{- This file was auto-generated from temporal/sdk/core/workflow_activation/workflow_activation.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.Sdk.Core.WorkflowActivation.WorkflowActivation (
        CancelWorkflow(), DoUpdate(), DoUpdate'HeadersEntry(), FireTimer(),
        NotifyHasPatch(), QueryWorkflow(), QueryWorkflow'HeadersEntry(),
        RemoveFromCache(), RemoveFromCache'EvictionReason(..),
        RemoveFromCache'EvictionReason(),
        RemoveFromCache'EvictionReason'UnrecognizedValue,
        ResolveActivity(), ResolveChildWorkflowExecution(),
        ResolveChildWorkflowExecutionStart(),
        ResolveChildWorkflowExecutionStart'Status(..),
        _ResolveChildWorkflowExecutionStart'Succeeded,
        _ResolveChildWorkflowExecutionStart'Failed,
        _ResolveChildWorkflowExecutionStart'Cancelled,
        ResolveChildWorkflowExecutionStartCancelled(),
        ResolveChildWorkflowExecutionStartFailure(),
        ResolveChildWorkflowExecutionStartSuccess(),
        ResolveRequestCancelExternalWorkflow(),
        ResolveSignalExternalWorkflow(), SignalWorkflow(),
        SignalWorkflow'HeadersEntry(), StartWorkflow(),
        StartWorkflow'HeadersEntry(), UpdateRandomSeed(),
        WorkflowActivation(), WorkflowActivationJob(),
        WorkflowActivationJob'Variant(..),
        _WorkflowActivationJob'StartWorkflow,
        _WorkflowActivationJob'FireTimer,
        _WorkflowActivationJob'UpdateRandomSeed,
        _WorkflowActivationJob'QueryWorkflow,
        _WorkflowActivationJob'CancelWorkflow,
        _WorkflowActivationJob'SignalWorkflow,
        _WorkflowActivationJob'ResolveActivity,
        _WorkflowActivationJob'NotifyHasPatch,
        _WorkflowActivationJob'ResolveChildWorkflowExecutionStart,
        _WorkflowActivationJob'ResolveChildWorkflowExecution,
        _WorkflowActivationJob'ResolveSignalExternalWorkflow,
        _WorkflowActivationJob'ResolveRequestCancelExternalWorkflow,
        _WorkflowActivationJob'DoUpdate,
        _WorkflowActivationJob'RemoveFromCache
    ) 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.Workflow
import qualified Proto.Temporal.Api.Failure.V1.Message
import qualified Proto.Temporal.Api.Update.V1.Message
import qualified Proto.Temporal.Sdk.Core.ActivityResult.ActivityResult
import qualified Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow
import qualified Proto.Temporal.Sdk.Core.Common.Common
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.details' @:: Lens' CancelWorkflow [Proto.Temporal.Api.Common.V1.Message.Payload]@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.vec'details' @:: Lens' CancelWorkflow (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data CancelWorkflow
  = CancelWorkflow'_constructor {CancelWorkflow -> Vector Payload
_CancelWorkflow'details :: !(Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload),
                                 CancelWorkflow -> FieldSet
_CancelWorkflow'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CancelWorkflow -> CancelWorkflow -> Bool
(CancelWorkflow -> CancelWorkflow -> Bool)
-> (CancelWorkflow -> CancelWorkflow -> Bool) -> Eq CancelWorkflow
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CancelWorkflow -> CancelWorkflow -> Bool
== :: CancelWorkflow -> CancelWorkflow -> Bool
$c/= :: CancelWorkflow -> CancelWorkflow -> Bool
/= :: CancelWorkflow -> CancelWorkflow -> Bool
Prelude.Eq, Eq CancelWorkflow
Eq CancelWorkflow =>
(CancelWorkflow -> CancelWorkflow -> Ordering)
-> (CancelWorkflow -> CancelWorkflow -> Bool)
-> (CancelWorkflow -> CancelWorkflow -> Bool)
-> (CancelWorkflow -> CancelWorkflow -> Bool)
-> (CancelWorkflow -> CancelWorkflow -> Bool)
-> (CancelWorkflow -> CancelWorkflow -> CancelWorkflow)
-> (CancelWorkflow -> CancelWorkflow -> CancelWorkflow)
-> Ord CancelWorkflow
CancelWorkflow -> CancelWorkflow -> Bool
CancelWorkflow -> CancelWorkflow -> Ordering
CancelWorkflow -> CancelWorkflow -> CancelWorkflow
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 :: CancelWorkflow -> CancelWorkflow -> Ordering
compare :: CancelWorkflow -> CancelWorkflow -> Ordering
$c< :: CancelWorkflow -> CancelWorkflow -> Bool
< :: CancelWorkflow -> CancelWorkflow -> Bool
$c<= :: CancelWorkflow -> CancelWorkflow -> Bool
<= :: CancelWorkflow -> CancelWorkflow -> Bool
$c> :: CancelWorkflow -> CancelWorkflow -> Bool
> :: CancelWorkflow -> CancelWorkflow -> Bool
$c>= :: CancelWorkflow -> CancelWorkflow -> Bool
>= :: CancelWorkflow -> CancelWorkflow -> Bool
$cmax :: CancelWorkflow -> CancelWorkflow -> CancelWorkflow
max :: CancelWorkflow -> CancelWorkflow -> CancelWorkflow
$cmin :: CancelWorkflow -> CancelWorkflow -> CancelWorkflow
min :: CancelWorkflow -> CancelWorkflow -> CancelWorkflow
Prelude.Ord)
instance Prelude.Show CancelWorkflow where
  showsPrec :: Int -> CancelWorkflow -> ShowS
showsPrec Int
_ CancelWorkflow
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (CancelWorkflow -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CancelWorkflow
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField CancelWorkflow "details" [Proto.Temporal.Api.Common.V1.Message.Payload] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "details"
-> ([Payload] -> f [Payload]) -> CancelWorkflow -> f CancelWorkflow
fieldOf Proxy# "details"
_
    = ((Vector Payload -> f (Vector Payload))
 -> CancelWorkflow -> f CancelWorkflow)
-> (([Payload] -> f [Payload])
    -> Vector Payload -> f (Vector Payload))
-> ([Payload] -> f [Payload])
-> CancelWorkflow
-> f CancelWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CancelWorkflow -> Vector Payload)
-> (CancelWorkflow -> Vector Payload -> CancelWorkflow)
-> Lens
     CancelWorkflow CancelWorkflow (Vector Payload) (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CancelWorkflow -> Vector Payload
_CancelWorkflow'details
           (\ CancelWorkflow
x__ Vector Payload
y__ -> CancelWorkflow
x__ {_CancelWorkflow'details = y__}))
        ((Vector Payload -> [Payload])
-> (Vector Payload -> [Payload] -> Vector Payload)
-> Lens (Vector Payload) (Vector Payload) [Payload] [Payload]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Payload -> [Payload]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Payload
_ [Payload]
y__ -> [Payload] -> Vector Payload
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Payload]
y__))
instance Data.ProtoLens.Field.HasField CancelWorkflow "vec'details" (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'details"
-> (Vector Payload -> f (Vector Payload))
-> CancelWorkflow
-> f CancelWorkflow
fieldOf Proxy# "vec'details"
_
    = ((Vector Payload -> f (Vector Payload))
 -> CancelWorkflow -> f CancelWorkflow)
-> ((Vector Payload -> f (Vector Payload))
    -> Vector Payload -> f (Vector Payload))
-> (Vector Payload -> f (Vector Payload))
-> CancelWorkflow
-> f CancelWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CancelWorkflow -> Vector Payload)
-> (CancelWorkflow -> Vector Payload -> CancelWorkflow)
-> Lens
     CancelWorkflow CancelWorkflow (Vector Payload) (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CancelWorkflow -> Vector Payload
_CancelWorkflow'details
           (\ CancelWorkflow
x__ Vector Payload
y__ -> CancelWorkflow
x__ {_CancelWorkflow'details = y__}))
        (Vector Payload -> f (Vector Payload))
-> Vector Payload -> f (Vector Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CancelWorkflow where
  messageName :: Proxy CancelWorkflow -> Text
messageName Proxy CancelWorkflow
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_activation.CancelWorkflow"
  packedMessageDescriptor :: Proxy CancelWorkflow -> ByteString
packedMessageDescriptor Proxy CancelWorkflow
_
    = ByteString
"\n\
      \\SOCancelWorkflow\DC29\n\
      \\adetails\CAN\SOH \ETX(\v2\US.temporal.api.common.v1.PayloadR\adetails"
  packedFileDescriptor :: Proxy CancelWorkflow -> ByteString
packedFileDescriptor Proxy CancelWorkflow
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CancelWorkflow)
fieldsByTag
    = let
        details__field_descriptor :: FieldDescriptor CancelWorkflow
details__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor CancelWorkflow Payload
-> FieldDescriptor CancelWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"details"
              (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)
              (Packing
-> Lens' CancelWorkflow [Payload]
-> FieldAccessor CancelWorkflow Payload
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 @"details")) ::
              Data.ProtoLens.FieldDescriptor CancelWorkflow
      in
        [(Tag, FieldDescriptor CancelWorkflow)]
-> Map Tag (FieldDescriptor CancelWorkflow)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor CancelWorkflow
details__field_descriptor)]
  unknownFields :: Lens' CancelWorkflow FieldSet
unknownFields
    = (CancelWorkflow -> FieldSet)
-> (CancelWorkflow -> FieldSet -> CancelWorkflow)
-> Lens' CancelWorkflow FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CancelWorkflow -> FieldSet
_CancelWorkflow'_unknownFields
        (\ CancelWorkflow
x__ FieldSet
y__ -> CancelWorkflow
x__ {_CancelWorkflow'_unknownFields = y__})
  defMessage :: CancelWorkflow
defMessage
    = CancelWorkflow'_constructor
        {_CancelWorkflow'details :: Vector Payload
_CancelWorkflow'details = Vector Payload
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _CancelWorkflow'_unknownFields :: FieldSet
_CancelWorkflow'_unknownFields = []}
  parseMessage :: Parser CancelWorkflow
parseMessage
    = let
        loop ::
          CancelWorkflow
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Common.V1.Message.Payload
             -> Data.ProtoLens.Encoding.Bytes.Parser CancelWorkflow
        loop :: CancelWorkflow
-> Growing Vector RealWorld Payload -> Parser CancelWorkflow
loop CancelWorkflow
x Growing Vector RealWorld Payload
mutable'details
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'details <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                          (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                             mutable'details)
                      (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'details") frozen'details x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> 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
"details"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'details 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'details
      in
        Parser CancelWorkflow -> String -> Parser CancelWorkflow
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'details <- IO (Growing Vector RealWorld Payload)
-> Parser (Growing Vector RealWorld Payload)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                   IO (Growing Vector RealWorld Payload)
IO (Growing Vector (PrimState IO) Payload)
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'details)
          String
"CancelWorkflow"
  buildMessage :: CancelWorkflow -> Builder
buildMessage
    = \ CancelWorkflow
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((Payload -> Builder) -> Vector Payload -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ Payload
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((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))
                (FoldLike
  (Vector Payload)
  CancelWorkflow
  CancelWorkflow
  (Vector Payload)
  (Vector Payload)
-> CancelWorkflow -> Vector 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 @"vec'details") CancelWorkflow
_x))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike FieldSet CancelWorkflow CancelWorkflow FieldSet FieldSet
-> CancelWorkflow -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet CancelWorkflow CancelWorkflow FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' CancelWorkflow FieldSet
Data.ProtoLens.unknownFields CancelWorkflow
_x))
instance Control.DeepSeq.NFData CancelWorkflow where
  rnf :: CancelWorkflow -> ()
rnf
    = \ CancelWorkflow
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CancelWorkflow -> FieldSet
_CancelWorkflow'_unknownFields CancelWorkflow
x__)
             (Vector Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (CancelWorkflow -> Vector Payload
_CancelWorkflow'details CancelWorkflow
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.id' @:: Lens' DoUpdate Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.protocolInstanceId' @:: Lens' DoUpdate Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.name' @:: Lens' DoUpdate Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.input' @:: Lens' DoUpdate [Proto.Temporal.Api.Common.V1.Message.Payload]@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.vec'input' @:: Lens' DoUpdate (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.headers' @:: Lens' DoUpdate (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.meta' @:: Lens' DoUpdate Proto.Temporal.Api.Update.V1.Message.Meta@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'meta' @:: Lens' DoUpdate (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Meta)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.runValidator' @:: Lens' DoUpdate Prelude.Bool@ -}
data DoUpdate
  = DoUpdate'_constructor {DoUpdate -> Text
_DoUpdate'id :: !Data.Text.Text,
                           DoUpdate -> Text
_DoUpdate'protocolInstanceId :: !Data.Text.Text,
                           DoUpdate -> Text
_DoUpdate'name :: !Data.Text.Text,
                           DoUpdate -> Vector Payload
_DoUpdate'input :: !(Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload),
                           DoUpdate -> Map Text Payload
_DoUpdate'headers :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload),
                           DoUpdate -> Maybe Meta
_DoUpdate'meta :: !(Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Meta),
                           DoUpdate -> Bool
_DoUpdate'runValidator :: !Prelude.Bool,
                           DoUpdate -> FieldSet
_DoUpdate'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DoUpdate -> DoUpdate -> Bool
(DoUpdate -> DoUpdate -> Bool)
-> (DoUpdate -> DoUpdate -> Bool) -> Eq DoUpdate
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DoUpdate -> DoUpdate -> Bool
== :: DoUpdate -> DoUpdate -> Bool
$c/= :: DoUpdate -> DoUpdate -> Bool
/= :: DoUpdate -> DoUpdate -> Bool
Prelude.Eq, Eq DoUpdate
Eq DoUpdate =>
(DoUpdate -> DoUpdate -> Ordering)
-> (DoUpdate -> DoUpdate -> Bool)
-> (DoUpdate -> DoUpdate -> Bool)
-> (DoUpdate -> DoUpdate -> Bool)
-> (DoUpdate -> DoUpdate -> Bool)
-> (DoUpdate -> DoUpdate -> DoUpdate)
-> (DoUpdate -> DoUpdate -> DoUpdate)
-> Ord DoUpdate
DoUpdate -> DoUpdate -> Bool
DoUpdate -> DoUpdate -> Ordering
DoUpdate -> DoUpdate -> DoUpdate
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 :: DoUpdate -> DoUpdate -> Ordering
compare :: DoUpdate -> DoUpdate -> Ordering
$c< :: DoUpdate -> DoUpdate -> Bool
< :: DoUpdate -> DoUpdate -> Bool
$c<= :: DoUpdate -> DoUpdate -> Bool
<= :: DoUpdate -> DoUpdate -> Bool
$c> :: DoUpdate -> DoUpdate -> Bool
> :: DoUpdate -> DoUpdate -> Bool
$c>= :: DoUpdate -> DoUpdate -> Bool
>= :: DoUpdate -> DoUpdate -> Bool
$cmax :: DoUpdate -> DoUpdate -> DoUpdate
max :: DoUpdate -> DoUpdate -> DoUpdate
$cmin :: DoUpdate -> DoUpdate -> DoUpdate
min :: DoUpdate -> DoUpdate -> DoUpdate
Prelude.Ord)
instance Prelude.Show DoUpdate where
  showsPrec :: Int -> DoUpdate -> ShowS
showsPrec Int
_ DoUpdate
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DoUpdate -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DoUpdate
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DoUpdate "id" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "id" -> (Text -> f Text) -> DoUpdate -> f DoUpdate
fieldOf Proxy# "id"
_
    = ((Text -> f Text) -> DoUpdate -> f DoUpdate)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DoUpdate
-> f DoUpdate
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DoUpdate -> Text)
-> (DoUpdate -> Text -> DoUpdate)
-> Lens DoUpdate DoUpdate Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DoUpdate -> Text
_DoUpdate'id (\ DoUpdate
x__ Text
y__ -> DoUpdate
x__ {_DoUpdate'id = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DoUpdate "protocolInstanceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "protocolInstanceId"
-> (Text -> f Text) -> DoUpdate -> f DoUpdate
fieldOf Proxy# "protocolInstanceId"
_
    = ((Text -> f Text) -> DoUpdate -> f DoUpdate)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DoUpdate
-> f DoUpdate
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DoUpdate -> Text)
-> (DoUpdate -> Text -> DoUpdate)
-> Lens DoUpdate DoUpdate Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DoUpdate -> Text
_DoUpdate'protocolInstanceId
           (\ DoUpdate
x__ Text
y__ -> DoUpdate
x__ {_DoUpdate'protocolInstanceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DoUpdate "name" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "name" -> (Text -> f Text) -> DoUpdate -> f DoUpdate
fieldOf Proxy# "name"
_
    = ((Text -> f Text) -> DoUpdate -> f DoUpdate)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DoUpdate
-> f DoUpdate
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DoUpdate -> Text)
-> (DoUpdate -> Text -> DoUpdate)
-> Lens DoUpdate DoUpdate Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DoUpdate -> Text
_DoUpdate'name (\ DoUpdate
x__ Text
y__ -> DoUpdate
x__ {_DoUpdate'name = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DoUpdate "input" [Proto.Temporal.Api.Common.V1.Message.Payload] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "input"
-> ([Payload] -> f [Payload]) -> DoUpdate -> f DoUpdate
fieldOf Proxy# "input"
_
    = ((Vector Payload -> f (Vector Payload)) -> DoUpdate -> f DoUpdate)
-> (([Payload] -> f [Payload])
    -> Vector Payload -> f (Vector Payload))
-> ([Payload] -> f [Payload])
-> DoUpdate
-> f DoUpdate
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DoUpdate -> Vector Payload)
-> (DoUpdate -> Vector Payload -> DoUpdate)
-> Lens DoUpdate DoUpdate (Vector Payload) (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DoUpdate -> Vector Payload
_DoUpdate'input (\ DoUpdate
x__ Vector Payload
y__ -> DoUpdate
x__ {_DoUpdate'input = y__}))
        ((Vector Payload -> [Payload])
-> (Vector Payload -> [Payload] -> Vector Payload)
-> Lens (Vector Payload) (Vector Payload) [Payload] [Payload]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Payload -> [Payload]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Payload
_ [Payload]
y__ -> [Payload] -> Vector Payload
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Payload]
y__))
instance Data.ProtoLens.Field.HasField DoUpdate "vec'input" (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'input"
-> (Vector Payload -> f (Vector Payload)) -> DoUpdate -> f DoUpdate
fieldOf Proxy# "vec'input"
_
    = ((Vector Payload -> f (Vector Payload)) -> DoUpdate -> f DoUpdate)
-> ((Vector Payload -> f (Vector Payload))
    -> Vector Payload -> f (Vector Payload))
-> (Vector Payload -> f (Vector Payload))
-> DoUpdate
-> f DoUpdate
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DoUpdate -> Vector Payload)
-> (DoUpdate -> Vector Payload -> DoUpdate)
-> Lens DoUpdate DoUpdate (Vector Payload) (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DoUpdate -> Vector Payload
_DoUpdate'input (\ DoUpdate
x__ Vector Payload
y__ -> DoUpdate
x__ {_DoUpdate'input = y__}))
        (Vector Payload -> f (Vector Payload))
-> Vector Payload -> f (Vector Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DoUpdate "headers" (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "headers"
-> (Map Text Payload -> f (Map Text Payload))
-> DoUpdate
-> f DoUpdate
fieldOf Proxy# "headers"
_
    = ((Map Text Payload -> f (Map Text Payload))
 -> DoUpdate -> f DoUpdate)
-> ((Map Text Payload -> f (Map Text Payload))
    -> Map Text Payload -> f (Map Text Payload))
-> (Map Text Payload -> f (Map Text Payload))
-> DoUpdate
-> f DoUpdate
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DoUpdate -> Map Text Payload)
-> (DoUpdate -> Map Text Payload -> DoUpdate)
-> Lens DoUpdate DoUpdate (Map Text Payload) (Map Text Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DoUpdate -> Map Text Payload
_DoUpdate'headers (\ DoUpdate
x__ Map Text Payload
y__ -> DoUpdate
x__ {_DoUpdate'headers = y__}))
        (Map Text Payload -> f (Map Text Payload))
-> Map Text Payload -> f (Map Text Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DoUpdate "meta" Proto.Temporal.Api.Update.V1.Message.Meta where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "meta" -> (Meta -> f Meta) -> DoUpdate -> f DoUpdate
fieldOf Proxy# "meta"
_
    = ((Maybe Meta -> f (Maybe Meta)) -> DoUpdate -> f DoUpdate)
-> ((Meta -> f Meta) -> Maybe Meta -> f (Maybe Meta))
-> (Meta -> f Meta)
-> DoUpdate
-> f DoUpdate
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DoUpdate -> Maybe Meta)
-> (DoUpdate -> Maybe Meta -> DoUpdate)
-> Lens DoUpdate DoUpdate (Maybe Meta) (Maybe Meta)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DoUpdate -> Maybe Meta
_DoUpdate'meta (\ DoUpdate
x__ Maybe Meta
y__ -> DoUpdate
x__ {_DoUpdate'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 DoUpdate "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)) -> DoUpdate -> f DoUpdate
fieldOf Proxy# "maybe'meta"
_
    = ((Maybe Meta -> f (Maybe Meta)) -> DoUpdate -> f DoUpdate)
-> ((Maybe Meta -> f (Maybe Meta)) -> Maybe Meta -> f (Maybe Meta))
-> (Maybe Meta -> f (Maybe Meta))
-> DoUpdate
-> f DoUpdate
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DoUpdate -> Maybe Meta)
-> (DoUpdate -> Maybe Meta -> DoUpdate)
-> Lens DoUpdate DoUpdate (Maybe Meta) (Maybe Meta)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DoUpdate -> Maybe Meta
_DoUpdate'meta (\ DoUpdate
x__ Maybe Meta
y__ -> DoUpdate
x__ {_DoUpdate'meta = y__}))
        (Maybe Meta -> f (Maybe Meta)) -> Maybe Meta -> f (Maybe Meta)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DoUpdate "runValidator" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "runValidator" -> (Bool -> f Bool) -> DoUpdate -> f DoUpdate
fieldOf Proxy# "runValidator"
_
    = ((Bool -> f Bool) -> DoUpdate -> f DoUpdate)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> DoUpdate
-> f DoUpdate
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DoUpdate -> Bool)
-> (DoUpdate -> Bool -> DoUpdate)
-> Lens DoUpdate DoUpdate Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DoUpdate -> Bool
_DoUpdate'runValidator
           (\ DoUpdate
x__ Bool
y__ -> DoUpdate
x__ {_DoUpdate'runValidator = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DoUpdate where
  messageName :: Proxy DoUpdate -> Text
messageName Proxy DoUpdate
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_activation.DoUpdate"
  packedMessageDescriptor :: Proxy DoUpdate -> ByteString
packedMessageDescriptor Proxy DoUpdate
_
    = ByteString
"\n\
      \\bDoUpdate\DC2\SO\n\
      \\STXid\CAN\SOH \SOH(\tR\STXid\DC20\n\
      \\DC4protocol_instance_id\CAN\STX \SOH(\tR\DC2protocolInstanceId\DC2\DC2\n\
      \\EOTname\CAN\ETX \SOH(\tR\EOTname\DC25\n\
      \\ENQinput\CAN\EOT \ETX(\v2\US.temporal.api.common.v1.PayloadR\ENQinput\DC2L\n\
      \\aheaders\CAN\ENQ \ETX(\v22.coresdk.workflow_activation.DoUpdate.HeadersEntryR\aheaders\DC20\n\
      \\EOTmeta\CAN\ACK \SOH(\v2\FS.temporal.api.update.v1.MetaR\EOTmeta\DC2#\n\
      \\rrun_validator\CAN\a \SOH(\bR\frunValidator\SUB[\n\
      \\fHeadersEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\
      \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy DoUpdate -> ByteString
packedFileDescriptor Proxy DoUpdate
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DoUpdate)
fieldsByTag
    = let
        id__field_descriptor :: FieldDescriptor DoUpdate
id__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DoUpdate Text
-> FieldDescriptor DoUpdate
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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 DoUpdate DoUpdate Text Text -> FieldAccessor DoUpdate 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 @"id")) ::
              Data.ProtoLens.FieldDescriptor DoUpdate
        protocolInstanceId__field_descriptor :: FieldDescriptor DoUpdate
protocolInstanceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DoUpdate Text
-> FieldDescriptor DoUpdate
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 DoUpdate DoUpdate Text Text -> FieldAccessor DoUpdate 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 DoUpdate
        name__field_descriptor :: FieldDescriptor DoUpdate
name__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DoUpdate Text
-> FieldDescriptor DoUpdate
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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 DoUpdate DoUpdate Text Text -> FieldAccessor DoUpdate 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 @"name")) ::
              Data.ProtoLens.FieldDescriptor DoUpdate
        input__field_descriptor :: FieldDescriptor DoUpdate
input__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor DoUpdate Payload
-> FieldDescriptor DoUpdate
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)
              (Packing
-> Lens' DoUpdate [Payload] -> FieldAccessor DoUpdate Payload
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 @"input")) ::
              Data.ProtoLens.FieldDescriptor DoUpdate
        headers__field_descriptor :: FieldDescriptor DoUpdate
headers__field_descriptor
          = String
-> FieldTypeDescriptor DoUpdate'HeadersEntry
-> FieldAccessor DoUpdate DoUpdate'HeadersEntry
-> FieldDescriptor DoUpdate
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"headers"
              (MessageOrGroup -> FieldTypeDescriptor DoUpdate'HeadersEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor DoUpdate'HeadersEntry)
              (Lens' DoUpdate'HeadersEntry Text
-> Lens' DoUpdate'HeadersEntry Payload
-> Lens DoUpdate DoUpdate (Map Text Payload) (Map Text Payload)
-> FieldAccessor DoUpdate DoUpdate'HeadersEntry
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 @"headers")) ::
              Data.ProtoLens.FieldDescriptor DoUpdate
        meta__field_descriptor :: FieldDescriptor DoUpdate
meta__field_descriptor
          = String
-> FieldTypeDescriptor Meta
-> FieldAccessor DoUpdate Meta
-> FieldDescriptor DoUpdate
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 DoUpdate DoUpdate (Maybe Meta) (Maybe Meta)
-> FieldAccessor DoUpdate 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 DoUpdate
        runValidator__field_descriptor :: FieldDescriptor DoUpdate
runValidator__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor DoUpdate Bool
-> FieldDescriptor DoUpdate
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"run_validator"
              (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 DoUpdate DoUpdate Bool Bool -> FieldAccessor DoUpdate 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 @"runValidator")) ::
              Data.ProtoLens.FieldDescriptor DoUpdate
      in
        [(Tag, FieldDescriptor DoUpdate)]
-> Map Tag (FieldDescriptor DoUpdate)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DoUpdate
id__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DoUpdate
protocolInstanceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor DoUpdate
name__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor DoUpdate
input__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor DoUpdate
headers__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor DoUpdate
meta__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor DoUpdate
runValidator__field_descriptor)]
  unknownFields :: Lens' DoUpdate FieldSet
unknownFields
    = (DoUpdate -> FieldSet)
-> (DoUpdate -> FieldSet -> DoUpdate) -> Lens' DoUpdate FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DoUpdate -> FieldSet
_DoUpdate'_unknownFields
        (\ DoUpdate
x__ FieldSet
y__ -> DoUpdate
x__ {_DoUpdate'_unknownFields = y__})
  defMessage :: DoUpdate
defMessage
    = DoUpdate'_constructor
        {_DoUpdate'id :: Text
_DoUpdate'id = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DoUpdate'protocolInstanceId :: Text
_DoUpdate'protocolInstanceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DoUpdate'name :: Text
_DoUpdate'name = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DoUpdate'input :: Vector Payload
_DoUpdate'input = Vector Payload
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _DoUpdate'headers :: Map Text Payload
_DoUpdate'headers = Map Text Payload
forall k a. Map k a
Data.Map.empty,
         _DoUpdate'meta :: Maybe Meta
_DoUpdate'meta = Maybe Meta
forall a. Maybe a
Prelude.Nothing,
         _DoUpdate'runValidator :: Bool
_DoUpdate'runValidator = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DoUpdate'_unknownFields :: FieldSet
_DoUpdate'_unknownFields = []}
  parseMessage :: Parser DoUpdate
parseMessage
    = let
        loop ::
          DoUpdate
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Common.V1.Message.Payload
             -> Data.ProtoLens.Encoding.Bytes.Parser DoUpdate
        loop :: DoUpdate -> Growing Vector RealWorld Payload -> Parser DoUpdate
loop DoUpdate
x Growing Vector RealWorld Payload
mutable'input
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'input <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                        (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'input)
                      (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'input") frozen'input 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
"id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"id") y x)
                                  mutable'input
                        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
"protocol_instance_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"protocolInstanceId") y x)
                                  mutable'input
                        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
"name"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"name") y x)
                                  mutable'input
                        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"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'input y)
                                loop x v
                        Word64
42
                          -> do !(entry :: DoUpdate'HeadersEntry) <- Parser DoUpdate'HeadersEntry
-> String -> Parser DoUpdate'HeadersEntry
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
"headers"
                                (let
                                   key = FoldLike Text DoUpdate'HeadersEntry DoUpdate'HeadersEntry Text Text
-> DoUpdate'HeadersEntry -> 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") DoUpdate'HeadersEntry
entry
                                   value
                                     = FoldLike
  Payload DoUpdate'HeadersEntry DoUpdate'HeadersEntry Payload Payload
-> DoUpdate'HeadersEntry -> 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 @"value") DoUpdate'HeadersEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"headers")
                                        (\ !Map Text Payload
t -> Text -> Payload -> Map Text Payload -> Map Text Payload
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key Payload
value Map Text Payload
t) x)
                                     mutable'input)
                        Word64
50
                          -> 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)
                                  mutable'input
                        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
"run_validator"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"runValidator") y x)
                                  mutable'input
                        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'input
      in
        Parser DoUpdate -> String -> Parser DoUpdate
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'input <- IO (Growing Vector RealWorld Payload)
-> Parser (Growing Vector RealWorld Payload)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                 IO (Growing Vector RealWorld Payload)
IO (Growing Vector (PrimState IO) Payload)
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'input)
          String
"DoUpdate"
  buildMessage :: DoUpdate -> Builder
buildMessage
    = \ DoUpdate
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike Text DoUpdate DoUpdate Text Text -> DoUpdate -> 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 @"id") DoUpdate
_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 DoUpdate DoUpdate Text Text -> DoUpdate -> 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") DoUpdate
_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 DoUpdate DoUpdate Text Text -> DoUpdate -> 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 @"name") DoUpdate
_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.<>)
                      ((Payload -> Builder) -> Vector Payload -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                         (\ 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))
                         (FoldLike
  (Vector Payload)
  DoUpdate
  DoUpdate
  (Vector Payload)
  (Vector Payload)
-> DoUpdate -> Vector 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 @"vec'input") DoUpdate
_x))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                            (((Text, Payload) -> Builder) -> [(Text, Payload)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                               (\ (Text, Payload)
_v
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                       ((ByteString -> Builder)
-> (DoUpdate'HeadersEntry -> ByteString)
-> DoUpdate'HeadersEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                          (\ ByteString
bs
                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                        (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                          DoUpdate'HeadersEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                          (Setter DoUpdate'HeadersEntry DoUpdate'HeadersEntry Text Text
-> Text -> DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry
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, Payload) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, Payload)
_v)
                                             (Setter DoUpdate'HeadersEntry DoUpdate'HeadersEntry Payload Payload
-> Payload -> DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry
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, Payload) -> Payload
forall a b. (a, b) -> b
Prelude.snd (Text, Payload)
_v)
                                                (DoUpdate'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                   DoUpdate'HeadersEntry)))))
                               (Map Text Payload -> [(Text, Payload)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                  (FoldLike
  (Map Text Payload)
  DoUpdate
  DoUpdate
  (Map Text Payload)
  (Map Text Payload)
-> DoUpdate -> Map Text 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 @"headers") DoUpdate
_x))))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (case
                                 FoldLike (Maybe Meta) DoUpdate DoUpdate (Maybe Meta) (Maybe Meta)
-> DoUpdate -> 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") DoUpdate
_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
50)
                                      ((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 :: Bool
_v
                                    = FoldLike Bool DoUpdate DoUpdate Bool Bool -> DoUpdate -> 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 @"runValidator") DoUpdate
_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))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike FieldSet DoUpdate DoUpdate FieldSet FieldSet
-> DoUpdate -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet DoUpdate DoUpdate FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DoUpdate FieldSet
Data.ProtoLens.unknownFields DoUpdate
_x))))))))
instance Control.DeepSeq.NFData DoUpdate where
  rnf :: DoUpdate -> ()
rnf
    = \ DoUpdate
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DoUpdate -> FieldSet
_DoUpdate'_unknownFields DoUpdate
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DoUpdate -> Text
_DoUpdate'id DoUpdate
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (DoUpdate -> Text
_DoUpdate'protocolInstanceId DoUpdate
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (DoUpdate -> Text
_DoUpdate'name DoUpdate
x__)
                      (Vector Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (DoUpdate -> Vector Payload
_DoUpdate'input DoUpdate
x__)
                         (Map Text Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (DoUpdate -> Map Text Payload
_DoUpdate'headers DoUpdate
x__)
                            (Maybe Meta -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (DoUpdate -> Maybe Meta
_DoUpdate'meta DoUpdate
x__)
                               (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (DoUpdate -> Bool
_DoUpdate'runValidator DoUpdate
x__) ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.key' @:: Lens' DoUpdate'HeadersEntry Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.value' @:: Lens' DoUpdate'HeadersEntry Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'value' @:: Lens' DoUpdate'HeadersEntry (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data DoUpdate'HeadersEntry
  = DoUpdate'HeadersEntry'_constructor {DoUpdate'HeadersEntry -> Text
_DoUpdate'HeadersEntry'key :: !Data.Text.Text,
                                        DoUpdate'HeadersEntry -> Maybe Payload
_DoUpdate'HeadersEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                        DoUpdate'HeadersEntry -> FieldSet
_DoUpdate'HeadersEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool
(DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool)
-> (DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool)
-> Eq DoUpdate'HeadersEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool
== :: DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool
$c/= :: DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool
/= :: DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool
Prelude.Eq, Eq DoUpdate'HeadersEntry
Eq DoUpdate'HeadersEntry =>
(DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Ordering)
-> (DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool)
-> (DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool)
-> (DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool)
-> (DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool)
-> (DoUpdate'HeadersEntry
    -> DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry)
-> (DoUpdate'HeadersEntry
    -> DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry)
-> Ord DoUpdate'HeadersEntry
DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool
DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Ordering
DoUpdate'HeadersEntry
-> DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry
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 :: DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Ordering
compare :: DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Ordering
$c< :: DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool
< :: DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool
$c<= :: DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool
<= :: DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool
$c> :: DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool
> :: DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool
$c>= :: DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool
>= :: DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry -> Bool
$cmax :: DoUpdate'HeadersEntry
-> DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry
max :: DoUpdate'HeadersEntry
-> DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry
$cmin :: DoUpdate'HeadersEntry
-> DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry
min :: DoUpdate'HeadersEntry
-> DoUpdate'HeadersEntry -> DoUpdate'HeadersEntry
Prelude.Ord)
instance Prelude.Show DoUpdate'HeadersEntry where
  showsPrec :: Int -> DoUpdate'HeadersEntry -> ShowS
showsPrec Int
_ DoUpdate'HeadersEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DoUpdate'HeadersEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DoUpdate'HeadersEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DoUpdate'HeadersEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> DoUpdate'HeadersEntry
-> f DoUpdate'HeadersEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> DoUpdate'HeadersEntry -> f DoUpdate'HeadersEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DoUpdate'HeadersEntry
-> f DoUpdate'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DoUpdate'HeadersEntry -> Text)
-> (DoUpdate'HeadersEntry -> Text -> DoUpdate'HeadersEntry)
-> Lens' DoUpdate'HeadersEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DoUpdate'HeadersEntry -> Text
_DoUpdate'HeadersEntry'key
           (\ DoUpdate'HeadersEntry
x__ Text
y__ -> DoUpdate'HeadersEntry
x__ {_DoUpdate'HeadersEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DoUpdate'HeadersEntry "value" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Payload -> f Payload)
-> DoUpdate'HeadersEntry
-> f DoUpdate'HeadersEntry
fieldOf Proxy# "value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> DoUpdate'HeadersEntry -> f DoUpdate'HeadersEntry)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> DoUpdate'HeadersEntry
-> f DoUpdate'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DoUpdate'HeadersEntry -> Maybe Payload)
-> (DoUpdate'HeadersEntry
    -> Maybe Payload -> DoUpdate'HeadersEntry)
-> Lens
     DoUpdate'HeadersEntry
     DoUpdate'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DoUpdate'HeadersEntry -> Maybe Payload
_DoUpdate'HeadersEntry'value
           (\ DoUpdate'HeadersEntry
x__ Maybe Payload
y__ -> DoUpdate'HeadersEntry
x__ {_DoUpdate'HeadersEntry'value = 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 DoUpdate'HeadersEntry "maybe'value" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'value"
-> (Maybe Payload -> f (Maybe Payload))
-> DoUpdate'HeadersEntry
-> f DoUpdate'HeadersEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> DoUpdate'HeadersEntry -> f DoUpdate'HeadersEntry)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> DoUpdate'HeadersEntry
-> f DoUpdate'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DoUpdate'HeadersEntry -> Maybe Payload)
-> (DoUpdate'HeadersEntry
    -> Maybe Payload -> DoUpdate'HeadersEntry)
-> Lens
     DoUpdate'HeadersEntry
     DoUpdate'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DoUpdate'HeadersEntry -> Maybe Payload
_DoUpdate'HeadersEntry'value
           (\ DoUpdate'HeadersEntry
x__ Maybe Payload
y__ -> DoUpdate'HeadersEntry
x__ {_DoUpdate'HeadersEntry'value = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DoUpdate'HeadersEntry where
  messageName :: Proxy DoUpdate'HeadersEntry -> Text
messageName Proxy DoUpdate'HeadersEntry
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_activation.DoUpdate.HeadersEntry"
  packedMessageDescriptor :: Proxy DoUpdate'HeadersEntry -> ByteString
packedMessageDescriptor Proxy DoUpdate'HeadersEntry
_
    = ByteString
"\n\
      \\fHeadersEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\
      \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy DoUpdate'HeadersEntry -> ByteString
packedFileDescriptor Proxy DoUpdate'HeadersEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DoUpdate'HeadersEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor DoUpdate'HeadersEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DoUpdate'HeadersEntry Text
-> FieldDescriptor DoUpdate'HeadersEntry
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' DoUpdate'HeadersEntry Text
-> FieldAccessor DoUpdate'HeadersEntry 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 DoUpdate'HeadersEntry
        value__field_descriptor :: FieldDescriptor DoUpdate'HeadersEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor DoUpdate'HeadersEntry Payload
-> FieldDescriptor DoUpdate'HeadersEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"value"
              (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
  DoUpdate'HeadersEntry
  DoUpdate'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor DoUpdate'HeadersEntry 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'value")) ::
              Data.ProtoLens.FieldDescriptor DoUpdate'HeadersEntry
      in
        [(Tag, FieldDescriptor DoUpdate'HeadersEntry)]
-> Map Tag (FieldDescriptor DoUpdate'HeadersEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DoUpdate'HeadersEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DoUpdate'HeadersEntry
value__field_descriptor)]
  unknownFields :: Lens' DoUpdate'HeadersEntry FieldSet
unknownFields
    = (DoUpdate'HeadersEntry -> FieldSet)
-> (DoUpdate'HeadersEntry -> FieldSet -> DoUpdate'HeadersEntry)
-> Lens' DoUpdate'HeadersEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DoUpdate'HeadersEntry -> FieldSet
_DoUpdate'HeadersEntry'_unknownFields
        (\ DoUpdate'HeadersEntry
x__ FieldSet
y__ -> DoUpdate'HeadersEntry
x__ {_DoUpdate'HeadersEntry'_unknownFields = y__})
  defMessage :: DoUpdate'HeadersEntry
defMessage
    = DoUpdate'HeadersEntry'_constructor
        {_DoUpdate'HeadersEntry'key :: Text
_DoUpdate'HeadersEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DoUpdate'HeadersEntry'value :: Maybe Payload
_DoUpdate'HeadersEntry'value = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _DoUpdate'HeadersEntry'_unknownFields :: FieldSet
_DoUpdate'HeadersEntry'_unknownFields = []}
  parseMessage :: Parser DoUpdate'HeadersEntry
parseMessage
    = let
        loop ::
          DoUpdate'HeadersEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser DoUpdate'HeadersEntry
        loop :: DoUpdate'HeadersEntry -> Parser DoUpdate'HeadersEntry
loop DoUpdate'HeadersEntry
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 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
"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 DoUpdate'HeadersEntry
-> String -> Parser DoUpdate'HeadersEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do DoUpdate'HeadersEntry -> Parser DoUpdate'HeadersEntry
loop DoUpdate'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"HeadersEntry"
  buildMessage :: DoUpdate'HeadersEntry -> Builder
buildMessage
    = \ DoUpdate'HeadersEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike Text DoUpdate'HeadersEntry DoUpdate'HeadersEntry Text Text
-> DoUpdate'HeadersEntry -> 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") DoUpdate'HeadersEntry
_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 Payload)
  DoUpdate'HeadersEntry
  DoUpdate'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> DoUpdate'HeadersEntry -> 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'value") DoUpdate'HeadersEntry
_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
  DoUpdate'HeadersEntry
  DoUpdate'HeadersEntry
  FieldSet
  FieldSet
-> DoUpdate'HeadersEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DoUpdate'HeadersEntry
  DoUpdate'HeadersEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DoUpdate'HeadersEntry FieldSet
Data.ProtoLens.unknownFields DoUpdate'HeadersEntry
_x)))
instance Control.DeepSeq.NFData DoUpdate'HeadersEntry where
  rnf :: DoUpdate'HeadersEntry -> ()
rnf
    = \ DoUpdate'HeadersEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DoUpdate'HeadersEntry -> FieldSet
_DoUpdate'HeadersEntry'_unknownFields DoUpdate'HeadersEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DoUpdate'HeadersEntry -> Text
_DoUpdate'HeadersEntry'key DoUpdate'HeadersEntry
x__)
                (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (DoUpdate'HeadersEntry -> Maybe Payload
_DoUpdate'HeadersEntry'value DoUpdate'HeadersEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.seq' @:: Lens' FireTimer Data.Word.Word32@ -}
data FireTimer
  = FireTimer'_constructor {FireTimer -> Word32
_FireTimer'seq :: !Data.Word.Word32,
                            FireTimer -> FieldSet
_FireTimer'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (FireTimer -> FireTimer -> Bool
(FireTimer -> FireTimer -> Bool)
-> (FireTimer -> FireTimer -> Bool) -> Eq FireTimer
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: FireTimer -> FireTimer -> Bool
== :: FireTimer -> FireTimer -> Bool
$c/= :: FireTimer -> FireTimer -> Bool
/= :: FireTimer -> FireTimer -> Bool
Prelude.Eq, Eq FireTimer
Eq FireTimer =>
(FireTimer -> FireTimer -> Ordering)
-> (FireTimer -> FireTimer -> Bool)
-> (FireTimer -> FireTimer -> Bool)
-> (FireTimer -> FireTimer -> Bool)
-> (FireTimer -> FireTimer -> Bool)
-> (FireTimer -> FireTimer -> FireTimer)
-> (FireTimer -> FireTimer -> FireTimer)
-> Ord FireTimer
FireTimer -> FireTimer -> Bool
FireTimer -> FireTimer -> Ordering
FireTimer -> FireTimer -> FireTimer
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 :: FireTimer -> FireTimer -> Ordering
compare :: FireTimer -> FireTimer -> Ordering
$c< :: FireTimer -> FireTimer -> Bool
< :: FireTimer -> FireTimer -> Bool
$c<= :: FireTimer -> FireTimer -> Bool
<= :: FireTimer -> FireTimer -> Bool
$c> :: FireTimer -> FireTimer -> Bool
> :: FireTimer -> FireTimer -> Bool
$c>= :: FireTimer -> FireTimer -> Bool
>= :: FireTimer -> FireTimer -> Bool
$cmax :: FireTimer -> FireTimer -> FireTimer
max :: FireTimer -> FireTimer -> FireTimer
$cmin :: FireTimer -> FireTimer -> FireTimer
min :: FireTimer -> FireTimer -> FireTimer
Prelude.Ord)
instance Prelude.Show FireTimer where
  showsPrec :: Int -> FireTimer -> ShowS
showsPrec Int
_ FireTimer
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (FireTimer -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort FireTimer
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField FireTimer "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq" -> (Word32 -> f Word32) -> FireTimer -> f FireTimer
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32) -> FireTimer -> f FireTimer)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> FireTimer
-> f FireTimer
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((FireTimer -> Word32)
-> (FireTimer -> Word32 -> FireTimer)
-> Lens FireTimer FireTimer Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           FireTimer -> Word32
_FireTimer'seq (\ FireTimer
x__ Word32
y__ -> FireTimer
x__ {_FireTimer'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message FireTimer where
  messageName :: Proxy FireTimer -> Text
messageName Proxy FireTimer
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_activation.FireTimer"
  packedMessageDescriptor :: Proxy FireTimer -> ByteString
packedMessageDescriptor Proxy FireTimer
_
    = ByteString
"\n\
      \\tFireTimer\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq"
  packedFileDescriptor :: Proxy FireTimer -> ByteString
packedFileDescriptor Proxy FireTimer
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor FireTimer)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor FireTimer
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor FireTimer Word32
-> FieldDescriptor FireTimer
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"seq"
              (ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
              (WireDefault Word32
-> Lens FireTimer FireTimer Word32 Word32
-> FieldAccessor FireTimer Word32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word32
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 @"seq")) ::
              Data.ProtoLens.FieldDescriptor FireTimer
      in
        [(Tag, FieldDescriptor FireTimer)]
-> Map Tag (FieldDescriptor FireTimer)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor FireTimer
seq__field_descriptor)]
  unknownFields :: Lens' FireTimer FieldSet
unknownFields
    = (FireTimer -> FieldSet)
-> (FireTimer -> FieldSet -> FireTimer) -> Lens' FireTimer FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        FireTimer -> FieldSet
_FireTimer'_unknownFields
        (\ FireTimer
x__ FieldSet
y__ -> FireTimer
x__ {_FireTimer'_unknownFields = y__})
  defMessage :: FireTimer
defMessage
    = FireTimer'_constructor
        {_FireTimer'seq :: Word32
_FireTimer'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _FireTimer'_unknownFields :: FieldSet
_FireTimer'_unknownFields = []}
  parseMessage :: Parser FireTimer
parseMessage
    = let
        loop :: FireTimer -> Data.ProtoLens.Encoding.Bytes.Parser FireTimer
        loop :: FireTimer -> Parser FireTimer
loop FireTimer
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 Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"seq"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"seq") 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 FireTimer -> String -> Parser FireTimer
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do FireTimer -> Parser FireTimer
loop FireTimer
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"FireTimer"
  buildMessage :: FireTimer -> Builder
buildMessage
    = \ FireTimer
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike Word32 FireTimer FireTimer Word32 Word32
-> FireTimer -> Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"seq") FireTimer
_x
              in
                if Word32 -> Word32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word32
_v Word32
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) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word32
_v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike FieldSet FireTimer FireTimer FieldSet FieldSet
-> FireTimer -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet FireTimer FireTimer FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' FireTimer FieldSet
Data.ProtoLens.unknownFields FireTimer
_x))
instance Control.DeepSeq.NFData FireTimer where
  rnf :: FireTimer -> ()
rnf
    = \ FireTimer
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (FireTimer -> FieldSet
_FireTimer'_unknownFields FireTimer
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (FireTimer -> Word32
_FireTimer'seq FireTimer
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.patchId' @:: Lens' NotifyHasPatch Data.Text.Text@ -}
data NotifyHasPatch
  = NotifyHasPatch'_constructor {NotifyHasPatch -> Text
_NotifyHasPatch'patchId :: !Data.Text.Text,
                                 NotifyHasPatch -> FieldSet
_NotifyHasPatch'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (NotifyHasPatch -> NotifyHasPatch -> Bool
(NotifyHasPatch -> NotifyHasPatch -> Bool)
-> (NotifyHasPatch -> NotifyHasPatch -> Bool) -> Eq NotifyHasPatch
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NotifyHasPatch -> NotifyHasPatch -> Bool
== :: NotifyHasPatch -> NotifyHasPatch -> Bool
$c/= :: NotifyHasPatch -> NotifyHasPatch -> Bool
/= :: NotifyHasPatch -> NotifyHasPatch -> Bool
Prelude.Eq, Eq NotifyHasPatch
Eq NotifyHasPatch =>
(NotifyHasPatch -> NotifyHasPatch -> Ordering)
-> (NotifyHasPatch -> NotifyHasPatch -> Bool)
-> (NotifyHasPatch -> NotifyHasPatch -> Bool)
-> (NotifyHasPatch -> NotifyHasPatch -> Bool)
-> (NotifyHasPatch -> NotifyHasPatch -> Bool)
-> (NotifyHasPatch -> NotifyHasPatch -> NotifyHasPatch)
-> (NotifyHasPatch -> NotifyHasPatch -> NotifyHasPatch)
-> Ord NotifyHasPatch
NotifyHasPatch -> NotifyHasPatch -> Bool
NotifyHasPatch -> NotifyHasPatch -> Ordering
NotifyHasPatch -> NotifyHasPatch -> NotifyHasPatch
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 :: NotifyHasPatch -> NotifyHasPatch -> Ordering
compare :: NotifyHasPatch -> NotifyHasPatch -> Ordering
$c< :: NotifyHasPatch -> NotifyHasPatch -> Bool
< :: NotifyHasPatch -> NotifyHasPatch -> Bool
$c<= :: NotifyHasPatch -> NotifyHasPatch -> Bool
<= :: NotifyHasPatch -> NotifyHasPatch -> Bool
$c> :: NotifyHasPatch -> NotifyHasPatch -> Bool
> :: NotifyHasPatch -> NotifyHasPatch -> Bool
$c>= :: NotifyHasPatch -> NotifyHasPatch -> Bool
>= :: NotifyHasPatch -> NotifyHasPatch -> Bool
$cmax :: NotifyHasPatch -> NotifyHasPatch -> NotifyHasPatch
max :: NotifyHasPatch -> NotifyHasPatch -> NotifyHasPatch
$cmin :: NotifyHasPatch -> NotifyHasPatch -> NotifyHasPatch
min :: NotifyHasPatch -> NotifyHasPatch -> NotifyHasPatch
Prelude.Ord)
instance Prelude.Show NotifyHasPatch where
  showsPrec :: Int -> NotifyHasPatch -> ShowS
showsPrec Int
_ NotifyHasPatch
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (NotifyHasPatch -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort NotifyHasPatch
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField NotifyHasPatch "patchId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "patchId"
-> (Text -> f Text) -> NotifyHasPatch -> f NotifyHasPatch
fieldOf Proxy# "patchId"
_
    = ((Text -> f Text) -> NotifyHasPatch -> f NotifyHasPatch)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> NotifyHasPatch
-> f NotifyHasPatch
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NotifyHasPatch -> Text)
-> (NotifyHasPatch -> Text -> NotifyHasPatch)
-> Lens NotifyHasPatch NotifyHasPatch Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NotifyHasPatch -> Text
_NotifyHasPatch'patchId
           (\ NotifyHasPatch
x__ Text
y__ -> NotifyHasPatch
x__ {_NotifyHasPatch'patchId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message NotifyHasPatch where
  messageName :: Proxy NotifyHasPatch -> Text
messageName Proxy NotifyHasPatch
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_activation.NotifyHasPatch"
  packedMessageDescriptor :: Proxy NotifyHasPatch -> ByteString
packedMessageDescriptor Proxy NotifyHasPatch
_
    = ByteString
"\n\
      \\SONotifyHasPatch\DC2\EM\n\
      \\bpatch_id\CAN\SOH \SOH(\tR\apatchId"
  packedFileDescriptor :: Proxy NotifyHasPatch -> ByteString
packedFileDescriptor Proxy NotifyHasPatch
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor NotifyHasPatch)
fieldsByTag
    = let
        patchId__field_descriptor :: FieldDescriptor NotifyHasPatch
patchId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor NotifyHasPatch Text
-> FieldDescriptor NotifyHasPatch
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"patch_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 NotifyHasPatch NotifyHasPatch Text Text
-> FieldAccessor NotifyHasPatch 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 @"patchId")) ::
              Data.ProtoLens.FieldDescriptor NotifyHasPatch
      in
        [(Tag, FieldDescriptor NotifyHasPatch)]
-> Map Tag (FieldDescriptor NotifyHasPatch)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor NotifyHasPatch
patchId__field_descriptor)]
  unknownFields :: Lens' NotifyHasPatch FieldSet
unknownFields
    = (NotifyHasPatch -> FieldSet)
-> (NotifyHasPatch -> FieldSet -> NotifyHasPatch)
-> Lens' NotifyHasPatch FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        NotifyHasPatch -> FieldSet
_NotifyHasPatch'_unknownFields
        (\ NotifyHasPatch
x__ FieldSet
y__ -> NotifyHasPatch
x__ {_NotifyHasPatch'_unknownFields = y__})
  defMessage :: NotifyHasPatch
defMessage
    = NotifyHasPatch'_constructor
        {_NotifyHasPatch'patchId :: Text
_NotifyHasPatch'patchId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NotifyHasPatch'_unknownFields :: FieldSet
_NotifyHasPatch'_unknownFields = []}
  parseMessage :: Parser NotifyHasPatch
parseMessage
    = let
        loop ::
          NotifyHasPatch
          -> Data.ProtoLens.Encoding.Bytes.Parser NotifyHasPatch
        loop :: NotifyHasPatch -> Parser NotifyHasPatch
loop NotifyHasPatch
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
"patch_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"patchId") 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 NotifyHasPatch -> String -> Parser NotifyHasPatch
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do NotifyHasPatch -> Parser NotifyHasPatch
loop NotifyHasPatch
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"NotifyHasPatch"
  buildMessage :: NotifyHasPatch -> Builder
buildMessage
    = \ NotifyHasPatch
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike Text NotifyHasPatch NotifyHasPatch Text Text
-> NotifyHasPatch -> 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 @"patchId") NotifyHasPatch
_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))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike FieldSet NotifyHasPatch NotifyHasPatch FieldSet FieldSet
-> NotifyHasPatch -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet NotifyHasPatch NotifyHasPatch FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' NotifyHasPatch FieldSet
Data.ProtoLens.unknownFields NotifyHasPatch
_x))
instance Control.DeepSeq.NFData NotifyHasPatch where
  rnf :: NotifyHasPatch -> ()
rnf
    = \ NotifyHasPatch
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (NotifyHasPatch -> FieldSet
_NotifyHasPatch'_unknownFields NotifyHasPatch
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (NotifyHasPatch -> Text
_NotifyHasPatch'patchId NotifyHasPatch
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.queryId' @:: Lens' QueryWorkflow Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.queryType' @:: Lens' QueryWorkflow Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.arguments' @:: Lens' QueryWorkflow [Proto.Temporal.Api.Common.V1.Message.Payload]@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.vec'arguments' @:: Lens' QueryWorkflow (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.headers' @:: Lens' QueryWorkflow (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data QueryWorkflow
  = QueryWorkflow'_constructor {QueryWorkflow -> Text
_QueryWorkflow'queryId :: !Data.Text.Text,
                                QueryWorkflow -> Text
_QueryWorkflow'queryType :: !Data.Text.Text,
                                QueryWorkflow -> Vector Payload
_QueryWorkflow'arguments :: !(Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload),
                                QueryWorkflow -> Map Text Payload
_QueryWorkflow'headers :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload),
                                QueryWorkflow -> FieldSet
_QueryWorkflow'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (QueryWorkflow -> QueryWorkflow -> Bool
(QueryWorkflow -> QueryWorkflow -> Bool)
-> (QueryWorkflow -> QueryWorkflow -> Bool) -> Eq QueryWorkflow
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: QueryWorkflow -> QueryWorkflow -> Bool
== :: QueryWorkflow -> QueryWorkflow -> Bool
$c/= :: QueryWorkflow -> QueryWorkflow -> Bool
/= :: QueryWorkflow -> QueryWorkflow -> Bool
Prelude.Eq, Eq QueryWorkflow
Eq QueryWorkflow =>
(QueryWorkflow -> QueryWorkflow -> Ordering)
-> (QueryWorkflow -> QueryWorkflow -> Bool)
-> (QueryWorkflow -> QueryWorkflow -> Bool)
-> (QueryWorkflow -> QueryWorkflow -> Bool)
-> (QueryWorkflow -> QueryWorkflow -> Bool)
-> (QueryWorkflow -> QueryWorkflow -> QueryWorkflow)
-> (QueryWorkflow -> QueryWorkflow -> QueryWorkflow)
-> Ord QueryWorkflow
QueryWorkflow -> QueryWorkflow -> Bool
QueryWorkflow -> QueryWorkflow -> Ordering
QueryWorkflow -> QueryWorkflow -> QueryWorkflow
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 :: QueryWorkflow -> QueryWorkflow -> Ordering
compare :: QueryWorkflow -> QueryWorkflow -> Ordering
$c< :: QueryWorkflow -> QueryWorkflow -> Bool
< :: QueryWorkflow -> QueryWorkflow -> Bool
$c<= :: QueryWorkflow -> QueryWorkflow -> Bool
<= :: QueryWorkflow -> QueryWorkflow -> Bool
$c> :: QueryWorkflow -> QueryWorkflow -> Bool
> :: QueryWorkflow -> QueryWorkflow -> Bool
$c>= :: QueryWorkflow -> QueryWorkflow -> Bool
>= :: QueryWorkflow -> QueryWorkflow -> Bool
$cmax :: QueryWorkflow -> QueryWorkflow -> QueryWorkflow
max :: QueryWorkflow -> QueryWorkflow -> QueryWorkflow
$cmin :: QueryWorkflow -> QueryWorkflow -> QueryWorkflow
min :: QueryWorkflow -> QueryWorkflow -> QueryWorkflow
Prelude.Ord)
instance Prelude.Show QueryWorkflow where
  showsPrec :: Int -> QueryWorkflow -> ShowS
showsPrec Int
_ QueryWorkflow
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (QueryWorkflow -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort QueryWorkflow
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField QueryWorkflow "queryId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "queryId"
-> (Text -> f Text) -> QueryWorkflow -> f QueryWorkflow
fieldOf Proxy# "queryId"
_
    = ((Text -> f Text) -> QueryWorkflow -> f QueryWorkflow)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> QueryWorkflow
-> f QueryWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflow -> Text)
-> (QueryWorkflow -> Text -> QueryWorkflow)
-> Lens QueryWorkflow QueryWorkflow Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflow -> Text
_QueryWorkflow'queryId
           (\ QueryWorkflow
x__ Text
y__ -> QueryWorkflow
x__ {_QueryWorkflow'queryId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField QueryWorkflow "queryType" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "queryType"
-> (Text -> f Text) -> QueryWorkflow -> f QueryWorkflow
fieldOf Proxy# "queryType"
_
    = ((Text -> f Text) -> QueryWorkflow -> f QueryWorkflow)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> QueryWorkflow
-> f QueryWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflow -> Text)
-> (QueryWorkflow -> Text -> QueryWorkflow)
-> Lens QueryWorkflow QueryWorkflow Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflow -> Text
_QueryWorkflow'queryType
           (\ QueryWorkflow
x__ Text
y__ -> QueryWorkflow
x__ {_QueryWorkflow'queryType = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField QueryWorkflow "arguments" [Proto.Temporal.Api.Common.V1.Message.Payload] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "arguments"
-> ([Payload] -> f [Payload]) -> QueryWorkflow -> f QueryWorkflow
fieldOf Proxy# "arguments"
_
    = ((Vector Payload -> f (Vector Payload))
 -> QueryWorkflow -> f QueryWorkflow)
-> (([Payload] -> f [Payload])
    -> Vector Payload -> f (Vector Payload))
-> ([Payload] -> f [Payload])
-> QueryWorkflow
-> f QueryWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflow -> Vector Payload)
-> (QueryWorkflow -> Vector Payload -> QueryWorkflow)
-> Lens
     QueryWorkflow QueryWorkflow (Vector Payload) (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflow -> Vector Payload
_QueryWorkflow'arguments
           (\ QueryWorkflow
x__ Vector Payload
y__ -> QueryWorkflow
x__ {_QueryWorkflow'arguments = y__}))
        ((Vector Payload -> [Payload])
-> (Vector Payload -> [Payload] -> Vector Payload)
-> Lens (Vector Payload) (Vector Payload) [Payload] [Payload]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Payload -> [Payload]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Payload
_ [Payload]
y__ -> [Payload] -> Vector Payload
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Payload]
y__))
instance Data.ProtoLens.Field.HasField QueryWorkflow "vec'arguments" (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'arguments"
-> (Vector Payload -> f (Vector Payload))
-> QueryWorkflow
-> f QueryWorkflow
fieldOf Proxy# "vec'arguments"
_
    = ((Vector Payload -> f (Vector Payload))
 -> QueryWorkflow -> f QueryWorkflow)
-> ((Vector Payload -> f (Vector Payload))
    -> Vector Payload -> f (Vector Payload))
-> (Vector Payload -> f (Vector Payload))
-> QueryWorkflow
-> f QueryWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflow -> Vector Payload)
-> (QueryWorkflow -> Vector Payload -> QueryWorkflow)
-> Lens
     QueryWorkflow QueryWorkflow (Vector Payload) (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflow -> Vector Payload
_QueryWorkflow'arguments
           (\ QueryWorkflow
x__ Vector Payload
y__ -> QueryWorkflow
x__ {_QueryWorkflow'arguments = y__}))
        (Vector Payload -> f (Vector Payload))
-> Vector Payload -> f (Vector Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField QueryWorkflow "headers" (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "headers"
-> (Map Text Payload -> f (Map Text Payload))
-> QueryWorkflow
-> f QueryWorkflow
fieldOf Proxy# "headers"
_
    = ((Map Text Payload -> f (Map Text Payload))
 -> QueryWorkflow -> f QueryWorkflow)
-> ((Map Text Payload -> f (Map Text Payload))
    -> Map Text Payload -> f (Map Text Payload))
-> (Map Text Payload -> f (Map Text Payload))
-> QueryWorkflow
-> f QueryWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflow -> Map Text Payload)
-> (QueryWorkflow -> Map Text Payload -> QueryWorkflow)
-> Lens
     QueryWorkflow QueryWorkflow (Map Text Payload) (Map Text Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflow -> Map Text Payload
_QueryWorkflow'headers
           (\ QueryWorkflow
x__ Map Text Payload
y__ -> QueryWorkflow
x__ {_QueryWorkflow'headers = y__}))
        (Map Text Payload -> f (Map Text Payload))
-> Map Text Payload -> f (Map Text Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message QueryWorkflow where
  messageName :: Proxy QueryWorkflow -> Text
messageName Proxy QueryWorkflow
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_activation.QueryWorkflow"
  packedMessageDescriptor :: Proxy QueryWorkflow -> ByteString
packedMessageDescriptor Proxy QueryWorkflow
_
    = ByteString
"\n\
      \\rQueryWorkflow\DC2\EM\n\
      \\bquery_id\CAN\SOH \SOH(\tR\aqueryId\DC2\GS\n\
      \\n\
      \query_type\CAN\STX \SOH(\tR\tqueryType\DC2=\n\
      \\targuments\CAN\ETX \ETX(\v2\US.temporal.api.common.v1.PayloadR\targuments\DC2Q\n\
      \\aheaders\CAN\ENQ \ETX(\v27.coresdk.workflow_activation.QueryWorkflow.HeadersEntryR\aheaders\SUB[\n\
      \\fHeadersEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\
      \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy QueryWorkflow -> ByteString
packedFileDescriptor Proxy QueryWorkflow
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor QueryWorkflow)
fieldsByTag
    = let
        queryId__field_descriptor :: FieldDescriptor QueryWorkflow
queryId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor QueryWorkflow Text
-> FieldDescriptor QueryWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"query_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 QueryWorkflow QueryWorkflow Text Text
-> FieldAccessor QueryWorkflow 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 @"queryId")) ::
              Data.ProtoLens.FieldDescriptor QueryWorkflow
        queryType__field_descriptor :: FieldDescriptor QueryWorkflow
queryType__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor QueryWorkflow Text
-> FieldDescriptor QueryWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"query_type"
              (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 QueryWorkflow QueryWorkflow Text Text
-> FieldAccessor QueryWorkflow 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 @"queryType")) ::
              Data.ProtoLens.FieldDescriptor QueryWorkflow
        arguments__field_descriptor :: FieldDescriptor QueryWorkflow
arguments__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor QueryWorkflow Payload
-> FieldDescriptor QueryWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"arguments"
              (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)
              (Packing
-> Lens' QueryWorkflow [Payload]
-> FieldAccessor QueryWorkflow Payload
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 @"arguments")) ::
              Data.ProtoLens.FieldDescriptor QueryWorkflow
        headers__field_descriptor :: FieldDescriptor QueryWorkflow
headers__field_descriptor
          = String
-> FieldTypeDescriptor QueryWorkflow'HeadersEntry
-> FieldAccessor QueryWorkflow QueryWorkflow'HeadersEntry
-> FieldDescriptor QueryWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"headers"
              (MessageOrGroup -> FieldTypeDescriptor QueryWorkflow'HeadersEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor QueryWorkflow'HeadersEntry)
              (Lens' QueryWorkflow'HeadersEntry Text
-> Lens' QueryWorkflow'HeadersEntry Payload
-> Lens
     QueryWorkflow QueryWorkflow (Map Text Payload) (Map Text Payload)
-> FieldAccessor QueryWorkflow QueryWorkflow'HeadersEntry
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 @"headers")) ::
              Data.ProtoLens.FieldDescriptor QueryWorkflow
      in
        [(Tag, FieldDescriptor QueryWorkflow)]
-> Map Tag (FieldDescriptor QueryWorkflow)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor QueryWorkflow
queryId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor QueryWorkflow
queryType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor QueryWorkflow
arguments__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor QueryWorkflow
headers__field_descriptor)]
  unknownFields :: Lens' QueryWorkflow FieldSet
unknownFields
    = (QueryWorkflow -> FieldSet)
-> (QueryWorkflow -> FieldSet -> QueryWorkflow)
-> Lens' QueryWorkflow FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        QueryWorkflow -> FieldSet
_QueryWorkflow'_unknownFields
        (\ QueryWorkflow
x__ FieldSet
y__ -> QueryWorkflow
x__ {_QueryWorkflow'_unknownFields = y__})
  defMessage :: QueryWorkflow
defMessage
    = QueryWorkflow'_constructor
        {_QueryWorkflow'queryId :: Text
_QueryWorkflow'queryId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _QueryWorkflow'queryType :: Text
_QueryWorkflow'queryType = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _QueryWorkflow'arguments :: Vector Payload
_QueryWorkflow'arguments = Vector Payload
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _QueryWorkflow'headers :: Map Text Payload
_QueryWorkflow'headers = Map Text Payload
forall k a. Map k a
Data.Map.empty,
         _QueryWorkflow'_unknownFields :: FieldSet
_QueryWorkflow'_unknownFields = []}
  parseMessage :: Parser QueryWorkflow
parseMessage
    = let
        loop ::
          QueryWorkflow
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Common.V1.Message.Payload
             -> Data.ProtoLens.Encoding.Bytes.Parser QueryWorkflow
        loop :: QueryWorkflow
-> Growing Vector RealWorld Payload -> Parser QueryWorkflow
loop QueryWorkflow
x Growing Vector RealWorld Payload
mutable'arguments
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'arguments <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                            (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                               mutable'arguments)
                      (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'arguments") frozen'arguments 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
"query_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"queryId") y x)
                                  mutable'arguments
                        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
"query_type"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"queryType") y x)
                                  mutable'arguments
                        Word64
26
                          -> 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
"arguments"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'arguments y)
                                loop x v
                        Word64
42
                          -> do !(entry :: QueryWorkflow'HeadersEntry) <- Parser QueryWorkflow'HeadersEntry
-> String -> Parser QueryWorkflow'HeadersEntry
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
"headers"
                                (let
                                   key = FoldLike
  Text
  QueryWorkflow'HeadersEntry
  QueryWorkflow'HeadersEntry
  Text
  Text
-> QueryWorkflow'HeadersEntry -> 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") QueryWorkflow'HeadersEntry
entry
                                   value
                                     = FoldLike
  Payload
  QueryWorkflow'HeadersEntry
  QueryWorkflow'HeadersEntry
  Payload
  Payload
-> QueryWorkflow'HeadersEntry -> 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 @"value") QueryWorkflow'HeadersEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"headers")
                                        (\ !Map Text Payload
t -> Text -> Payload -> Map Text Payload -> Map Text Payload
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key Payload
value Map Text Payload
t) x)
                                     mutable'arguments)
                        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'arguments
      in
        Parser QueryWorkflow -> String -> Parser QueryWorkflow
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'arguments <- IO (Growing Vector RealWorld Payload)
-> Parser (Growing Vector RealWorld Payload)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                     IO (Growing Vector RealWorld Payload)
IO (Growing Vector (PrimState IO) Payload)
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'arguments)
          String
"QueryWorkflow"
  buildMessage :: QueryWorkflow -> Builder
buildMessage
    = \ QueryWorkflow
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike Text QueryWorkflow QueryWorkflow Text Text
-> QueryWorkflow -> 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 @"queryId") QueryWorkflow
_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 QueryWorkflow QueryWorkflow Text Text
-> QueryWorkflow -> 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 @"queryType") QueryWorkflow
_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.<>)
                   ((Payload -> Builder) -> Vector Payload -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                      (\ Payload
_v
                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                              ((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))
                      (FoldLike
  (Vector Payload)
  QueryWorkflow
  QueryWorkflow
  (Vector Payload)
  (Vector Payload)
-> QueryWorkflow -> Vector 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 @"vec'arguments") QueryWorkflow
_x))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                         (((Text, Payload) -> Builder) -> [(Text, Payload)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                            (\ (Text, Payload)
_v
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                    ((ByteString -> Builder)
-> (QueryWorkflow'HeadersEntry -> ByteString)
-> QueryWorkflow'HeadersEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                       (\ ByteString
bs
                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                     (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                       QueryWorkflow'HeadersEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                       (Setter
  QueryWorkflow'HeadersEntry QueryWorkflow'HeadersEntry Text Text
-> Text -> QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry
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, Payload) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, Payload)
_v)
                                          (Setter
  QueryWorkflow'HeadersEntry
  QueryWorkflow'HeadersEntry
  Payload
  Payload
-> Payload
-> QueryWorkflow'HeadersEntry
-> QueryWorkflow'HeadersEntry
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, Payload) -> Payload
forall a b. (a, b) -> b
Prelude.snd (Text, Payload)
_v)
                                             (QueryWorkflow'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                QueryWorkflow'HeadersEntry)))))
                            (Map Text Payload -> [(Text, Payload)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                               (FoldLike
  (Map Text Payload)
  QueryWorkflow
  QueryWorkflow
  (Map Text Payload)
  (Map Text Payload)
-> QueryWorkflow -> Map Text 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 @"headers") QueryWorkflow
_x))))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike FieldSet QueryWorkflow QueryWorkflow FieldSet FieldSet
-> QueryWorkflow -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet QueryWorkflow QueryWorkflow FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' QueryWorkflow FieldSet
Data.ProtoLens.unknownFields QueryWorkflow
_x)))))
instance Control.DeepSeq.NFData QueryWorkflow where
  rnf :: QueryWorkflow -> ()
rnf
    = \ QueryWorkflow
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (QueryWorkflow -> FieldSet
_QueryWorkflow'_unknownFields QueryWorkflow
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (QueryWorkflow -> Text
_QueryWorkflow'queryId QueryWorkflow
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (QueryWorkflow -> Text
_QueryWorkflow'queryType QueryWorkflow
x__)
                   (Vector Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (QueryWorkflow -> Vector Payload
_QueryWorkflow'arguments QueryWorkflow
x__)
                      (Map Text Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (QueryWorkflow -> Map Text Payload
_QueryWorkflow'headers QueryWorkflow
x__) ()))))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.key' @:: Lens' QueryWorkflow'HeadersEntry Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.value' @:: Lens' QueryWorkflow'HeadersEntry Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'value' @:: Lens' QueryWorkflow'HeadersEntry (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data QueryWorkflow'HeadersEntry
  = QueryWorkflow'HeadersEntry'_constructor {QueryWorkflow'HeadersEntry -> Text
_QueryWorkflow'HeadersEntry'key :: !Data.Text.Text,
                                             QueryWorkflow'HeadersEntry -> Maybe Payload
_QueryWorkflow'HeadersEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                             QueryWorkflow'HeadersEntry -> FieldSet
_QueryWorkflow'HeadersEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry -> Bool
(QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry -> Bool)
-> (QueryWorkflow'HeadersEntry
    -> QueryWorkflow'HeadersEntry -> Bool)
-> Eq QueryWorkflow'HeadersEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry -> Bool
== :: QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry -> Bool
$c/= :: QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry -> Bool
/= :: QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry -> Bool
Prelude.Eq, Eq QueryWorkflow'HeadersEntry
Eq QueryWorkflow'HeadersEntry =>
(QueryWorkflow'HeadersEntry
 -> QueryWorkflow'HeadersEntry -> Ordering)
-> (QueryWorkflow'HeadersEntry
    -> QueryWorkflow'HeadersEntry -> Bool)
-> (QueryWorkflow'HeadersEntry
    -> QueryWorkflow'HeadersEntry -> Bool)
-> (QueryWorkflow'HeadersEntry
    -> QueryWorkflow'HeadersEntry -> Bool)
-> (QueryWorkflow'HeadersEntry
    -> QueryWorkflow'HeadersEntry -> Bool)
-> (QueryWorkflow'HeadersEntry
    -> QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry)
-> (QueryWorkflow'HeadersEntry
    -> QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry)
-> Ord QueryWorkflow'HeadersEntry
QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry -> Bool
QueryWorkflow'HeadersEntry
-> QueryWorkflow'HeadersEntry -> Ordering
QueryWorkflow'HeadersEntry
-> QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry
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 :: QueryWorkflow'HeadersEntry
-> QueryWorkflow'HeadersEntry -> Ordering
compare :: QueryWorkflow'HeadersEntry
-> QueryWorkflow'HeadersEntry -> Ordering
$c< :: QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry -> Bool
< :: QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry -> Bool
$c<= :: QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry -> Bool
<= :: QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry -> Bool
$c> :: QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry -> Bool
> :: QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry -> Bool
$c>= :: QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry -> Bool
>= :: QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry -> Bool
$cmax :: QueryWorkflow'HeadersEntry
-> QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry
max :: QueryWorkflow'HeadersEntry
-> QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry
$cmin :: QueryWorkflow'HeadersEntry
-> QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry
min :: QueryWorkflow'HeadersEntry
-> QueryWorkflow'HeadersEntry -> QueryWorkflow'HeadersEntry
Prelude.Ord)
instance Prelude.Show QueryWorkflow'HeadersEntry where
  showsPrec :: Int -> QueryWorkflow'HeadersEntry -> ShowS
showsPrec Int
_ QueryWorkflow'HeadersEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (QueryWorkflow'HeadersEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort QueryWorkflow'HeadersEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField QueryWorkflow'HeadersEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> QueryWorkflow'HeadersEntry
-> f QueryWorkflow'HeadersEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> QueryWorkflow'HeadersEntry -> f QueryWorkflow'HeadersEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> QueryWorkflow'HeadersEntry
-> f QueryWorkflow'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflow'HeadersEntry -> Text)
-> (QueryWorkflow'HeadersEntry
    -> Text -> QueryWorkflow'HeadersEntry)
-> Lens' QueryWorkflow'HeadersEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflow'HeadersEntry -> Text
_QueryWorkflow'HeadersEntry'key
           (\ QueryWorkflow'HeadersEntry
x__ Text
y__ -> QueryWorkflow'HeadersEntry
x__ {_QueryWorkflow'HeadersEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField QueryWorkflow'HeadersEntry "value" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Payload -> f Payload)
-> QueryWorkflow'HeadersEntry
-> f QueryWorkflow'HeadersEntry
fieldOf Proxy# "value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> QueryWorkflow'HeadersEntry -> f QueryWorkflow'HeadersEntry)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> QueryWorkflow'HeadersEntry
-> f QueryWorkflow'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflow'HeadersEntry -> Maybe Payload)
-> (QueryWorkflow'HeadersEntry
    -> Maybe Payload -> QueryWorkflow'HeadersEntry)
-> Lens
     QueryWorkflow'HeadersEntry
     QueryWorkflow'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflow'HeadersEntry -> Maybe Payload
_QueryWorkflow'HeadersEntry'value
           (\ QueryWorkflow'HeadersEntry
x__ Maybe Payload
y__ -> QueryWorkflow'HeadersEntry
x__ {_QueryWorkflow'HeadersEntry'value = 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 QueryWorkflow'HeadersEntry "maybe'value" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'value"
-> (Maybe Payload -> f (Maybe Payload))
-> QueryWorkflow'HeadersEntry
-> f QueryWorkflow'HeadersEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> QueryWorkflow'HeadersEntry -> f QueryWorkflow'HeadersEntry)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> QueryWorkflow'HeadersEntry
-> f QueryWorkflow'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflow'HeadersEntry -> Maybe Payload)
-> (QueryWorkflow'HeadersEntry
    -> Maybe Payload -> QueryWorkflow'HeadersEntry)
-> Lens
     QueryWorkflow'HeadersEntry
     QueryWorkflow'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflow'HeadersEntry -> Maybe Payload
_QueryWorkflow'HeadersEntry'value
           (\ QueryWorkflow'HeadersEntry
x__ Maybe Payload
y__ -> QueryWorkflow'HeadersEntry
x__ {_QueryWorkflow'HeadersEntry'value = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message QueryWorkflow'HeadersEntry where
  messageName :: Proxy QueryWorkflow'HeadersEntry -> Text
messageName Proxy QueryWorkflow'HeadersEntry
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_activation.QueryWorkflow.HeadersEntry"
  packedMessageDescriptor :: Proxy QueryWorkflow'HeadersEntry -> ByteString
packedMessageDescriptor Proxy QueryWorkflow'HeadersEntry
_
    = ByteString
"\n\
      \\fHeadersEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\
      \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy QueryWorkflow'HeadersEntry -> ByteString
packedFileDescriptor Proxy QueryWorkflow'HeadersEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor QueryWorkflow'HeadersEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor QueryWorkflow'HeadersEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor QueryWorkflow'HeadersEntry Text
-> FieldDescriptor QueryWorkflow'HeadersEntry
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' QueryWorkflow'HeadersEntry Text
-> FieldAccessor QueryWorkflow'HeadersEntry 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 QueryWorkflow'HeadersEntry
        value__field_descriptor :: FieldDescriptor QueryWorkflow'HeadersEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor QueryWorkflow'HeadersEntry Payload
-> FieldDescriptor QueryWorkflow'HeadersEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"value"
              (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
  QueryWorkflow'HeadersEntry
  QueryWorkflow'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor QueryWorkflow'HeadersEntry 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'value")) ::
              Data.ProtoLens.FieldDescriptor QueryWorkflow'HeadersEntry
      in
        [(Tag, FieldDescriptor QueryWorkflow'HeadersEntry)]
-> Map Tag (FieldDescriptor QueryWorkflow'HeadersEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor QueryWorkflow'HeadersEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor QueryWorkflow'HeadersEntry
value__field_descriptor)]
  unknownFields :: Lens' QueryWorkflow'HeadersEntry FieldSet
unknownFields
    = (QueryWorkflow'HeadersEntry -> FieldSet)
-> (QueryWorkflow'HeadersEntry
    -> FieldSet -> QueryWorkflow'HeadersEntry)
-> Lens' QueryWorkflow'HeadersEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        QueryWorkflow'HeadersEntry -> FieldSet
_QueryWorkflow'HeadersEntry'_unknownFields
        (\ QueryWorkflow'HeadersEntry
x__ FieldSet
y__
           -> QueryWorkflow'HeadersEntry
x__ {_QueryWorkflow'HeadersEntry'_unknownFields = y__})
  defMessage :: QueryWorkflow'HeadersEntry
defMessage
    = QueryWorkflow'HeadersEntry'_constructor
        {_QueryWorkflow'HeadersEntry'key :: Text
_QueryWorkflow'HeadersEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _QueryWorkflow'HeadersEntry'value :: Maybe Payload
_QueryWorkflow'HeadersEntry'value = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _QueryWorkflow'HeadersEntry'_unknownFields :: FieldSet
_QueryWorkflow'HeadersEntry'_unknownFields = []}
  parseMessage :: Parser QueryWorkflow'HeadersEntry
parseMessage
    = let
        loop ::
          QueryWorkflow'HeadersEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser QueryWorkflow'HeadersEntry
        loop :: QueryWorkflow'HeadersEntry -> Parser QueryWorkflow'HeadersEntry
loop QueryWorkflow'HeadersEntry
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 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
"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 QueryWorkflow'HeadersEntry
-> String -> Parser QueryWorkflow'HeadersEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do QueryWorkflow'HeadersEntry -> Parser QueryWorkflow'HeadersEntry
loop QueryWorkflow'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"HeadersEntry"
  buildMessage :: QueryWorkflow'HeadersEntry -> Builder
buildMessage
    = \ QueryWorkflow'HeadersEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  QueryWorkflow'HeadersEntry
  QueryWorkflow'HeadersEntry
  Text
  Text
-> QueryWorkflow'HeadersEntry -> 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") QueryWorkflow'HeadersEntry
_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 Payload)
  QueryWorkflow'HeadersEntry
  QueryWorkflow'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> QueryWorkflow'HeadersEntry -> 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'value") QueryWorkflow'HeadersEntry
_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
  QueryWorkflow'HeadersEntry
  QueryWorkflow'HeadersEntry
  FieldSet
  FieldSet
-> QueryWorkflow'HeadersEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  QueryWorkflow'HeadersEntry
  QueryWorkflow'HeadersEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' QueryWorkflow'HeadersEntry FieldSet
Data.ProtoLens.unknownFields QueryWorkflow'HeadersEntry
_x)))
instance Control.DeepSeq.NFData QueryWorkflow'HeadersEntry where
  rnf :: QueryWorkflow'HeadersEntry -> ()
rnf
    = \ QueryWorkflow'HeadersEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (QueryWorkflow'HeadersEntry -> FieldSet
_QueryWorkflow'HeadersEntry'_unknownFields QueryWorkflow'HeadersEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (QueryWorkflow'HeadersEntry -> Text
_QueryWorkflow'HeadersEntry'key QueryWorkflow'HeadersEntry
x__)
                (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (QueryWorkflow'HeadersEntry -> Maybe Payload
_QueryWorkflow'HeadersEntry'value QueryWorkflow'HeadersEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.message' @:: Lens' RemoveFromCache Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.reason' @:: Lens' RemoveFromCache RemoveFromCache'EvictionReason@ -}
data RemoveFromCache
  = RemoveFromCache'_constructor {RemoveFromCache -> Text
_RemoveFromCache'message :: !Data.Text.Text,
                                  RemoveFromCache -> RemoveFromCache'EvictionReason
_RemoveFromCache'reason :: !RemoveFromCache'EvictionReason,
                                  RemoveFromCache -> FieldSet
_RemoveFromCache'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RemoveFromCache -> RemoveFromCache -> Bool
(RemoveFromCache -> RemoveFromCache -> Bool)
-> (RemoveFromCache -> RemoveFromCache -> Bool)
-> Eq RemoveFromCache
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RemoveFromCache -> RemoveFromCache -> Bool
== :: RemoveFromCache -> RemoveFromCache -> Bool
$c/= :: RemoveFromCache -> RemoveFromCache -> Bool
/= :: RemoveFromCache -> RemoveFromCache -> Bool
Prelude.Eq, Eq RemoveFromCache
Eq RemoveFromCache =>
(RemoveFromCache -> RemoveFromCache -> Ordering)
-> (RemoveFromCache -> RemoveFromCache -> Bool)
-> (RemoveFromCache -> RemoveFromCache -> Bool)
-> (RemoveFromCache -> RemoveFromCache -> Bool)
-> (RemoveFromCache -> RemoveFromCache -> Bool)
-> (RemoveFromCache -> RemoveFromCache -> RemoveFromCache)
-> (RemoveFromCache -> RemoveFromCache -> RemoveFromCache)
-> Ord RemoveFromCache
RemoveFromCache -> RemoveFromCache -> Bool
RemoveFromCache -> RemoveFromCache -> Ordering
RemoveFromCache -> RemoveFromCache -> RemoveFromCache
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 :: RemoveFromCache -> RemoveFromCache -> Ordering
compare :: RemoveFromCache -> RemoveFromCache -> Ordering
$c< :: RemoveFromCache -> RemoveFromCache -> Bool
< :: RemoveFromCache -> RemoveFromCache -> Bool
$c<= :: RemoveFromCache -> RemoveFromCache -> Bool
<= :: RemoveFromCache -> RemoveFromCache -> Bool
$c> :: RemoveFromCache -> RemoveFromCache -> Bool
> :: RemoveFromCache -> RemoveFromCache -> Bool
$c>= :: RemoveFromCache -> RemoveFromCache -> Bool
>= :: RemoveFromCache -> RemoveFromCache -> Bool
$cmax :: RemoveFromCache -> RemoveFromCache -> RemoveFromCache
max :: RemoveFromCache -> RemoveFromCache -> RemoveFromCache
$cmin :: RemoveFromCache -> RemoveFromCache -> RemoveFromCache
min :: RemoveFromCache -> RemoveFromCache -> RemoveFromCache
Prelude.Ord)
instance Prelude.Show RemoveFromCache where
  showsPrec :: Int -> RemoveFromCache -> ShowS
showsPrec Int
_ RemoveFromCache
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RemoveFromCache -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RemoveFromCache
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RemoveFromCache "message" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "message"
-> (Text -> f Text) -> RemoveFromCache -> f RemoveFromCache
fieldOf Proxy# "message"
_
    = ((Text -> f Text) -> RemoveFromCache -> f RemoveFromCache)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RemoveFromCache
-> f RemoveFromCache
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RemoveFromCache -> Text)
-> (RemoveFromCache -> Text -> RemoveFromCache)
-> Lens RemoveFromCache RemoveFromCache Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RemoveFromCache -> Text
_RemoveFromCache'message
           (\ RemoveFromCache
x__ Text
y__ -> RemoveFromCache
x__ {_RemoveFromCache'message = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RemoveFromCache "reason" RemoveFromCache'EvictionReason where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "reason"
-> (RemoveFromCache'EvictionReason
    -> f RemoveFromCache'EvictionReason)
-> RemoveFromCache
-> f RemoveFromCache
fieldOf Proxy# "reason"
_
    = ((RemoveFromCache'EvictionReason
  -> f RemoveFromCache'EvictionReason)
 -> RemoveFromCache -> f RemoveFromCache)
-> ((RemoveFromCache'EvictionReason
     -> f RemoveFromCache'EvictionReason)
    -> RemoveFromCache'EvictionReason
    -> f RemoveFromCache'EvictionReason)
-> (RemoveFromCache'EvictionReason
    -> f RemoveFromCache'EvictionReason)
-> RemoveFromCache
-> f RemoveFromCache
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RemoveFromCache -> RemoveFromCache'EvictionReason)
-> (RemoveFromCache
    -> RemoveFromCache'EvictionReason -> RemoveFromCache)
-> Lens
     RemoveFromCache
     RemoveFromCache
     RemoveFromCache'EvictionReason
     RemoveFromCache'EvictionReason
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RemoveFromCache -> RemoveFromCache'EvictionReason
_RemoveFromCache'reason
           (\ RemoveFromCache
x__ RemoveFromCache'EvictionReason
y__ -> RemoveFromCache
x__ {_RemoveFromCache'reason = y__}))
        (RemoveFromCache'EvictionReason
 -> f RemoveFromCache'EvictionReason)
-> RemoveFromCache'EvictionReason
-> f RemoveFromCache'EvictionReason
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RemoveFromCache where
  messageName :: Proxy RemoveFromCache -> Text
messageName Proxy RemoveFromCache
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_activation.RemoveFromCache"
  packedMessageDescriptor :: Proxy RemoveFromCache -> ByteString
packedMessageDescriptor Proxy RemoveFromCache
_
    = ByteString
"\n\
      \\SIRemoveFromCache\DC2\CAN\n\
      \\amessage\CAN\SOH \SOH(\tR\amessage\DC2S\n\
      \\ACKreason\CAN\STX \SOH(\SO2;.coresdk.workflow_activation.RemoveFromCache.EvictionReasonR\ACKreason\"\207\SOH\n\
      \\SOEvictionReason\DC2\SI\n\
      \\vUNSPECIFIED\DLE\NUL\DC2\SO\n\
      \\n\
      \CACHE_FULL\DLE\SOH\DC2\SO\n\
      \\n\
      \CACHE_MISS\DLE\STX\DC2\DC2\n\
      \\SONONDETERMINISM\DLE\ETX\DC2\r\n\
      \\tLANG_FAIL\DLE\EOT\DC2\DC2\n\
      \\SOLANG_REQUESTED\DLE\ENQ\DC2\DC2\n\
      \\SOTASK_NOT_FOUND\DLE\ACK\DC2\NAK\n\
      \\DC1UNHANDLED_COMMAND\DLE\a\DC2\t\n\
      \\ENQFATAL\DLE\b\DC2\US\n\
      \\ESCPAGINATION_OR_HISTORY_FETCH\DLE\t"
  packedFileDescriptor :: Proxy RemoveFromCache -> ByteString
packedFileDescriptor Proxy RemoveFromCache
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RemoveFromCache)
fieldsByTag
    = let
        message__field_descriptor :: FieldDescriptor RemoveFromCache
message__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RemoveFromCache Text
-> FieldDescriptor RemoveFromCache
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"message"
              (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 RemoveFromCache RemoveFromCache Text Text
-> FieldAccessor RemoveFromCache 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 @"message")) ::
              Data.ProtoLens.FieldDescriptor RemoveFromCache
        reason__field_descriptor :: FieldDescriptor RemoveFromCache
reason__field_descriptor
          = String
-> FieldTypeDescriptor RemoveFromCache'EvictionReason
-> FieldAccessor RemoveFromCache RemoveFromCache'EvictionReason
-> FieldDescriptor RemoveFromCache
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"reason"
              (ScalarField RemoveFromCache'EvictionReason
-> FieldTypeDescriptor RemoveFromCache'EvictionReason
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField RemoveFromCache'EvictionReason
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor RemoveFromCache'EvictionReason)
              (WireDefault RemoveFromCache'EvictionReason
-> Lens
     RemoveFromCache
     RemoveFromCache
     RemoveFromCache'EvictionReason
     RemoveFromCache'EvictionReason
-> FieldAccessor RemoveFromCache RemoveFromCache'EvictionReason
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault RemoveFromCache'EvictionReason
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 RemoveFromCache
      in
        [(Tag, FieldDescriptor RemoveFromCache)]
-> Map Tag (FieldDescriptor RemoveFromCache)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RemoveFromCache
message__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RemoveFromCache
reason__field_descriptor)]
  unknownFields :: Lens' RemoveFromCache FieldSet
unknownFields
    = (RemoveFromCache -> FieldSet)
-> (RemoveFromCache -> FieldSet -> RemoveFromCache)
-> Lens' RemoveFromCache FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RemoveFromCache -> FieldSet
_RemoveFromCache'_unknownFields
        (\ RemoveFromCache
x__ FieldSet
y__ -> RemoveFromCache
x__ {_RemoveFromCache'_unknownFields = y__})
  defMessage :: RemoveFromCache
defMessage
    = RemoveFromCache'_constructor
        {_RemoveFromCache'message :: Text
_RemoveFromCache'message = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RemoveFromCache'reason :: RemoveFromCache'EvictionReason
_RemoveFromCache'reason = RemoveFromCache'EvictionReason
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RemoveFromCache'_unknownFields :: FieldSet
_RemoveFromCache'_unknownFields = []}
  parseMessage :: Parser RemoveFromCache
parseMessage
    = let
        loop ::
          RemoveFromCache
          -> Data.ProtoLens.Encoding.Bytes.Parser RemoveFromCache
        loop :: RemoveFromCache -> Parser RemoveFromCache
loop RemoveFromCache
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
"message"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"message") y x)
                        Word64
16
                          -> do y <- Parser RemoveFromCache'EvictionReason
-> String -> Parser RemoveFromCache'EvictionReason
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> RemoveFromCache'EvictionReason)
-> Parser Int -> Parser RemoveFromCache'EvictionReason
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> RemoveFromCache'EvictionReason
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
"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 RemoveFromCache -> String -> Parser RemoveFromCache
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RemoveFromCache -> Parser RemoveFromCache
loop RemoveFromCache
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"RemoveFromCache"
  buildMessage :: RemoveFromCache -> Builder
buildMessage
    = \ RemoveFromCache
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike Text RemoveFromCache RemoveFromCache Text Text
-> RemoveFromCache -> 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 @"message") RemoveFromCache
_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 :: RemoveFromCache'EvictionReason
_v = FoldLike
  RemoveFromCache'EvictionReason
  RemoveFromCache
  RemoveFromCache
  RemoveFromCache'EvictionReason
  RemoveFromCache'EvictionReason
-> RemoveFromCache -> RemoveFromCache'EvictionReason
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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") RemoveFromCache
_x
                 in
                   if RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) RemoveFromCache'EvictionReason
_v RemoveFromCache'EvictionReason
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)
-> (RemoveFromCache'EvictionReason -> Int)
-> RemoveFromCache'EvictionReason
-> 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)
                            RemoveFromCache'EvictionReason -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum RemoveFromCache'EvictionReason
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike FieldSet RemoveFromCache RemoveFromCache FieldSet FieldSet
-> RemoveFromCache -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet RemoveFromCache RemoveFromCache FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RemoveFromCache FieldSet
Data.ProtoLens.unknownFields RemoveFromCache
_x)))
instance Control.DeepSeq.NFData RemoveFromCache where
  rnf :: RemoveFromCache -> ()
rnf
    = \ RemoveFromCache
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RemoveFromCache -> FieldSet
_RemoveFromCache'_unknownFields RemoveFromCache
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RemoveFromCache -> Text
_RemoveFromCache'message RemoveFromCache
x__)
                (RemoveFromCache'EvictionReason -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (RemoveFromCache -> RemoveFromCache'EvictionReason
_RemoveFromCache'reason RemoveFromCache
x__) ()))
newtype RemoveFromCache'EvictionReason'UnrecognizedValue
  = RemoveFromCache'EvictionReason'UnrecognizedValue Data.Int.Int32
  deriving stock (RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool
(RemoveFromCache'EvictionReason'UnrecognizedValue
 -> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool)
-> (RemoveFromCache'EvictionReason'UnrecognizedValue
    -> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool)
-> Eq RemoveFromCache'EvictionReason'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool
== :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool
$c/= :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool
/= :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool
Prelude.Eq, Eq RemoveFromCache'EvictionReason'UnrecognizedValue
Eq RemoveFromCache'EvictionReason'UnrecognizedValue =>
(RemoveFromCache'EvictionReason'UnrecognizedValue
 -> RemoveFromCache'EvictionReason'UnrecognizedValue -> Ordering)
-> (RemoveFromCache'EvictionReason'UnrecognizedValue
    -> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool)
-> (RemoveFromCache'EvictionReason'UnrecognizedValue
    -> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool)
-> (RemoveFromCache'EvictionReason'UnrecognizedValue
    -> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool)
-> (RemoveFromCache'EvictionReason'UnrecognizedValue
    -> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool)
-> (RemoveFromCache'EvictionReason'UnrecognizedValue
    -> RemoveFromCache'EvictionReason'UnrecognizedValue
    -> RemoveFromCache'EvictionReason'UnrecognizedValue)
-> (RemoveFromCache'EvictionReason'UnrecognizedValue
    -> RemoveFromCache'EvictionReason'UnrecognizedValue
    -> RemoveFromCache'EvictionReason'UnrecognizedValue)
-> Ord RemoveFromCache'EvictionReason'UnrecognizedValue
RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool
RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Ordering
RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Ordering
compare :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Ordering
$c< :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool
< :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool
$c<= :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool
<= :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool
$c> :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool
> :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool
$c>= :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool
>= :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue -> Bool
$cmax :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue
max :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue
$cmin :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue
min :: RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason'UnrecognizedValue
Prelude.Ord, Int -> RemoveFromCache'EvictionReason'UnrecognizedValue -> ShowS
[RemoveFromCache'EvictionReason'UnrecognizedValue] -> ShowS
RemoveFromCache'EvictionReason'UnrecognizedValue -> String
(Int -> RemoveFromCache'EvictionReason'UnrecognizedValue -> ShowS)
-> (RemoveFromCache'EvictionReason'UnrecognizedValue -> String)
-> ([RemoveFromCache'EvictionReason'UnrecognizedValue] -> ShowS)
-> Show RemoveFromCache'EvictionReason'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> RemoveFromCache'EvictionReason'UnrecognizedValue -> ShowS
showsPrec :: Int -> RemoveFromCache'EvictionReason'UnrecognizedValue -> ShowS
$cshow :: RemoveFromCache'EvictionReason'UnrecognizedValue -> String
show :: RemoveFromCache'EvictionReason'UnrecognizedValue -> String
$cshowList :: [RemoveFromCache'EvictionReason'UnrecognizedValue] -> ShowS
showList :: [RemoveFromCache'EvictionReason'UnrecognizedValue] -> ShowS
Prelude.Show)
data RemoveFromCache'EvictionReason
  = RemoveFromCache'UNSPECIFIED |
    RemoveFromCache'CACHE_FULL |
    RemoveFromCache'CACHE_MISS |
    RemoveFromCache'NONDETERMINISM |
    RemoveFromCache'LANG_FAIL |
    RemoveFromCache'LANG_REQUESTED |
    RemoveFromCache'TASK_NOT_FOUND |
    RemoveFromCache'UNHANDLED_COMMAND |
    RemoveFromCache'FATAL |
    RemoveFromCache'PAGINATION_OR_HISTORY_FETCH |
    RemoveFromCache'EvictionReason'Unrecognized !RemoveFromCache'EvictionReason'UnrecognizedValue
  deriving stock (Int -> RemoveFromCache'EvictionReason -> ShowS
[RemoveFromCache'EvictionReason] -> ShowS
RemoveFromCache'EvictionReason -> String
(Int -> RemoveFromCache'EvictionReason -> ShowS)
-> (RemoveFromCache'EvictionReason -> String)
-> ([RemoveFromCache'EvictionReason] -> ShowS)
-> Show RemoveFromCache'EvictionReason
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> RemoveFromCache'EvictionReason -> ShowS
showsPrec :: Int -> RemoveFromCache'EvictionReason -> ShowS
$cshow :: RemoveFromCache'EvictionReason -> String
show :: RemoveFromCache'EvictionReason -> String
$cshowList :: [RemoveFromCache'EvictionReason] -> ShowS
showList :: [RemoveFromCache'EvictionReason] -> ShowS
Prelude.Show, RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Bool
(RemoveFromCache'EvictionReason
 -> RemoveFromCache'EvictionReason -> Bool)
-> (RemoveFromCache'EvictionReason
    -> RemoveFromCache'EvictionReason -> Bool)
-> Eq RemoveFromCache'EvictionReason
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Bool
== :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Bool
$c/= :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Bool
/= :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Bool
Prelude.Eq, Eq RemoveFromCache'EvictionReason
Eq RemoveFromCache'EvictionReason =>
(RemoveFromCache'EvictionReason
 -> RemoveFromCache'EvictionReason -> Ordering)
-> (RemoveFromCache'EvictionReason
    -> RemoveFromCache'EvictionReason -> Bool)
-> (RemoveFromCache'EvictionReason
    -> RemoveFromCache'EvictionReason -> Bool)
-> (RemoveFromCache'EvictionReason
    -> RemoveFromCache'EvictionReason -> Bool)
-> (RemoveFromCache'EvictionReason
    -> RemoveFromCache'EvictionReason -> Bool)
-> (RemoveFromCache'EvictionReason
    -> RemoveFromCache'EvictionReason
    -> RemoveFromCache'EvictionReason)
-> (RemoveFromCache'EvictionReason
    -> RemoveFromCache'EvictionReason
    -> RemoveFromCache'EvictionReason)
-> Ord RemoveFromCache'EvictionReason
RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Bool
RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Ordering
RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> RemoveFromCache'EvictionReason
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 :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Ordering
compare :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Ordering
$c< :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Bool
< :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Bool
$c<= :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Bool
<= :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Bool
$c> :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Bool
> :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Bool
$c>= :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Bool
>= :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> Bool
$cmax :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> RemoveFromCache'EvictionReason
max :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> RemoveFromCache'EvictionReason
$cmin :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> RemoveFromCache'EvictionReason
min :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason -> RemoveFromCache'EvictionReason
Prelude.Ord)
instance Data.ProtoLens.MessageEnum RemoveFromCache'EvictionReason where
  maybeToEnum :: Int -> Maybe RemoveFromCache'EvictionReason
maybeToEnum Int
0 = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'UNSPECIFIED
  maybeToEnum Int
1 = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_FULL
  maybeToEnum Int
2 = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_MISS
  maybeToEnum Int
3 = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'NONDETERMINISM
  maybeToEnum Int
4 = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'LANG_FAIL
  maybeToEnum Int
5 = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'LANG_REQUESTED
  maybeToEnum Int
6 = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'TASK_NOT_FOUND
  maybeToEnum Int
7 = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'UNHANDLED_COMMAND
  maybeToEnum Int
8 = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'FATAL
  maybeToEnum Int
9
    = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'PAGINATION_OR_HISTORY_FETCH
  maybeToEnum Int
k
    = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just
        (RemoveFromCache'EvictionReason'UnrecognizedValue
-> RemoveFromCache'EvictionReason
RemoveFromCache'EvictionReason'Unrecognized
           (Int32 -> RemoveFromCache'EvictionReason'UnrecognizedValue
RemoveFromCache'EvictionReason'UnrecognizedValue
              (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: RemoveFromCache'EvictionReason -> String
showEnum RemoveFromCache'EvictionReason
RemoveFromCache'UNSPECIFIED = String
"UNSPECIFIED"
  showEnum RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_FULL = String
"CACHE_FULL"
  showEnum RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_MISS = String
"CACHE_MISS"
  showEnum RemoveFromCache'EvictionReason
RemoveFromCache'NONDETERMINISM = String
"NONDETERMINISM"
  showEnum RemoveFromCache'EvictionReason
RemoveFromCache'LANG_FAIL = String
"LANG_FAIL"
  showEnum RemoveFromCache'EvictionReason
RemoveFromCache'LANG_REQUESTED = String
"LANG_REQUESTED"
  showEnum RemoveFromCache'EvictionReason
RemoveFromCache'TASK_NOT_FOUND = String
"TASK_NOT_FOUND"
  showEnum RemoveFromCache'EvictionReason
RemoveFromCache'UNHANDLED_COMMAND = String
"UNHANDLED_COMMAND"
  showEnum RemoveFromCache'EvictionReason
RemoveFromCache'FATAL = String
"FATAL"
  showEnum RemoveFromCache'EvictionReason
RemoveFromCache'PAGINATION_OR_HISTORY_FETCH
    = String
"PAGINATION_OR_HISTORY_FETCH"
  showEnum
    (RemoveFromCache'EvictionReason'Unrecognized (RemoveFromCache'EvictionReason'UnrecognizedValue Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe RemoveFromCache'EvictionReason
readEnum String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"UNSPECIFIED"
    = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'UNSPECIFIED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"CACHE_FULL"
    = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_FULL
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"CACHE_MISS"
    = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_MISS
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"NONDETERMINISM"
    = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'NONDETERMINISM
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"LANG_FAIL"
    = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'LANG_FAIL
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"LANG_REQUESTED"
    = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'LANG_REQUESTED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TASK_NOT_FOUND"
    = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'TASK_NOT_FOUND
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"UNHANDLED_COMMAND"
    = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'UNHANDLED_COMMAND
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"FATAL" = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'FATAL
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"PAGINATION_OR_HISTORY_FETCH"
    = RemoveFromCache'EvictionReason
-> Maybe RemoveFromCache'EvictionReason
forall a. a -> Maybe a
Prelude.Just RemoveFromCache'EvictionReason
RemoveFromCache'PAGINATION_OR_HISTORY_FETCH
    | Bool
Prelude.otherwise
    = Maybe Int
-> (Int -> Maybe RemoveFromCache'EvictionReason)
-> Maybe RemoveFromCache'EvictionReason
forall a b. Maybe a -> (a -> Maybe b) -> Maybe b
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
(Prelude.>>=) (String -> Maybe Int
forall a. Read a => String -> Maybe a
Text.Read.readMaybe String
k) Int -> Maybe RemoveFromCache'EvictionReason
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded RemoveFromCache'EvictionReason where
  minBound :: RemoveFromCache'EvictionReason
minBound = RemoveFromCache'EvictionReason
RemoveFromCache'UNSPECIFIED
  maxBound :: RemoveFromCache'EvictionReason
maxBound = RemoveFromCache'EvictionReason
RemoveFromCache'PAGINATION_OR_HISTORY_FETCH
instance Prelude.Enum RemoveFromCache'EvictionReason where
  toEnum :: Int -> RemoveFromCache'EvictionReason
toEnum Int
k__
    = RemoveFromCache'EvictionReason
-> (RemoveFromCache'EvictionReason
    -> RemoveFromCache'EvictionReason)
-> Maybe RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> RemoveFromCache'EvictionReason
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              String
"toEnum: unknown value for enum EvictionReason: "
              (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        RemoveFromCache'EvictionReason -> RemoveFromCache'EvictionReason
forall a. a -> a
Prelude.id (Int -> Maybe RemoveFromCache'EvictionReason
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: RemoveFromCache'EvictionReason -> Int
fromEnum RemoveFromCache'EvictionReason
RemoveFromCache'UNSPECIFIED = Int
0
  fromEnum RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_FULL = Int
1
  fromEnum RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_MISS = Int
2
  fromEnum RemoveFromCache'EvictionReason
RemoveFromCache'NONDETERMINISM = Int
3
  fromEnum RemoveFromCache'EvictionReason
RemoveFromCache'LANG_FAIL = Int
4
  fromEnum RemoveFromCache'EvictionReason
RemoveFromCache'LANG_REQUESTED = Int
5
  fromEnum RemoveFromCache'EvictionReason
RemoveFromCache'TASK_NOT_FOUND = Int
6
  fromEnum RemoveFromCache'EvictionReason
RemoveFromCache'UNHANDLED_COMMAND = Int
7
  fromEnum RemoveFromCache'EvictionReason
RemoveFromCache'FATAL = Int
8
  fromEnum RemoveFromCache'EvictionReason
RemoveFromCache'PAGINATION_OR_HISTORY_FETCH = Int
9
  fromEnum
    (RemoveFromCache'EvictionReason'Unrecognized (RemoveFromCache'EvictionReason'UnrecognizedValue Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: RemoveFromCache'EvictionReason -> RemoveFromCache'EvictionReason
succ RemoveFromCache'EvictionReason
RemoveFromCache'PAGINATION_OR_HISTORY_FETCH
    = String -> RemoveFromCache'EvictionReason
forall a. HasCallStack => String -> a
Prelude.error
        String
"RemoveFromCache'EvictionReason.succ: bad argument RemoveFromCache'PAGINATION_OR_HISTORY_FETCH. This value would be out of bounds."
  succ RemoveFromCache'EvictionReason
RemoveFromCache'UNSPECIFIED = RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_FULL
  succ RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_FULL = RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_MISS
  succ RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_MISS = RemoveFromCache'EvictionReason
RemoveFromCache'NONDETERMINISM
  succ RemoveFromCache'EvictionReason
RemoveFromCache'NONDETERMINISM = RemoveFromCache'EvictionReason
RemoveFromCache'LANG_FAIL
  succ RemoveFromCache'EvictionReason
RemoveFromCache'LANG_FAIL = RemoveFromCache'EvictionReason
RemoveFromCache'LANG_REQUESTED
  succ RemoveFromCache'EvictionReason
RemoveFromCache'LANG_REQUESTED
    = RemoveFromCache'EvictionReason
RemoveFromCache'TASK_NOT_FOUND
  succ RemoveFromCache'EvictionReason
RemoveFromCache'TASK_NOT_FOUND
    = RemoveFromCache'EvictionReason
RemoveFromCache'UNHANDLED_COMMAND
  succ RemoveFromCache'EvictionReason
RemoveFromCache'UNHANDLED_COMMAND = RemoveFromCache'EvictionReason
RemoveFromCache'FATAL
  succ RemoveFromCache'EvictionReason
RemoveFromCache'FATAL
    = RemoveFromCache'EvictionReason
RemoveFromCache'PAGINATION_OR_HISTORY_FETCH
  succ (RemoveFromCache'EvictionReason'Unrecognized RemoveFromCache'EvictionReason'UnrecognizedValue
_)
    = String -> RemoveFromCache'EvictionReason
forall a. HasCallStack => String -> a
Prelude.error
        String
"RemoveFromCache'EvictionReason.succ: bad argument: unrecognized value"
  pred :: RemoveFromCache'EvictionReason -> RemoveFromCache'EvictionReason
pred RemoveFromCache'EvictionReason
RemoveFromCache'UNSPECIFIED
    = String -> RemoveFromCache'EvictionReason
forall a. HasCallStack => String -> a
Prelude.error
        String
"RemoveFromCache'EvictionReason.pred: bad argument RemoveFromCache'UNSPECIFIED. This value would be out of bounds."
  pred RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_FULL = RemoveFromCache'EvictionReason
RemoveFromCache'UNSPECIFIED
  pred RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_MISS = RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_FULL
  pred RemoveFromCache'EvictionReason
RemoveFromCache'NONDETERMINISM = RemoveFromCache'EvictionReason
RemoveFromCache'CACHE_MISS
  pred RemoveFromCache'EvictionReason
RemoveFromCache'LANG_FAIL = RemoveFromCache'EvictionReason
RemoveFromCache'NONDETERMINISM
  pred RemoveFromCache'EvictionReason
RemoveFromCache'LANG_REQUESTED = RemoveFromCache'EvictionReason
RemoveFromCache'LANG_FAIL
  pred RemoveFromCache'EvictionReason
RemoveFromCache'TASK_NOT_FOUND
    = RemoveFromCache'EvictionReason
RemoveFromCache'LANG_REQUESTED
  pred RemoveFromCache'EvictionReason
RemoveFromCache'UNHANDLED_COMMAND
    = RemoveFromCache'EvictionReason
RemoveFromCache'TASK_NOT_FOUND
  pred RemoveFromCache'EvictionReason
RemoveFromCache'FATAL = RemoveFromCache'EvictionReason
RemoveFromCache'UNHANDLED_COMMAND
  pred RemoveFromCache'EvictionReason
RemoveFromCache'PAGINATION_OR_HISTORY_FETCH
    = RemoveFromCache'EvictionReason
RemoveFromCache'FATAL
  pred (RemoveFromCache'EvictionReason'Unrecognized RemoveFromCache'EvictionReason'UnrecognizedValue
_)
    = String -> RemoveFromCache'EvictionReason
forall a. HasCallStack => String -> a
Prelude.error
        String
"RemoveFromCache'EvictionReason.pred: bad argument: unrecognized value"
  enumFrom :: RemoveFromCache'EvictionReason -> [RemoveFromCache'EvictionReason]
enumFrom = RemoveFromCache'EvictionReason -> [RemoveFromCache'EvictionReason]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason
-> [RemoveFromCache'EvictionReason]
enumFromTo = RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason
-> [RemoveFromCache'EvictionReason]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason
-> [RemoveFromCache'EvictionReason]
enumFromThen = RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason
-> [RemoveFromCache'EvictionReason]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason
-> [RemoveFromCache'EvictionReason]
enumFromThenTo = RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason
-> RemoveFromCache'EvictionReason
-> [RemoveFromCache'EvictionReason]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault RemoveFromCache'EvictionReason where
  fieldDefault :: RemoveFromCache'EvictionReason
fieldDefault = RemoveFromCache'EvictionReason
RemoveFromCache'UNSPECIFIED
instance Control.DeepSeq.NFData RemoveFromCache'EvictionReason where
  rnf :: RemoveFromCache'EvictionReason -> ()
rnf RemoveFromCache'EvictionReason
x__ = RemoveFromCache'EvictionReason -> () -> ()
forall a b. a -> b -> b
Prelude.seq RemoveFromCache'EvictionReason
x__ ()
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.seq' @:: Lens' ResolveActivity Data.Word.Word32@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.result' @:: Lens' ResolveActivity Proto.Temporal.Sdk.Core.ActivityResult.ActivityResult.ActivityResolution@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'result' @:: Lens' ResolveActivity (Prelude.Maybe Proto.Temporal.Sdk.Core.ActivityResult.ActivityResult.ActivityResolution)@ -}
data ResolveActivity
  = ResolveActivity'_constructor {ResolveActivity -> Word32
_ResolveActivity'seq :: !Data.Word.Word32,
                                  ResolveActivity -> Maybe ActivityResolution
_ResolveActivity'result :: !(Prelude.Maybe Proto.Temporal.Sdk.Core.ActivityResult.ActivityResult.ActivityResolution),
                                  ResolveActivity -> FieldSet
_ResolveActivity'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ResolveActivity -> ResolveActivity -> Bool
(ResolveActivity -> ResolveActivity -> Bool)
-> (ResolveActivity -> ResolveActivity -> Bool)
-> Eq ResolveActivity
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResolveActivity -> ResolveActivity -> Bool
== :: ResolveActivity -> ResolveActivity -> Bool
$c/= :: ResolveActivity -> ResolveActivity -> Bool
/= :: ResolveActivity -> ResolveActivity -> Bool
Prelude.Eq, Eq ResolveActivity
Eq ResolveActivity =>
(ResolveActivity -> ResolveActivity -> Ordering)
-> (ResolveActivity -> ResolveActivity -> Bool)
-> (ResolveActivity -> ResolveActivity -> Bool)
-> (ResolveActivity -> ResolveActivity -> Bool)
-> (ResolveActivity -> ResolveActivity -> Bool)
-> (ResolveActivity -> ResolveActivity -> ResolveActivity)
-> (ResolveActivity -> ResolveActivity -> ResolveActivity)
-> Ord ResolveActivity
ResolveActivity -> ResolveActivity -> Bool
ResolveActivity -> ResolveActivity -> Ordering
ResolveActivity -> ResolveActivity -> ResolveActivity
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 :: ResolveActivity -> ResolveActivity -> Ordering
compare :: ResolveActivity -> ResolveActivity -> Ordering
$c< :: ResolveActivity -> ResolveActivity -> Bool
< :: ResolveActivity -> ResolveActivity -> Bool
$c<= :: ResolveActivity -> ResolveActivity -> Bool
<= :: ResolveActivity -> ResolveActivity -> Bool
$c> :: ResolveActivity -> ResolveActivity -> Bool
> :: ResolveActivity -> ResolveActivity -> Bool
$c>= :: ResolveActivity -> ResolveActivity -> Bool
>= :: ResolveActivity -> ResolveActivity -> Bool
$cmax :: ResolveActivity -> ResolveActivity -> ResolveActivity
max :: ResolveActivity -> ResolveActivity -> ResolveActivity
$cmin :: ResolveActivity -> ResolveActivity -> ResolveActivity
min :: ResolveActivity -> ResolveActivity -> ResolveActivity
Prelude.Ord)
instance Prelude.Show ResolveActivity where
  showsPrec :: Int -> ResolveActivity -> ShowS
showsPrec Int
_ ResolveActivity
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ResolveActivity -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResolveActivity
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ResolveActivity "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq"
-> (Word32 -> f Word32) -> ResolveActivity -> f ResolveActivity
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32) -> ResolveActivity -> f ResolveActivity)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> ResolveActivity
-> f ResolveActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveActivity -> Word32)
-> (ResolveActivity -> Word32 -> ResolveActivity)
-> Lens ResolveActivity ResolveActivity Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveActivity -> Word32
_ResolveActivity'seq
           (\ ResolveActivity
x__ Word32
y__ -> ResolveActivity
x__ {_ResolveActivity'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResolveActivity "result" Proto.Temporal.Sdk.Core.ActivityResult.ActivityResult.ActivityResolution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "result"
-> (ActivityResolution -> f ActivityResolution)
-> ResolveActivity
-> f ResolveActivity
fieldOf Proxy# "result"
_
    = ((Maybe ActivityResolution -> f (Maybe ActivityResolution))
 -> ResolveActivity -> f ResolveActivity)
-> ((ActivityResolution -> f ActivityResolution)
    -> Maybe ActivityResolution -> f (Maybe ActivityResolution))
-> (ActivityResolution -> f ActivityResolution)
-> ResolveActivity
-> f ResolveActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveActivity -> Maybe ActivityResolution)
-> (ResolveActivity -> Maybe ActivityResolution -> ResolveActivity)
-> Lens
     ResolveActivity
     ResolveActivity
     (Maybe ActivityResolution)
     (Maybe ActivityResolution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveActivity -> Maybe ActivityResolution
_ResolveActivity'result
           (\ ResolveActivity
x__ Maybe ActivityResolution
y__ -> ResolveActivity
x__ {_ResolveActivity'result = y__}))
        (ActivityResolution
-> Lens' (Maybe ActivityResolution) ActivityResolution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ActivityResolution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ResolveActivity "maybe'result" (Prelude.Maybe Proto.Temporal.Sdk.Core.ActivityResult.ActivityResult.ActivityResolution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'result"
-> (Maybe ActivityResolution -> f (Maybe ActivityResolution))
-> ResolveActivity
-> f ResolveActivity
fieldOf Proxy# "maybe'result"
_
    = ((Maybe ActivityResolution -> f (Maybe ActivityResolution))
 -> ResolveActivity -> f ResolveActivity)
-> ((Maybe ActivityResolution -> f (Maybe ActivityResolution))
    -> Maybe ActivityResolution -> f (Maybe ActivityResolution))
-> (Maybe ActivityResolution -> f (Maybe ActivityResolution))
-> ResolveActivity
-> f ResolveActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveActivity -> Maybe ActivityResolution)
-> (ResolveActivity -> Maybe ActivityResolution -> ResolveActivity)
-> Lens
     ResolveActivity
     ResolveActivity
     (Maybe ActivityResolution)
     (Maybe ActivityResolution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveActivity -> Maybe ActivityResolution
_ResolveActivity'result
           (\ ResolveActivity
x__ Maybe ActivityResolution
y__ -> ResolveActivity
x__ {_ResolveActivity'result = y__}))
        (Maybe ActivityResolution -> f (Maybe ActivityResolution))
-> Maybe ActivityResolution -> f (Maybe ActivityResolution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ResolveActivity where
  messageName :: Proxy ResolveActivity -> Text
messageName Proxy ResolveActivity
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_activation.ResolveActivity"
  packedMessageDescriptor :: Proxy ResolveActivity -> ByteString
packedMessageDescriptor Proxy ResolveActivity
_
    = ByteString
"\n\
      \\SIResolveActivity\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2C\n\
      \\ACKresult\CAN\STX \SOH(\v2+.coresdk.activity_result.ActivityResolutionR\ACKresult"
  packedFileDescriptor :: Proxy ResolveActivity -> ByteString
packedFileDescriptor Proxy ResolveActivity
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ResolveActivity)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor ResolveActivity
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor ResolveActivity Word32
-> FieldDescriptor ResolveActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"seq"
              (ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
              (WireDefault Word32
-> Lens ResolveActivity ResolveActivity Word32 Word32
-> FieldAccessor ResolveActivity Word32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word32
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 @"seq")) ::
              Data.ProtoLens.FieldDescriptor ResolveActivity
        result__field_descriptor :: FieldDescriptor ResolveActivity
result__field_descriptor
          = String
-> FieldTypeDescriptor ActivityResolution
-> FieldAccessor ResolveActivity ActivityResolution
-> FieldDescriptor ResolveActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"result"
              (MessageOrGroup -> FieldTypeDescriptor ActivityResolution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Sdk.Core.ActivityResult.ActivityResult.ActivityResolution)
              (Lens
  ResolveActivity
  ResolveActivity
  (Maybe ActivityResolution)
  (Maybe ActivityResolution)
-> FieldAccessor ResolveActivity ActivityResolution
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 ResolveActivity
      in
        [(Tag, FieldDescriptor ResolveActivity)]
-> Map Tag (FieldDescriptor ResolveActivity)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ResolveActivity
seq__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ResolveActivity
result__field_descriptor)]
  unknownFields :: Lens' ResolveActivity FieldSet
unknownFields
    = (ResolveActivity -> FieldSet)
-> (ResolveActivity -> FieldSet -> ResolveActivity)
-> Lens' ResolveActivity FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ResolveActivity -> FieldSet
_ResolveActivity'_unknownFields
        (\ ResolveActivity
x__ FieldSet
y__ -> ResolveActivity
x__ {_ResolveActivity'_unknownFields = y__})
  defMessage :: ResolveActivity
defMessage
    = ResolveActivity'_constructor
        {_ResolveActivity'seq :: Word32
_ResolveActivity'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResolveActivity'result :: Maybe ActivityResolution
_ResolveActivity'result = Maybe ActivityResolution
forall a. Maybe a
Prelude.Nothing,
         _ResolveActivity'_unknownFields :: FieldSet
_ResolveActivity'_unknownFields = []}
  parseMessage :: Parser ResolveActivity
parseMessage
    = let
        loop ::
          ResolveActivity
          -> Data.ProtoLens.Encoding.Bytes.Parser ResolveActivity
        loop :: ResolveActivity -> Parser ResolveActivity
loop ResolveActivity
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 Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"seq"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"seq") y x)
                        Word64
18
                          -> do y <- Parser ActivityResolution -> String -> Parser ActivityResolution
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 ResolveActivity -> String -> Parser ResolveActivity
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ResolveActivity -> Parser ResolveActivity
loop ResolveActivity
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ResolveActivity"
  buildMessage :: ResolveActivity -> Builder
buildMessage
    = \ ResolveActivity
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike Word32 ResolveActivity ResolveActivity Word32 Word32
-> ResolveActivity -> Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"seq") ResolveActivity
_x
              in
                if Word32 -> Word32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word32
_v Word32
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) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word32
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe ActivityResolution)
  ResolveActivity
  ResolveActivity
  (Maybe ActivityResolution)
  (Maybe ActivityResolution)
-> ResolveActivity -> Maybe ActivityResolution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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") ResolveActivity
_x
                 of
                   Maybe ActivityResolution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just ActivityResolution
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (ActivityResolution -> ByteString)
-> ActivityResolution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             ActivityResolution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ActivityResolution
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike FieldSet ResolveActivity ResolveActivity FieldSet FieldSet
-> ResolveActivity -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet ResolveActivity ResolveActivity FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResolveActivity FieldSet
Data.ProtoLens.unknownFields ResolveActivity
_x)))
instance Control.DeepSeq.NFData ResolveActivity where
  rnf :: ResolveActivity -> ()
rnf
    = \ ResolveActivity
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ResolveActivity -> FieldSet
_ResolveActivity'_unknownFields ResolveActivity
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ResolveActivity -> Word32
_ResolveActivity'seq ResolveActivity
x__)
                (Maybe ActivityResolution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (ResolveActivity -> Maybe ActivityResolution
_ResolveActivity'result ResolveActivity
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.seq' @:: Lens' ResolveChildWorkflowExecution Data.Word.Word32@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.result' @:: Lens' ResolveChildWorkflowExecution Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.ChildWorkflowResult@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'result' @:: Lens' ResolveChildWorkflowExecution (Prelude.Maybe Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.ChildWorkflowResult)@ -}
data ResolveChildWorkflowExecution
  = ResolveChildWorkflowExecution'_constructor {ResolveChildWorkflowExecution -> Word32
_ResolveChildWorkflowExecution'seq :: !Data.Word.Word32,
                                                ResolveChildWorkflowExecution -> Maybe ChildWorkflowResult
_ResolveChildWorkflowExecution'result :: !(Prelude.Maybe Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.ChildWorkflowResult),
                                                ResolveChildWorkflowExecution -> FieldSet
_ResolveChildWorkflowExecution'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Bool
(ResolveChildWorkflowExecution
 -> ResolveChildWorkflowExecution -> Bool)
-> (ResolveChildWorkflowExecution
    -> ResolveChildWorkflowExecution -> Bool)
-> Eq ResolveChildWorkflowExecution
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Bool
== :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Bool
$c/= :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Bool
/= :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Bool
Prelude.Eq, Eq ResolveChildWorkflowExecution
Eq ResolveChildWorkflowExecution =>
(ResolveChildWorkflowExecution
 -> ResolveChildWorkflowExecution -> Ordering)
-> (ResolveChildWorkflowExecution
    -> ResolveChildWorkflowExecution -> Bool)
-> (ResolveChildWorkflowExecution
    -> ResolveChildWorkflowExecution -> Bool)
-> (ResolveChildWorkflowExecution
    -> ResolveChildWorkflowExecution -> Bool)
-> (ResolveChildWorkflowExecution
    -> ResolveChildWorkflowExecution -> Bool)
-> (ResolveChildWorkflowExecution
    -> ResolveChildWorkflowExecution -> ResolveChildWorkflowExecution)
-> (ResolveChildWorkflowExecution
    -> ResolveChildWorkflowExecution -> ResolveChildWorkflowExecution)
-> Ord ResolveChildWorkflowExecution
ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Bool
ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Ordering
ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> ResolveChildWorkflowExecution
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 :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Ordering
compare :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Ordering
$c< :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Bool
< :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Bool
$c<= :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Bool
<= :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Bool
$c> :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Bool
> :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Bool
$c>= :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Bool
>= :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> Bool
$cmax :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> ResolveChildWorkflowExecution
max :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> ResolveChildWorkflowExecution
$cmin :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> ResolveChildWorkflowExecution
min :: ResolveChildWorkflowExecution
-> ResolveChildWorkflowExecution -> ResolveChildWorkflowExecution
Prelude.Ord)
instance Prelude.Show ResolveChildWorkflowExecution where
  showsPrec :: Int -> ResolveChildWorkflowExecution -> ShowS
showsPrec Int
_ ResolveChildWorkflowExecution
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ResolveChildWorkflowExecution -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResolveChildWorkflowExecution
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecution "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq"
-> (Word32 -> f Word32)
-> ResolveChildWorkflowExecution
-> f ResolveChildWorkflowExecution
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32)
 -> ResolveChildWorkflowExecution
 -> f ResolveChildWorkflowExecution)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> ResolveChildWorkflowExecution
-> f ResolveChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecution -> Word32)
-> (ResolveChildWorkflowExecution
    -> Word32 -> ResolveChildWorkflowExecution)
-> Lens
     ResolveChildWorkflowExecution
     ResolveChildWorkflowExecution
     Word32
     Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecution -> Word32
_ResolveChildWorkflowExecution'seq
           (\ ResolveChildWorkflowExecution
x__ Word32
y__ -> ResolveChildWorkflowExecution
x__ {_ResolveChildWorkflowExecution'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecution "result" Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.ChildWorkflowResult where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "result"
-> (ChildWorkflowResult -> f ChildWorkflowResult)
-> ResolveChildWorkflowExecution
-> f ResolveChildWorkflowExecution
fieldOf Proxy# "result"
_
    = ((Maybe ChildWorkflowResult -> f (Maybe ChildWorkflowResult))
 -> ResolveChildWorkflowExecution
 -> f ResolveChildWorkflowExecution)
-> ((ChildWorkflowResult -> f ChildWorkflowResult)
    -> Maybe ChildWorkflowResult -> f (Maybe ChildWorkflowResult))
-> (ChildWorkflowResult -> f ChildWorkflowResult)
-> ResolveChildWorkflowExecution
-> f ResolveChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecution -> Maybe ChildWorkflowResult)
-> (ResolveChildWorkflowExecution
    -> Maybe ChildWorkflowResult -> ResolveChildWorkflowExecution)
-> Lens
     ResolveChildWorkflowExecution
     ResolveChildWorkflowExecution
     (Maybe ChildWorkflowResult)
     (Maybe ChildWorkflowResult)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecution -> Maybe ChildWorkflowResult
_ResolveChildWorkflowExecution'result
           (\ ResolveChildWorkflowExecution
x__ Maybe ChildWorkflowResult
y__ -> ResolveChildWorkflowExecution
x__ {_ResolveChildWorkflowExecution'result = y__}))
        (ChildWorkflowResult
-> Lens' (Maybe ChildWorkflowResult) ChildWorkflowResult
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ChildWorkflowResult
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecution "maybe'result" (Prelude.Maybe Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.ChildWorkflowResult) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'result"
-> (Maybe ChildWorkflowResult -> f (Maybe ChildWorkflowResult))
-> ResolveChildWorkflowExecution
-> f ResolveChildWorkflowExecution
fieldOf Proxy# "maybe'result"
_
    = ((Maybe ChildWorkflowResult -> f (Maybe ChildWorkflowResult))
 -> ResolveChildWorkflowExecution
 -> f ResolveChildWorkflowExecution)
-> ((Maybe ChildWorkflowResult -> f (Maybe ChildWorkflowResult))
    -> Maybe ChildWorkflowResult -> f (Maybe ChildWorkflowResult))
-> (Maybe ChildWorkflowResult -> f (Maybe ChildWorkflowResult))
-> ResolveChildWorkflowExecution
-> f ResolveChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecution -> Maybe ChildWorkflowResult)
-> (ResolveChildWorkflowExecution
    -> Maybe ChildWorkflowResult -> ResolveChildWorkflowExecution)
-> Lens
     ResolveChildWorkflowExecution
     ResolveChildWorkflowExecution
     (Maybe ChildWorkflowResult)
     (Maybe ChildWorkflowResult)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecution -> Maybe ChildWorkflowResult
_ResolveChildWorkflowExecution'result
           (\ ResolveChildWorkflowExecution
x__ Maybe ChildWorkflowResult
y__ -> ResolveChildWorkflowExecution
x__ {_ResolveChildWorkflowExecution'result = y__}))
        (Maybe ChildWorkflowResult -> f (Maybe ChildWorkflowResult))
-> Maybe ChildWorkflowResult -> f (Maybe ChildWorkflowResult)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ResolveChildWorkflowExecution where
  messageName :: Proxy ResolveChildWorkflowExecution -> Text
messageName Proxy ResolveChildWorkflowExecution
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_activation.ResolveChildWorkflowExecution"
  packedMessageDescriptor :: Proxy ResolveChildWorkflowExecution -> ByteString
packedMessageDescriptor Proxy ResolveChildWorkflowExecution
_
    = ByteString
"\n\
      \\GSResolveChildWorkflowExecution\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2C\n\
      \\ACKresult\CAN\STX \SOH(\v2+.coresdk.child_workflow.ChildWorkflowResultR\ACKresult"
  packedFileDescriptor :: Proxy ResolveChildWorkflowExecution -> ByteString
packedFileDescriptor Proxy ResolveChildWorkflowExecution
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ResolveChildWorkflowExecution)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor ResolveChildWorkflowExecution
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor ResolveChildWorkflowExecution Word32
-> FieldDescriptor ResolveChildWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"seq"
              (ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
              (WireDefault Word32
-> Lens
     ResolveChildWorkflowExecution
     ResolveChildWorkflowExecution
     Word32
     Word32
-> FieldAccessor ResolveChildWorkflowExecution Word32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word32
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 @"seq")) ::
              Data.ProtoLens.FieldDescriptor ResolveChildWorkflowExecution
        result__field_descriptor :: FieldDescriptor ResolveChildWorkflowExecution
result__field_descriptor
          = String
-> FieldTypeDescriptor ChildWorkflowResult
-> FieldAccessor ResolveChildWorkflowExecution ChildWorkflowResult
-> FieldDescriptor ResolveChildWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"result"
              (MessageOrGroup -> FieldTypeDescriptor ChildWorkflowResult
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.ChildWorkflowResult)
              (Lens
  ResolveChildWorkflowExecution
  ResolveChildWorkflowExecution
  (Maybe ChildWorkflowResult)
  (Maybe ChildWorkflowResult)
-> FieldAccessor ResolveChildWorkflowExecution ChildWorkflowResult
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 ResolveChildWorkflowExecution
      in
        [(Tag, FieldDescriptor ResolveChildWorkflowExecution)]
-> Map Tag (FieldDescriptor ResolveChildWorkflowExecution)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ResolveChildWorkflowExecution
seq__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ResolveChildWorkflowExecution
result__field_descriptor)]
  unknownFields :: Lens' ResolveChildWorkflowExecution FieldSet
unknownFields
    = (ResolveChildWorkflowExecution -> FieldSet)
-> (ResolveChildWorkflowExecution
    -> FieldSet -> ResolveChildWorkflowExecution)
-> Lens' ResolveChildWorkflowExecution FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ResolveChildWorkflowExecution -> FieldSet
_ResolveChildWorkflowExecution'_unknownFields
        (\ ResolveChildWorkflowExecution
x__ FieldSet
y__
           -> ResolveChildWorkflowExecution
x__ {_ResolveChildWorkflowExecution'_unknownFields = y__})
  defMessage :: ResolveChildWorkflowExecution
defMessage
    = ResolveChildWorkflowExecution'_constructor
        {_ResolveChildWorkflowExecution'seq :: Word32
_ResolveChildWorkflowExecution'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResolveChildWorkflowExecution'result :: Maybe ChildWorkflowResult
_ResolveChildWorkflowExecution'result = Maybe ChildWorkflowResult
forall a. Maybe a
Prelude.Nothing,
         _ResolveChildWorkflowExecution'_unknownFields :: FieldSet
_ResolveChildWorkflowExecution'_unknownFields = []}
  parseMessage :: Parser ResolveChildWorkflowExecution
parseMessage
    = let
        loop ::
          ResolveChildWorkflowExecution
          -> Data.ProtoLens.Encoding.Bytes.Parser ResolveChildWorkflowExecution
        loop :: ResolveChildWorkflowExecution
-> Parser ResolveChildWorkflowExecution
loop ResolveChildWorkflowExecution
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 Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"seq"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"seq") y x)
                        Word64
18
                          -> do y <- Parser ChildWorkflowResult -> String -> Parser ChildWorkflowResult
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 ResolveChildWorkflowExecution
-> String -> Parser ResolveChildWorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ResolveChildWorkflowExecution
-> Parser ResolveChildWorkflowExecution
loop ResolveChildWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ResolveChildWorkflowExecution"
  buildMessage :: ResolveChildWorkflowExecution -> Builder
buildMessage
    = \ ResolveChildWorkflowExecution
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike
  Word32
  ResolveChildWorkflowExecution
  ResolveChildWorkflowExecution
  Word32
  Word32
-> ResolveChildWorkflowExecution -> Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"seq") ResolveChildWorkflowExecution
_x
              in
                if Word32 -> Word32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word32
_v Word32
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) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word32
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe ChildWorkflowResult)
  ResolveChildWorkflowExecution
  ResolveChildWorkflowExecution
  (Maybe ChildWorkflowResult)
  (Maybe ChildWorkflowResult)
-> ResolveChildWorkflowExecution -> Maybe ChildWorkflowResult
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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") ResolveChildWorkflowExecution
_x
                 of
                   Maybe ChildWorkflowResult
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just ChildWorkflowResult
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (ChildWorkflowResult -> ByteString)
-> ChildWorkflowResult
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             ChildWorkflowResult -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ChildWorkflowResult
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ResolveChildWorkflowExecution
  ResolveChildWorkflowExecution
  FieldSet
  FieldSet
-> ResolveChildWorkflowExecution -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ResolveChildWorkflowExecution
  ResolveChildWorkflowExecution
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResolveChildWorkflowExecution FieldSet
Data.ProtoLens.unknownFields ResolveChildWorkflowExecution
_x)))
instance Control.DeepSeq.NFData ResolveChildWorkflowExecution where
  rnf :: ResolveChildWorkflowExecution -> ()
rnf
    = \ ResolveChildWorkflowExecution
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ResolveChildWorkflowExecution -> FieldSet
_ResolveChildWorkflowExecution'_unknownFields ResolveChildWorkflowExecution
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ResolveChildWorkflowExecution -> Word32
_ResolveChildWorkflowExecution'seq ResolveChildWorkflowExecution
x__)
                (Maybe ChildWorkflowResult -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ResolveChildWorkflowExecution -> Maybe ChildWorkflowResult
_ResolveChildWorkflowExecution'result ResolveChildWorkflowExecution
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.seq' @:: Lens' ResolveChildWorkflowExecutionStart Data.Word.Word32@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'status' @:: Lens' ResolveChildWorkflowExecutionStart (Prelude.Maybe ResolveChildWorkflowExecutionStart'Status)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'succeeded' @:: Lens' ResolveChildWorkflowExecutionStart (Prelude.Maybe ResolveChildWorkflowExecutionStartSuccess)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.succeeded' @:: Lens' ResolveChildWorkflowExecutionStart ResolveChildWorkflowExecutionStartSuccess@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'failed' @:: Lens' ResolveChildWorkflowExecutionStart (Prelude.Maybe ResolveChildWorkflowExecutionStartFailure)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.failed' @:: Lens' ResolveChildWorkflowExecutionStart ResolveChildWorkflowExecutionStartFailure@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'cancelled' @:: Lens' ResolveChildWorkflowExecutionStart (Prelude.Maybe ResolveChildWorkflowExecutionStartCancelled)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.cancelled' @:: Lens' ResolveChildWorkflowExecutionStart ResolveChildWorkflowExecutionStartCancelled@ -}
data ResolveChildWorkflowExecutionStart
  = ResolveChildWorkflowExecutionStart'_constructor {ResolveChildWorkflowExecutionStart -> Word32
_ResolveChildWorkflowExecutionStart'seq :: !Data.Word.Word32,
                                                     ResolveChildWorkflowExecutionStart
-> Maybe ResolveChildWorkflowExecutionStart'Status
_ResolveChildWorkflowExecutionStart'status :: !(Prelude.Maybe ResolveChildWorkflowExecutionStart'Status),
                                                     ResolveChildWorkflowExecutionStart -> FieldSet
_ResolveChildWorkflowExecutionStart'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Bool
(ResolveChildWorkflowExecutionStart
 -> ResolveChildWorkflowExecutionStart -> Bool)
-> (ResolveChildWorkflowExecutionStart
    -> ResolveChildWorkflowExecutionStart -> Bool)
-> Eq ResolveChildWorkflowExecutionStart
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Bool
== :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Bool
$c/= :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Bool
/= :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Bool
Prelude.Eq, Eq ResolveChildWorkflowExecutionStart
Eq ResolveChildWorkflowExecutionStart =>
(ResolveChildWorkflowExecutionStart
 -> ResolveChildWorkflowExecutionStart -> Ordering)
-> (ResolveChildWorkflowExecutionStart
    -> ResolveChildWorkflowExecutionStart -> Bool)
-> (ResolveChildWorkflowExecutionStart
    -> ResolveChildWorkflowExecutionStart -> Bool)
-> (ResolveChildWorkflowExecutionStart
    -> ResolveChildWorkflowExecutionStart -> Bool)
-> (ResolveChildWorkflowExecutionStart
    -> ResolveChildWorkflowExecutionStart -> Bool)
-> (ResolveChildWorkflowExecutionStart
    -> ResolveChildWorkflowExecutionStart
    -> ResolveChildWorkflowExecutionStart)
-> (ResolveChildWorkflowExecutionStart
    -> ResolveChildWorkflowExecutionStart
    -> ResolveChildWorkflowExecutionStart)
-> Ord ResolveChildWorkflowExecutionStart
ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Bool
ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Ordering
ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart
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 :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Ordering
compare :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Ordering
$c< :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Bool
< :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Bool
$c<= :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Bool
<= :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Bool
$c> :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Bool
> :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Bool
$c>= :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Bool
>= :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart -> Bool
$cmax :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart
max :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart
$cmin :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart
min :: ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart
-> ResolveChildWorkflowExecutionStart
Prelude.Ord)
instance Prelude.Show ResolveChildWorkflowExecutionStart where
  showsPrec :: Int -> ResolveChildWorkflowExecutionStart -> ShowS
showsPrec Int
_ ResolveChildWorkflowExecutionStart
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ResolveChildWorkflowExecutionStart -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResolveChildWorkflowExecutionStart
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data ResolveChildWorkflowExecutionStart'Status
  = ResolveChildWorkflowExecutionStart'Succeeded !ResolveChildWorkflowExecutionStartSuccess |
    ResolveChildWorkflowExecutionStart'Failed !ResolveChildWorkflowExecutionStartFailure |
    ResolveChildWorkflowExecutionStart'Cancelled !ResolveChildWorkflowExecutionStartCancelled
  deriving stock (Int -> ResolveChildWorkflowExecutionStart'Status -> ShowS
[ResolveChildWorkflowExecutionStart'Status] -> ShowS
ResolveChildWorkflowExecutionStart'Status -> String
(Int -> ResolveChildWorkflowExecutionStart'Status -> ShowS)
-> (ResolveChildWorkflowExecutionStart'Status -> String)
-> ([ResolveChildWorkflowExecutionStart'Status] -> ShowS)
-> Show ResolveChildWorkflowExecutionStart'Status
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ResolveChildWorkflowExecutionStart'Status -> ShowS
showsPrec :: Int -> ResolveChildWorkflowExecutionStart'Status -> ShowS
$cshow :: ResolveChildWorkflowExecutionStart'Status -> String
show :: ResolveChildWorkflowExecutionStart'Status -> String
$cshowList :: [ResolveChildWorkflowExecutionStart'Status] -> ShowS
showList :: [ResolveChildWorkflowExecutionStart'Status] -> ShowS
Prelude.Show, ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Bool
(ResolveChildWorkflowExecutionStart'Status
 -> ResolveChildWorkflowExecutionStart'Status -> Bool)
-> (ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart'Status -> Bool)
-> Eq ResolveChildWorkflowExecutionStart'Status
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Bool
== :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Bool
$c/= :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Bool
/= :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Bool
Prelude.Eq, Eq ResolveChildWorkflowExecutionStart'Status
Eq ResolveChildWorkflowExecutionStart'Status =>
(ResolveChildWorkflowExecutionStart'Status
 -> ResolveChildWorkflowExecutionStart'Status -> Ordering)
-> (ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart'Status -> Bool)
-> (ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart'Status -> Bool)
-> (ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart'Status -> Bool)
-> (ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart'Status -> Bool)
-> (ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart'Status)
-> (ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart'Status)
-> Ord ResolveChildWorkflowExecutionStart'Status
ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Bool
ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Ordering
ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status
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 :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Ordering
compare :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Ordering
$c< :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Bool
< :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Bool
$c<= :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Bool
<= :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Bool
$c> :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Bool
> :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Bool
$c>= :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Bool
>= :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status -> Bool
$cmax :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status
max :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status
$cmin :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status
min :: ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status
-> ResolveChildWorkflowExecutionStart'Status
Prelude.Ord)
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecutionStart "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq"
-> (Word32 -> f Word32)
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32)
 -> ResolveChildWorkflowExecutionStart
 -> f ResolveChildWorkflowExecutionStart)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecutionStart -> Word32)
-> (ResolveChildWorkflowExecutionStart
    -> Word32 -> ResolveChildWorkflowExecutionStart)
-> Lens
     ResolveChildWorkflowExecutionStart
     ResolveChildWorkflowExecutionStart
     Word32
     Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecutionStart -> Word32
_ResolveChildWorkflowExecutionStart'seq
           (\ ResolveChildWorkflowExecutionStart
x__ Word32
y__ -> ResolveChildWorkflowExecutionStart
x__ {_ResolveChildWorkflowExecutionStart'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecutionStart "maybe'status" (Prelude.Maybe ResolveChildWorkflowExecutionStart'Status) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'status"
-> (Maybe ResolveChildWorkflowExecutionStart'Status
    -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
fieldOf Proxy# "maybe'status"
_
    = ((Maybe ResolveChildWorkflowExecutionStart'Status
  -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
 -> ResolveChildWorkflowExecutionStart
 -> f ResolveChildWorkflowExecutionStart)
-> ((Maybe ResolveChildWorkflowExecutionStart'Status
     -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
    -> Maybe ResolveChildWorkflowExecutionStart'Status
    -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
-> (Maybe ResolveChildWorkflowExecutionStart'Status
    -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecutionStart
 -> Maybe ResolveChildWorkflowExecutionStart'Status)
-> (ResolveChildWorkflowExecutionStart
    -> Maybe ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart)
-> Lens
     ResolveChildWorkflowExecutionStart
     ResolveChildWorkflowExecutionStart
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStart'Status)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecutionStart
-> Maybe ResolveChildWorkflowExecutionStart'Status
_ResolveChildWorkflowExecutionStart'status
           (\ ResolveChildWorkflowExecutionStart
x__ Maybe ResolveChildWorkflowExecutionStart'Status
y__
              -> ResolveChildWorkflowExecutionStart
x__ {_ResolveChildWorkflowExecutionStart'status = y__}))
        (Maybe ResolveChildWorkflowExecutionStart'Status
 -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
-> Maybe ResolveChildWorkflowExecutionStart'Status
-> f (Maybe ResolveChildWorkflowExecutionStart'Status)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecutionStart "maybe'succeeded" (Prelude.Maybe ResolveChildWorkflowExecutionStartSuccess) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'succeeded"
-> (Maybe ResolveChildWorkflowExecutionStartSuccess
    -> f (Maybe ResolveChildWorkflowExecutionStartSuccess))
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
fieldOf Proxy# "maybe'succeeded"
_
    = ((Maybe ResolveChildWorkflowExecutionStart'Status
  -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
 -> ResolveChildWorkflowExecutionStart
 -> f ResolveChildWorkflowExecutionStart)
-> ((Maybe ResolveChildWorkflowExecutionStartSuccess
     -> f (Maybe ResolveChildWorkflowExecutionStartSuccess))
    -> Maybe ResolveChildWorkflowExecutionStart'Status
    -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
-> (Maybe ResolveChildWorkflowExecutionStartSuccess
    -> f (Maybe ResolveChildWorkflowExecutionStartSuccess))
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecutionStart
 -> Maybe ResolveChildWorkflowExecutionStart'Status)
-> (ResolveChildWorkflowExecutionStart
    -> Maybe ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart)
-> Lens
     ResolveChildWorkflowExecutionStart
     ResolveChildWorkflowExecutionStart
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStart'Status)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecutionStart
-> Maybe ResolveChildWorkflowExecutionStart'Status
_ResolveChildWorkflowExecutionStart'status
           (\ ResolveChildWorkflowExecutionStart
x__ Maybe ResolveChildWorkflowExecutionStart'Status
y__
              -> ResolveChildWorkflowExecutionStart
x__ {_ResolveChildWorkflowExecutionStart'status = y__}))
        ((Maybe ResolveChildWorkflowExecutionStart'Status
 -> Maybe ResolveChildWorkflowExecutionStartSuccess)
-> (Maybe ResolveChildWorkflowExecutionStart'Status
    -> Maybe ResolveChildWorkflowExecutionStartSuccess
    -> Maybe ResolveChildWorkflowExecutionStart'Status)
-> Lens
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStartSuccess)
     (Maybe ResolveChildWorkflowExecutionStartSuccess)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe ResolveChildWorkflowExecutionStart'Status
x__
              -> case Maybe ResolveChildWorkflowExecutionStart'Status
x__ of
                   (Prelude.Just (ResolveChildWorkflowExecutionStart'Succeeded ResolveChildWorkflowExecutionStartSuccess
x__val))
                     -> ResolveChildWorkflowExecutionStartSuccess
-> Maybe ResolveChildWorkflowExecutionStartSuccess
forall a. a -> Maybe a
Prelude.Just ResolveChildWorkflowExecutionStartSuccess
x__val
                   Maybe ResolveChildWorkflowExecutionStart'Status
_otherwise -> Maybe ResolveChildWorkflowExecutionStartSuccess
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe ResolveChildWorkflowExecutionStart'Status
_ Maybe ResolveChildWorkflowExecutionStartSuccess
y__
              -> (ResolveChildWorkflowExecutionStartSuccess
 -> ResolveChildWorkflowExecutionStart'Status)
-> Maybe ResolveChildWorkflowExecutionStartSuccess
-> Maybe ResolveChildWorkflowExecutionStart'Status
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStart'Status
ResolveChildWorkflowExecutionStart'Succeeded Maybe ResolveChildWorkflowExecutionStartSuccess
y__))
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecutionStart "succeeded" ResolveChildWorkflowExecutionStartSuccess where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "succeeded"
-> (ResolveChildWorkflowExecutionStartSuccess
    -> f ResolveChildWorkflowExecutionStartSuccess)
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
fieldOf Proxy# "succeeded"
_
    = ((Maybe ResolveChildWorkflowExecutionStart'Status
  -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
 -> ResolveChildWorkflowExecutionStart
 -> f ResolveChildWorkflowExecutionStart)
-> ((ResolveChildWorkflowExecutionStartSuccess
     -> f ResolveChildWorkflowExecutionStartSuccess)
    -> Maybe ResolveChildWorkflowExecutionStart'Status
    -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
-> (ResolveChildWorkflowExecutionStartSuccess
    -> f ResolveChildWorkflowExecutionStartSuccess)
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecutionStart
 -> Maybe ResolveChildWorkflowExecutionStart'Status)
-> (ResolveChildWorkflowExecutionStart
    -> Maybe ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart)
-> Lens
     ResolveChildWorkflowExecutionStart
     ResolveChildWorkflowExecutionStart
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStart'Status)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecutionStart
-> Maybe ResolveChildWorkflowExecutionStart'Status
_ResolveChildWorkflowExecutionStart'status
           (\ ResolveChildWorkflowExecutionStart
x__ Maybe ResolveChildWorkflowExecutionStart'Status
y__
              -> ResolveChildWorkflowExecutionStart
x__ {_ResolveChildWorkflowExecutionStart'status = y__}))
        (((Maybe ResolveChildWorkflowExecutionStartSuccess
  -> f (Maybe ResolveChildWorkflowExecutionStartSuccess))
 -> Maybe ResolveChildWorkflowExecutionStart'Status
 -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
-> ((ResolveChildWorkflowExecutionStartSuccess
     -> f ResolveChildWorkflowExecutionStartSuccess)
    -> Maybe ResolveChildWorkflowExecutionStartSuccess
    -> f (Maybe ResolveChildWorkflowExecutionStartSuccess))
-> (ResolveChildWorkflowExecutionStartSuccess
    -> f ResolveChildWorkflowExecutionStartSuccess)
-> Maybe ResolveChildWorkflowExecutionStart'Status
-> f (Maybe ResolveChildWorkflowExecutionStart'Status)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe ResolveChildWorkflowExecutionStart'Status
 -> Maybe ResolveChildWorkflowExecutionStartSuccess)
-> (Maybe ResolveChildWorkflowExecutionStart'Status
    -> Maybe ResolveChildWorkflowExecutionStartSuccess
    -> Maybe ResolveChildWorkflowExecutionStart'Status)
-> Lens
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStartSuccess)
     (Maybe ResolveChildWorkflowExecutionStartSuccess)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe ResolveChildWorkflowExecutionStart'Status
x__
                 -> case Maybe ResolveChildWorkflowExecutionStart'Status
x__ of
                      (Prelude.Just (ResolveChildWorkflowExecutionStart'Succeeded ResolveChildWorkflowExecutionStartSuccess
x__val))
                        -> ResolveChildWorkflowExecutionStartSuccess
-> Maybe ResolveChildWorkflowExecutionStartSuccess
forall a. a -> Maybe a
Prelude.Just ResolveChildWorkflowExecutionStartSuccess
x__val
                      Maybe ResolveChildWorkflowExecutionStart'Status
_otherwise -> Maybe ResolveChildWorkflowExecutionStartSuccess
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe ResolveChildWorkflowExecutionStart'Status
_ Maybe ResolveChildWorkflowExecutionStartSuccess
y__
                 -> (ResolveChildWorkflowExecutionStartSuccess
 -> ResolveChildWorkflowExecutionStart'Status)
-> Maybe ResolveChildWorkflowExecutionStartSuccess
-> Maybe ResolveChildWorkflowExecutionStart'Status
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStart'Status
ResolveChildWorkflowExecutionStart'Succeeded Maybe ResolveChildWorkflowExecutionStartSuccess
y__))
           (ResolveChildWorkflowExecutionStartSuccess
-> Lens'
     (Maybe ResolveChildWorkflowExecutionStartSuccess)
     ResolveChildWorkflowExecutionStartSuccess
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ResolveChildWorkflowExecutionStartSuccess
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecutionStart "maybe'failed" (Prelude.Maybe ResolveChildWorkflowExecutionStartFailure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'failed"
-> (Maybe ResolveChildWorkflowExecutionStartFailure
    -> f (Maybe ResolveChildWorkflowExecutionStartFailure))
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
fieldOf Proxy# "maybe'failed"
_
    = ((Maybe ResolveChildWorkflowExecutionStart'Status
  -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
 -> ResolveChildWorkflowExecutionStart
 -> f ResolveChildWorkflowExecutionStart)
-> ((Maybe ResolveChildWorkflowExecutionStartFailure
     -> f (Maybe ResolveChildWorkflowExecutionStartFailure))
    -> Maybe ResolveChildWorkflowExecutionStart'Status
    -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
-> (Maybe ResolveChildWorkflowExecutionStartFailure
    -> f (Maybe ResolveChildWorkflowExecutionStartFailure))
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecutionStart
 -> Maybe ResolveChildWorkflowExecutionStart'Status)
-> (ResolveChildWorkflowExecutionStart
    -> Maybe ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart)
-> Lens
     ResolveChildWorkflowExecutionStart
     ResolveChildWorkflowExecutionStart
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStart'Status)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecutionStart
-> Maybe ResolveChildWorkflowExecutionStart'Status
_ResolveChildWorkflowExecutionStart'status
           (\ ResolveChildWorkflowExecutionStart
x__ Maybe ResolveChildWorkflowExecutionStart'Status
y__
              -> ResolveChildWorkflowExecutionStart
x__ {_ResolveChildWorkflowExecutionStart'status = y__}))
        ((Maybe ResolveChildWorkflowExecutionStart'Status
 -> Maybe ResolveChildWorkflowExecutionStartFailure)
-> (Maybe ResolveChildWorkflowExecutionStart'Status
    -> Maybe ResolveChildWorkflowExecutionStartFailure
    -> Maybe ResolveChildWorkflowExecutionStart'Status)
-> Lens
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStartFailure)
     (Maybe ResolveChildWorkflowExecutionStartFailure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe ResolveChildWorkflowExecutionStart'Status
x__
              -> case Maybe ResolveChildWorkflowExecutionStart'Status
x__ of
                   (Prelude.Just (ResolveChildWorkflowExecutionStart'Failed ResolveChildWorkflowExecutionStartFailure
x__val))
                     -> ResolveChildWorkflowExecutionStartFailure
-> Maybe ResolveChildWorkflowExecutionStartFailure
forall a. a -> Maybe a
Prelude.Just ResolveChildWorkflowExecutionStartFailure
x__val
                   Maybe ResolveChildWorkflowExecutionStart'Status
_otherwise -> Maybe ResolveChildWorkflowExecutionStartFailure
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe ResolveChildWorkflowExecutionStart'Status
_ Maybe ResolveChildWorkflowExecutionStartFailure
y__
              -> (ResolveChildWorkflowExecutionStartFailure
 -> ResolveChildWorkflowExecutionStart'Status)
-> Maybe ResolveChildWorkflowExecutionStartFailure
-> Maybe ResolveChildWorkflowExecutionStart'Status
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStart'Status
ResolveChildWorkflowExecutionStart'Failed Maybe ResolveChildWorkflowExecutionStartFailure
y__))
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecutionStart "failed" ResolveChildWorkflowExecutionStartFailure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failed"
-> (ResolveChildWorkflowExecutionStartFailure
    -> f ResolveChildWorkflowExecutionStartFailure)
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
fieldOf Proxy# "failed"
_
    = ((Maybe ResolveChildWorkflowExecutionStart'Status
  -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
 -> ResolveChildWorkflowExecutionStart
 -> f ResolveChildWorkflowExecutionStart)
-> ((ResolveChildWorkflowExecutionStartFailure
     -> f ResolveChildWorkflowExecutionStartFailure)
    -> Maybe ResolveChildWorkflowExecutionStart'Status
    -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
-> (ResolveChildWorkflowExecutionStartFailure
    -> f ResolveChildWorkflowExecutionStartFailure)
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecutionStart
 -> Maybe ResolveChildWorkflowExecutionStart'Status)
-> (ResolveChildWorkflowExecutionStart
    -> Maybe ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart)
-> Lens
     ResolveChildWorkflowExecutionStart
     ResolveChildWorkflowExecutionStart
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStart'Status)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecutionStart
-> Maybe ResolveChildWorkflowExecutionStart'Status
_ResolveChildWorkflowExecutionStart'status
           (\ ResolveChildWorkflowExecutionStart
x__ Maybe ResolveChildWorkflowExecutionStart'Status
y__
              -> ResolveChildWorkflowExecutionStart
x__ {_ResolveChildWorkflowExecutionStart'status = y__}))
        (((Maybe ResolveChildWorkflowExecutionStartFailure
  -> f (Maybe ResolveChildWorkflowExecutionStartFailure))
 -> Maybe ResolveChildWorkflowExecutionStart'Status
 -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
-> ((ResolveChildWorkflowExecutionStartFailure
     -> f ResolveChildWorkflowExecutionStartFailure)
    -> Maybe ResolveChildWorkflowExecutionStartFailure
    -> f (Maybe ResolveChildWorkflowExecutionStartFailure))
-> (ResolveChildWorkflowExecutionStartFailure
    -> f ResolveChildWorkflowExecutionStartFailure)
-> Maybe ResolveChildWorkflowExecutionStart'Status
-> f (Maybe ResolveChildWorkflowExecutionStart'Status)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe ResolveChildWorkflowExecutionStart'Status
 -> Maybe ResolveChildWorkflowExecutionStartFailure)
-> (Maybe ResolveChildWorkflowExecutionStart'Status
    -> Maybe ResolveChildWorkflowExecutionStartFailure
    -> Maybe ResolveChildWorkflowExecutionStart'Status)
-> Lens
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStartFailure)
     (Maybe ResolveChildWorkflowExecutionStartFailure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe ResolveChildWorkflowExecutionStart'Status
x__
                 -> case Maybe ResolveChildWorkflowExecutionStart'Status
x__ of
                      (Prelude.Just (ResolveChildWorkflowExecutionStart'Failed ResolveChildWorkflowExecutionStartFailure
x__val))
                        -> ResolveChildWorkflowExecutionStartFailure
-> Maybe ResolveChildWorkflowExecutionStartFailure
forall a. a -> Maybe a
Prelude.Just ResolveChildWorkflowExecutionStartFailure
x__val
                      Maybe ResolveChildWorkflowExecutionStart'Status
_otherwise -> Maybe ResolveChildWorkflowExecutionStartFailure
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe ResolveChildWorkflowExecutionStart'Status
_ Maybe ResolveChildWorkflowExecutionStartFailure
y__
                 -> (ResolveChildWorkflowExecutionStartFailure
 -> ResolveChildWorkflowExecutionStart'Status)
-> Maybe ResolveChildWorkflowExecutionStartFailure
-> Maybe ResolveChildWorkflowExecutionStart'Status
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStart'Status
ResolveChildWorkflowExecutionStart'Failed Maybe ResolveChildWorkflowExecutionStartFailure
y__))
           (ResolveChildWorkflowExecutionStartFailure
-> Lens'
     (Maybe ResolveChildWorkflowExecutionStartFailure)
     ResolveChildWorkflowExecutionStartFailure
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ResolveChildWorkflowExecutionStartFailure
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecutionStart "maybe'cancelled" (Prelude.Maybe ResolveChildWorkflowExecutionStartCancelled) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'cancelled"
-> (Maybe ResolveChildWorkflowExecutionStartCancelled
    -> f (Maybe ResolveChildWorkflowExecutionStartCancelled))
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
fieldOf Proxy# "maybe'cancelled"
_
    = ((Maybe ResolveChildWorkflowExecutionStart'Status
  -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
 -> ResolveChildWorkflowExecutionStart
 -> f ResolveChildWorkflowExecutionStart)
-> ((Maybe ResolveChildWorkflowExecutionStartCancelled
     -> f (Maybe ResolveChildWorkflowExecutionStartCancelled))
    -> Maybe ResolveChildWorkflowExecutionStart'Status
    -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
-> (Maybe ResolveChildWorkflowExecutionStartCancelled
    -> f (Maybe ResolveChildWorkflowExecutionStartCancelled))
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecutionStart
 -> Maybe ResolveChildWorkflowExecutionStart'Status)
-> (ResolveChildWorkflowExecutionStart
    -> Maybe ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart)
-> Lens
     ResolveChildWorkflowExecutionStart
     ResolveChildWorkflowExecutionStart
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStart'Status)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecutionStart
-> Maybe ResolveChildWorkflowExecutionStart'Status
_ResolveChildWorkflowExecutionStart'status
           (\ ResolveChildWorkflowExecutionStart
x__ Maybe ResolveChildWorkflowExecutionStart'Status
y__
              -> ResolveChildWorkflowExecutionStart
x__ {_ResolveChildWorkflowExecutionStart'status = y__}))
        ((Maybe ResolveChildWorkflowExecutionStart'Status
 -> Maybe ResolveChildWorkflowExecutionStartCancelled)
-> (Maybe ResolveChildWorkflowExecutionStart'Status
    -> Maybe ResolveChildWorkflowExecutionStartCancelled
    -> Maybe ResolveChildWorkflowExecutionStart'Status)
-> Lens
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStartCancelled)
     (Maybe ResolveChildWorkflowExecutionStartCancelled)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe ResolveChildWorkflowExecutionStart'Status
x__
              -> case Maybe ResolveChildWorkflowExecutionStart'Status
x__ of
                   (Prelude.Just (ResolveChildWorkflowExecutionStart'Cancelled ResolveChildWorkflowExecutionStartCancelled
x__val))
                     -> ResolveChildWorkflowExecutionStartCancelled
-> Maybe ResolveChildWorkflowExecutionStartCancelled
forall a. a -> Maybe a
Prelude.Just ResolveChildWorkflowExecutionStartCancelled
x__val
                   Maybe ResolveChildWorkflowExecutionStart'Status
_otherwise -> Maybe ResolveChildWorkflowExecutionStartCancelled
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe ResolveChildWorkflowExecutionStart'Status
_ Maybe ResolveChildWorkflowExecutionStartCancelled
y__
              -> (ResolveChildWorkflowExecutionStartCancelled
 -> ResolveChildWorkflowExecutionStart'Status)
-> Maybe ResolveChildWorkflowExecutionStartCancelled
-> Maybe ResolveChildWorkflowExecutionStart'Status
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStart'Status
ResolveChildWorkflowExecutionStart'Cancelled Maybe ResolveChildWorkflowExecutionStartCancelled
y__))
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecutionStart "cancelled" ResolveChildWorkflowExecutionStartCancelled where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cancelled"
-> (ResolveChildWorkflowExecutionStartCancelled
    -> f ResolveChildWorkflowExecutionStartCancelled)
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
fieldOf Proxy# "cancelled"
_
    = ((Maybe ResolveChildWorkflowExecutionStart'Status
  -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
 -> ResolveChildWorkflowExecutionStart
 -> f ResolveChildWorkflowExecutionStart)
-> ((ResolveChildWorkflowExecutionStartCancelled
     -> f ResolveChildWorkflowExecutionStartCancelled)
    -> Maybe ResolveChildWorkflowExecutionStart'Status
    -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
-> (ResolveChildWorkflowExecutionStartCancelled
    -> f ResolveChildWorkflowExecutionStartCancelled)
-> ResolveChildWorkflowExecutionStart
-> f ResolveChildWorkflowExecutionStart
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecutionStart
 -> Maybe ResolveChildWorkflowExecutionStart'Status)
-> (ResolveChildWorkflowExecutionStart
    -> Maybe ResolveChildWorkflowExecutionStart'Status
    -> ResolveChildWorkflowExecutionStart)
-> Lens
     ResolveChildWorkflowExecutionStart
     ResolveChildWorkflowExecutionStart
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStart'Status)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecutionStart
-> Maybe ResolveChildWorkflowExecutionStart'Status
_ResolveChildWorkflowExecutionStart'status
           (\ ResolveChildWorkflowExecutionStart
x__ Maybe ResolveChildWorkflowExecutionStart'Status
y__
              -> ResolveChildWorkflowExecutionStart
x__ {_ResolveChildWorkflowExecutionStart'status = y__}))
        (((Maybe ResolveChildWorkflowExecutionStartCancelled
  -> f (Maybe ResolveChildWorkflowExecutionStartCancelled))
 -> Maybe ResolveChildWorkflowExecutionStart'Status
 -> f (Maybe ResolveChildWorkflowExecutionStart'Status))
-> ((ResolveChildWorkflowExecutionStartCancelled
     -> f ResolveChildWorkflowExecutionStartCancelled)
    -> Maybe ResolveChildWorkflowExecutionStartCancelled
    -> f (Maybe ResolveChildWorkflowExecutionStartCancelled))
-> (ResolveChildWorkflowExecutionStartCancelled
    -> f ResolveChildWorkflowExecutionStartCancelled)
-> Maybe ResolveChildWorkflowExecutionStart'Status
-> f (Maybe ResolveChildWorkflowExecutionStart'Status)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe ResolveChildWorkflowExecutionStart'Status
 -> Maybe ResolveChildWorkflowExecutionStartCancelled)
-> (Maybe ResolveChildWorkflowExecutionStart'Status
    -> Maybe ResolveChildWorkflowExecutionStartCancelled
    -> Maybe ResolveChildWorkflowExecutionStart'Status)
-> Lens
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStart'Status)
     (Maybe ResolveChildWorkflowExecutionStartCancelled)
     (Maybe ResolveChildWorkflowExecutionStartCancelled)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe ResolveChildWorkflowExecutionStart'Status
x__
                 -> case Maybe ResolveChildWorkflowExecutionStart'Status
x__ of
                      (Prelude.Just (ResolveChildWorkflowExecutionStart'Cancelled ResolveChildWorkflowExecutionStartCancelled
x__val))
                        -> ResolveChildWorkflowExecutionStartCancelled
-> Maybe ResolveChildWorkflowExecutionStartCancelled
forall a. a -> Maybe a
Prelude.Just ResolveChildWorkflowExecutionStartCancelled
x__val
                      Maybe ResolveChildWorkflowExecutionStart'Status
_otherwise -> Maybe ResolveChildWorkflowExecutionStartCancelled
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe ResolveChildWorkflowExecutionStart'Status
_ Maybe ResolveChildWorkflowExecutionStartCancelled
y__
                 -> (ResolveChildWorkflowExecutionStartCancelled
 -> ResolveChildWorkflowExecutionStart'Status)
-> Maybe ResolveChildWorkflowExecutionStartCancelled
-> Maybe ResolveChildWorkflowExecutionStart'Status
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStart'Status
ResolveChildWorkflowExecutionStart'Cancelled Maybe ResolveChildWorkflowExecutionStartCancelled
y__))
           (ResolveChildWorkflowExecutionStartCancelled
-> Lens'
     (Maybe ResolveChildWorkflowExecutionStartCancelled)
     ResolveChildWorkflowExecutionStartCancelled
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ResolveChildWorkflowExecutionStartCancelled
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message ResolveChildWorkflowExecutionStart where
  messageName :: Proxy ResolveChildWorkflowExecutionStart -> Text
messageName Proxy ResolveChildWorkflowExecutionStart
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_activation.ResolveChildWorkflowExecutionStart"
  packedMessageDescriptor :: Proxy ResolveChildWorkflowExecutionStart -> ByteString
packedMessageDescriptor Proxy ResolveChildWorkflowExecutionStart
_
    = ByteString
"\n\
      \\"ResolveChildWorkflowExecutionStart\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2f\n\
      \\tsucceeded\CAN\STX \SOH(\v2F.coresdk.workflow_activation.ResolveChildWorkflowExecutionStartSuccessH\NULR\tsucceeded\DC2`\n\
      \\ACKfailed\CAN\ETX \SOH(\v2F.coresdk.workflow_activation.ResolveChildWorkflowExecutionStartFailureH\NULR\ACKfailed\DC2h\n\
      \\tcancelled\CAN\EOT \SOH(\v2H.coresdk.workflow_activation.ResolveChildWorkflowExecutionStartCancelledH\NULR\tcancelledB\b\n\
      \\ACKstatus"
  packedFileDescriptor :: Proxy ResolveChildWorkflowExecutionStart -> ByteString
packedFileDescriptor Proxy ResolveChildWorkflowExecutionStart
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ResolveChildWorkflowExecutionStart)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor ResolveChildWorkflowExecutionStart
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor ResolveChildWorkflowExecutionStart Word32
-> FieldDescriptor ResolveChildWorkflowExecutionStart
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"seq"
              (ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
              (WireDefault Word32
-> Lens
     ResolveChildWorkflowExecutionStart
     ResolveChildWorkflowExecutionStart
     Word32
     Word32
-> FieldAccessor ResolveChildWorkflowExecutionStart Word32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word32
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 @"seq")) ::
              Data.ProtoLens.FieldDescriptor ResolveChildWorkflowExecutionStart
        succeeded__field_descriptor :: FieldDescriptor ResolveChildWorkflowExecutionStart
succeeded__field_descriptor
          = String
-> FieldTypeDescriptor ResolveChildWorkflowExecutionStartSuccess
-> FieldAccessor
     ResolveChildWorkflowExecutionStart
     ResolveChildWorkflowExecutionStartSuccess
-> FieldDescriptor ResolveChildWorkflowExecutionStart
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"succeeded"
              (MessageOrGroup
-> FieldTypeDescriptor ResolveChildWorkflowExecutionStartSuccess
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ResolveChildWorkflowExecutionStartSuccess)
              (Lens'
  ResolveChildWorkflowExecutionStart
  (Maybe ResolveChildWorkflowExecutionStartSuccess)
-> FieldAccessor
     ResolveChildWorkflowExecutionStart
     ResolveChildWorkflowExecutionStartSuccess
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'succeeded")) ::
              Data.ProtoLens.FieldDescriptor ResolveChildWorkflowExecutionStart
        failed__field_descriptor :: FieldDescriptor ResolveChildWorkflowExecutionStart
failed__field_descriptor
          = String
-> FieldTypeDescriptor ResolveChildWorkflowExecutionStartFailure
-> FieldAccessor
     ResolveChildWorkflowExecutionStart
     ResolveChildWorkflowExecutionStartFailure
-> FieldDescriptor ResolveChildWorkflowExecutionStart
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"failed"
              (MessageOrGroup
-> FieldTypeDescriptor ResolveChildWorkflowExecutionStartFailure
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ResolveChildWorkflowExecutionStartFailure)
              (Lens'
  ResolveChildWorkflowExecutionStart
  (Maybe ResolveChildWorkflowExecutionStartFailure)
-> FieldAccessor
     ResolveChildWorkflowExecutionStart
     ResolveChildWorkflowExecutionStartFailure
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'failed")) ::
              Data.ProtoLens.FieldDescriptor ResolveChildWorkflowExecutionStart
        cancelled__field_descriptor :: FieldDescriptor ResolveChildWorkflowExecutionStart
cancelled__field_descriptor
          = String
-> FieldTypeDescriptor ResolveChildWorkflowExecutionStartCancelled
-> FieldAccessor
     ResolveChildWorkflowExecutionStart
     ResolveChildWorkflowExecutionStartCancelled
-> FieldDescriptor ResolveChildWorkflowExecutionStart
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cancelled"
              (MessageOrGroup
-> FieldTypeDescriptor ResolveChildWorkflowExecutionStartCancelled
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ResolveChildWorkflowExecutionStartCancelled)
              (Lens'
  ResolveChildWorkflowExecutionStart
  (Maybe ResolveChildWorkflowExecutionStartCancelled)
-> FieldAccessor
     ResolveChildWorkflowExecutionStart
     ResolveChildWorkflowExecutionStartCancelled
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'cancelled")) ::
              Data.ProtoLens.FieldDescriptor ResolveChildWorkflowExecutionStart
      in
        [(Tag, FieldDescriptor ResolveChildWorkflowExecutionStart)]
-> Map Tag (FieldDescriptor ResolveChildWorkflowExecutionStart)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ResolveChildWorkflowExecutionStart
seq__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ResolveChildWorkflowExecutionStart
succeeded__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ResolveChildWorkflowExecutionStart
failed__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ResolveChildWorkflowExecutionStart
cancelled__field_descriptor)]
  unknownFields :: Lens' ResolveChildWorkflowExecutionStart FieldSet
unknownFields
    = (ResolveChildWorkflowExecutionStart -> FieldSet)
-> (ResolveChildWorkflowExecutionStart
    -> FieldSet -> ResolveChildWorkflowExecutionStart)
-> Lens' ResolveChildWorkflowExecutionStart FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ResolveChildWorkflowExecutionStart -> FieldSet
_ResolveChildWorkflowExecutionStart'_unknownFields
        (\ ResolveChildWorkflowExecutionStart
x__ FieldSet
y__
           -> ResolveChildWorkflowExecutionStart
x__ {_ResolveChildWorkflowExecutionStart'_unknownFields = y__})
  defMessage :: ResolveChildWorkflowExecutionStart
defMessage
    = ResolveChildWorkflowExecutionStart'_constructor
        {_ResolveChildWorkflowExecutionStart'seq :: Word32
_ResolveChildWorkflowExecutionStart'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResolveChildWorkflowExecutionStart'status :: Maybe ResolveChildWorkflowExecutionStart'Status
_ResolveChildWorkflowExecutionStart'status = Maybe ResolveChildWorkflowExecutionStart'Status
forall a. Maybe a
Prelude.Nothing,
         _ResolveChildWorkflowExecutionStart'_unknownFields :: FieldSet
_ResolveChildWorkflowExecutionStart'_unknownFields = []}
  parseMessage :: Parser ResolveChildWorkflowExecutionStart
parseMessage
    = let
        loop ::
          ResolveChildWorkflowExecutionStart
          -> Data.ProtoLens.Encoding.Bytes.Parser ResolveChildWorkflowExecutionStart
        loop :: ResolveChildWorkflowExecutionStart
-> Parser ResolveChildWorkflowExecutionStart
loop ResolveChildWorkflowExecutionStart
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 Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"seq"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"seq") y x)
                        Word64
18
                          -> do y <- Parser ResolveChildWorkflowExecutionStartSuccess
-> String -> Parser ResolveChildWorkflowExecutionStartSuccess
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
"succeeded"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"succeeded") y x)
                        Word64
26
                          -> do y <- Parser ResolveChildWorkflowExecutionStartFailure
-> String -> Parser ResolveChildWorkflowExecutionStartFailure
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
"failed"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"failed") y x)
                        Word64
34
                          -> do y <- Parser ResolveChildWorkflowExecutionStartCancelled
-> String -> Parser ResolveChildWorkflowExecutionStartCancelled
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
"cancelled"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"cancelled") 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 ResolveChildWorkflowExecutionStart
-> String -> Parser ResolveChildWorkflowExecutionStart
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ResolveChildWorkflowExecutionStart
-> Parser ResolveChildWorkflowExecutionStart
loop ResolveChildWorkflowExecutionStart
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ResolveChildWorkflowExecutionStart"
  buildMessage :: ResolveChildWorkflowExecutionStart -> Builder
buildMessage
    = \ ResolveChildWorkflowExecutionStart
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike
  Word32
  ResolveChildWorkflowExecutionStart
  ResolveChildWorkflowExecutionStart
  Word32
  Word32
-> ResolveChildWorkflowExecutionStart -> Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"seq") ResolveChildWorkflowExecutionStart
_x
              in
                if Word32 -> Word32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word32
_v Word32
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) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word32
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe ResolveChildWorkflowExecutionStart'Status)
  ResolveChildWorkflowExecutionStart
  ResolveChildWorkflowExecutionStart
  (Maybe ResolveChildWorkflowExecutionStart'Status)
  (Maybe ResolveChildWorkflowExecutionStart'Status)
-> ResolveChildWorkflowExecutionStart
-> Maybe ResolveChildWorkflowExecutionStart'Status
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'status") ResolveChildWorkflowExecutionStart
_x
                 of
                   Maybe ResolveChildWorkflowExecutionStart'Status
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just (ResolveChildWorkflowExecutionStart'Succeeded ResolveChildWorkflowExecutionStartSuccess
v))
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (ResolveChildWorkflowExecutionStartSuccess -> ByteString)
-> ResolveChildWorkflowExecutionStartSuccess
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             ResolveChildWorkflowExecutionStartSuccess -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ResolveChildWorkflowExecutionStartSuccess
v)
                   (Prelude.Just (ResolveChildWorkflowExecutionStart'Failed ResolveChildWorkflowExecutionStartFailure
v))
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                          ((ByteString -> Builder)
-> (ResolveChildWorkflowExecutionStartFailure -> ByteString)
-> ResolveChildWorkflowExecutionStartFailure
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             ResolveChildWorkflowExecutionStartFailure -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ResolveChildWorkflowExecutionStartFailure
v)
                   (Prelude.Just (ResolveChildWorkflowExecutionStart'Cancelled ResolveChildWorkflowExecutionStartCancelled
v))
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                          ((ByteString -> Builder)
-> (ResolveChildWorkflowExecutionStartCancelled -> ByteString)
-> ResolveChildWorkflowExecutionStartCancelled
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             ResolveChildWorkflowExecutionStartCancelled -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ResolveChildWorkflowExecutionStartCancelled
v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ResolveChildWorkflowExecutionStart
  ResolveChildWorkflowExecutionStart
  FieldSet
  FieldSet
-> ResolveChildWorkflowExecutionStart -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ResolveChildWorkflowExecutionStart
  ResolveChildWorkflowExecutionStart
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResolveChildWorkflowExecutionStart FieldSet
Data.ProtoLens.unknownFields ResolveChildWorkflowExecutionStart
_x)))
instance Control.DeepSeq.NFData ResolveChildWorkflowExecutionStart where
  rnf :: ResolveChildWorkflowExecutionStart -> ()
rnf
    = \ ResolveChildWorkflowExecutionStart
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ResolveChildWorkflowExecutionStart -> FieldSet
_ResolveChildWorkflowExecutionStart'_unknownFields ResolveChildWorkflowExecutionStart
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ResolveChildWorkflowExecutionStart -> Word32
_ResolveChildWorkflowExecutionStart'seq ResolveChildWorkflowExecutionStart
x__)
                (Maybe ResolveChildWorkflowExecutionStart'Status -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ResolveChildWorkflowExecutionStart
-> Maybe ResolveChildWorkflowExecutionStart'Status
_ResolveChildWorkflowExecutionStart'status ResolveChildWorkflowExecutionStart
x__) ()))
instance Control.DeepSeq.NFData ResolveChildWorkflowExecutionStart'Status where
  rnf :: ResolveChildWorkflowExecutionStart'Status -> ()
rnf (ResolveChildWorkflowExecutionStart'Succeeded ResolveChildWorkflowExecutionStartSuccess
x__)
    = ResolveChildWorkflowExecutionStartSuccess -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ResolveChildWorkflowExecutionStartSuccess
x__
  rnf (ResolveChildWorkflowExecutionStart'Failed ResolveChildWorkflowExecutionStartFailure
x__)
    = ResolveChildWorkflowExecutionStartFailure -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ResolveChildWorkflowExecutionStartFailure
x__
  rnf (ResolveChildWorkflowExecutionStart'Cancelled ResolveChildWorkflowExecutionStartCancelled
x__)
    = ResolveChildWorkflowExecutionStartCancelled -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ResolveChildWorkflowExecutionStartCancelled
x__
_ResolveChildWorkflowExecutionStart'Succeeded ::
  Data.ProtoLens.Prism.Prism' ResolveChildWorkflowExecutionStart'Status ResolveChildWorkflowExecutionStartSuccess
_ResolveChildWorkflowExecutionStart'Succeeded :: Prism'
  ResolveChildWorkflowExecutionStart'Status
  ResolveChildWorkflowExecutionStartSuccess
_ResolveChildWorkflowExecutionStart'Succeeded
  = (ResolveChildWorkflowExecutionStartSuccess
 -> ResolveChildWorkflowExecutionStart'Status)
-> (ResolveChildWorkflowExecutionStart'Status
    -> Maybe ResolveChildWorkflowExecutionStartSuccess)
-> Prism'
     ResolveChildWorkflowExecutionStart'Status
     ResolveChildWorkflowExecutionStartSuccess
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStart'Status
ResolveChildWorkflowExecutionStart'Succeeded
      (\ ResolveChildWorkflowExecutionStart'Status
p__
         -> case ResolveChildWorkflowExecutionStart'Status
p__ of
              (ResolveChildWorkflowExecutionStart'Succeeded ResolveChildWorkflowExecutionStartSuccess
p__val)
                -> ResolveChildWorkflowExecutionStartSuccess
-> Maybe ResolveChildWorkflowExecutionStartSuccess
forall a. a -> Maybe a
Prelude.Just ResolveChildWorkflowExecutionStartSuccess
p__val
              ResolveChildWorkflowExecutionStart'Status
_otherwise -> Maybe ResolveChildWorkflowExecutionStartSuccess
forall a. Maybe a
Prelude.Nothing)
_ResolveChildWorkflowExecutionStart'Failed ::
  Data.ProtoLens.Prism.Prism' ResolveChildWorkflowExecutionStart'Status ResolveChildWorkflowExecutionStartFailure
_ResolveChildWorkflowExecutionStart'Failed :: Prism'
  ResolveChildWorkflowExecutionStart'Status
  ResolveChildWorkflowExecutionStartFailure
_ResolveChildWorkflowExecutionStart'Failed
  = (ResolveChildWorkflowExecutionStartFailure
 -> ResolveChildWorkflowExecutionStart'Status)
-> (ResolveChildWorkflowExecutionStart'Status
    -> Maybe ResolveChildWorkflowExecutionStartFailure)
-> Prism'
     ResolveChildWorkflowExecutionStart'Status
     ResolveChildWorkflowExecutionStartFailure
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStart'Status
ResolveChildWorkflowExecutionStart'Failed
      (\ ResolveChildWorkflowExecutionStart'Status
p__
         -> case ResolveChildWorkflowExecutionStart'Status
p__ of
              (ResolveChildWorkflowExecutionStart'Failed ResolveChildWorkflowExecutionStartFailure
p__val)
                -> ResolveChildWorkflowExecutionStartFailure
-> Maybe ResolveChildWorkflowExecutionStartFailure
forall a. a -> Maybe a
Prelude.Just ResolveChildWorkflowExecutionStartFailure
p__val
              ResolveChildWorkflowExecutionStart'Status
_otherwise -> Maybe ResolveChildWorkflowExecutionStartFailure
forall a. Maybe a
Prelude.Nothing)
_ResolveChildWorkflowExecutionStart'Cancelled ::
  Data.ProtoLens.Prism.Prism' ResolveChildWorkflowExecutionStart'Status ResolveChildWorkflowExecutionStartCancelled
_ResolveChildWorkflowExecutionStart'Cancelled :: Prism'
  ResolveChildWorkflowExecutionStart'Status
  ResolveChildWorkflowExecutionStartCancelled
_ResolveChildWorkflowExecutionStart'Cancelled
  = (ResolveChildWorkflowExecutionStartCancelled
 -> ResolveChildWorkflowExecutionStart'Status)
-> (ResolveChildWorkflowExecutionStart'Status
    -> Maybe ResolveChildWorkflowExecutionStartCancelled)
-> Prism'
     ResolveChildWorkflowExecutionStart'Status
     ResolveChildWorkflowExecutionStartCancelled
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStart'Status
ResolveChildWorkflowExecutionStart'Cancelled
      (\ ResolveChildWorkflowExecutionStart'Status
p__
         -> case ResolveChildWorkflowExecutionStart'Status
p__ of
              (ResolveChildWorkflowExecutionStart'Cancelled ResolveChildWorkflowExecutionStartCancelled
p__val)
                -> ResolveChildWorkflowExecutionStartCancelled
-> Maybe ResolveChildWorkflowExecutionStartCancelled
forall a. a -> Maybe a
Prelude.Just ResolveChildWorkflowExecutionStartCancelled
p__val
              ResolveChildWorkflowExecutionStart'Status
_otherwise -> Maybe ResolveChildWorkflowExecutionStartCancelled
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.failure' @:: Lens' ResolveChildWorkflowExecutionStartCancelled Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'failure' @:: Lens' ResolveChildWorkflowExecutionStartCancelled (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@ -}
data ResolveChildWorkflowExecutionStartCancelled
  = ResolveChildWorkflowExecutionStartCancelled'_constructor {ResolveChildWorkflowExecutionStartCancelled -> Maybe Failure
_ResolveChildWorkflowExecutionStartCancelled'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                              ResolveChildWorkflowExecutionStartCancelled -> FieldSet
_ResolveChildWorkflowExecutionStartCancelled'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Bool
(ResolveChildWorkflowExecutionStartCancelled
 -> ResolveChildWorkflowExecutionStartCancelled -> Bool)
-> (ResolveChildWorkflowExecutionStartCancelled
    -> ResolveChildWorkflowExecutionStartCancelled -> Bool)
-> Eq ResolveChildWorkflowExecutionStartCancelled
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Bool
== :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Bool
$c/= :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Bool
/= :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Bool
Prelude.Eq, Eq ResolveChildWorkflowExecutionStartCancelled
Eq ResolveChildWorkflowExecutionStartCancelled =>
(ResolveChildWorkflowExecutionStartCancelled
 -> ResolveChildWorkflowExecutionStartCancelled -> Ordering)
-> (ResolveChildWorkflowExecutionStartCancelled
    -> ResolveChildWorkflowExecutionStartCancelled -> Bool)
-> (ResolveChildWorkflowExecutionStartCancelled
    -> ResolveChildWorkflowExecutionStartCancelled -> Bool)
-> (ResolveChildWorkflowExecutionStartCancelled
    -> ResolveChildWorkflowExecutionStartCancelled -> Bool)
-> (ResolveChildWorkflowExecutionStartCancelled
    -> ResolveChildWorkflowExecutionStartCancelled -> Bool)
-> (ResolveChildWorkflowExecutionStartCancelled
    -> ResolveChildWorkflowExecutionStartCancelled
    -> ResolveChildWorkflowExecutionStartCancelled)
-> (ResolveChildWorkflowExecutionStartCancelled
    -> ResolveChildWorkflowExecutionStartCancelled
    -> ResolveChildWorkflowExecutionStartCancelled)
-> Ord ResolveChildWorkflowExecutionStartCancelled
ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Bool
ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Ordering
ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled
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 :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Ordering
compare :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Ordering
$c< :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Bool
< :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Bool
$c<= :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Bool
<= :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Bool
$c> :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Bool
> :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Bool
$c>= :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Bool
>= :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled -> Bool
$cmax :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled
max :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled
$cmin :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled
min :: ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled
-> ResolveChildWorkflowExecutionStartCancelled
Prelude.Ord)
instance Prelude.Show ResolveChildWorkflowExecutionStartCancelled where
  showsPrec :: Int -> ResolveChildWorkflowExecutionStartCancelled -> ShowS
showsPrec Int
_ ResolveChildWorkflowExecutionStartCancelled
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ResolveChildWorkflowExecutionStartCancelled -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResolveChildWorkflowExecutionStartCancelled
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecutionStartCancelled "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> ResolveChildWorkflowExecutionStartCancelled
-> f ResolveChildWorkflowExecutionStartCancelled
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> ResolveChildWorkflowExecutionStartCancelled
 -> f ResolveChildWorkflowExecutionStartCancelled)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> ResolveChildWorkflowExecutionStartCancelled
-> f ResolveChildWorkflowExecutionStartCancelled
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecutionStartCancelled -> Maybe Failure)
-> (ResolveChildWorkflowExecutionStartCancelled
    -> Maybe Failure -> ResolveChildWorkflowExecutionStartCancelled)
-> Lens
     ResolveChildWorkflowExecutionStartCancelled
     ResolveChildWorkflowExecutionStartCancelled
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecutionStartCancelled -> Maybe Failure
_ResolveChildWorkflowExecutionStartCancelled'failure
           (\ ResolveChildWorkflowExecutionStartCancelled
x__ Maybe Failure
y__
              -> ResolveChildWorkflowExecutionStartCancelled
x__
                   {_ResolveChildWorkflowExecutionStartCancelled'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 ResolveChildWorkflowExecutionStartCancelled "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))
-> ResolveChildWorkflowExecutionStartCancelled
-> f ResolveChildWorkflowExecutionStartCancelled
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> ResolveChildWorkflowExecutionStartCancelled
 -> f ResolveChildWorkflowExecutionStartCancelled)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> ResolveChildWorkflowExecutionStartCancelled
-> f ResolveChildWorkflowExecutionStartCancelled
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecutionStartCancelled -> Maybe Failure)
-> (ResolveChildWorkflowExecutionStartCancelled
    -> Maybe Failure -> ResolveChildWorkflowExecutionStartCancelled)
-> Lens
     ResolveChildWorkflowExecutionStartCancelled
     ResolveChildWorkflowExecutionStartCancelled
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecutionStartCancelled -> Maybe Failure
_ResolveChildWorkflowExecutionStartCancelled'failure
           (\ ResolveChildWorkflowExecutionStartCancelled
x__ Maybe Failure
y__
              -> ResolveChildWorkflowExecutionStartCancelled
x__
                   {_ResolveChildWorkflowExecutionStartCancelled'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ResolveChildWorkflowExecutionStartCancelled where
  messageName :: Proxy ResolveChildWorkflowExecutionStartCancelled -> Text
messageName Proxy ResolveChildWorkflowExecutionStartCancelled
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_activation.ResolveChildWorkflowExecutionStartCancelled"
  packedMessageDescriptor :: Proxy ResolveChildWorkflowExecutionStartCancelled -> ByteString
packedMessageDescriptor Proxy ResolveChildWorkflowExecutionStartCancelled
_
    = ByteString
"\n\
      \+ResolveChildWorkflowExecutionStartCancelled\DC2:\n\
      \\afailure\CAN\SOH \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure"
  packedFileDescriptor :: Proxy ResolveChildWorkflowExecutionStartCancelled -> ByteString
packedFileDescriptor Proxy ResolveChildWorkflowExecutionStartCancelled
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor ResolveChildWorkflowExecutionStartCancelled)
fieldsByTag
    = let
        failure__field_descriptor :: FieldDescriptor ResolveChildWorkflowExecutionStartCancelled
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor
     ResolveChildWorkflowExecutionStartCancelled Failure
-> FieldDescriptor ResolveChildWorkflowExecutionStartCancelled
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
  ResolveChildWorkflowExecutionStartCancelled
  ResolveChildWorkflowExecutionStartCancelled
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor
     ResolveChildWorkflowExecutionStartCancelled 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 ResolveChildWorkflowExecutionStartCancelled
      in
        [(Tag,
  FieldDescriptor ResolveChildWorkflowExecutionStartCancelled)]
-> Map
     Tag (FieldDescriptor ResolveChildWorkflowExecutionStartCancelled)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ResolveChildWorkflowExecutionStartCancelled
failure__field_descriptor)]
  unknownFields :: Lens' ResolveChildWorkflowExecutionStartCancelled FieldSet
unknownFields
    = (ResolveChildWorkflowExecutionStartCancelled -> FieldSet)
-> (ResolveChildWorkflowExecutionStartCancelled
    -> FieldSet -> ResolveChildWorkflowExecutionStartCancelled)
-> Lens' ResolveChildWorkflowExecutionStartCancelled FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ResolveChildWorkflowExecutionStartCancelled -> FieldSet
_ResolveChildWorkflowExecutionStartCancelled'_unknownFields
        (\ ResolveChildWorkflowExecutionStartCancelled
x__ FieldSet
y__
           -> ResolveChildWorkflowExecutionStartCancelled
x__
                {_ResolveChildWorkflowExecutionStartCancelled'_unknownFields = y__})
  defMessage :: ResolveChildWorkflowExecutionStartCancelled
defMessage
    = ResolveChildWorkflowExecutionStartCancelled'_constructor
        {_ResolveChildWorkflowExecutionStartCancelled'failure :: Maybe Failure
_ResolveChildWorkflowExecutionStartCancelled'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _ResolveChildWorkflowExecutionStartCancelled'_unknownFields :: FieldSet
_ResolveChildWorkflowExecutionStartCancelled'_unknownFields = []}
  parseMessage :: Parser ResolveChildWorkflowExecutionStartCancelled
parseMessage
    = let
        loop ::
          ResolveChildWorkflowExecutionStartCancelled
          -> Data.ProtoLens.Encoding.Bytes.Parser ResolveChildWorkflowExecutionStartCancelled
        loop :: ResolveChildWorkflowExecutionStartCancelled
-> Parser ResolveChildWorkflowExecutionStartCancelled
loop ResolveChildWorkflowExecutionStartCancelled
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
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 ResolveChildWorkflowExecutionStartCancelled
-> String -> Parser ResolveChildWorkflowExecutionStartCancelled
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ResolveChildWorkflowExecutionStartCancelled
-> Parser ResolveChildWorkflowExecutionStartCancelled
loop ResolveChildWorkflowExecutionStartCancelled
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ResolveChildWorkflowExecutionStartCancelled"
  buildMessage :: ResolveChildWorkflowExecutionStartCancelled -> Builder
buildMessage
    = \ ResolveChildWorkflowExecutionStartCancelled
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Failure)
  ResolveChildWorkflowExecutionStartCancelled
  ResolveChildWorkflowExecutionStartCancelled
  (Maybe Failure)
  (Maybe Failure)
-> ResolveChildWorkflowExecutionStartCancelled -> 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") ResolveChildWorkflowExecutionStartCancelled
_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))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  ResolveChildWorkflowExecutionStartCancelled
  ResolveChildWorkflowExecutionStartCancelled
  FieldSet
  FieldSet
-> ResolveChildWorkflowExecutionStartCancelled -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ResolveChildWorkflowExecutionStartCancelled
  ResolveChildWorkflowExecutionStartCancelled
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResolveChildWorkflowExecutionStartCancelled FieldSet
Data.ProtoLens.unknownFields ResolveChildWorkflowExecutionStartCancelled
_x))
instance Control.DeepSeq.NFData ResolveChildWorkflowExecutionStartCancelled where
  rnf :: ResolveChildWorkflowExecutionStartCancelled -> ()
rnf
    = \ ResolveChildWorkflowExecutionStartCancelled
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ResolveChildWorkflowExecutionStartCancelled -> FieldSet
_ResolveChildWorkflowExecutionStartCancelled'_unknownFields ResolveChildWorkflowExecutionStartCancelled
x__)
             (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ResolveChildWorkflowExecutionStartCancelled -> Maybe Failure
_ResolveChildWorkflowExecutionStartCancelled'failure ResolveChildWorkflowExecutionStartCancelled
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.workflowId' @:: Lens' ResolveChildWorkflowExecutionStartFailure Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.workflowType' @:: Lens' ResolveChildWorkflowExecutionStartFailure Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.cause' @:: Lens' ResolveChildWorkflowExecutionStartFailure Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.StartChildWorkflowExecutionFailedCause@ -}
data ResolveChildWorkflowExecutionStartFailure
  = ResolveChildWorkflowExecutionStartFailure'_constructor {ResolveChildWorkflowExecutionStartFailure -> Text
_ResolveChildWorkflowExecutionStartFailure'workflowId :: !Data.Text.Text,
                                                            ResolveChildWorkflowExecutionStartFailure -> Text
_ResolveChildWorkflowExecutionStartFailure'workflowType :: !Data.Text.Text,
                                                            ResolveChildWorkflowExecutionStartFailure
-> StartChildWorkflowExecutionFailedCause
_ResolveChildWorkflowExecutionStartFailure'cause :: !Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.StartChildWorkflowExecutionFailedCause,
                                                            ResolveChildWorkflowExecutionStartFailure -> FieldSet
_ResolveChildWorkflowExecutionStartFailure'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Bool
(ResolveChildWorkflowExecutionStartFailure
 -> ResolveChildWorkflowExecutionStartFailure -> Bool)
-> (ResolveChildWorkflowExecutionStartFailure
    -> ResolveChildWorkflowExecutionStartFailure -> Bool)
-> Eq ResolveChildWorkflowExecutionStartFailure
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Bool
== :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Bool
$c/= :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Bool
/= :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Bool
Prelude.Eq, Eq ResolveChildWorkflowExecutionStartFailure
Eq ResolveChildWorkflowExecutionStartFailure =>
(ResolveChildWorkflowExecutionStartFailure
 -> ResolveChildWorkflowExecutionStartFailure -> Ordering)
-> (ResolveChildWorkflowExecutionStartFailure
    -> ResolveChildWorkflowExecutionStartFailure -> Bool)
-> (ResolveChildWorkflowExecutionStartFailure
    -> ResolveChildWorkflowExecutionStartFailure -> Bool)
-> (ResolveChildWorkflowExecutionStartFailure
    -> ResolveChildWorkflowExecutionStartFailure -> Bool)
-> (ResolveChildWorkflowExecutionStartFailure
    -> ResolveChildWorkflowExecutionStartFailure -> Bool)
-> (ResolveChildWorkflowExecutionStartFailure
    -> ResolveChildWorkflowExecutionStartFailure
    -> ResolveChildWorkflowExecutionStartFailure)
-> (ResolveChildWorkflowExecutionStartFailure
    -> ResolveChildWorkflowExecutionStartFailure
    -> ResolveChildWorkflowExecutionStartFailure)
-> Ord ResolveChildWorkflowExecutionStartFailure
ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Bool
ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Ordering
ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure
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 :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Ordering
compare :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Ordering
$c< :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Bool
< :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Bool
$c<= :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Bool
<= :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Bool
$c> :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Bool
> :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Bool
$c>= :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Bool
>= :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure -> Bool
$cmax :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure
max :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure
$cmin :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure
min :: ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure
-> ResolveChildWorkflowExecutionStartFailure
Prelude.Ord)
instance Prelude.Show ResolveChildWorkflowExecutionStartFailure where
  showsPrec :: Int -> ResolveChildWorkflowExecutionStartFailure -> ShowS
showsPrec Int
_ ResolveChildWorkflowExecutionStartFailure
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ResolveChildWorkflowExecutionStartFailure -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResolveChildWorkflowExecutionStartFailure
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecutionStartFailure "workflowId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowId"
-> (Text -> f Text)
-> ResolveChildWorkflowExecutionStartFailure
-> f ResolveChildWorkflowExecutionStartFailure
fieldOf Proxy# "workflowId"
_
    = ((Text -> f Text)
 -> ResolveChildWorkflowExecutionStartFailure
 -> f ResolveChildWorkflowExecutionStartFailure)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ResolveChildWorkflowExecutionStartFailure
-> f ResolveChildWorkflowExecutionStartFailure
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecutionStartFailure -> Text)
-> (ResolveChildWorkflowExecutionStartFailure
    -> Text -> ResolveChildWorkflowExecutionStartFailure)
-> Lens
     ResolveChildWorkflowExecutionStartFailure
     ResolveChildWorkflowExecutionStartFailure
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecutionStartFailure -> Text
_ResolveChildWorkflowExecutionStartFailure'workflowId
           (\ ResolveChildWorkflowExecutionStartFailure
x__ Text
y__
              -> ResolveChildWorkflowExecutionStartFailure
x__
                   {_ResolveChildWorkflowExecutionStartFailure'workflowId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecutionStartFailure "workflowType" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (Text -> f Text)
-> ResolveChildWorkflowExecutionStartFailure
-> f ResolveChildWorkflowExecutionStartFailure
fieldOf Proxy# "workflowType"
_
    = ((Text -> f Text)
 -> ResolveChildWorkflowExecutionStartFailure
 -> f ResolveChildWorkflowExecutionStartFailure)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ResolveChildWorkflowExecutionStartFailure
-> f ResolveChildWorkflowExecutionStartFailure
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecutionStartFailure -> Text)
-> (ResolveChildWorkflowExecutionStartFailure
    -> Text -> ResolveChildWorkflowExecutionStartFailure)
-> Lens
     ResolveChildWorkflowExecutionStartFailure
     ResolveChildWorkflowExecutionStartFailure
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecutionStartFailure -> Text
_ResolveChildWorkflowExecutionStartFailure'workflowType
           (\ ResolveChildWorkflowExecutionStartFailure
x__ Text
y__
              -> ResolveChildWorkflowExecutionStartFailure
x__
                   {_ResolveChildWorkflowExecutionStartFailure'workflowType = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecutionStartFailure "cause" Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.StartChildWorkflowExecutionFailedCause where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cause"
-> (StartChildWorkflowExecutionFailedCause
    -> f StartChildWorkflowExecutionFailedCause)
-> ResolveChildWorkflowExecutionStartFailure
-> f ResolveChildWorkflowExecutionStartFailure
fieldOf Proxy# "cause"
_
    = ((StartChildWorkflowExecutionFailedCause
  -> f StartChildWorkflowExecutionFailedCause)
 -> ResolveChildWorkflowExecutionStartFailure
 -> f ResolveChildWorkflowExecutionStartFailure)
-> ((StartChildWorkflowExecutionFailedCause
     -> f StartChildWorkflowExecutionFailedCause)
    -> StartChildWorkflowExecutionFailedCause
    -> f StartChildWorkflowExecutionFailedCause)
-> (StartChildWorkflowExecutionFailedCause
    -> f StartChildWorkflowExecutionFailedCause)
-> ResolveChildWorkflowExecutionStartFailure
-> f ResolveChildWorkflowExecutionStartFailure
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecutionStartFailure
 -> StartChildWorkflowExecutionFailedCause)
-> (ResolveChildWorkflowExecutionStartFailure
    -> StartChildWorkflowExecutionFailedCause
    -> ResolveChildWorkflowExecutionStartFailure)
-> Lens
     ResolveChildWorkflowExecutionStartFailure
     ResolveChildWorkflowExecutionStartFailure
     StartChildWorkflowExecutionFailedCause
     StartChildWorkflowExecutionFailedCause
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecutionStartFailure
-> StartChildWorkflowExecutionFailedCause
_ResolveChildWorkflowExecutionStartFailure'cause
           (\ ResolveChildWorkflowExecutionStartFailure
x__ StartChildWorkflowExecutionFailedCause
y__
              -> ResolveChildWorkflowExecutionStartFailure
x__ {_ResolveChildWorkflowExecutionStartFailure'cause = y__}))
        (StartChildWorkflowExecutionFailedCause
 -> f StartChildWorkflowExecutionFailedCause)
-> StartChildWorkflowExecutionFailedCause
-> f StartChildWorkflowExecutionFailedCause
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ResolveChildWorkflowExecutionStartFailure where
  messageName :: Proxy ResolveChildWorkflowExecutionStartFailure -> Text
messageName Proxy ResolveChildWorkflowExecutionStartFailure
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_activation.ResolveChildWorkflowExecutionStartFailure"
  packedMessageDescriptor :: Proxy ResolveChildWorkflowExecutionStartFailure -> ByteString
packedMessageDescriptor Proxy ResolveChildWorkflowExecutionStartFailure
_
    = ByteString
"\n\
      \)ResolveChildWorkflowExecutionStartFailure\DC2\US\n\
      \\vworkflow_id\CAN\SOH \SOH(\tR\n\
      \workflowId\DC2#\n\
      \\rworkflow_type\CAN\STX \SOH(\tR\fworkflowType\DC2T\n\
      \\ENQcause\CAN\ETX \SOH(\SO2>.coresdk.child_workflow.StartChildWorkflowExecutionFailedCauseR\ENQcause"
  packedFileDescriptor :: Proxy ResolveChildWorkflowExecutionStartFailure -> ByteString
packedFileDescriptor Proxy ResolveChildWorkflowExecutionStartFailure
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ResolveChildWorkflowExecutionStartFailure)
fieldsByTag
    = let
        workflowId__field_descriptor :: FieldDescriptor ResolveChildWorkflowExecutionStartFailure
workflowId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ResolveChildWorkflowExecutionStartFailure Text
-> FieldDescriptor ResolveChildWorkflowExecutionStartFailure
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
     ResolveChildWorkflowExecutionStartFailure
     ResolveChildWorkflowExecutionStartFailure
     Text
     Text
-> FieldAccessor ResolveChildWorkflowExecutionStartFailure 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 ResolveChildWorkflowExecutionStartFailure
        workflowType__field_descriptor :: FieldDescriptor ResolveChildWorkflowExecutionStartFailure
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ResolveChildWorkflowExecutionStartFailure Text
-> FieldDescriptor ResolveChildWorkflowExecutionStartFailure
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_type"
              (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
     ResolveChildWorkflowExecutionStartFailure
     ResolveChildWorkflowExecutionStartFailure
     Text
     Text
-> FieldAccessor ResolveChildWorkflowExecutionStartFailure 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 @"workflowType")) ::
              Data.ProtoLens.FieldDescriptor ResolveChildWorkflowExecutionStartFailure
        cause__field_descriptor :: FieldDescriptor ResolveChildWorkflowExecutionStartFailure
cause__field_descriptor
          = String
-> FieldTypeDescriptor StartChildWorkflowExecutionFailedCause
-> FieldAccessor
     ResolveChildWorkflowExecutionStartFailure
     StartChildWorkflowExecutionFailedCause
-> FieldDescriptor ResolveChildWorkflowExecutionStartFailure
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.Sdk.Core.ChildWorkflow.ChildWorkflow.StartChildWorkflowExecutionFailedCause)
              (WireDefault StartChildWorkflowExecutionFailedCause
-> Lens
     ResolveChildWorkflowExecutionStartFailure
     ResolveChildWorkflowExecutionStartFailure
     StartChildWorkflowExecutionFailedCause
     StartChildWorkflowExecutionFailedCause
-> FieldAccessor
     ResolveChildWorkflowExecutionStartFailure
     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 ResolveChildWorkflowExecutionStartFailure
      in
        [(Tag, FieldDescriptor ResolveChildWorkflowExecutionStartFailure)]
-> Map
     Tag (FieldDescriptor ResolveChildWorkflowExecutionStartFailure)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ResolveChildWorkflowExecutionStartFailure
workflowId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ResolveChildWorkflowExecutionStartFailure
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ResolveChildWorkflowExecutionStartFailure
cause__field_descriptor)]
  unknownFields :: Lens' ResolveChildWorkflowExecutionStartFailure FieldSet
unknownFields
    = (ResolveChildWorkflowExecutionStartFailure -> FieldSet)
-> (ResolveChildWorkflowExecutionStartFailure
    -> FieldSet -> ResolveChildWorkflowExecutionStartFailure)
-> Lens' ResolveChildWorkflowExecutionStartFailure FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ResolveChildWorkflowExecutionStartFailure -> FieldSet
_ResolveChildWorkflowExecutionStartFailure'_unknownFields
        (\ ResolveChildWorkflowExecutionStartFailure
x__ FieldSet
y__
           -> ResolveChildWorkflowExecutionStartFailure
x__
                {_ResolveChildWorkflowExecutionStartFailure'_unknownFields = y__})
  defMessage :: ResolveChildWorkflowExecutionStartFailure
defMessage
    = ResolveChildWorkflowExecutionStartFailure'_constructor
        {_ResolveChildWorkflowExecutionStartFailure'workflowId :: Text
_ResolveChildWorkflowExecutionStartFailure'workflowId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResolveChildWorkflowExecutionStartFailure'workflowType :: Text
_ResolveChildWorkflowExecutionStartFailure'workflowType = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResolveChildWorkflowExecutionStartFailure'cause :: StartChildWorkflowExecutionFailedCause
_ResolveChildWorkflowExecutionStartFailure'cause = StartChildWorkflowExecutionFailedCause
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResolveChildWorkflowExecutionStartFailure'_unknownFields :: FieldSet
_ResolveChildWorkflowExecutionStartFailure'_unknownFields = []}
  parseMessage :: Parser ResolveChildWorkflowExecutionStartFailure
parseMessage
    = let
        loop ::
          ResolveChildWorkflowExecutionStartFailure
          -> Data.ProtoLens.Encoding.Bytes.Parser ResolveChildWorkflowExecutionStartFailure
        loop :: ResolveChildWorkflowExecutionStartFailure
-> Parser ResolveChildWorkflowExecutionStartFailure
loop ResolveChildWorkflowExecutionStartFailure
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"workflow_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"workflowId") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"workflow_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowType") y x)
                        Word64
24
                          -> 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
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 ResolveChildWorkflowExecutionStartFailure
-> String -> Parser ResolveChildWorkflowExecutionStartFailure
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ResolveChildWorkflowExecutionStartFailure
-> Parser ResolveChildWorkflowExecutionStartFailure
loop ResolveChildWorkflowExecutionStartFailure
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ResolveChildWorkflowExecutionStartFailure"
  buildMessage :: ResolveChildWorkflowExecutionStartFailure -> Builder
buildMessage
    = \ ResolveChildWorkflowExecutionStartFailure
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike
  Text
  ResolveChildWorkflowExecutionStartFailure
  ResolveChildWorkflowExecutionStartFailure
  Text
  Text
-> ResolveChildWorkflowExecutionStartFailure -> 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") ResolveChildWorkflowExecutionStartFailure
_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
  ResolveChildWorkflowExecutionStartFailure
  ResolveChildWorkflowExecutionStartFailure
  Text
  Text
-> ResolveChildWorkflowExecutionStartFailure -> 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 @"workflowType") ResolveChildWorkflowExecutionStartFailure
_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 :: StartChildWorkflowExecutionFailedCause
_v = FoldLike
  StartChildWorkflowExecutionFailedCause
  ResolveChildWorkflowExecutionStartFailure
  ResolveChildWorkflowExecutionStartFailure
  StartChildWorkflowExecutionFailedCause
  StartChildWorkflowExecutionFailedCause
-> ResolveChildWorkflowExecutionStartFailure
-> 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") ResolveChildWorkflowExecutionStartFailure
_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
24)
                            ((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))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  ResolveChildWorkflowExecutionStartFailure
  ResolveChildWorkflowExecutionStartFailure
  FieldSet
  FieldSet
-> ResolveChildWorkflowExecutionStartFailure -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ResolveChildWorkflowExecutionStartFailure
  ResolveChildWorkflowExecutionStartFailure
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResolveChildWorkflowExecutionStartFailure FieldSet
Data.ProtoLens.unknownFields ResolveChildWorkflowExecutionStartFailure
_x))))
instance Control.DeepSeq.NFData ResolveChildWorkflowExecutionStartFailure where
  rnf :: ResolveChildWorkflowExecutionStartFailure -> ()
rnf
    = \ ResolveChildWorkflowExecutionStartFailure
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ResolveChildWorkflowExecutionStartFailure -> FieldSet
_ResolveChildWorkflowExecutionStartFailure'_unknownFields ResolveChildWorkflowExecutionStartFailure
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ResolveChildWorkflowExecutionStartFailure -> Text
_ResolveChildWorkflowExecutionStartFailure'workflowId ResolveChildWorkflowExecutionStartFailure
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ResolveChildWorkflowExecutionStartFailure -> Text
_ResolveChildWorkflowExecutionStartFailure'workflowType ResolveChildWorkflowExecutionStartFailure
x__)
                   (StartChildWorkflowExecutionFailedCause -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ResolveChildWorkflowExecutionStartFailure
-> StartChildWorkflowExecutionFailedCause
_ResolveChildWorkflowExecutionStartFailure'cause ResolveChildWorkflowExecutionStartFailure
x__) ())))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.runId' @:: Lens' ResolveChildWorkflowExecutionStartSuccess Data.Text.Text@ -}
data ResolveChildWorkflowExecutionStartSuccess
  = ResolveChildWorkflowExecutionStartSuccess'_constructor {ResolveChildWorkflowExecutionStartSuccess -> Text
_ResolveChildWorkflowExecutionStartSuccess'runId :: !Data.Text.Text,
                                                            ResolveChildWorkflowExecutionStartSuccess -> FieldSet
_ResolveChildWorkflowExecutionStartSuccess'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Bool
(ResolveChildWorkflowExecutionStartSuccess
 -> ResolveChildWorkflowExecutionStartSuccess -> Bool)
-> (ResolveChildWorkflowExecutionStartSuccess
    -> ResolveChildWorkflowExecutionStartSuccess -> Bool)
-> Eq ResolveChildWorkflowExecutionStartSuccess
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Bool
== :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Bool
$c/= :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Bool
/= :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Bool
Prelude.Eq, Eq ResolveChildWorkflowExecutionStartSuccess
Eq ResolveChildWorkflowExecutionStartSuccess =>
(ResolveChildWorkflowExecutionStartSuccess
 -> ResolveChildWorkflowExecutionStartSuccess -> Ordering)
-> (ResolveChildWorkflowExecutionStartSuccess
    -> ResolveChildWorkflowExecutionStartSuccess -> Bool)
-> (ResolveChildWorkflowExecutionStartSuccess
    -> ResolveChildWorkflowExecutionStartSuccess -> Bool)
-> (ResolveChildWorkflowExecutionStartSuccess
    -> ResolveChildWorkflowExecutionStartSuccess -> Bool)
-> (ResolveChildWorkflowExecutionStartSuccess
    -> ResolveChildWorkflowExecutionStartSuccess -> Bool)
-> (ResolveChildWorkflowExecutionStartSuccess
    -> ResolveChildWorkflowExecutionStartSuccess
    -> ResolveChildWorkflowExecutionStartSuccess)
-> (ResolveChildWorkflowExecutionStartSuccess
    -> ResolveChildWorkflowExecutionStartSuccess
    -> ResolveChildWorkflowExecutionStartSuccess)
-> Ord ResolveChildWorkflowExecutionStartSuccess
ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Bool
ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Ordering
ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess
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 :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Ordering
compare :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Ordering
$c< :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Bool
< :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Bool
$c<= :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Bool
<= :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Bool
$c> :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Bool
> :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Bool
$c>= :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Bool
>= :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess -> Bool
$cmax :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess
max :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess
$cmin :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess
min :: ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess
-> ResolveChildWorkflowExecutionStartSuccess
Prelude.Ord)
instance Prelude.Show ResolveChildWorkflowExecutionStartSuccess where
  showsPrec :: Int -> ResolveChildWorkflowExecutionStartSuccess -> ShowS
showsPrec Int
_ ResolveChildWorkflowExecutionStartSuccess
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ResolveChildWorkflowExecutionStartSuccess -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResolveChildWorkflowExecutionStartSuccess
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ResolveChildWorkflowExecutionStartSuccess "runId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "runId"
-> (Text -> f Text)
-> ResolveChildWorkflowExecutionStartSuccess
-> f ResolveChildWorkflowExecutionStartSuccess
fieldOf Proxy# "runId"
_
    = ((Text -> f Text)
 -> ResolveChildWorkflowExecutionStartSuccess
 -> f ResolveChildWorkflowExecutionStartSuccess)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ResolveChildWorkflowExecutionStartSuccess
-> f ResolveChildWorkflowExecutionStartSuccess
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveChildWorkflowExecutionStartSuccess -> Text)
-> (ResolveChildWorkflowExecutionStartSuccess
    -> Text -> ResolveChildWorkflowExecutionStartSuccess)
-> Lens
     ResolveChildWorkflowExecutionStartSuccess
     ResolveChildWorkflowExecutionStartSuccess
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveChildWorkflowExecutionStartSuccess -> Text
_ResolveChildWorkflowExecutionStartSuccess'runId
           (\ ResolveChildWorkflowExecutionStartSuccess
x__ Text
y__
              -> ResolveChildWorkflowExecutionStartSuccess
x__ {_ResolveChildWorkflowExecutionStartSuccess'runId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ResolveChildWorkflowExecutionStartSuccess where
  messageName :: Proxy ResolveChildWorkflowExecutionStartSuccess -> Text
messageName Proxy ResolveChildWorkflowExecutionStartSuccess
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_activation.ResolveChildWorkflowExecutionStartSuccess"
  packedMessageDescriptor :: Proxy ResolveChildWorkflowExecutionStartSuccess -> ByteString
packedMessageDescriptor Proxy ResolveChildWorkflowExecutionStartSuccess
_
    = ByteString
"\n\
      \)ResolveChildWorkflowExecutionStartSuccess\DC2\NAK\n\
      \\ACKrun_id\CAN\SOH \SOH(\tR\ENQrunId"
  packedFileDescriptor :: Proxy ResolveChildWorkflowExecutionStartSuccess -> ByteString
packedFileDescriptor Proxy ResolveChildWorkflowExecutionStartSuccess
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ResolveChildWorkflowExecutionStartSuccess)
fieldsByTag
    = let
        runId__field_descriptor :: FieldDescriptor ResolveChildWorkflowExecutionStartSuccess
runId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ResolveChildWorkflowExecutionStartSuccess Text
-> FieldDescriptor ResolveChildWorkflowExecutionStartSuccess
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"run_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     ResolveChildWorkflowExecutionStartSuccess
     ResolveChildWorkflowExecutionStartSuccess
     Text
     Text
-> FieldAccessor ResolveChildWorkflowExecutionStartSuccess Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId")) ::
              Data.ProtoLens.FieldDescriptor ResolveChildWorkflowExecutionStartSuccess
      in
        [(Tag, FieldDescriptor ResolveChildWorkflowExecutionStartSuccess)]
-> Map
     Tag (FieldDescriptor ResolveChildWorkflowExecutionStartSuccess)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ResolveChildWorkflowExecutionStartSuccess
runId__field_descriptor)]
  unknownFields :: Lens' ResolveChildWorkflowExecutionStartSuccess FieldSet
unknownFields
    = (ResolveChildWorkflowExecutionStartSuccess -> FieldSet)
-> (ResolveChildWorkflowExecutionStartSuccess
    -> FieldSet -> ResolveChildWorkflowExecutionStartSuccess)
-> Lens' ResolveChildWorkflowExecutionStartSuccess FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ResolveChildWorkflowExecutionStartSuccess -> FieldSet
_ResolveChildWorkflowExecutionStartSuccess'_unknownFields
        (\ ResolveChildWorkflowExecutionStartSuccess
x__ FieldSet
y__
           -> ResolveChildWorkflowExecutionStartSuccess
x__
                {_ResolveChildWorkflowExecutionStartSuccess'_unknownFields = y__})
  defMessage :: ResolveChildWorkflowExecutionStartSuccess
defMessage
    = ResolveChildWorkflowExecutionStartSuccess'_constructor
        {_ResolveChildWorkflowExecutionStartSuccess'runId :: Text
_ResolveChildWorkflowExecutionStartSuccess'runId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResolveChildWorkflowExecutionStartSuccess'_unknownFields :: FieldSet
_ResolveChildWorkflowExecutionStartSuccess'_unknownFields = []}
  parseMessage :: Parser ResolveChildWorkflowExecutionStartSuccess
parseMessage
    = let
        loop ::
          ResolveChildWorkflowExecutionStartSuccess
          -> Data.ProtoLens.Encoding.Bytes.Parser ResolveChildWorkflowExecutionStartSuccess
        loop :: ResolveChildWorkflowExecutionStartSuccess
-> Parser ResolveChildWorkflowExecutionStartSuccess
loop ResolveChildWorkflowExecutionStartSuccess
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
"run_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"runId") 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 ResolveChildWorkflowExecutionStartSuccess
-> String -> Parser ResolveChildWorkflowExecutionStartSuccess
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ResolveChildWorkflowExecutionStartSuccess
-> Parser ResolveChildWorkflowExecutionStartSuccess
loop ResolveChildWorkflowExecutionStartSuccess
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ResolveChildWorkflowExecutionStartSuccess"
  buildMessage :: ResolveChildWorkflowExecutionStartSuccess -> Builder
buildMessage
    = \ ResolveChildWorkflowExecutionStartSuccess
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ResolveChildWorkflowExecutionStartSuccess
  ResolveChildWorkflowExecutionStartSuccess
  Text
  Text
-> ResolveChildWorkflowExecutionStartSuccess -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId") ResolveChildWorkflowExecutionStartSuccess
_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))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  ResolveChildWorkflowExecutionStartSuccess
  ResolveChildWorkflowExecutionStartSuccess
  FieldSet
  FieldSet
-> ResolveChildWorkflowExecutionStartSuccess -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ResolveChildWorkflowExecutionStartSuccess
  ResolveChildWorkflowExecutionStartSuccess
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResolveChildWorkflowExecutionStartSuccess FieldSet
Data.ProtoLens.unknownFields ResolveChildWorkflowExecutionStartSuccess
_x))
instance Control.DeepSeq.NFData ResolveChildWorkflowExecutionStartSuccess where
  rnf :: ResolveChildWorkflowExecutionStartSuccess -> ()
rnf
    = \ ResolveChildWorkflowExecutionStartSuccess
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ResolveChildWorkflowExecutionStartSuccess -> FieldSet
_ResolveChildWorkflowExecutionStartSuccess'_unknownFields ResolveChildWorkflowExecutionStartSuccess
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ResolveChildWorkflowExecutionStartSuccess -> Text
_ResolveChildWorkflowExecutionStartSuccess'runId ResolveChildWorkflowExecutionStartSuccess
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.seq' @:: Lens' ResolveRequestCancelExternalWorkflow Data.Word.Word32@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.failure' @:: Lens' ResolveRequestCancelExternalWorkflow Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'failure' @:: Lens' ResolveRequestCancelExternalWorkflow (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@ -}
data ResolveRequestCancelExternalWorkflow
  = ResolveRequestCancelExternalWorkflow'_constructor {ResolveRequestCancelExternalWorkflow -> Word32
_ResolveRequestCancelExternalWorkflow'seq :: !Data.Word.Word32,
                                                       ResolveRequestCancelExternalWorkflow -> Maybe Failure
_ResolveRequestCancelExternalWorkflow'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                       ResolveRequestCancelExternalWorkflow -> FieldSet
_ResolveRequestCancelExternalWorkflow'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Bool
(ResolveRequestCancelExternalWorkflow
 -> ResolveRequestCancelExternalWorkflow -> Bool)
-> (ResolveRequestCancelExternalWorkflow
    -> ResolveRequestCancelExternalWorkflow -> Bool)
-> Eq ResolveRequestCancelExternalWorkflow
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Bool
== :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Bool
$c/= :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Bool
/= :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Bool
Prelude.Eq, Eq ResolveRequestCancelExternalWorkflow
Eq ResolveRequestCancelExternalWorkflow =>
(ResolveRequestCancelExternalWorkflow
 -> ResolveRequestCancelExternalWorkflow -> Ordering)
-> (ResolveRequestCancelExternalWorkflow
    -> ResolveRequestCancelExternalWorkflow -> Bool)
-> (ResolveRequestCancelExternalWorkflow
    -> ResolveRequestCancelExternalWorkflow -> Bool)
-> (ResolveRequestCancelExternalWorkflow
    -> ResolveRequestCancelExternalWorkflow -> Bool)
-> (ResolveRequestCancelExternalWorkflow
    -> ResolveRequestCancelExternalWorkflow -> Bool)
-> (ResolveRequestCancelExternalWorkflow
    -> ResolveRequestCancelExternalWorkflow
    -> ResolveRequestCancelExternalWorkflow)
-> (ResolveRequestCancelExternalWorkflow
    -> ResolveRequestCancelExternalWorkflow
    -> ResolveRequestCancelExternalWorkflow)
-> Ord ResolveRequestCancelExternalWorkflow
ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Bool
ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Ordering
ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow
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 :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Ordering
compare :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Ordering
$c< :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Bool
< :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Bool
$c<= :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Bool
<= :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Bool
$c> :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Bool
> :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Bool
$c>= :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Bool
>= :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow -> Bool
$cmax :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow
max :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow
$cmin :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow
min :: ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow
-> ResolveRequestCancelExternalWorkflow
Prelude.Ord)
instance Prelude.Show ResolveRequestCancelExternalWorkflow where
  showsPrec :: Int -> ResolveRequestCancelExternalWorkflow -> ShowS
showsPrec Int
_ ResolveRequestCancelExternalWorkflow
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ResolveRequestCancelExternalWorkflow -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResolveRequestCancelExternalWorkflow
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ResolveRequestCancelExternalWorkflow "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq"
-> (Word32 -> f Word32)
-> ResolveRequestCancelExternalWorkflow
-> f ResolveRequestCancelExternalWorkflow
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32)
 -> ResolveRequestCancelExternalWorkflow
 -> f ResolveRequestCancelExternalWorkflow)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> ResolveRequestCancelExternalWorkflow
-> f ResolveRequestCancelExternalWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveRequestCancelExternalWorkflow -> Word32)
-> (ResolveRequestCancelExternalWorkflow
    -> Word32 -> ResolveRequestCancelExternalWorkflow)
-> Lens
     ResolveRequestCancelExternalWorkflow
     ResolveRequestCancelExternalWorkflow
     Word32
     Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveRequestCancelExternalWorkflow -> Word32
_ResolveRequestCancelExternalWorkflow'seq
           (\ ResolveRequestCancelExternalWorkflow
x__ Word32
y__
              -> ResolveRequestCancelExternalWorkflow
x__ {_ResolveRequestCancelExternalWorkflow'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResolveRequestCancelExternalWorkflow "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> ResolveRequestCancelExternalWorkflow
-> f ResolveRequestCancelExternalWorkflow
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> ResolveRequestCancelExternalWorkflow
 -> f ResolveRequestCancelExternalWorkflow)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> ResolveRequestCancelExternalWorkflow
-> f ResolveRequestCancelExternalWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveRequestCancelExternalWorkflow -> Maybe Failure)
-> (ResolveRequestCancelExternalWorkflow
    -> Maybe Failure -> ResolveRequestCancelExternalWorkflow)
-> Lens
     ResolveRequestCancelExternalWorkflow
     ResolveRequestCancelExternalWorkflow
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveRequestCancelExternalWorkflow -> Maybe Failure
_ResolveRequestCancelExternalWorkflow'failure
           (\ ResolveRequestCancelExternalWorkflow
x__ Maybe Failure
y__
              -> ResolveRequestCancelExternalWorkflow
x__ {_ResolveRequestCancelExternalWorkflow'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 ResolveRequestCancelExternalWorkflow "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))
-> ResolveRequestCancelExternalWorkflow
-> f ResolveRequestCancelExternalWorkflow
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> ResolveRequestCancelExternalWorkflow
 -> f ResolveRequestCancelExternalWorkflow)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> ResolveRequestCancelExternalWorkflow
-> f ResolveRequestCancelExternalWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveRequestCancelExternalWorkflow -> Maybe Failure)
-> (ResolveRequestCancelExternalWorkflow
    -> Maybe Failure -> ResolveRequestCancelExternalWorkflow)
-> Lens
     ResolveRequestCancelExternalWorkflow
     ResolveRequestCancelExternalWorkflow
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveRequestCancelExternalWorkflow -> Maybe Failure
_ResolveRequestCancelExternalWorkflow'failure
           (\ ResolveRequestCancelExternalWorkflow
x__ Maybe Failure
y__
              -> ResolveRequestCancelExternalWorkflow
x__ {_ResolveRequestCancelExternalWorkflow'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ResolveRequestCancelExternalWorkflow where
  messageName :: Proxy ResolveRequestCancelExternalWorkflow -> Text
messageName Proxy ResolveRequestCancelExternalWorkflow
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_activation.ResolveRequestCancelExternalWorkflow"
  packedMessageDescriptor :: Proxy ResolveRequestCancelExternalWorkflow -> ByteString
packedMessageDescriptor Proxy ResolveRequestCancelExternalWorkflow
_
    = ByteString
"\n\
      \$ResolveRequestCancelExternalWorkflow\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2:\n\
      \\afailure\CAN\STX \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure"
  packedFileDescriptor :: Proxy ResolveRequestCancelExternalWorkflow -> ByteString
packedFileDescriptor Proxy ResolveRequestCancelExternalWorkflow
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ResolveRequestCancelExternalWorkflow)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor ResolveRequestCancelExternalWorkflow
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor ResolveRequestCancelExternalWorkflow Word32
-> FieldDescriptor ResolveRequestCancelExternalWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"seq"
              (ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
              (WireDefault Word32
-> Lens
     ResolveRequestCancelExternalWorkflow
     ResolveRequestCancelExternalWorkflow
     Word32
     Word32
-> FieldAccessor ResolveRequestCancelExternalWorkflow Word32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word32
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 @"seq")) ::
              Data.ProtoLens.FieldDescriptor ResolveRequestCancelExternalWorkflow
        failure__field_descriptor :: FieldDescriptor ResolveRequestCancelExternalWorkflow
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor ResolveRequestCancelExternalWorkflow Failure
-> FieldDescriptor ResolveRequestCancelExternalWorkflow
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
  ResolveRequestCancelExternalWorkflow
  ResolveRequestCancelExternalWorkflow
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor ResolveRequestCancelExternalWorkflow 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 ResolveRequestCancelExternalWorkflow
      in
        [(Tag, FieldDescriptor ResolveRequestCancelExternalWorkflow)]
-> Map Tag (FieldDescriptor ResolveRequestCancelExternalWorkflow)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ResolveRequestCancelExternalWorkflow
seq__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ResolveRequestCancelExternalWorkflow
failure__field_descriptor)]
  unknownFields :: Lens' ResolveRequestCancelExternalWorkflow FieldSet
unknownFields
    = (ResolveRequestCancelExternalWorkflow -> FieldSet)
-> (ResolveRequestCancelExternalWorkflow
    -> FieldSet -> ResolveRequestCancelExternalWorkflow)
-> Lens' ResolveRequestCancelExternalWorkflow FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ResolveRequestCancelExternalWorkflow -> FieldSet
_ResolveRequestCancelExternalWorkflow'_unknownFields
        (\ ResolveRequestCancelExternalWorkflow
x__ FieldSet
y__
           -> ResolveRequestCancelExternalWorkflow
x__
                {_ResolveRequestCancelExternalWorkflow'_unknownFields = y__})
  defMessage :: ResolveRequestCancelExternalWorkflow
defMessage
    = ResolveRequestCancelExternalWorkflow'_constructor
        {_ResolveRequestCancelExternalWorkflow'seq :: Word32
_ResolveRequestCancelExternalWorkflow'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResolveRequestCancelExternalWorkflow'failure :: Maybe Failure
_ResolveRequestCancelExternalWorkflow'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _ResolveRequestCancelExternalWorkflow'_unknownFields :: FieldSet
_ResolveRequestCancelExternalWorkflow'_unknownFields = []}
  parseMessage :: Parser ResolveRequestCancelExternalWorkflow
parseMessage
    = let
        loop ::
          ResolveRequestCancelExternalWorkflow
          -> Data.ProtoLens.Encoding.Bytes.Parser ResolveRequestCancelExternalWorkflow
        loop :: ResolveRequestCancelExternalWorkflow
-> Parser ResolveRequestCancelExternalWorkflow
loop ResolveRequestCancelExternalWorkflow
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 Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"seq"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"seq") 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 ResolveRequestCancelExternalWorkflow
-> String -> Parser ResolveRequestCancelExternalWorkflow
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ResolveRequestCancelExternalWorkflow
-> Parser ResolveRequestCancelExternalWorkflow
loop ResolveRequestCancelExternalWorkflow
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ResolveRequestCancelExternalWorkflow"
  buildMessage :: ResolveRequestCancelExternalWorkflow -> Builder
buildMessage
    = \ ResolveRequestCancelExternalWorkflow
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike
  Word32
  ResolveRequestCancelExternalWorkflow
  ResolveRequestCancelExternalWorkflow
  Word32
  Word32
-> ResolveRequestCancelExternalWorkflow -> Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"seq") ResolveRequestCancelExternalWorkflow
_x
              in
                if Word32 -> Word32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word32
_v Word32
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) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word32
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe Failure)
  ResolveRequestCancelExternalWorkflow
  ResolveRequestCancelExternalWorkflow
  (Maybe Failure)
  (Maybe Failure)
-> ResolveRequestCancelExternalWorkflow -> 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") ResolveRequestCancelExternalWorkflow
_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
  ResolveRequestCancelExternalWorkflow
  ResolveRequestCancelExternalWorkflow
  FieldSet
  FieldSet
-> ResolveRequestCancelExternalWorkflow -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ResolveRequestCancelExternalWorkflow
  ResolveRequestCancelExternalWorkflow
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResolveRequestCancelExternalWorkflow FieldSet
Data.ProtoLens.unknownFields ResolveRequestCancelExternalWorkflow
_x)))
instance Control.DeepSeq.NFData ResolveRequestCancelExternalWorkflow where
  rnf :: ResolveRequestCancelExternalWorkflow -> ()
rnf
    = \ ResolveRequestCancelExternalWorkflow
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ResolveRequestCancelExternalWorkflow -> FieldSet
_ResolveRequestCancelExternalWorkflow'_unknownFields ResolveRequestCancelExternalWorkflow
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ResolveRequestCancelExternalWorkflow -> Word32
_ResolveRequestCancelExternalWorkflow'seq ResolveRequestCancelExternalWorkflow
x__)
                (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ResolveRequestCancelExternalWorkflow -> Maybe Failure
_ResolveRequestCancelExternalWorkflow'failure ResolveRequestCancelExternalWorkflow
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.seq' @:: Lens' ResolveSignalExternalWorkflow Data.Word.Word32@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.failure' @:: Lens' ResolveSignalExternalWorkflow Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'failure' @:: Lens' ResolveSignalExternalWorkflow (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@ -}
data ResolveSignalExternalWorkflow
  = ResolveSignalExternalWorkflow'_constructor {ResolveSignalExternalWorkflow -> Word32
_ResolveSignalExternalWorkflow'seq :: !Data.Word.Word32,
                                                ResolveSignalExternalWorkflow -> Maybe Failure
_ResolveSignalExternalWorkflow'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                ResolveSignalExternalWorkflow -> FieldSet
_ResolveSignalExternalWorkflow'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Bool
(ResolveSignalExternalWorkflow
 -> ResolveSignalExternalWorkflow -> Bool)
-> (ResolveSignalExternalWorkflow
    -> ResolveSignalExternalWorkflow -> Bool)
-> Eq ResolveSignalExternalWorkflow
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Bool
== :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Bool
$c/= :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Bool
/= :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Bool
Prelude.Eq, Eq ResolveSignalExternalWorkflow
Eq ResolveSignalExternalWorkflow =>
(ResolveSignalExternalWorkflow
 -> ResolveSignalExternalWorkflow -> Ordering)
-> (ResolveSignalExternalWorkflow
    -> ResolveSignalExternalWorkflow -> Bool)
-> (ResolveSignalExternalWorkflow
    -> ResolveSignalExternalWorkflow -> Bool)
-> (ResolveSignalExternalWorkflow
    -> ResolveSignalExternalWorkflow -> Bool)
-> (ResolveSignalExternalWorkflow
    -> ResolveSignalExternalWorkflow -> Bool)
-> (ResolveSignalExternalWorkflow
    -> ResolveSignalExternalWorkflow -> ResolveSignalExternalWorkflow)
-> (ResolveSignalExternalWorkflow
    -> ResolveSignalExternalWorkflow -> ResolveSignalExternalWorkflow)
-> Ord ResolveSignalExternalWorkflow
ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Bool
ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Ordering
ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> ResolveSignalExternalWorkflow
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 :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Ordering
compare :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Ordering
$c< :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Bool
< :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Bool
$c<= :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Bool
<= :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Bool
$c> :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Bool
> :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Bool
$c>= :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Bool
>= :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> Bool
$cmax :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> ResolveSignalExternalWorkflow
max :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> ResolveSignalExternalWorkflow
$cmin :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> ResolveSignalExternalWorkflow
min :: ResolveSignalExternalWorkflow
-> ResolveSignalExternalWorkflow -> ResolveSignalExternalWorkflow
Prelude.Ord)
instance Prelude.Show ResolveSignalExternalWorkflow where
  showsPrec :: Int -> ResolveSignalExternalWorkflow -> ShowS
showsPrec Int
_ ResolveSignalExternalWorkflow
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ResolveSignalExternalWorkflow -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResolveSignalExternalWorkflow
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ResolveSignalExternalWorkflow "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq"
-> (Word32 -> f Word32)
-> ResolveSignalExternalWorkflow
-> f ResolveSignalExternalWorkflow
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32)
 -> ResolveSignalExternalWorkflow
 -> f ResolveSignalExternalWorkflow)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> ResolveSignalExternalWorkflow
-> f ResolveSignalExternalWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveSignalExternalWorkflow -> Word32)
-> (ResolveSignalExternalWorkflow
    -> Word32 -> ResolveSignalExternalWorkflow)
-> Lens
     ResolveSignalExternalWorkflow
     ResolveSignalExternalWorkflow
     Word32
     Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveSignalExternalWorkflow -> Word32
_ResolveSignalExternalWorkflow'seq
           (\ ResolveSignalExternalWorkflow
x__ Word32
y__ -> ResolveSignalExternalWorkflow
x__ {_ResolveSignalExternalWorkflow'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResolveSignalExternalWorkflow "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> ResolveSignalExternalWorkflow
-> f ResolveSignalExternalWorkflow
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> ResolveSignalExternalWorkflow
 -> f ResolveSignalExternalWorkflow)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> ResolveSignalExternalWorkflow
-> f ResolveSignalExternalWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveSignalExternalWorkflow -> Maybe Failure)
-> (ResolveSignalExternalWorkflow
    -> Maybe Failure -> ResolveSignalExternalWorkflow)
-> Lens
     ResolveSignalExternalWorkflow
     ResolveSignalExternalWorkflow
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveSignalExternalWorkflow -> Maybe Failure
_ResolveSignalExternalWorkflow'failure
           (\ ResolveSignalExternalWorkflow
x__ Maybe Failure
y__ -> ResolveSignalExternalWorkflow
x__ {_ResolveSignalExternalWorkflow'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 ResolveSignalExternalWorkflow "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))
-> ResolveSignalExternalWorkflow
-> f ResolveSignalExternalWorkflow
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> ResolveSignalExternalWorkflow
 -> f ResolveSignalExternalWorkflow)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> ResolveSignalExternalWorkflow
-> f ResolveSignalExternalWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResolveSignalExternalWorkflow -> Maybe Failure)
-> (ResolveSignalExternalWorkflow
    -> Maybe Failure -> ResolveSignalExternalWorkflow)
-> Lens
     ResolveSignalExternalWorkflow
     ResolveSignalExternalWorkflow
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResolveSignalExternalWorkflow -> Maybe Failure
_ResolveSignalExternalWorkflow'failure
           (\ ResolveSignalExternalWorkflow
x__ Maybe Failure
y__ -> ResolveSignalExternalWorkflow
x__ {_ResolveSignalExternalWorkflow'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ResolveSignalExternalWorkflow where
  messageName :: Proxy ResolveSignalExternalWorkflow -> Text
messageName Proxy ResolveSignalExternalWorkflow
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_activation.ResolveSignalExternalWorkflow"
  packedMessageDescriptor :: Proxy ResolveSignalExternalWorkflow -> ByteString
packedMessageDescriptor Proxy ResolveSignalExternalWorkflow
_
    = ByteString
"\n\
      \\GSResolveSignalExternalWorkflow\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2:\n\
      \\afailure\CAN\STX \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure"
  packedFileDescriptor :: Proxy ResolveSignalExternalWorkflow -> ByteString
packedFileDescriptor Proxy ResolveSignalExternalWorkflow
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ResolveSignalExternalWorkflow)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor ResolveSignalExternalWorkflow
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor ResolveSignalExternalWorkflow Word32
-> FieldDescriptor ResolveSignalExternalWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"seq"
              (ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
              (WireDefault Word32
-> Lens
     ResolveSignalExternalWorkflow
     ResolveSignalExternalWorkflow
     Word32
     Word32
-> FieldAccessor ResolveSignalExternalWorkflow Word32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word32
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 @"seq")) ::
              Data.ProtoLens.FieldDescriptor ResolveSignalExternalWorkflow
        failure__field_descriptor :: FieldDescriptor ResolveSignalExternalWorkflow
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor ResolveSignalExternalWorkflow Failure
-> FieldDescriptor ResolveSignalExternalWorkflow
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
  ResolveSignalExternalWorkflow
  ResolveSignalExternalWorkflow
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor ResolveSignalExternalWorkflow 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 ResolveSignalExternalWorkflow
      in
        [(Tag, FieldDescriptor ResolveSignalExternalWorkflow)]
-> Map Tag (FieldDescriptor ResolveSignalExternalWorkflow)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ResolveSignalExternalWorkflow
seq__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ResolveSignalExternalWorkflow
failure__field_descriptor)]
  unknownFields :: Lens' ResolveSignalExternalWorkflow FieldSet
unknownFields
    = (ResolveSignalExternalWorkflow -> FieldSet)
-> (ResolveSignalExternalWorkflow
    -> FieldSet -> ResolveSignalExternalWorkflow)
-> Lens' ResolveSignalExternalWorkflow FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ResolveSignalExternalWorkflow -> FieldSet
_ResolveSignalExternalWorkflow'_unknownFields
        (\ ResolveSignalExternalWorkflow
x__ FieldSet
y__
           -> ResolveSignalExternalWorkflow
x__ {_ResolveSignalExternalWorkflow'_unknownFields = y__})
  defMessage :: ResolveSignalExternalWorkflow
defMessage
    = ResolveSignalExternalWorkflow'_constructor
        {_ResolveSignalExternalWorkflow'seq :: Word32
_ResolveSignalExternalWorkflow'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResolveSignalExternalWorkflow'failure :: Maybe Failure
_ResolveSignalExternalWorkflow'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _ResolveSignalExternalWorkflow'_unknownFields :: FieldSet
_ResolveSignalExternalWorkflow'_unknownFields = []}
  parseMessage :: Parser ResolveSignalExternalWorkflow
parseMessage
    = let
        loop ::
          ResolveSignalExternalWorkflow
          -> Data.ProtoLens.Encoding.Bytes.Parser ResolveSignalExternalWorkflow
        loop :: ResolveSignalExternalWorkflow
-> Parser ResolveSignalExternalWorkflow
loop ResolveSignalExternalWorkflow
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 Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"seq"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"seq") 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 ResolveSignalExternalWorkflow
-> String -> Parser ResolveSignalExternalWorkflow
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ResolveSignalExternalWorkflow
-> Parser ResolveSignalExternalWorkflow
loop ResolveSignalExternalWorkflow
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ResolveSignalExternalWorkflow"
  buildMessage :: ResolveSignalExternalWorkflow -> Builder
buildMessage
    = \ ResolveSignalExternalWorkflow
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike
  Word32
  ResolveSignalExternalWorkflow
  ResolveSignalExternalWorkflow
  Word32
  Word32
-> ResolveSignalExternalWorkflow -> Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"seq") ResolveSignalExternalWorkflow
_x
              in
                if Word32 -> Word32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word32
_v Word32
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) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word32
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe Failure)
  ResolveSignalExternalWorkflow
  ResolveSignalExternalWorkflow
  (Maybe Failure)
  (Maybe Failure)
-> ResolveSignalExternalWorkflow -> 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") ResolveSignalExternalWorkflow
_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
  ResolveSignalExternalWorkflow
  ResolveSignalExternalWorkflow
  FieldSet
  FieldSet
-> ResolveSignalExternalWorkflow -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ResolveSignalExternalWorkflow
  ResolveSignalExternalWorkflow
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResolveSignalExternalWorkflow FieldSet
Data.ProtoLens.unknownFields ResolveSignalExternalWorkflow
_x)))
instance Control.DeepSeq.NFData ResolveSignalExternalWorkflow where
  rnf :: ResolveSignalExternalWorkflow -> ()
rnf
    = \ ResolveSignalExternalWorkflow
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ResolveSignalExternalWorkflow -> FieldSet
_ResolveSignalExternalWorkflow'_unknownFields ResolveSignalExternalWorkflow
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ResolveSignalExternalWorkflow -> Word32
_ResolveSignalExternalWorkflow'seq ResolveSignalExternalWorkflow
x__)
                (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ResolveSignalExternalWorkflow -> Maybe Failure
_ResolveSignalExternalWorkflow'failure ResolveSignalExternalWorkflow
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.signalName' @:: Lens' SignalWorkflow Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.input' @:: Lens' SignalWorkflow [Proto.Temporal.Api.Common.V1.Message.Payload]@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.vec'input' @:: Lens' SignalWorkflow (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.identity' @:: Lens' SignalWorkflow Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.headers' @:: Lens' SignalWorkflow (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data SignalWorkflow
  = SignalWorkflow'_constructor {SignalWorkflow -> Text
_SignalWorkflow'signalName :: !Data.Text.Text,
                                 SignalWorkflow -> Vector Payload
_SignalWorkflow'input :: !(Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload),
                                 SignalWorkflow -> Text
_SignalWorkflow'identity :: !Data.Text.Text,
                                 SignalWorkflow -> Map Text Payload
_SignalWorkflow'headers :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload),
                                 SignalWorkflow -> FieldSet
_SignalWorkflow'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SignalWorkflow -> SignalWorkflow -> Bool
(SignalWorkflow -> SignalWorkflow -> Bool)
-> (SignalWorkflow -> SignalWorkflow -> Bool) -> Eq SignalWorkflow
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SignalWorkflow -> SignalWorkflow -> Bool
== :: SignalWorkflow -> SignalWorkflow -> Bool
$c/= :: SignalWorkflow -> SignalWorkflow -> Bool
/= :: SignalWorkflow -> SignalWorkflow -> Bool
Prelude.Eq, Eq SignalWorkflow
Eq SignalWorkflow =>
(SignalWorkflow -> SignalWorkflow -> Ordering)
-> (SignalWorkflow -> SignalWorkflow -> Bool)
-> (SignalWorkflow -> SignalWorkflow -> Bool)
-> (SignalWorkflow -> SignalWorkflow -> Bool)
-> (SignalWorkflow -> SignalWorkflow -> Bool)
-> (SignalWorkflow -> SignalWorkflow -> SignalWorkflow)
-> (SignalWorkflow -> SignalWorkflow -> SignalWorkflow)
-> Ord SignalWorkflow
SignalWorkflow -> SignalWorkflow -> Bool
SignalWorkflow -> SignalWorkflow -> Ordering
SignalWorkflow -> SignalWorkflow -> SignalWorkflow
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 :: SignalWorkflow -> SignalWorkflow -> Ordering
compare :: SignalWorkflow -> SignalWorkflow -> Ordering
$c< :: SignalWorkflow -> SignalWorkflow -> Bool
< :: SignalWorkflow -> SignalWorkflow -> Bool
$c<= :: SignalWorkflow -> SignalWorkflow -> Bool
<= :: SignalWorkflow -> SignalWorkflow -> Bool
$c> :: SignalWorkflow -> SignalWorkflow -> Bool
> :: SignalWorkflow -> SignalWorkflow -> Bool
$c>= :: SignalWorkflow -> SignalWorkflow -> Bool
>= :: SignalWorkflow -> SignalWorkflow -> Bool
$cmax :: SignalWorkflow -> SignalWorkflow -> SignalWorkflow
max :: SignalWorkflow -> SignalWorkflow -> SignalWorkflow
$cmin :: SignalWorkflow -> SignalWorkflow -> SignalWorkflow
min :: SignalWorkflow -> SignalWorkflow -> SignalWorkflow
Prelude.Ord)
instance Prelude.Show SignalWorkflow where
  showsPrec :: Int -> SignalWorkflow -> ShowS
showsPrec Int
_ SignalWorkflow
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (SignalWorkflow -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SignalWorkflow
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField SignalWorkflow "signalName" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "signalName"
-> (Text -> f Text) -> SignalWorkflow -> f SignalWorkflow
fieldOf Proxy# "signalName"
_
    = ((Text -> f Text) -> SignalWorkflow -> f SignalWorkflow)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWorkflow
-> f SignalWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflow -> Text)
-> (SignalWorkflow -> Text -> SignalWorkflow)
-> Lens SignalWorkflow SignalWorkflow Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflow -> Text
_SignalWorkflow'signalName
           (\ SignalWorkflow
x__ Text
y__ -> SignalWorkflow
x__ {_SignalWorkflow'signalName = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWorkflow "input" [Proto.Temporal.Api.Common.V1.Message.Payload] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "input"
-> ([Payload] -> f [Payload]) -> SignalWorkflow -> f SignalWorkflow
fieldOf Proxy# "input"
_
    = ((Vector Payload -> f (Vector Payload))
 -> SignalWorkflow -> f SignalWorkflow)
-> (([Payload] -> f [Payload])
    -> Vector Payload -> f (Vector Payload))
-> ([Payload] -> f [Payload])
-> SignalWorkflow
-> f SignalWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflow -> Vector Payload)
-> (SignalWorkflow -> Vector Payload -> SignalWorkflow)
-> Lens
     SignalWorkflow SignalWorkflow (Vector Payload) (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflow -> Vector Payload
_SignalWorkflow'input
           (\ SignalWorkflow
x__ Vector Payload
y__ -> SignalWorkflow
x__ {_SignalWorkflow'input = y__}))
        ((Vector Payload -> [Payload])
-> (Vector Payload -> [Payload] -> Vector Payload)
-> Lens (Vector Payload) (Vector Payload) [Payload] [Payload]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Payload -> [Payload]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Payload
_ [Payload]
y__ -> [Payload] -> Vector Payload
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Payload]
y__))
instance Data.ProtoLens.Field.HasField SignalWorkflow "vec'input" (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'input"
-> (Vector Payload -> f (Vector Payload))
-> SignalWorkflow
-> f SignalWorkflow
fieldOf Proxy# "vec'input"
_
    = ((Vector Payload -> f (Vector Payload))
 -> SignalWorkflow -> f SignalWorkflow)
-> ((Vector Payload -> f (Vector Payload))
    -> Vector Payload -> f (Vector Payload))
-> (Vector Payload -> f (Vector Payload))
-> SignalWorkflow
-> f SignalWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflow -> Vector Payload)
-> (SignalWorkflow -> Vector Payload -> SignalWorkflow)
-> Lens
     SignalWorkflow SignalWorkflow (Vector Payload) (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflow -> Vector Payload
_SignalWorkflow'input
           (\ SignalWorkflow
x__ Vector Payload
y__ -> SignalWorkflow
x__ {_SignalWorkflow'input = y__}))
        (Vector Payload -> f (Vector Payload))
-> Vector Payload -> f (Vector Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWorkflow "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text) -> SignalWorkflow -> f SignalWorkflow
fieldOf Proxy# "identity"
_
    = ((Text -> f Text) -> SignalWorkflow -> f SignalWorkflow)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWorkflow
-> f SignalWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflow -> Text)
-> (SignalWorkflow -> Text -> SignalWorkflow)
-> Lens SignalWorkflow SignalWorkflow Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflow -> Text
_SignalWorkflow'identity
           (\ SignalWorkflow
x__ Text
y__ -> SignalWorkflow
x__ {_SignalWorkflow'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWorkflow "headers" (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "headers"
-> (Map Text Payload -> f (Map Text Payload))
-> SignalWorkflow
-> f SignalWorkflow
fieldOf Proxy# "headers"
_
    = ((Map Text Payload -> f (Map Text Payload))
 -> SignalWorkflow -> f SignalWorkflow)
-> ((Map Text Payload -> f (Map Text Payload))
    -> Map Text Payload -> f (Map Text Payload))
-> (Map Text Payload -> f (Map Text Payload))
-> SignalWorkflow
-> f SignalWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflow -> Map Text Payload)
-> (SignalWorkflow -> Map Text Payload -> SignalWorkflow)
-> Lens
     SignalWorkflow SignalWorkflow (Map Text Payload) (Map Text Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflow -> Map Text Payload
_SignalWorkflow'headers
           (\ SignalWorkflow
x__ Map Text Payload
y__ -> SignalWorkflow
x__ {_SignalWorkflow'headers = y__}))
        (Map Text Payload -> f (Map Text Payload))
-> Map Text Payload -> f (Map Text Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SignalWorkflow where
  messageName :: Proxy SignalWorkflow -> Text
messageName Proxy SignalWorkflow
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_activation.SignalWorkflow"
  packedMessageDescriptor :: Proxy SignalWorkflow -> ByteString
packedMessageDescriptor Proxy SignalWorkflow
_
    = ByteString
"\n\
      \\SOSignalWorkflow\DC2\US\n\
      \\vsignal_name\CAN\SOH \SOH(\tR\n\
      \signalName\DC25\n\
      \\ENQinput\CAN\STX \ETX(\v2\US.temporal.api.common.v1.PayloadR\ENQinput\DC2\SUB\n\
      \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2R\n\
      \\aheaders\CAN\ENQ \ETX(\v28.coresdk.workflow_activation.SignalWorkflow.HeadersEntryR\aheaders\SUB[\n\
      \\fHeadersEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\
      \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy SignalWorkflow -> ByteString
packedFileDescriptor Proxy SignalWorkflow
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor SignalWorkflow)
fieldsByTag
    = let
        signalName__field_descriptor :: FieldDescriptor SignalWorkflow
signalName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWorkflow Text
-> FieldDescriptor SignalWorkflow
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 SignalWorkflow SignalWorkflow Text Text
-> FieldAccessor SignalWorkflow 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 SignalWorkflow
        input__field_descriptor :: FieldDescriptor SignalWorkflow
input__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor SignalWorkflow Payload
-> FieldDescriptor SignalWorkflow
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)
              (Packing
-> Lens' SignalWorkflow [Payload]
-> FieldAccessor SignalWorkflow Payload
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 @"input")) ::
              Data.ProtoLens.FieldDescriptor SignalWorkflow
        identity__field_descriptor :: FieldDescriptor SignalWorkflow
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWorkflow Text
-> FieldDescriptor SignalWorkflow
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 SignalWorkflow SignalWorkflow Text Text
-> FieldAccessor SignalWorkflow 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 SignalWorkflow
        headers__field_descriptor :: FieldDescriptor SignalWorkflow
headers__field_descriptor
          = String
-> FieldTypeDescriptor SignalWorkflow'HeadersEntry
-> FieldAccessor SignalWorkflow SignalWorkflow'HeadersEntry
-> FieldDescriptor SignalWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"headers"
              (MessageOrGroup -> FieldTypeDescriptor SignalWorkflow'HeadersEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor SignalWorkflow'HeadersEntry)
              (Lens' SignalWorkflow'HeadersEntry Text
-> Lens' SignalWorkflow'HeadersEntry Payload
-> Lens
     SignalWorkflow SignalWorkflow (Map Text Payload) (Map Text Payload)
-> FieldAccessor SignalWorkflow SignalWorkflow'HeadersEntry
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 @"headers")) ::
              Data.ProtoLens.FieldDescriptor SignalWorkflow
      in
        [(Tag, FieldDescriptor SignalWorkflow)]
-> Map Tag (FieldDescriptor SignalWorkflow)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor SignalWorkflow
signalName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor SignalWorkflow
input__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor SignalWorkflow
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor SignalWorkflow
headers__field_descriptor)]
  unknownFields :: Lens' SignalWorkflow FieldSet
unknownFields
    = (SignalWorkflow -> FieldSet)
-> (SignalWorkflow -> FieldSet -> SignalWorkflow)
-> Lens' SignalWorkflow FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SignalWorkflow -> FieldSet
_SignalWorkflow'_unknownFields
        (\ SignalWorkflow
x__ FieldSet
y__ -> SignalWorkflow
x__ {_SignalWorkflow'_unknownFields = y__})
  defMessage :: SignalWorkflow
defMessage
    = SignalWorkflow'_constructor
        {_SignalWorkflow'signalName :: Text
_SignalWorkflow'signalName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWorkflow'input :: Vector Payload
_SignalWorkflow'input = Vector Payload
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _SignalWorkflow'identity :: Text
_SignalWorkflow'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWorkflow'headers :: Map Text Payload
_SignalWorkflow'headers = Map Text Payload
forall k a. Map k a
Data.Map.empty,
         _SignalWorkflow'_unknownFields :: FieldSet
_SignalWorkflow'_unknownFields = []}
  parseMessage :: Parser SignalWorkflow
parseMessage
    = let
        loop ::
          SignalWorkflow
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Common.V1.Message.Payload
             -> Data.ProtoLens.Encoding.Bytes.Parser SignalWorkflow
        loop :: SignalWorkflow
-> Growing Vector RealWorld Payload -> Parser SignalWorkflow
loop SignalWorkflow
x Growing Vector RealWorld Payload
mutable'input
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'input <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                        (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'input)
                      (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'input") frozen'input 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)
                                  mutable'input
                        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
"input"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'input y)
                                loop x v
                        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)
                                  mutable'input
                        Word64
42
                          -> do !(entry :: SignalWorkflow'HeadersEntry) <- Parser SignalWorkflow'HeadersEntry
-> String -> Parser SignalWorkflow'HeadersEntry
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
"headers"
                                (let
                                   key = FoldLike
  Text
  SignalWorkflow'HeadersEntry
  SignalWorkflow'HeadersEntry
  Text
  Text
-> SignalWorkflow'HeadersEntry -> 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") SignalWorkflow'HeadersEntry
entry
                                   value
                                     = FoldLike
  Payload
  SignalWorkflow'HeadersEntry
  SignalWorkflow'HeadersEntry
  Payload
  Payload
-> SignalWorkflow'HeadersEntry -> 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 @"value") SignalWorkflow'HeadersEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"headers")
                                        (\ !Map Text Payload
t -> Text -> Payload -> Map Text Payload -> Map Text Payload
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key Payload
value Map Text Payload
t) x)
                                     mutable'input)
                        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'input
      in
        Parser SignalWorkflow -> String -> Parser SignalWorkflow
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'input <- IO (Growing Vector RealWorld Payload)
-> Parser (Growing Vector RealWorld Payload)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                 IO (Growing Vector RealWorld Payload)
IO (Growing Vector (PrimState IO) Payload)
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'input)
          String
"SignalWorkflow"
  buildMessage :: SignalWorkflow -> Builder
buildMessage
    = \ SignalWorkflow
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike Text SignalWorkflow SignalWorkflow Text Text
-> SignalWorkflow -> 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") SignalWorkflow
_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.<>)
                ((Payload -> Builder) -> Vector Payload -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                   (\ 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))
                   (FoldLike
  (Vector Payload)
  SignalWorkflow
  SignalWorkflow
  (Vector Payload)
  (Vector Payload)
-> SignalWorkflow -> Vector 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 @"vec'input") SignalWorkflow
_x))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v = FoldLike Text SignalWorkflow SignalWorkflow Text Text
-> SignalWorkflow -> 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") SignalWorkflow
_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.<>)
                      ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                         (((Text, Payload) -> Builder) -> [(Text, Payload)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                            (\ (Text, Payload)
_v
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                    ((ByteString -> Builder)
-> (SignalWorkflow'HeadersEntry -> ByteString)
-> SignalWorkflow'HeadersEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                       (\ ByteString
bs
                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                     (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                       SignalWorkflow'HeadersEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                       (Setter
  SignalWorkflow'HeadersEntry SignalWorkflow'HeadersEntry Text Text
-> Text
-> SignalWorkflow'HeadersEntry
-> SignalWorkflow'HeadersEntry
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, Payload) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, Payload)
_v)
                                          (Setter
  SignalWorkflow'HeadersEntry
  SignalWorkflow'HeadersEntry
  Payload
  Payload
-> Payload
-> SignalWorkflow'HeadersEntry
-> SignalWorkflow'HeadersEntry
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, Payload) -> Payload
forall a b. (a, b) -> b
Prelude.snd (Text, Payload)
_v)
                                             (SignalWorkflow'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                SignalWorkflow'HeadersEntry)))))
                            (Map Text Payload -> [(Text, Payload)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                               (FoldLike
  (Map Text Payload)
  SignalWorkflow
  SignalWorkflow
  (Map Text Payload)
  (Map Text Payload)
-> SignalWorkflow -> Map Text 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 @"headers") SignalWorkflow
_x))))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike FieldSet SignalWorkflow SignalWorkflow FieldSet FieldSet
-> SignalWorkflow -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet SignalWorkflow SignalWorkflow FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SignalWorkflow FieldSet
Data.ProtoLens.unknownFields SignalWorkflow
_x)))))
instance Control.DeepSeq.NFData SignalWorkflow where
  rnf :: SignalWorkflow -> ()
rnf
    = \ SignalWorkflow
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SignalWorkflow -> FieldSet
_SignalWorkflow'_unknownFields SignalWorkflow
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SignalWorkflow -> Text
_SignalWorkflow'signalName SignalWorkflow
x__)
                (Vector Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (SignalWorkflow -> Vector Payload
_SignalWorkflow'input SignalWorkflow
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (SignalWorkflow -> Text
_SignalWorkflow'identity SignalWorkflow
x__)
                      (Map Text Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (SignalWorkflow -> Map Text Payload
_SignalWorkflow'headers SignalWorkflow
x__) ()))))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.key' @:: Lens' SignalWorkflow'HeadersEntry Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.value' @:: Lens' SignalWorkflow'HeadersEntry Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'value' @:: Lens' SignalWorkflow'HeadersEntry (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data SignalWorkflow'HeadersEntry
  = SignalWorkflow'HeadersEntry'_constructor {SignalWorkflow'HeadersEntry -> Text
_SignalWorkflow'HeadersEntry'key :: !Data.Text.Text,
                                              SignalWorkflow'HeadersEntry -> Maybe Payload
_SignalWorkflow'HeadersEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                              SignalWorkflow'HeadersEntry -> FieldSet
_SignalWorkflow'HeadersEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry -> Bool
(SignalWorkflow'HeadersEntry
 -> SignalWorkflow'HeadersEntry -> Bool)
-> (SignalWorkflow'HeadersEntry
    -> SignalWorkflow'HeadersEntry -> Bool)
-> Eq SignalWorkflow'HeadersEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry -> Bool
== :: SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry -> Bool
$c/= :: SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry -> Bool
/= :: SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry -> Bool
Prelude.Eq, Eq SignalWorkflow'HeadersEntry
Eq SignalWorkflow'HeadersEntry =>
(SignalWorkflow'HeadersEntry
 -> SignalWorkflow'HeadersEntry -> Ordering)
-> (SignalWorkflow'HeadersEntry
    -> SignalWorkflow'HeadersEntry -> Bool)
-> (SignalWorkflow'HeadersEntry
    -> SignalWorkflow'HeadersEntry -> Bool)
-> (SignalWorkflow'HeadersEntry
    -> SignalWorkflow'HeadersEntry -> Bool)
-> (SignalWorkflow'HeadersEntry
    -> SignalWorkflow'HeadersEntry -> Bool)
-> (SignalWorkflow'HeadersEntry
    -> SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry)
-> (SignalWorkflow'HeadersEntry
    -> SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry)
-> Ord SignalWorkflow'HeadersEntry
SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry -> Bool
SignalWorkflow'HeadersEntry
-> SignalWorkflow'HeadersEntry -> Ordering
SignalWorkflow'HeadersEntry
-> SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry
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 :: SignalWorkflow'HeadersEntry
-> SignalWorkflow'HeadersEntry -> Ordering
compare :: SignalWorkflow'HeadersEntry
-> SignalWorkflow'HeadersEntry -> Ordering
$c< :: SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry -> Bool
< :: SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry -> Bool
$c<= :: SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry -> Bool
<= :: SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry -> Bool
$c> :: SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry -> Bool
> :: SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry -> Bool
$c>= :: SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry -> Bool
>= :: SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry -> Bool
$cmax :: SignalWorkflow'HeadersEntry
-> SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry
max :: SignalWorkflow'HeadersEntry
-> SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry
$cmin :: SignalWorkflow'HeadersEntry
-> SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry
min :: SignalWorkflow'HeadersEntry
-> SignalWorkflow'HeadersEntry -> SignalWorkflow'HeadersEntry
Prelude.Ord)
instance Prelude.Show SignalWorkflow'HeadersEntry where
  showsPrec :: Int -> SignalWorkflow'HeadersEntry -> ShowS
showsPrec Int
_ SignalWorkflow'HeadersEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (SignalWorkflow'HeadersEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SignalWorkflow'HeadersEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField SignalWorkflow'HeadersEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> SignalWorkflow'HeadersEntry
-> f SignalWorkflow'HeadersEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> SignalWorkflow'HeadersEntry -> f SignalWorkflow'HeadersEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWorkflow'HeadersEntry
-> f SignalWorkflow'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflow'HeadersEntry -> Text)
-> (SignalWorkflow'HeadersEntry
    -> Text -> SignalWorkflow'HeadersEntry)
-> Lens' SignalWorkflow'HeadersEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflow'HeadersEntry -> Text
_SignalWorkflow'HeadersEntry'key
           (\ SignalWorkflow'HeadersEntry
x__ Text
y__ -> SignalWorkflow'HeadersEntry
x__ {_SignalWorkflow'HeadersEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWorkflow'HeadersEntry "value" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Payload -> f Payload)
-> SignalWorkflow'HeadersEntry
-> f SignalWorkflow'HeadersEntry
fieldOf Proxy# "value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> SignalWorkflow'HeadersEntry -> f SignalWorkflow'HeadersEntry)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> SignalWorkflow'HeadersEntry
-> f SignalWorkflow'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflow'HeadersEntry -> Maybe Payload)
-> (SignalWorkflow'HeadersEntry
    -> Maybe Payload -> SignalWorkflow'HeadersEntry)
-> Lens
     SignalWorkflow'HeadersEntry
     SignalWorkflow'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflow'HeadersEntry -> Maybe Payload
_SignalWorkflow'HeadersEntry'value
           (\ SignalWorkflow'HeadersEntry
x__ Maybe Payload
y__ -> SignalWorkflow'HeadersEntry
x__ {_SignalWorkflow'HeadersEntry'value = 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 SignalWorkflow'HeadersEntry "maybe'value" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'value"
-> (Maybe Payload -> f (Maybe Payload))
-> SignalWorkflow'HeadersEntry
-> f SignalWorkflow'HeadersEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> SignalWorkflow'HeadersEntry -> f SignalWorkflow'HeadersEntry)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> SignalWorkflow'HeadersEntry
-> f SignalWorkflow'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflow'HeadersEntry -> Maybe Payload)
-> (SignalWorkflow'HeadersEntry
    -> Maybe Payload -> SignalWorkflow'HeadersEntry)
-> Lens
     SignalWorkflow'HeadersEntry
     SignalWorkflow'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflow'HeadersEntry -> Maybe Payload
_SignalWorkflow'HeadersEntry'value
           (\ SignalWorkflow'HeadersEntry
x__ Maybe Payload
y__ -> SignalWorkflow'HeadersEntry
x__ {_SignalWorkflow'HeadersEntry'value = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SignalWorkflow'HeadersEntry where
  messageName :: Proxy SignalWorkflow'HeadersEntry -> Text
messageName Proxy SignalWorkflow'HeadersEntry
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_activation.SignalWorkflow.HeadersEntry"
  packedMessageDescriptor :: Proxy SignalWorkflow'HeadersEntry -> ByteString
packedMessageDescriptor Proxy SignalWorkflow'HeadersEntry
_
    = ByteString
"\n\
      \\fHeadersEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\
      \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy SignalWorkflow'HeadersEntry -> ByteString
packedFileDescriptor Proxy SignalWorkflow'HeadersEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor SignalWorkflow'HeadersEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor SignalWorkflow'HeadersEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWorkflow'HeadersEntry Text
-> FieldDescriptor SignalWorkflow'HeadersEntry
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' SignalWorkflow'HeadersEntry Text
-> FieldAccessor SignalWorkflow'HeadersEntry 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 SignalWorkflow'HeadersEntry
        value__field_descriptor :: FieldDescriptor SignalWorkflow'HeadersEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor SignalWorkflow'HeadersEntry Payload
-> FieldDescriptor SignalWorkflow'HeadersEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"value"
              (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
  SignalWorkflow'HeadersEntry
  SignalWorkflow'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor SignalWorkflow'HeadersEntry 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'value")) ::
              Data.ProtoLens.FieldDescriptor SignalWorkflow'HeadersEntry
      in
        [(Tag, FieldDescriptor SignalWorkflow'HeadersEntry)]
-> Map Tag (FieldDescriptor SignalWorkflow'HeadersEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor SignalWorkflow'HeadersEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor SignalWorkflow'HeadersEntry
value__field_descriptor)]
  unknownFields :: Lens' SignalWorkflow'HeadersEntry FieldSet
unknownFields
    = (SignalWorkflow'HeadersEntry -> FieldSet)
-> (SignalWorkflow'HeadersEntry
    -> FieldSet -> SignalWorkflow'HeadersEntry)
-> Lens' SignalWorkflow'HeadersEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SignalWorkflow'HeadersEntry -> FieldSet
_SignalWorkflow'HeadersEntry'_unknownFields
        (\ SignalWorkflow'HeadersEntry
x__ FieldSet
y__
           -> SignalWorkflow'HeadersEntry
x__ {_SignalWorkflow'HeadersEntry'_unknownFields = y__})
  defMessage :: SignalWorkflow'HeadersEntry
defMessage
    = SignalWorkflow'HeadersEntry'_constructor
        {_SignalWorkflow'HeadersEntry'key :: Text
_SignalWorkflow'HeadersEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWorkflow'HeadersEntry'value :: Maybe Payload
_SignalWorkflow'HeadersEntry'value = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _SignalWorkflow'HeadersEntry'_unknownFields :: FieldSet
_SignalWorkflow'HeadersEntry'_unknownFields = []}
  parseMessage :: Parser SignalWorkflow'HeadersEntry
parseMessage
    = let
        loop ::
          SignalWorkflow'HeadersEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser SignalWorkflow'HeadersEntry
        loop :: SignalWorkflow'HeadersEntry -> Parser SignalWorkflow'HeadersEntry
loop SignalWorkflow'HeadersEntry
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 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
"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 SignalWorkflow'HeadersEntry
-> String -> Parser SignalWorkflow'HeadersEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do SignalWorkflow'HeadersEntry -> Parser SignalWorkflow'HeadersEntry
loop SignalWorkflow'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"HeadersEntry"
  buildMessage :: SignalWorkflow'HeadersEntry -> Builder
buildMessage
    = \ SignalWorkflow'HeadersEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  SignalWorkflow'HeadersEntry
  SignalWorkflow'HeadersEntry
  Text
  Text
-> SignalWorkflow'HeadersEntry -> 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") SignalWorkflow'HeadersEntry
_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 Payload)
  SignalWorkflow'HeadersEntry
  SignalWorkflow'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> SignalWorkflow'HeadersEntry -> 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'value") SignalWorkflow'HeadersEntry
_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
  SignalWorkflow'HeadersEntry
  SignalWorkflow'HeadersEntry
  FieldSet
  FieldSet
-> SignalWorkflow'HeadersEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  SignalWorkflow'HeadersEntry
  SignalWorkflow'HeadersEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SignalWorkflow'HeadersEntry FieldSet
Data.ProtoLens.unknownFields SignalWorkflow'HeadersEntry
_x)))
instance Control.DeepSeq.NFData SignalWorkflow'HeadersEntry where
  rnf :: SignalWorkflow'HeadersEntry -> ()
rnf
    = \ SignalWorkflow'HeadersEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SignalWorkflow'HeadersEntry -> FieldSet
_SignalWorkflow'HeadersEntry'_unknownFields SignalWorkflow'HeadersEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SignalWorkflow'HeadersEntry -> Text
_SignalWorkflow'HeadersEntry'key SignalWorkflow'HeadersEntry
x__)
                (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (SignalWorkflow'HeadersEntry -> Maybe Payload
_SignalWorkflow'HeadersEntry'value SignalWorkflow'HeadersEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.workflowType' @:: Lens' StartWorkflow Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.workflowId' @:: Lens' StartWorkflow Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.arguments' @:: Lens' StartWorkflow [Proto.Temporal.Api.Common.V1.Message.Payload]@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.vec'arguments' @:: Lens' StartWorkflow (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.randomnessSeed' @:: Lens' StartWorkflow Data.Word.Word64@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.headers' @:: Lens' StartWorkflow (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.identity' @:: Lens' StartWorkflow Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.parentWorkflowInfo' @:: Lens' StartWorkflow Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'parentWorkflowInfo' @:: Lens' StartWorkflow (Prelude.Maybe Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.workflowExecutionTimeout' @:: Lens' StartWorkflow Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'workflowExecutionTimeout' @:: Lens' StartWorkflow (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.workflowRunTimeout' @:: Lens' StartWorkflow Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'workflowRunTimeout' @:: Lens' StartWorkflow (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.workflowTaskTimeout' @:: Lens' StartWorkflow Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'workflowTaskTimeout' @:: Lens' StartWorkflow (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.continuedFromExecutionRunId' @:: Lens' StartWorkflow Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.continuedInitiator' @:: Lens' StartWorkflow Proto.Temporal.Api.Enums.V1.Workflow.ContinueAsNewInitiator@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.continuedFailure' @:: Lens' StartWorkflow Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'continuedFailure' @:: Lens' StartWorkflow (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.lastCompletionResult' @:: Lens' StartWorkflow Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'lastCompletionResult' @:: Lens' StartWorkflow (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.firstExecutionRunId' @:: Lens' StartWorkflow Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.retryPolicy' @:: Lens' StartWorkflow Proto.Temporal.Api.Common.V1.Message.RetryPolicy@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'retryPolicy' @:: Lens' StartWorkflow (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.attempt' @:: Lens' StartWorkflow Data.Int.Int32@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.cronSchedule' @:: Lens' StartWorkflow Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.workflowExecutionExpirationTime' @:: Lens' StartWorkflow Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'workflowExecutionExpirationTime' @:: Lens' StartWorkflow (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.cronScheduleToScheduleInterval' @:: Lens' StartWorkflow Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'cronScheduleToScheduleInterval' @:: Lens' StartWorkflow (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.memo' @:: Lens' StartWorkflow Proto.Temporal.Api.Common.V1.Message.Memo@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'memo' @:: Lens' StartWorkflow (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.searchAttributes' @:: Lens' StartWorkflow Proto.Temporal.Api.Common.V1.Message.SearchAttributes@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'searchAttributes' @:: Lens' StartWorkflow (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.startTime' @:: Lens' StartWorkflow Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'startTime' @:: Lens' StartWorkflow (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@ -}
data StartWorkflow
  = StartWorkflow'_constructor {StartWorkflow -> Text
_StartWorkflow'workflowType :: !Data.Text.Text,
                                StartWorkflow -> Text
_StartWorkflow'workflowId :: !Data.Text.Text,
                                StartWorkflow -> Vector Payload
_StartWorkflow'arguments :: !(Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload),
                                StartWorkflow -> Word64
_StartWorkflow'randomnessSeed :: !Data.Word.Word64,
                                StartWorkflow -> Map Text Payload
_StartWorkflow'headers :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload),
                                StartWorkflow -> Text
_StartWorkflow'identity :: !Data.Text.Text,
                                StartWorkflow -> Maybe NamespacedWorkflowExecution
_StartWorkflow'parentWorkflowInfo :: !(Prelude.Maybe Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution),
                                StartWorkflow -> Maybe Duration
_StartWorkflow'workflowExecutionTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                StartWorkflow -> Maybe Duration
_StartWorkflow'workflowRunTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                StartWorkflow -> Maybe Duration
_StartWorkflow'workflowTaskTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                StartWorkflow -> Text
_StartWorkflow'continuedFromExecutionRunId :: !Data.Text.Text,
                                StartWorkflow -> ContinueAsNewInitiator
_StartWorkflow'continuedInitiator :: !Proto.Temporal.Api.Enums.V1.Workflow.ContinueAsNewInitiator,
                                StartWorkflow -> Maybe Failure
_StartWorkflow'continuedFailure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                StartWorkflow -> Maybe Payloads
_StartWorkflow'lastCompletionResult :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                StartWorkflow -> Text
_StartWorkflow'firstExecutionRunId :: !Data.Text.Text,
                                StartWorkflow -> Maybe RetryPolicy
_StartWorkflow'retryPolicy :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy),
                                StartWorkflow -> Int32
_StartWorkflow'attempt :: !Data.Int.Int32,
                                StartWorkflow -> Text
_StartWorkflow'cronSchedule :: !Data.Text.Text,
                                StartWorkflow -> Maybe Timestamp
_StartWorkflow'workflowExecutionExpirationTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                StartWorkflow -> Maybe Duration
_StartWorkflow'cronScheduleToScheduleInterval :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                StartWorkflow -> Maybe Memo
_StartWorkflow'memo :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo),
                                StartWorkflow -> Maybe SearchAttributes
_StartWorkflow'searchAttributes :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes),
                                StartWorkflow -> Maybe Timestamp
_StartWorkflow'startTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                StartWorkflow -> FieldSet
_StartWorkflow'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (StartWorkflow -> StartWorkflow -> Bool
(StartWorkflow -> StartWorkflow -> Bool)
-> (StartWorkflow -> StartWorkflow -> Bool) -> Eq StartWorkflow
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StartWorkflow -> StartWorkflow -> Bool
== :: StartWorkflow -> StartWorkflow -> Bool
$c/= :: StartWorkflow -> StartWorkflow -> Bool
/= :: StartWorkflow -> StartWorkflow -> Bool
Prelude.Eq, Eq StartWorkflow
Eq StartWorkflow =>
(StartWorkflow -> StartWorkflow -> Ordering)
-> (StartWorkflow -> StartWorkflow -> Bool)
-> (StartWorkflow -> StartWorkflow -> Bool)
-> (StartWorkflow -> StartWorkflow -> Bool)
-> (StartWorkflow -> StartWorkflow -> Bool)
-> (StartWorkflow -> StartWorkflow -> StartWorkflow)
-> (StartWorkflow -> StartWorkflow -> StartWorkflow)
-> Ord StartWorkflow
StartWorkflow -> StartWorkflow -> Bool
StartWorkflow -> StartWorkflow -> Ordering
StartWorkflow -> StartWorkflow -> StartWorkflow
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 :: StartWorkflow -> StartWorkflow -> Ordering
compare :: StartWorkflow -> StartWorkflow -> Ordering
$c< :: StartWorkflow -> StartWorkflow -> Bool
< :: StartWorkflow -> StartWorkflow -> Bool
$c<= :: StartWorkflow -> StartWorkflow -> Bool
<= :: StartWorkflow -> StartWorkflow -> Bool
$c> :: StartWorkflow -> StartWorkflow -> Bool
> :: StartWorkflow -> StartWorkflow -> Bool
$c>= :: StartWorkflow -> StartWorkflow -> Bool
>= :: StartWorkflow -> StartWorkflow -> Bool
$cmax :: StartWorkflow -> StartWorkflow -> StartWorkflow
max :: StartWorkflow -> StartWorkflow -> StartWorkflow
$cmin :: StartWorkflow -> StartWorkflow -> StartWorkflow
min :: StartWorkflow -> StartWorkflow -> StartWorkflow
Prelude.Ord)
instance Prelude.Show StartWorkflow where
  showsPrec :: Int -> StartWorkflow -> ShowS
showsPrec Int
_ StartWorkflow
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (StartWorkflow -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort StartWorkflow
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField StartWorkflow "workflowType" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (Text -> f Text) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "workflowType"
_
    = ((Text -> f Text) -> StartWorkflow -> f StartWorkflow)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Text)
-> (StartWorkflow -> Text -> StartWorkflow)
-> Lens StartWorkflow StartWorkflow Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Text
_StartWorkflow'workflowType
           (\ StartWorkflow
x__ Text
y__ -> StartWorkflow
x__ {_StartWorkflow'workflowType = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "workflowId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowId"
-> (Text -> f Text) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "workflowId"
_
    = ((Text -> f Text) -> StartWorkflow -> f StartWorkflow)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Text)
-> (StartWorkflow -> Text -> StartWorkflow)
-> Lens StartWorkflow StartWorkflow Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Text
_StartWorkflow'workflowId
           (\ StartWorkflow
x__ Text
y__ -> StartWorkflow
x__ {_StartWorkflow'workflowId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "arguments" [Proto.Temporal.Api.Common.V1.Message.Payload] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "arguments"
-> ([Payload] -> f [Payload]) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "arguments"
_
    = ((Vector Payload -> f (Vector Payload))
 -> StartWorkflow -> f StartWorkflow)
-> (([Payload] -> f [Payload])
    -> Vector Payload -> f (Vector Payload))
-> ([Payload] -> f [Payload])
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Vector Payload)
-> (StartWorkflow -> Vector Payload -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Vector Payload) (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Vector Payload
_StartWorkflow'arguments
           (\ StartWorkflow
x__ Vector Payload
y__ -> StartWorkflow
x__ {_StartWorkflow'arguments = y__}))
        ((Vector Payload -> [Payload])
-> (Vector Payload -> [Payload] -> Vector Payload)
-> Lens (Vector Payload) (Vector Payload) [Payload] [Payload]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Payload -> [Payload]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Payload
_ [Payload]
y__ -> [Payload] -> Vector Payload
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Payload]
y__))
instance Data.ProtoLens.Field.HasField StartWorkflow "vec'arguments" (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'arguments"
-> (Vector Payload -> f (Vector Payload))
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "vec'arguments"
_
    = ((Vector Payload -> f (Vector Payload))
 -> StartWorkflow -> f StartWorkflow)
-> ((Vector Payload -> f (Vector Payload))
    -> Vector Payload -> f (Vector Payload))
-> (Vector Payload -> f (Vector Payload))
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Vector Payload)
-> (StartWorkflow -> Vector Payload -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Vector Payload) (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Vector Payload
_StartWorkflow'arguments
           (\ StartWorkflow
x__ Vector Payload
y__ -> StartWorkflow
x__ {_StartWorkflow'arguments = y__}))
        (Vector Payload -> f (Vector Payload))
-> Vector Payload -> f (Vector Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "randomnessSeed" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "randomnessSeed"
-> (Word64 -> f Word64) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "randomnessSeed"
_
    = ((Word64 -> f Word64) -> StartWorkflow -> f StartWorkflow)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Word64)
-> (StartWorkflow -> Word64 -> StartWorkflow)
-> Lens StartWorkflow StartWorkflow Word64 Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Word64
_StartWorkflow'randomnessSeed
           (\ StartWorkflow
x__ Word64
y__ -> StartWorkflow
x__ {_StartWorkflow'randomnessSeed = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "headers" (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "headers"
-> (Map Text Payload -> f (Map Text Payload))
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "headers"
_
    = ((Map Text Payload -> f (Map Text Payload))
 -> StartWorkflow -> f StartWorkflow)
-> ((Map Text Payload -> f (Map Text Payload))
    -> Map Text Payload -> f (Map Text Payload))
-> (Map Text Payload -> f (Map Text Payload))
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Map Text Payload)
-> (StartWorkflow -> Map Text Payload -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Map Text Payload) (Map Text Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Map Text Payload
_StartWorkflow'headers
           (\ StartWorkflow
x__ Map Text Payload
y__ -> StartWorkflow
x__ {_StartWorkflow'headers = y__}))
        (Map Text Payload -> f (Map Text Payload))
-> Map Text Payload -> f (Map Text Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "identity"
_
    = ((Text -> f Text) -> StartWorkflow -> f StartWorkflow)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Text)
-> (StartWorkflow -> Text -> StartWorkflow)
-> Lens StartWorkflow StartWorkflow Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Text
_StartWorkflow'identity
           (\ StartWorkflow
x__ Text
y__ -> StartWorkflow
x__ {_StartWorkflow'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "parentWorkflowInfo" Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "parentWorkflowInfo"
-> (NamespacedWorkflowExecution -> f NamespacedWorkflowExecution)
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "parentWorkflowInfo"
_
    = ((Maybe NamespacedWorkflowExecution
  -> f (Maybe NamespacedWorkflowExecution))
 -> StartWorkflow -> f StartWorkflow)
-> ((NamespacedWorkflowExecution -> f NamespacedWorkflowExecution)
    -> Maybe NamespacedWorkflowExecution
    -> f (Maybe NamespacedWorkflowExecution))
-> (NamespacedWorkflowExecution -> f NamespacedWorkflowExecution)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe NamespacedWorkflowExecution)
-> (StartWorkflow
    -> Maybe NamespacedWorkflowExecution -> StartWorkflow)
-> Lens
     StartWorkflow
     StartWorkflow
     (Maybe NamespacedWorkflowExecution)
     (Maybe NamespacedWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe NamespacedWorkflowExecution
_StartWorkflow'parentWorkflowInfo
           (\ StartWorkflow
x__ Maybe NamespacedWorkflowExecution
y__ -> StartWorkflow
x__ {_StartWorkflow'parentWorkflowInfo = y__}))
        (NamespacedWorkflowExecution
-> Lens'
     (Maybe NamespacedWorkflowExecution) NamespacedWorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NamespacedWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField StartWorkflow "maybe'parentWorkflowInfo" (Prelude.Maybe Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'parentWorkflowInfo"
-> (Maybe NamespacedWorkflowExecution
    -> f (Maybe NamespacedWorkflowExecution))
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "maybe'parentWorkflowInfo"
_
    = ((Maybe NamespacedWorkflowExecution
  -> f (Maybe NamespacedWorkflowExecution))
 -> StartWorkflow -> f StartWorkflow)
-> ((Maybe NamespacedWorkflowExecution
     -> f (Maybe NamespacedWorkflowExecution))
    -> Maybe NamespacedWorkflowExecution
    -> f (Maybe NamespacedWorkflowExecution))
-> (Maybe NamespacedWorkflowExecution
    -> f (Maybe NamespacedWorkflowExecution))
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe NamespacedWorkflowExecution)
-> (StartWorkflow
    -> Maybe NamespacedWorkflowExecution -> StartWorkflow)
-> Lens
     StartWorkflow
     StartWorkflow
     (Maybe NamespacedWorkflowExecution)
     (Maybe NamespacedWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe NamespacedWorkflowExecution
_StartWorkflow'parentWorkflowInfo
           (\ StartWorkflow
x__ Maybe NamespacedWorkflowExecution
y__ -> StartWorkflow
x__ {_StartWorkflow'parentWorkflowInfo = y__}))
        (Maybe NamespacedWorkflowExecution
 -> f (Maybe NamespacedWorkflowExecution))
-> Maybe NamespacedWorkflowExecution
-> f (Maybe NamespacedWorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "workflowExecutionTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionTimeout"
-> (Duration -> f Duration) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "workflowExecutionTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflow -> f StartWorkflow)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Duration)
-> (StartWorkflow -> Maybe Duration -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Duration
_StartWorkflow'workflowExecutionTimeout
           (\ StartWorkflow
x__ Maybe Duration
y__ -> StartWorkflow
x__ {_StartWorkflow'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 StartWorkflow "maybe'workflowExecutionTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "maybe'workflowExecutionTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflow -> f StartWorkflow)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Duration)
-> (StartWorkflow -> Maybe Duration -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Duration
_StartWorkflow'workflowExecutionTimeout
           (\ StartWorkflow
x__ Maybe Duration
y__ -> StartWorkflow
x__ {_StartWorkflow'workflowExecutionTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "workflowRunTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowRunTimeout"
-> (Duration -> f Duration) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflow -> f StartWorkflow)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Duration)
-> (StartWorkflow -> Maybe Duration -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Duration
_StartWorkflow'workflowRunTimeout
           (\ StartWorkflow
x__ Maybe Duration
y__ -> StartWorkflow
x__ {_StartWorkflow'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 StartWorkflow "maybe'workflowRunTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowRunTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "maybe'workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflow -> f StartWorkflow)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Duration)
-> (StartWorkflow -> Maybe Duration -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Duration
_StartWorkflow'workflowRunTimeout
           (\ StartWorkflow
x__ Maybe Duration
y__ -> StartWorkflow
x__ {_StartWorkflow'workflowRunTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "workflowTaskTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskTimeout"
-> (Duration -> f Duration) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflow -> f StartWorkflow)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Duration)
-> (StartWorkflow -> Maybe Duration -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Duration
_StartWorkflow'workflowTaskTimeout
           (\ StartWorkflow
x__ Maybe Duration
y__ -> StartWorkflow
x__ {_StartWorkflow'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 StartWorkflow "maybe'workflowTaskTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowTaskTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "maybe'workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflow -> f StartWorkflow)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Duration)
-> (StartWorkflow -> Maybe Duration -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Duration
_StartWorkflow'workflowTaskTimeout
           (\ StartWorkflow
x__ Maybe Duration
y__ -> StartWorkflow
x__ {_StartWorkflow'workflowTaskTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "continuedFromExecutionRunId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "continuedFromExecutionRunId"
-> (Text -> f Text) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "continuedFromExecutionRunId"
_
    = ((Text -> f Text) -> StartWorkflow -> f StartWorkflow)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Text)
-> (StartWorkflow -> Text -> StartWorkflow)
-> Lens StartWorkflow StartWorkflow Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Text
_StartWorkflow'continuedFromExecutionRunId
           (\ StartWorkflow
x__ Text
y__
              -> StartWorkflow
x__ {_StartWorkflow'continuedFromExecutionRunId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "continuedInitiator" Proto.Temporal.Api.Enums.V1.Workflow.ContinueAsNewInitiator where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "continuedInitiator"
-> (ContinueAsNewInitiator -> f ContinueAsNewInitiator)
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "continuedInitiator"
_
    = ((ContinueAsNewInitiator -> f ContinueAsNewInitiator)
 -> StartWorkflow -> f StartWorkflow)
-> ((ContinueAsNewInitiator -> f ContinueAsNewInitiator)
    -> ContinueAsNewInitiator -> f ContinueAsNewInitiator)
-> (ContinueAsNewInitiator -> f ContinueAsNewInitiator)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> ContinueAsNewInitiator)
-> (StartWorkflow -> ContinueAsNewInitiator -> StartWorkflow)
-> Lens
     StartWorkflow
     StartWorkflow
     ContinueAsNewInitiator
     ContinueAsNewInitiator
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> ContinueAsNewInitiator
_StartWorkflow'continuedInitiator
           (\ StartWorkflow
x__ ContinueAsNewInitiator
y__ -> StartWorkflow
x__ {_StartWorkflow'continuedInitiator = y__}))
        (ContinueAsNewInitiator -> f ContinueAsNewInitiator)
-> ContinueAsNewInitiator -> f ContinueAsNewInitiator
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "continuedFailure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "continuedFailure"
-> (Failure -> f Failure) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "continuedFailure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> StartWorkflow -> f StartWorkflow)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Failure)
-> (StartWorkflow -> Maybe Failure -> StartWorkflow)
-> Lens StartWorkflow StartWorkflow (Maybe Failure) (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Failure
_StartWorkflow'continuedFailure
           (\ StartWorkflow
x__ Maybe Failure
y__ -> StartWorkflow
x__ {_StartWorkflow'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 StartWorkflow "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))
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "maybe'continuedFailure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> StartWorkflow -> f StartWorkflow)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Failure)
-> (StartWorkflow -> Maybe Failure -> StartWorkflow)
-> Lens StartWorkflow StartWorkflow (Maybe Failure) (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Failure
_StartWorkflow'continuedFailure
           (\ StartWorkflow
x__ Maybe Failure
y__ -> StartWorkflow
x__ {_StartWorkflow'continuedFailure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "lastCompletionResult" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastCompletionResult"
-> (Payloads -> f Payloads) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "lastCompletionResult"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> StartWorkflow -> f StartWorkflow)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Payloads)
-> (StartWorkflow -> Maybe Payloads -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe Payloads) (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Payloads
_StartWorkflow'lastCompletionResult
           (\ StartWorkflow
x__ Maybe Payloads
y__ -> StartWorkflow
x__ {_StartWorkflow'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 StartWorkflow "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))
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "maybe'lastCompletionResult"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> StartWorkflow -> f StartWorkflow)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Payloads)
-> (StartWorkflow -> Maybe Payloads -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe Payloads) (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Payloads
_StartWorkflow'lastCompletionResult
           (\ StartWorkflow
x__ Maybe Payloads
y__ -> StartWorkflow
x__ {_StartWorkflow'lastCompletionResult = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "firstExecutionRunId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "firstExecutionRunId"
-> (Text -> f Text) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "firstExecutionRunId"
_
    = ((Text -> f Text) -> StartWorkflow -> f StartWorkflow)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Text)
-> (StartWorkflow -> Text -> StartWorkflow)
-> Lens StartWorkflow StartWorkflow Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Text
_StartWorkflow'firstExecutionRunId
           (\ StartWorkflow
x__ Text
y__ -> StartWorkflow
x__ {_StartWorkflow'firstExecutionRunId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "retryPolicy" Proto.Temporal.Api.Common.V1.Message.RetryPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryPolicy"
-> (RetryPolicy -> f RetryPolicy)
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> StartWorkflow -> f StartWorkflow)
-> ((RetryPolicy -> f RetryPolicy)
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (RetryPolicy -> f RetryPolicy)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe RetryPolicy)
-> (StartWorkflow -> Maybe RetryPolicy -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe RetryPolicy) (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe RetryPolicy
_StartWorkflow'retryPolicy
           (\ StartWorkflow
x__ Maybe RetryPolicy
y__ -> StartWorkflow
x__ {_StartWorkflow'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 StartWorkflow "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))
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "maybe'retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> StartWorkflow -> f StartWorkflow)
-> ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe RetryPolicy)
-> (StartWorkflow -> Maybe RetryPolicy -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe RetryPolicy) (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe RetryPolicy
_StartWorkflow'retryPolicy
           (\ StartWorkflow
x__ Maybe RetryPolicy
y__ -> StartWorkflow
x__ {_StartWorkflow'retryPolicy = y__}))
        (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> Maybe RetryPolicy -> f (Maybe RetryPolicy)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "attempt" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attempt"
-> (Int32 -> f Int32) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "attempt"
_
    = ((Int32 -> f Int32) -> StartWorkflow -> f StartWorkflow)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Int32)
-> (StartWorkflow -> Int32 -> StartWorkflow)
-> Lens StartWorkflow StartWorkflow Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Int32
_StartWorkflow'attempt
           (\ StartWorkflow
x__ Int32
y__ -> StartWorkflow
x__ {_StartWorkflow'attempt = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "cronSchedule" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cronSchedule"
-> (Text -> f Text) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "cronSchedule"
_
    = ((Text -> f Text) -> StartWorkflow -> f StartWorkflow)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Text)
-> (StartWorkflow -> Text -> StartWorkflow)
-> Lens StartWorkflow StartWorkflow Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Text
_StartWorkflow'cronSchedule
           (\ StartWorkflow
x__ Text
y__ -> StartWorkflow
x__ {_StartWorkflow'cronSchedule = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "workflowExecutionExpirationTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionExpirationTime"
-> (Timestamp -> f Timestamp) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "workflowExecutionExpirationTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> StartWorkflow -> f StartWorkflow)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Timestamp)
-> (StartWorkflow -> Maybe Timestamp -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Timestamp
_StartWorkflow'workflowExecutionExpirationTime
           (\ StartWorkflow
x__ Maybe Timestamp
y__
              -> StartWorkflow
x__ {_StartWorkflow'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 StartWorkflow "maybe'workflowExecutionExpirationTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionExpirationTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "maybe'workflowExecutionExpirationTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> StartWorkflow -> f StartWorkflow)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Timestamp)
-> (StartWorkflow -> Maybe Timestamp -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Timestamp
_StartWorkflow'workflowExecutionExpirationTime
           (\ StartWorkflow
x__ Maybe Timestamp
y__
              -> StartWorkflow
x__ {_StartWorkflow'workflowExecutionExpirationTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "cronScheduleToScheduleInterval" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cronScheduleToScheduleInterval"
-> (Duration -> f Duration) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "cronScheduleToScheduleInterval"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflow -> f StartWorkflow)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Duration)
-> (StartWorkflow -> Maybe Duration -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Duration
_StartWorkflow'cronScheduleToScheduleInterval
           (\ StartWorkflow
x__ Maybe Duration
y__
              -> StartWorkflow
x__ {_StartWorkflow'cronScheduleToScheduleInterval = 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 StartWorkflow "maybe'cronScheduleToScheduleInterval" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'cronScheduleToScheduleInterval"
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "maybe'cronScheduleToScheduleInterval"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflow -> f StartWorkflow)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Duration)
-> (StartWorkflow -> Maybe Duration -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Duration
_StartWorkflow'cronScheduleToScheduleInterval
           (\ StartWorkflow
x__ Maybe Duration
y__
              -> StartWorkflow
x__ {_StartWorkflow'cronScheduleToScheduleInterval = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "memo" Proto.Temporal.Api.Common.V1.Message.Memo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "memo"
-> (Memo -> f Memo) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> StartWorkflow -> f StartWorkflow)
-> ((Memo -> f Memo) -> Maybe Memo -> f (Maybe Memo))
-> (Memo -> f Memo)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Memo)
-> (StartWorkflow -> Maybe Memo -> StartWorkflow)
-> Lens StartWorkflow StartWorkflow (Maybe Memo) (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Memo
_StartWorkflow'memo (\ StartWorkflow
x__ Maybe Memo
y__ -> StartWorkflow
x__ {_StartWorkflow'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 StartWorkflow "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))
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "maybe'memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> StartWorkflow -> f StartWorkflow)
-> ((Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo))
-> (Maybe Memo -> f (Maybe Memo))
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Memo)
-> (StartWorkflow -> Maybe Memo -> StartWorkflow)
-> Lens StartWorkflow StartWorkflow (Maybe Memo) (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Memo
_StartWorkflow'memo (\ StartWorkflow
x__ Maybe Memo
y__ -> StartWorkflow
x__ {_StartWorkflow'memo = y__}))
        (Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "searchAttributes" Proto.Temporal.Api.Common.V1.Message.SearchAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "searchAttributes"
-> (SearchAttributes -> f SearchAttributes)
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> StartWorkflow -> f StartWorkflow)
-> ((SearchAttributes -> f SearchAttributes)
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (SearchAttributes -> f SearchAttributes)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe SearchAttributes)
-> (StartWorkflow -> Maybe SearchAttributes -> StartWorkflow)
-> Lens
     StartWorkflow
     StartWorkflow
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe SearchAttributes
_StartWorkflow'searchAttributes
           (\ StartWorkflow
x__ Maybe SearchAttributes
y__ -> StartWorkflow
x__ {_StartWorkflow'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 StartWorkflow "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))
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "maybe'searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> StartWorkflow -> f StartWorkflow)
-> ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe SearchAttributes)
-> (StartWorkflow -> Maybe SearchAttributes -> StartWorkflow)
-> Lens
     StartWorkflow
     StartWorkflow
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe SearchAttributes
_StartWorkflow'searchAttributes
           (\ StartWorkflow
x__ Maybe SearchAttributes
y__ -> StartWorkflow
x__ {_StartWorkflow'searchAttributes = y__}))
        (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> Maybe SearchAttributes -> f (Maybe SearchAttributes)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow "startTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startTime"
-> (Timestamp -> f Timestamp) -> StartWorkflow -> f StartWorkflow
fieldOf Proxy# "startTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> StartWorkflow -> f StartWorkflow)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Timestamp)
-> (StartWorkflow -> Maybe Timestamp -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Timestamp
_StartWorkflow'startTime
           (\ StartWorkflow
x__ Maybe Timestamp
y__ -> StartWorkflow
x__ {_StartWorkflow'startTime = y__}))
        (Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField StartWorkflow "maybe'startTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> StartWorkflow
-> f StartWorkflow
fieldOf Proxy# "maybe'startTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> StartWorkflow -> f StartWorkflow)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> StartWorkflow
-> f StartWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow -> Maybe Timestamp)
-> (StartWorkflow -> Maybe Timestamp -> StartWorkflow)
-> Lens
     StartWorkflow StartWorkflow (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow -> Maybe Timestamp
_StartWorkflow'startTime
           (\ StartWorkflow
x__ Maybe Timestamp
y__ -> StartWorkflow
x__ {_StartWorkflow'startTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message StartWorkflow where
  messageName :: Proxy StartWorkflow -> Text
messageName Proxy StartWorkflow
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_activation.StartWorkflow"
  packedMessageDescriptor :: Proxy StartWorkflow -> ByteString
packedMessageDescriptor Proxy StartWorkflow
_
    = ByteString
"\n\
      \\rStartWorkflow\DC2#\n\
      \\rworkflow_type\CAN\SOH \SOH(\tR\fworkflowType\DC2\US\n\
      \\vworkflow_id\CAN\STX \SOH(\tR\n\
      \workflowId\DC2=\n\
      \\targuments\CAN\ETX \ETX(\v2\US.temporal.api.common.v1.PayloadR\targuments\DC2'\n\
      \\SIrandomness_seed\CAN\EOT \SOH(\EOTR\SOrandomnessSeed\DC2Q\n\
      \\aheaders\CAN\ENQ \ETX(\v27.coresdk.workflow_activation.StartWorkflow.HeadersEntryR\aheaders\DC2\SUB\n\
      \\bidentity\CAN\ACK \SOH(\tR\bidentity\DC2]\n\
      \\DC4parent_workflow_info\CAN\a \SOH(\v2+.coresdk.common.NamespacedWorkflowExecutionR\DC2parentWorkflowInfo\DC2W\n\
      \\SUBworkflow_execution_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
      \\DC4workflow_run_timeout\CAN\t \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
      \\NAKworkflow_task_timeout\CAN\n\
      \ \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2D\n\
      \\UScontinued_from_execution_run_id\CAN\v \SOH(\tR\ESCcontinuedFromExecutionRunId\DC2^\n\
      \\DC3continued_initiator\CAN\f \SOH(\SO2-.temporal.api.enums.v1.ContinueAsNewInitiatorR\DC2continuedInitiator\DC2M\n\
      \\DC1continued_failure\CAN\r \SOH(\v2 .temporal.api.failure.v1.FailureR\DLEcontinuedFailure\DC2V\n\
      \\SYNlast_completion_result\CAN\SO \SOH(\v2 .temporal.api.common.v1.PayloadsR\DC4lastCompletionResult\DC23\n\
      \\SYNfirst_execution_run_id\CAN\SI \SOH(\tR\DC3firstExecutionRunId\DC2F\n\
      \\fretry_policy\CAN\DLE \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2\CAN\n\
      \\aattempt\CAN\DC1 \SOH(\ENQR\aattempt\DC2#\n\
      \\rcron_schedule\CAN\DC2 \SOH(\tR\fcronSchedule\DC2g\n\
      \\"workflow_execution_expiration_time\CAN\DC3 \SOH(\v2\SUB.google.protobuf.TimestampR\USworkflowExecutionExpirationTime\DC2e\n\
      \\"cron_schedule_to_schedule_interval\CAN\DC4 \SOH(\v2\EM.google.protobuf.DurationR\RScronScheduleToScheduleInterval\DC20\n\
      \\EOTmemo\CAN\NAK \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
      \\DC1search_attributes\CAN\SYN \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC29\n\
      \\n\
      \start_time\CAN\ETB \SOH(\v2\SUB.google.protobuf.TimestampR\tstartTime\SUB[\n\
      \\fHeadersEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\
      \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy StartWorkflow -> ByteString
packedFileDescriptor Proxy StartWorkflow
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor StartWorkflow)
fieldsByTag
    = let
        workflowType__field_descriptor :: FieldDescriptor StartWorkflow
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartWorkflow Text
-> FieldDescriptor StartWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_type"
              (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 StartWorkflow StartWorkflow Text Text
-> FieldAccessor StartWorkflow 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 @"workflowType")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflow
        workflowId__field_descriptor :: FieldDescriptor StartWorkflow
workflowId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartWorkflow Text
-> FieldDescriptor StartWorkflow
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 StartWorkflow StartWorkflow Text Text
-> FieldAccessor StartWorkflow 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 StartWorkflow
        arguments__field_descriptor :: FieldDescriptor StartWorkflow
arguments__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor StartWorkflow Payload
-> FieldDescriptor StartWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"arguments"
              (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)
              (Packing
-> Lens' StartWorkflow [Payload]
-> FieldAccessor StartWorkflow Payload
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 @"arguments")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflow
        randomnessSeed__field_descriptor :: FieldDescriptor StartWorkflow
randomnessSeed__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor StartWorkflow Word64
-> FieldDescriptor StartWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"randomness_seed"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.UInt64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens StartWorkflow StartWorkflow Word64 Word64
-> FieldAccessor StartWorkflow Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
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 @"randomnessSeed")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflow
        headers__field_descriptor :: FieldDescriptor StartWorkflow
headers__field_descriptor
          = String
-> FieldTypeDescriptor StartWorkflow'HeadersEntry
-> FieldAccessor StartWorkflow StartWorkflow'HeadersEntry
-> FieldDescriptor StartWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"headers"
              (MessageOrGroup -> FieldTypeDescriptor StartWorkflow'HeadersEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor StartWorkflow'HeadersEntry)
              (Lens' StartWorkflow'HeadersEntry Text
-> Lens' StartWorkflow'HeadersEntry Payload
-> Lens
     StartWorkflow StartWorkflow (Map Text Payload) (Map Text Payload)
-> FieldAccessor StartWorkflow StartWorkflow'HeadersEntry
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 @"headers")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflow
        identity__field_descriptor :: FieldDescriptor StartWorkflow
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartWorkflow Text
-> FieldDescriptor StartWorkflow
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 StartWorkflow StartWorkflow Text Text
-> FieldAccessor StartWorkflow 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 StartWorkflow
        parentWorkflowInfo__field_descriptor :: FieldDescriptor StartWorkflow
parentWorkflowInfo__field_descriptor
          = String
-> FieldTypeDescriptor NamespacedWorkflowExecution
-> FieldAccessor StartWorkflow NamespacedWorkflowExecution
-> FieldDescriptor StartWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"parent_workflow_info"
              (MessageOrGroup -> FieldTypeDescriptor NamespacedWorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution)
              (Lens
  StartWorkflow
  StartWorkflow
  (Maybe NamespacedWorkflowExecution)
  (Maybe NamespacedWorkflowExecution)
-> FieldAccessor StartWorkflow NamespacedWorkflowExecution
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'parentWorkflowInfo")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflow
        workflowExecutionTimeout__field_descriptor :: FieldDescriptor StartWorkflow
workflowExecutionTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor StartWorkflow Duration
-> FieldDescriptor StartWorkflow
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 StartWorkflow StartWorkflow (Maybe Duration) (Maybe Duration)
-> FieldAccessor StartWorkflow 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 StartWorkflow
        workflowRunTimeout__field_descriptor :: FieldDescriptor StartWorkflow
workflowRunTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor StartWorkflow Duration
-> FieldDescriptor StartWorkflow
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 StartWorkflow StartWorkflow (Maybe Duration) (Maybe Duration)
-> FieldAccessor StartWorkflow 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 StartWorkflow
        workflowTaskTimeout__field_descriptor :: FieldDescriptor StartWorkflow
workflowTaskTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor StartWorkflow Duration
-> FieldDescriptor StartWorkflow
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 StartWorkflow StartWorkflow (Maybe Duration) (Maybe Duration)
-> FieldAccessor StartWorkflow 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 StartWorkflow
        continuedFromExecutionRunId__field_descriptor :: FieldDescriptor StartWorkflow
continuedFromExecutionRunId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartWorkflow Text
-> FieldDescriptor StartWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"continued_from_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 StartWorkflow StartWorkflow Text Text
-> FieldAccessor StartWorkflow 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 @"continuedFromExecutionRunId")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflow
        continuedInitiator__field_descriptor :: FieldDescriptor StartWorkflow
continuedInitiator__field_descriptor
          = String
-> FieldTypeDescriptor ContinueAsNewInitiator
-> FieldAccessor StartWorkflow ContinueAsNewInitiator
-> FieldDescriptor StartWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"continued_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
     StartWorkflow
     StartWorkflow
     ContinueAsNewInitiator
     ContinueAsNewInitiator
-> FieldAccessor StartWorkflow 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 @"continuedInitiator")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflow
        continuedFailure__field_descriptor :: FieldDescriptor StartWorkflow
continuedFailure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor StartWorkflow Failure
-> FieldDescriptor StartWorkflow
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 StartWorkflow StartWorkflow (Maybe Failure) (Maybe Failure)
-> FieldAccessor StartWorkflow 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 StartWorkflow
        lastCompletionResult__field_descriptor :: FieldDescriptor StartWorkflow
lastCompletionResult__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor StartWorkflow Payloads
-> FieldDescriptor StartWorkflow
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 StartWorkflow StartWorkflow (Maybe Payloads) (Maybe Payloads)
-> FieldAccessor StartWorkflow 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 StartWorkflow
        firstExecutionRunId__field_descriptor :: FieldDescriptor StartWorkflow
firstExecutionRunId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartWorkflow Text
-> FieldDescriptor StartWorkflow
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 StartWorkflow StartWorkflow Text Text
-> FieldAccessor StartWorkflow 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 StartWorkflow
        retryPolicy__field_descriptor :: FieldDescriptor StartWorkflow
retryPolicy__field_descriptor
          = String
-> FieldTypeDescriptor RetryPolicy
-> FieldAccessor StartWorkflow RetryPolicy
-> FieldDescriptor StartWorkflow
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
  StartWorkflow StartWorkflow (Maybe RetryPolicy) (Maybe RetryPolicy)
-> FieldAccessor StartWorkflow 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 StartWorkflow
        attempt__field_descriptor :: FieldDescriptor StartWorkflow
attempt__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor StartWorkflow Int32
-> FieldDescriptor StartWorkflow
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 StartWorkflow StartWorkflow Int32 Int32
-> FieldAccessor StartWorkflow 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 StartWorkflow
        cronSchedule__field_descriptor :: FieldDescriptor StartWorkflow
cronSchedule__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartWorkflow Text
-> FieldDescriptor StartWorkflow
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 StartWorkflow StartWorkflow Text Text
-> FieldAccessor StartWorkflow 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 StartWorkflow
        workflowExecutionExpirationTime__field_descriptor :: FieldDescriptor StartWorkflow
workflowExecutionExpirationTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor StartWorkflow Timestamp
-> FieldDescriptor StartWorkflow
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
  StartWorkflow StartWorkflow (Maybe Timestamp) (Maybe Timestamp)
-> FieldAccessor StartWorkflow 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 StartWorkflow
        cronScheduleToScheduleInterval__field_descriptor :: FieldDescriptor StartWorkflow
cronScheduleToScheduleInterval__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor StartWorkflow Duration
-> FieldDescriptor StartWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cron_schedule_to_schedule_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 StartWorkflow StartWorkflow (Maybe Duration) (Maybe Duration)
-> FieldAccessor StartWorkflow 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'cronScheduleToScheduleInterval")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflow
        memo__field_descriptor :: FieldDescriptor StartWorkflow
memo__field_descriptor
          = String
-> FieldTypeDescriptor Memo
-> FieldAccessor StartWorkflow Memo
-> FieldDescriptor StartWorkflow
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 StartWorkflow StartWorkflow (Maybe Memo) (Maybe Memo)
-> FieldAccessor StartWorkflow 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 StartWorkflow
        searchAttributes__field_descriptor :: FieldDescriptor StartWorkflow
searchAttributes__field_descriptor
          = String
-> FieldTypeDescriptor SearchAttributes
-> FieldAccessor StartWorkflow SearchAttributes
-> FieldDescriptor StartWorkflow
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
  StartWorkflow
  StartWorkflow
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> FieldAccessor StartWorkflow 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 StartWorkflow
        startTime__field_descriptor :: FieldDescriptor StartWorkflow
startTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor StartWorkflow Timestamp
-> FieldDescriptor StartWorkflow
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_time"
              (MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
              (Lens
  StartWorkflow StartWorkflow (Maybe Timestamp) (Maybe Timestamp)
-> FieldAccessor StartWorkflow Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startTime")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflow
      in
        [(Tag, FieldDescriptor StartWorkflow)]
-> Map Tag (FieldDescriptor StartWorkflow)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor StartWorkflow
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor StartWorkflow
workflowId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor StartWorkflow
arguments__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor StartWorkflow
randomnessSeed__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor StartWorkflow
headers__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor StartWorkflow
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor StartWorkflow
parentWorkflowInfo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor StartWorkflow
workflowExecutionTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor StartWorkflow
workflowRunTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor StartWorkflow
workflowTaskTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, 
            FieldDescriptor StartWorkflow
continuedFromExecutionRunId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor StartWorkflow
continuedInitiator__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor StartWorkflow
continuedFailure__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
14, FieldDescriptor StartWorkflow
lastCompletionResult__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
15, FieldDescriptor StartWorkflow
firstExecutionRunId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
16, FieldDescriptor StartWorkflow
retryPolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
17, FieldDescriptor StartWorkflow
attempt__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
18, FieldDescriptor StartWorkflow
cronSchedule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
19, 
            FieldDescriptor StartWorkflow
workflowExecutionExpirationTime__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
20, 
            FieldDescriptor StartWorkflow
cronScheduleToScheduleInterval__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
21, FieldDescriptor StartWorkflow
memo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
22, FieldDescriptor StartWorkflow
searchAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
23, FieldDescriptor StartWorkflow
startTime__field_descriptor)]
  unknownFields :: Lens' StartWorkflow FieldSet
unknownFields
    = (StartWorkflow -> FieldSet)
-> (StartWorkflow -> FieldSet -> StartWorkflow)
-> Lens' StartWorkflow FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        StartWorkflow -> FieldSet
_StartWorkflow'_unknownFields
        (\ StartWorkflow
x__ FieldSet
y__ -> StartWorkflow
x__ {_StartWorkflow'_unknownFields = y__})
  defMessage :: StartWorkflow
defMessage
    = StartWorkflow'_constructor
        {_StartWorkflow'workflowType :: Text
_StartWorkflow'workflowType = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflow'workflowId :: Text
_StartWorkflow'workflowId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflow'arguments :: Vector Payload
_StartWorkflow'arguments = Vector Payload
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _StartWorkflow'randomnessSeed :: Word64
_StartWorkflow'randomnessSeed = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflow'headers :: Map Text Payload
_StartWorkflow'headers = Map Text Payload
forall k a. Map k a
Data.Map.empty,
         _StartWorkflow'identity :: Text
_StartWorkflow'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflow'parentWorkflowInfo :: Maybe NamespacedWorkflowExecution
_StartWorkflow'parentWorkflowInfo = Maybe NamespacedWorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflow'workflowExecutionTimeout :: Maybe Duration
_StartWorkflow'workflowExecutionTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflow'workflowRunTimeout :: Maybe Duration
_StartWorkflow'workflowRunTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflow'workflowTaskTimeout :: Maybe Duration
_StartWorkflow'workflowTaskTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflow'continuedFromExecutionRunId :: Text
_StartWorkflow'continuedFromExecutionRunId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflow'continuedInitiator :: ContinueAsNewInitiator
_StartWorkflow'continuedInitiator = ContinueAsNewInitiator
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflow'continuedFailure :: Maybe Failure
_StartWorkflow'continuedFailure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflow'lastCompletionResult :: Maybe Payloads
_StartWorkflow'lastCompletionResult = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflow'firstExecutionRunId :: Text
_StartWorkflow'firstExecutionRunId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflow'retryPolicy :: Maybe RetryPolicy
_StartWorkflow'retryPolicy = Maybe RetryPolicy
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflow'attempt :: Int32
_StartWorkflow'attempt = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflow'cronSchedule :: Text
_StartWorkflow'cronSchedule = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflow'workflowExecutionExpirationTime :: Maybe Timestamp
_StartWorkflow'workflowExecutionExpirationTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflow'cronScheduleToScheduleInterval :: Maybe Duration
_StartWorkflow'cronScheduleToScheduleInterval = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflow'memo :: Maybe Memo
_StartWorkflow'memo = Maybe Memo
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflow'searchAttributes :: Maybe SearchAttributes
_StartWorkflow'searchAttributes = Maybe SearchAttributes
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflow'startTime :: Maybe Timestamp
_StartWorkflow'startTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflow'_unknownFields :: FieldSet
_StartWorkflow'_unknownFields = []}
  parseMessage :: Parser StartWorkflow
parseMessage
    = let
        loop ::
          StartWorkflow
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Common.V1.Message.Payload
             -> Data.ProtoLens.Encoding.Bytes.Parser StartWorkflow
        loop :: StartWorkflow
-> Growing Vector RealWorld Payload -> Parser StartWorkflow
loop StartWorkflow
x Growing Vector RealWorld Payload
mutable'arguments
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'arguments <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                            (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                               mutable'arguments)
                      (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'arguments") frozen'arguments x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"workflow_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowType") y x)
                                  mutable'arguments
                        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)
                                  mutable'arguments
                        Word64
26
                          -> 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
"arguments"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'arguments y)
                                loop x v
                        Word64
32
                          -> do y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt String
"randomness_seed"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"randomnessSeed") y x)
                                  mutable'arguments
                        Word64
42
                          -> do !(entry :: StartWorkflow'HeadersEntry) <- Parser StartWorkflow'HeadersEntry
-> String -> Parser StartWorkflow'HeadersEntry
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
"headers"
                                (let
                                   key = FoldLike
  Text
  StartWorkflow'HeadersEntry
  StartWorkflow'HeadersEntry
  Text
  Text
-> StartWorkflow'HeadersEntry -> 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") StartWorkflow'HeadersEntry
entry
                                   value
                                     = FoldLike
  Payload
  StartWorkflow'HeadersEntry
  StartWorkflow'HeadersEntry
  Payload
  Payload
-> StartWorkflow'HeadersEntry -> 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 @"value") StartWorkflow'HeadersEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"headers")
                                        (\ !Map Text Payload
t -> Text -> Payload -> Map Text Payload -> Map Text Payload
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key Payload
value Map Text Payload
t) x)
                                     mutable'arguments)
                        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
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                                  mutable'arguments
                        Word64
58
                          -> do y <- Parser NamespacedWorkflowExecution
-> String -> Parser NamespacedWorkflowExecution
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_info"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"parentWorkflowInfo") y x)
                                  mutable'arguments
                        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_execution_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecutionTimeout") y x)
                                  mutable'arguments
                        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_run_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowRunTimeout") y x)
                                  mutable'arguments
                        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
"workflow_task_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskTimeout") y x)
                                  mutable'arguments
                        Word64
90
                          -> 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_from_execution_run_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"continuedFromExecutionRunId") y
                                     x)
                                  mutable'arguments
                        Word64
96
                          -> 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
"continued_initiator"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"continuedInitiator") y x)
                                  mutable'arguments
                        Word64
106
                          -> 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'arguments
                        Word64
114
                          -> 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'arguments
                        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
"first_execution_run_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"firstExecutionRunId") y x)
                                  mutable'arguments
                        Word64
130
                          -> 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'arguments
                        Word64
136
                          -> 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'arguments
                        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
"cron_schedule"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cronSchedule") y x)
                                  mutable'arguments
                        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'arguments
                        Word64
162
                          -> 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
"cron_schedule_to_schedule_interval"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cronScheduleToScheduleInterval")
                                     y x)
                                  mutable'arguments
                        Word64
170
                          -> 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'arguments
                        Word64
178
                          -> 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'arguments
                        Word64
186
                          -> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"start_time"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"startTime") y x)
                                  mutable'arguments
                        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'arguments
      in
        Parser StartWorkflow -> String -> Parser StartWorkflow
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'arguments <- IO (Growing Vector RealWorld Payload)
-> Parser (Growing Vector RealWorld Payload)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                     IO (Growing Vector RealWorld Payload)
IO (Growing Vector (PrimState IO) Payload)
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'arguments)
          String
"StartWorkflow"
  buildMessage :: StartWorkflow -> Builder
buildMessage
    = \ StartWorkflow
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike Text StartWorkflow StartWorkflow Text Text
-> StartWorkflow -> 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 @"workflowType") StartWorkflow
_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 StartWorkflow StartWorkflow Text Text
-> StartWorkflow -> 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") StartWorkflow
_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.<>)
                   ((Payload -> Builder) -> Vector Payload -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                      (\ Payload
_v
                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                              ((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))
                      (FoldLike
  (Vector Payload)
  StartWorkflow
  StartWorkflow
  (Vector Payload)
  (Vector Payload)
-> StartWorkflow -> Vector 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 @"vec'arguments") StartWorkflow
_x))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Word64
_v
                           = FoldLike Word64 StartWorkflow StartWorkflow Word64 Word64
-> StartWorkflow -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"randomnessSeed") StartWorkflow
_x
                       in
                         if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
_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, Payload) -> Builder) -> [(Text, Payload)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                               (\ (Text, Payload)
_v
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                       ((ByteString -> Builder)
-> (StartWorkflow'HeadersEntry -> ByteString)
-> StartWorkflow'HeadersEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                          (\ ByteString
bs
                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                        (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                          StartWorkflow'HeadersEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                          (Setter
  StartWorkflow'HeadersEntry StartWorkflow'HeadersEntry Text Text
-> Text -> StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry
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, Payload) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, Payload)
_v)
                                             (Setter
  StartWorkflow'HeadersEntry
  StartWorkflow'HeadersEntry
  Payload
  Payload
-> Payload
-> StartWorkflow'HeadersEntry
-> StartWorkflow'HeadersEntry
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, Payload) -> Payload
forall a b. (a, b) -> b
Prelude.snd (Text, Payload)
_v)
                                                (StartWorkflow'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                   StartWorkflow'HeadersEntry)))))
                               (Map Text Payload -> [(Text, Payload)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                  (FoldLike
  (Map Text Payload)
  StartWorkflow
  StartWorkflow
  (Map Text Payload)
  (Map Text Payload)
-> StartWorkflow -> Map Text 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 @"headers") StartWorkflow
_x))))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v = FoldLike Text StartWorkflow StartWorkflow Text Text
-> StartWorkflow -> 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") StartWorkflow
_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 NamespacedWorkflowExecution)
  StartWorkflow
  StartWorkflow
  (Maybe NamespacedWorkflowExecution)
  (Maybe NamespacedWorkflowExecution)
-> StartWorkflow -> Maybe NamespacedWorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'parentWorkflowInfo") StartWorkflow
_x
                                of
                                  Maybe NamespacedWorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  (Prelude.Just NamespacedWorkflowExecution
_v)
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                         ((ByteString -> Builder)
-> (NamespacedWorkflowExecution -> ByteString)
-> NamespacedWorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                            (\ ByteString
bs
                                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                          (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                            NamespacedWorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NamespacedWorkflowExecution
_v))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (case
                                       FoldLike
  (Maybe Duration)
  StartWorkflow
  StartWorkflow
  (Maybe Duration)
  (Maybe Duration)
-> StartWorkflow -> 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")
                                         StartWorkflow
_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)
  StartWorkflow
  StartWorkflow
  (Maybe Duration)
  (Maybe Duration)
-> StartWorkflow -> 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")
                                            StartWorkflow
_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)
  StartWorkflow
  StartWorkflow
  (Maybe Duration)
  (Maybe Duration)
-> StartWorkflow -> 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")
                                               StartWorkflow
_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 :: Text
_v
                                                = FoldLike Text StartWorkflow StartWorkflow Text Text
-> StartWorkflow -> 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
                                                       @"continuedFromExecutionRunId")
                                                    StartWorkflow
_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
90)
                                                    ((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
  StartWorkflow
  StartWorkflow
  ContinueAsNewInitiator
  ContinueAsNewInitiator
-> StartWorkflow -> 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
                                                          @"continuedInitiator")
                                                       StartWorkflow
_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
96)
                                                       ((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)
  StartWorkflow
  StartWorkflow
  (Maybe Failure)
  (Maybe Failure)
-> StartWorkflow -> 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")
                                                        StartWorkflow
_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
106)
                                                           ((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)
  StartWorkflow
  StartWorkflow
  (Maybe Payloads)
  (Maybe Payloads)
-> StartWorkflow -> 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")
                                                           StartWorkflow
_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
114)
                                                              ((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 StartWorkflow StartWorkflow Text Text
-> StartWorkflow -> 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")
                                                                StartWorkflow
_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.<>)
                                                          (case
                                                               FoldLike
  (Maybe RetryPolicy)
  StartWorkflow
  StartWorkflow
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> StartWorkflow -> 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")
                                                                 StartWorkflow
_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
130)
                                                                    ((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 StartWorkflow StartWorkflow Int32 Int32
-> StartWorkflow -> 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")
                                                                      StartWorkflow
_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
136)
                                                                      ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                         Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                                                             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                (let
                                                                   _v :: Text
_v
                                                                     = FoldLike Text StartWorkflow StartWorkflow Text Text
-> StartWorkflow -> 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")
                                                                         StartWorkflow
_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.<>)
                                                                   (case
                                                                        FoldLike
  (Maybe Timestamp)
  StartWorkflow
  StartWorkflow
  (Maybe Timestamp)
  (Maybe Timestamp)
-> StartWorkflow -> 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")
                                                                          StartWorkflow
_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.<>)
                                                                      (case
                                                                           FoldLike
  (Maybe Duration)
  StartWorkflow
  StartWorkflow
  (Maybe Duration)
  (Maybe Duration)
-> StartWorkflow -> 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'cronScheduleToScheduleInterval")
                                                                             StartWorkflow
_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
162)
                                                                                ((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) StartWorkflow StartWorkflow (Maybe Memo) (Maybe Memo)
-> StartWorkflow -> 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")
                                                                                StartWorkflow
_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
170)
                                                                                   ((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)
  StartWorkflow
  StartWorkflow
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> StartWorkflow -> 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")
                                                                                   StartWorkflow
_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
178)
                                                                                      ((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 Timestamp)
  StartWorkflow
  StartWorkflow
  (Maybe Timestamp)
  (Maybe Timestamp)
-> StartWorkflow -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                                      (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                                         @"maybe'startTime")
                                                                                      StartWorkflow
_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
186)
                                                                                         ((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                                            (\ ByteString
bs
                                                                                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                                          (ByteString -> Int
Data.ByteString.length
                                                                                                             ByteString
bs)))
                                                                                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                                       ByteString
bs))
                                                                                            Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                                            Timestamp
_v))
                                                                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                                                                  (FoldLike FieldSet StartWorkflow StartWorkflow FieldSet FieldSet
-> StartWorkflow -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                                     FoldLike FieldSet StartWorkflow StartWorkflow FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' StartWorkflow FieldSet
Data.ProtoLens.unknownFields
                                                                                     StartWorkflow
_x))))))))))))))))))))))))
instance Control.DeepSeq.NFData StartWorkflow where
  rnf :: StartWorkflow -> ()
rnf
    = \ StartWorkflow
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (StartWorkflow -> FieldSet
_StartWorkflow'_unknownFields StartWorkflow
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (StartWorkflow -> Text
_StartWorkflow'workflowType StartWorkflow
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (StartWorkflow -> Text
_StartWorkflow'workflowId StartWorkflow
x__)
                   (Vector Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (StartWorkflow -> Vector Payload
_StartWorkflow'arguments StartWorkflow
x__)
                      (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (StartWorkflow -> Word64
_StartWorkflow'randomnessSeed StartWorkflow
x__)
                         (Map Text Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (StartWorkflow -> Map Text Payload
_StartWorkflow'headers StartWorkflow
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (StartWorkflow -> Text
_StartWorkflow'identity StartWorkflow
x__)
                               (Maybe NamespacedWorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (StartWorkflow -> Maybe NamespacedWorkflowExecution
_StartWorkflow'parentWorkflowInfo StartWorkflow
x__)
                                  (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (StartWorkflow -> Maybe Duration
_StartWorkflow'workflowExecutionTimeout StartWorkflow
x__)
                                     (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (StartWorkflow -> Maybe Duration
_StartWorkflow'workflowRunTimeout StartWorkflow
x__)
                                        (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (StartWorkflow -> Maybe Duration
_StartWorkflow'workflowTaskTimeout StartWorkflow
x__)
                                           (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (StartWorkflow -> Text
_StartWorkflow'continuedFromExecutionRunId StartWorkflow
x__)
                                              (ContinueAsNewInitiator -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (StartWorkflow -> ContinueAsNewInitiator
_StartWorkflow'continuedInitiator StartWorkflow
x__)
                                                 (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (StartWorkflow -> Maybe Failure
_StartWorkflow'continuedFailure StartWorkflow
x__)
                                                    (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                       (StartWorkflow -> Maybe Payloads
_StartWorkflow'lastCompletionResult StartWorkflow
x__)
                                                       (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                          (StartWorkflow -> Text
_StartWorkflow'firstExecutionRunId StartWorkflow
x__)
                                                          (Maybe RetryPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                             (StartWorkflow -> Maybe RetryPolicy
_StartWorkflow'retryPolicy StartWorkflow
x__)
                                                             (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                (StartWorkflow -> Int32
_StartWorkflow'attempt StartWorkflow
x__)
                                                                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                   (StartWorkflow -> Text
_StartWorkflow'cronSchedule StartWorkflow
x__)
                                                                   (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                      (StartWorkflow -> Maybe Timestamp
_StartWorkflow'workflowExecutionExpirationTime
                                                                         StartWorkflow
x__)
                                                                      (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                         (StartWorkflow -> Maybe Duration
_StartWorkflow'cronScheduleToScheduleInterval
                                                                            StartWorkflow
x__)
                                                                         (Maybe Memo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                            (StartWorkflow -> Maybe Memo
_StartWorkflow'memo
                                                                               StartWorkflow
x__)
                                                                            (Maybe SearchAttributes -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                               (StartWorkflow -> Maybe SearchAttributes
_StartWorkflow'searchAttributes
                                                                                  StartWorkflow
x__)
                                                                               (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                                  (StartWorkflow -> Maybe Timestamp
_StartWorkflow'startTime
                                                                                     StartWorkflow
x__)
                                                                                  ())))))))))))))))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.key' @:: Lens' StartWorkflow'HeadersEntry Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.value' @:: Lens' StartWorkflow'HeadersEntry Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'value' @:: Lens' StartWorkflow'HeadersEntry (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data StartWorkflow'HeadersEntry
  = StartWorkflow'HeadersEntry'_constructor {StartWorkflow'HeadersEntry -> Text
_StartWorkflow'HeadersEntry'key :: !Data.Text.Text,
                                             StartWorkflow'HeadersEntry -> Maybe Payload
_StartWorkflow'HeadersEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                             StartWorkflow'HeadersEntry -> FieldSet
_StartWorkflow'HeadersEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry -> Bool
(StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry -> Bool)
-> (StartWorkflow'HeadersEntry
    -> StartWorkflow'HeadersEntry -> Bool)
-> Eq StartWorkflow'HeadersEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry -> Bool
== :: StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry -> Bool
$c/= :: StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry -> Bool
/= :: StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry -> Bool
Prelude.Eq, Eq StartWorkflow'HeadersEntry
Eq StartWorkflow'HeadersEntry =>
(StartWorkflow'HeadersEntry
 -> StartWorkflow'HeadersEntry -> Ordering)
-> (StartWorkflow'HeadersEntry
    -> StartWorkflow'HeadersEntry -> Bool)
-> (StartWorkflow'HeadersEntry
    -> StartWorkflow'HeadersEntry -> Bool)
-> (StartWorkflow'HeadersEntry
    -> StartWorkflow'HeadersEntry -> Bool)
-> (StartWorkflow'HeadersEntry
    -> StartWorkflow'HeadersEntry -> Bool)
-> (StartWorkflow'HeadersEntry
    -> StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry)
-> (StartWorkflow'HeadersEntry
    -> StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry)
-> Ord StartWorkflow'HeadersEntry
StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry -> Bool
StartWorkflow'HeadersEntry
-> StartWorkflow'HeadersEntry -> Ordering
StartWorkflow'HeadersEntry
-> StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry
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 :: StartWorkflow'HeadersEntry
-> StartWorkflow'HeadersEntry -> Ordering
compare :: StartWorkflow'HeadersEntry
-> StartWorkflow'HeadersEntry -> Ordering
$c< :: StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry -> Bool
< :: StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry -> Bool
$c<= :: StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry -> Bool
<= :: StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry -> Bool
$c> :: StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry -> Bool
> :: StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry -> Bool
$c>= :: StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry -> Bool
>= :: StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry -> Bool
$cmax :: StartWorkflow'HeadersEntry
-> StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry
max :: StartWorkflow'HeadersEntry
-> StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry
$cmin :: StartWorkflow'HeadersEntry
-> StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry
min :: StartWorkflow'HeadersEntry
-> StartWorkflow'HeadersEntry -> StartWorkflow'HeadersEntry
Prelude.Ord)
instance Prelude.Show StartWorkflow'HeadersEntry where
  showsPrec :: Int -> StartWorkflow'HeadersEntry -> ShowS
showsPrec Int
_ StartWorkflow'HeadersEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (StartWorkflow'HeadersEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort StartWorkflow'HeadersEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField StartWorkflow'HeadersEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> StartWorkflow'HeadersEntry
-> f StartWorkflow'HeadersEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> StartWorkflow'HeadersEntry -> f StartWorkflow'HeadersEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartWorkflow'HeadersEntry
-> f StartWorkflow'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow'HeadersEntry -> Text)
-> (StartWorkflow'HeadersEntry
    -> Text -> StartWorkflow'HeadersEntry)
-> Lens' StartWorkflow'HeadersEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow'HeadersEntry -> Text
_StartWorkflow'HeadersEntry'key
           (\ StartWorkflow'HeadersEntry
x__ Text
y__ -> StartWorkflow'HeadersEntry
x__ {_StartWorkflow'HeadersEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflow'HeadersEntry "value" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Payload -> f Payload)
-> StartWorkflow'HeadersEntry
-> f StartWorkflow'HeadersEntry
fieldOf Proxy# "value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> StartWorkflow'HeadersEntry -> f StartWorkflow'HeadersEntry)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> StartWorkflow'HeadersEntry
-> f StartWorkflow'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow'HeadersEntry -> Maybe Payload)
-> (StartWorkflow'HeadersEntry
    -> Maybe Payload -> StartWorkflow'HeadersEntry)
-> Lens
     StartWorkflow'HeadersEntry
     StartWorkflow'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow'HeadersEntry -> Maybe Payload
_StartWorkflow'HeadersEntry'value
           (\ StartWorkflow'HeadersEntry
x__ Maybe Payload
y__ -> StartWorkflow'HeadersEntry
x__ {_StartWorkflow'HeadersEntry'value = 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 StartWorkflow'HeadersEntry "maybe'value" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'value"
-> (Maybe Payload -> f (Maybe Payload))
-> StartWorkflow'HeadersEntry
-> f StartWorkflow'HeadersEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> StartWorkflow'HeadersEntry -> f StartWorkflow'HeadersEntry)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> StartWorkflow'HeadersEntry
-> f StartWorkflow'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflow'HeadersEntry -> Maybe Payload)
-> (StartWorkflow'HeadersEntry
    -> Maybe Payload -> StartWorkflow'HeadersEntry)
-> Lens
     StartWorkflow'HeadersEntry
     StartWorkflow'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflow'HeadersEntry -> Maybe Payload
_StartWorkflow'HeadersEntry'value
           (\ StartWorkflow'HeadersEntry
x__ Maybe Payload
y__ -> StartWorkflow'HeadersEntry
x__ {_StartWorkflow'HeadersEntry'value = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message StartWorkflow'HeadersEntry where
  messageName :: Proxy StartWorkflow'HeadersEntry -> Text
messageName Proxy StartWorkflow'HeadersEntry
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_activation.StartWorkflow.HeadersEntry"
  packedMessageDescriptor :: Proxy StartWorkflow'HeadersEntry -> ByteString
packedMessageDescriptor Proxy StartWorkflow'HeadersEntry
_
    = ByteString
"\n\
      \\fHeadersEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\
      \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy StartWorkflow'HeadersEntry -> ByteString
packedFileDescriptor Proxy StartWorkflow'HeadersEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor StartWorkflow'HeadersEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor StartWorkflow'HeadersEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartWorkflow'HeadersEntry Text
-> FieldDescriptor StartWorkflow'HeadersEntry
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' StartWorkflow'HeadersEntry Text
-> FieldAccessor StartWorkflow'HeadersEntry 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 StartWorkflow'HeadersEntry
        value__field_descriptor :: FieldDescriptor StartWorkflow'HeadersEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor StartWorkflow'HeadersEntry Payload
-> FieldDescriptor StartWorkflow'HeadersEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"value"
              (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
  StartWorkflow'HeadersEntry
  StartWorkflow'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor StartWorkflow'HeadersEntry 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'value")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflow'HeadersEntry
      in
        [(Tag, FieldDescriptor StartWorkflow'HeadersEntry)]
-> Map Tag (FieldDescriptor StartWorkflow'HeadersEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor StartWorkflow'HeadersEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor StartWorkflow'HeadersEntry
value__field_descriptor)]
  unknownFields :: Lens' StartWorkflow'HeadersEntry FieldSet
unknownFields
    = (StartWorkflow'HeadersEntry -> FieldSet)
-> (StartWorkflow'HeadersEntry
    -> FieldSet -> StartWorkflow'HeadersEntry)
-> Lens' StartWorkflow'HeadersEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        StartWorkflow'HeadersEntry -> FieldSet
_StartWorkflow'HeadersEntry'_unknownFields
        (\ StartWorkflow'HeadersEntry
x__ FieldSet
y__
           -> StartWorkflow'HeadersEntry
x__ {_StartWorkflow'HeadersEntry'_unknownFields = y__})
  defMessage :: StartWorkflow'HeadersEntry
defMessage
    = StartWorkflow'HeadersEntry'_constructor
        {_StartWorkflow'HeadersEntry'key :: Text
_StartWorkflow'HeadersEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflow'HeadersEntry'value :: Maybe Payload
_StartWorkflow'HeadersEntry'value = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflow'HeadersEntry'_unknownFields :: FieldSet
_StartWorkflow'HeadersEntry'_unknownFields = []}
  parseMessage :: Parser StartWorkflow'HeadersEntry
parseMessage
    = let
        loop ::
          StartWorkflow'HeadersEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser StartWorkflow'HeadersEntry
        loop :: StartWorkflow'HeadersEntry -> Parser StartWorkflow'HeadersEntry
loop StartWorkflow'HeadersEntry
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 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
"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 StartWorkflow'HeadersEntry
-> String -> Parser StartWorkflow'HeadersEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do StartWorkflow'HeadersEntry -> Parser StartWorkflow'HeadersEntry
loop StartWorkflow'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"HeadersEntry"
  buildMessage :: StartWorkflow'HeadersEntry -> Builder
buildMessage
    = \ StartWorkflow'HeadersEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  StartWorkflow'HeadersEntry
  StartWorkflow'HeadersEntry
  Text
  Text
-> StartWorkflow'HeadersEntry -> 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") StartWorkflow'HeadersEntry
_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 Payload)
  StartWorkflow'HeadersEntry
  StartWorkflow'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> StartWorkflow'HeadersEntry -> 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'value") StartWorkflow'HeadersEntry
_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
  StartWorkflow'HeadersEntry
  StartWorkflow'HeadersEntry
  FieldSet
  FieldSet
-> StartWorkflow'HeadersEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  StartWorkflow'HeadersEntry
  StartWorkflow'HeadersEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' StartWorkflow'HeadersEntry FieldSet
Data.ProtoLens.unknownFields StartWorkflow'HeadersEntry
_x)))
instance Control.DeepSeq.NFData StartWorkflow'HeadersEntry where
  rnf :: StartWorkflow'HeadersEntry -> ()
rnf
    = \ StartWorkflow'HeadersEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (StartWorkflow'HeadersEntry -> FieldSet
_StartWorkflow'HeadersEntry'_unknownFields StartWorkflow'HeadersEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (StartWorkflow'HeadersEntry -> Text
_StartWorkflow'HeadersEntry'key StartWorkflow'HeadersEntry
x__)
                (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (StartWorkflow'HeadersEntry -> Maybe Payload
_StartWorkflow'HeadersEntry'value StartWorkflow'HeadersEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.randomnessSeed' @:: Lens' UpdateRandomSeed Data.Word.Word64@ -}
data UpdateRandomSeed
  = UpdateRandomSeed'_constructor {UpdateRandomSeed -> Word64
_UpdateRandomSeed'randomnessSeed :: !Data.Word.Word64,
                                   UpdateRandomSeed -> FieldSet
_UpdateRandomSeed'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateRandomSeed -> UpdateRandomSeed -> Bool
(UpdateRandomSeed -> UpdateRandomSeed -> Bool)
-> (UpdateRandomSeed -> UpdateRandomSeed -> Bool)
-> Eq UpdateRandomSeed
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateRandomSeed -> UpdateRandomSeed -> Bool
== :: UpdateRandomSeed -> UpdateRandomSeed -> Bool
$c/= :: UpdateRandomSeed -> UpdateRandomSeed -> Bool
/= :: UpdateRandomSeed -> UpdateRandomSeed -> Bool
Prelude.Eq, Eq UpdateRandomSeed
Eq UpdateRandomSeed =>
(UpdateRandomSeed -> UpdateRandomSeed -> Ordering)
-> (UpdateRandomSeed -> UpdateRandomSeed -> Bool)
-> (UpdateRandomSeed -> UpdateRandomSeed -> Bool)
-> (UpdateRandomSeed -> UpdateRandomSeed -> Bool)
-> (UpdateRandomSeed -> UpdateRandomSeed -> Bool)
-> (UpdateRandomSeed -> UpdateRandomSeed -> UpdateRandomSeed)
-> (UpdateRandomSeed -> UpdateRandomSeed -> UpdateRandomSeed)
-> Ord UpdateRandomSeed
UpdateRandomSeed -> UpdateRandomSeed -> Bool
UpdateRandomSeed -> UpdateRandomSeed -> Ordering
UpdateRandomSeed -> UpdateRandomSeed -> UpdateRandomSeed
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 :: UpdateRandomSeed -> UpdateRandomSeed -> Ordering
compare :: UpdateRandomSeed -> UpdateRandomSeed -> Ordering
$c< :: UpdateRandomSeed -> UpdateRandomSeed -> Bool
< :: UpdateRandomSeed -> UpdateRandomSeed -> Bool
$c<= :: UpdateRandomSeed -> UpdateRandomSeed -> Bool
<= :: UpdateRandomSeed -> UpdateRandomSeed -> Bool
$c> :: UpdateRandomSeed -> UpdateRandomSeed -> Bool
> :: UpdateRandomSeed -> UpdateRandomSeed -> Bool
$c>= :: UpdateRandomSeed -> UpdateRandomSeed -> Bool
>= :: UpdateRandomSeed -> UpdateRandomSeed -> Bool
$cmax :: UpdateRandomSeed -> UpdateRandomSeed -> UpdateRandomSeed
max :: UpdateRandomSeed -> UpdateRandomSeed -> UpdateRandomSeed
$cmin :: UpdateRandomSeed -> UpdateRandomSeed -> UpdateRandomSeed
min :: UpdateRandomSeed -> UpdateRandomSeed -> UpdateRandomSeed
Prelude.Ord)
instance Prelude.Show UpdateRandomSeed where
  showsPrec :: Int -> UpdateRandomSeed -> ShowS
showsPrec Int
_ UpdateRandomSeed
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateRandomSeed -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateRandomSeed
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateRandomSeed "randomnessSeed" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "randomnessSeed"
-> (Word64 -> f Word64) -> UpdateRandomSeed -> f UpdateRandomSeed
fieldOf Proxy# "randomnessSeed"
_
    = ((Word64 -> f Word64) -> UpdateRandomSeed -> f UpdateRandomSeed)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> UpdateRandomSeed
-> f UpdateRandomSeed
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateRandomSeed -> Word64)
-> (UpdateRandomSeed -> Word64 -> UpdateRandomSeed)
-> Lens UpdateRandomSeed UpdateRandomSeed Word64 Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateRandomSeed -> Word64
_UpdateRandomSeed'randomnessSeed
           (\ UpdateRandomSeed
x__ Word64
y__ -> UpdateRandomSeed
x__ {_UpdateRandomSeed'randomnessSeed = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateRandomSeed where
  messageName :: Proxy UpdateRandomSeed -> Text
messageName Proxy UpdateRandomSeed
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_activation.UpdateRandomSeed"
  packedMessageDescriptor :: Proxy UpdateRandomSeed -> ByteString
packedMessageDescriptor Proxy UpdateRandomSeed
_
    = ByteString
"\n\
      \\DLEUpdateRandomSeed\DC2'\n\
      \\SIrandomness_seed\CAN\SOH \SOH(\EOTR\SOrandomnessSeed"
  packedFileDescriptor :: Proxy UpdateRandomSeed -> ByteString
packedFileDescriptor Proxy UpdateRandomSeed
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor UpdateRandomSeed)
fieldsByTag
    = let
        randomnessSeed__field_descriptor :: FieldDescriptor UpdateRandomSeed
randomnessSeed__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor UpdateRandomSeed Word64
-> FieldDescriptor UpdateRandomSeed
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"randomness_seed"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.UInt64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens UpdateRandomSeed UpdateRandomSeed Word64 Word64
-> FieldAccessor UpdateRandomSeed Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
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 @"randomnessSeed")) ::
              Data.ProtoLens.FieldDescriptor UpdateRandomSeed
      in
        [(Tag, FieldDescriptor UpdateRandomSeed)]
-> Map Tag (FieldDescriptor UpdateRandomSeed)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor UpdateRandomSeed
randomnessSeed__field_descriptor)]
  unknownFields :: Lens' UpdateRandomSeed FieldSet
unknownFields
    = (UpdateRandomSeed -> FieldSet)
-> (UpdateRandomSeed -> FieldSet -> UpdateRandomSeed)
-> Lens' UpdateRandomSeed FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateRandomSeed -> FieldSet
_UpdateRandomSeed'_unknownFields
        (\ UpdateRandomSeed
x__ FieldSet
y__ -> UpdateRandomSeed
x__ {_UpdateRandomSeed'_unknownFields = y__})
  defMessage :: UpdateRandomSeed
defMessage
    = UpdateRandomSeed'_constructor
        {_UpdateRandomSeed'randomnessSeed :: Word64
_UpdateRandomSeed'randomnessSeed = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateRandomSeed'_unknownFields :: FieldSet
_UpdateRandomSeed'_unknownFields = []}
  parseMessage :: Parser UpdateRandomSeed
parseMessage
    = let
        loop ::
          UpdateRandomSeed
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateRandomSeed
        loop :: UpdateRandomSeed -> Parser UpdateRandomSeed
loop UpdateRandomSeed
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 Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt String
"randomness_seed"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"randomnessSeed") 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 UpdateRandomSeed -> String -> Parser UpdateRandomSeed
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateRandomSeed -> Parser UpdateRandomSeed
loop UpdateRandomSeed
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"UpdateRandomSeed"
  buildMessage :: UpdateRandomSeed -> Builder
buildMessage
    = \ UpdateRandomSeed
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Word64
_v
                  = FoldLike Word64 UpdateRandomSeed UpdateRandomSeed Word64 Word64
-> UpdateRandomSeed -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"randomnessSeed") UpdateRandomSeed
_x
              in
                if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
_v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet UpdateRandomSeed UpdateRandomSeed FieldSet FieldSet
-> UpdateRandomSeed -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet UpdateRandomSeed UpdateRandomSeed FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpdateRandomSeed FieldSet
Data.ProtoLens.unknownFields UpdateRandomSeed
_x))
instance Control.DeepSeq.NFData UpdateRandomSeed where
  rnf :: UpdateRandomSeed -> ()
rnf
    = \ UpdateRandomSeed
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateRandomSeed -> FieldSet
_UpdateRandomSeed'_unknownFields UpdateRandomSeed
x__)
             (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (UpdateRandomSeed -> Word64
_UpdateRandomSeed'randomnessSeed UpdateRandomSeed
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.runId' @:: Lens' WorkflowActivation Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.timestamp' @:: Lens' WorkflowActivation Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'timestamp' @:: Lens' WorkflowActivation (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.isReplaying' @:: Lens' WorkflowActivation Prelude.Bool@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.historyLength' @:: Lens' WorkflowActivation Data.Word.Word32@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.jobs' @:: Lens' WorkflowActivation [WorkflowActivationJob]@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.vec'jobs' @:: Lens' WorkflowActivation (Data.Vector.Vector WorkflowActivationJob)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.availableInternalFlags' @:: Lens' WorkflowActivation [Data.Word.Word32]@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.vec'availableInternalFlags' @:: Lens' WorkflowActivation (Data.Vector.Unboxed.Vector Data.Word.Word32)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.historySizeBytes' @:: Lens' WorkflowActivation Data.Word.Word64@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.continueAsNewSuggested' @:: Lens' WorkflowActivation Prelude.Bool@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.buildIdForCurrentTask' @:: Lens' WorkflowActivation Data.Text.Text@ -}
data WorkflowActivation
  = WorkflowActivation'_constructor {WorkflowActivation -> Text
_WorkflowActivation'runId :: !Data.Text.Text,
                                     WorkflowActivation -> Maybe Timestamp
_WorkflowActivation'timestamp :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                     WorkflowActivation -> Bool
_WorkflowActivation'isReplaying :: !Prelude.Bool,
                                     WorkflowActivation -> Word32
_WorkflowActivation'historyLength :: !Data.Word.Word32,
                                     WorkflowActivation -> Vector WorkflowActivationJob
_WorkflowActivation'jobs :: !(Data.Vector.Vector WorkflowActivationJob),
                                     WorkflowActivation -> Vector Word32
_WorkflowActivation'availableInternalFlags :: !(Data.Vector.Unboxed.Vector Data.Word.Word32),
                                     WorkflowActivation -> Word64
_WorkflowActivation'historySizeBytes :: !Data.Word.Word64,
                                     WorkflowActivation -> Bool
_WorkflowActivation'continueAsNewSuggested :: !Prelude.Bool,
                                     WorkflowActivation -> Text
_WorkflowActivation'buildIdForCurrentTask :: !Data.Text.Text,
                                     WorkflowActivation -> FieldSet
_WorkflowActivation'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowActivation -> WorkflowActivation -> Bool
(WorkflowActivation -> WorkflowActivation -> Bool)
-> (WorkflowActivation -> WorkflowActivation -> Bool)
-> Eq WorkflowActivation
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowActivation -> WorkflowActivation -> Bool
== :: WorkflowActivation -> WorkflowActivation -> Bool
$c/= :: WorkflowActivation -> WorkflowActivation -> Bool
/= :: WorkflowActivation -> WorkflowActivation -> Bool
Prelude.Eq, Eq WorkflowActivation
Eq WorkflowActivation =>
(WorkflowActivation -> WorkflowActivation -> Ordering)
-> (WorkflowActivation -> WorkflowActivation -> Bool)
-> (WorkflowActivation -> WorkflowActivation -> Bool)
-> (WorkflowActivation -> WorkflowActivation -> Bool)
-> (WorkflowActivation -> WorkflowActivation -> Bool)
-> (WorkflowActivation -> WorkflowActivation -> WorkflowActivation)
-> (WorkflowActivation -> WorkflowActivation -> WorkflowActivation)
-> Ord WorkflowActivation
WorkflowActivation -> WorkflowActivation -> Bool
WorkflowActivation -> WorkflowActivation -> Ordering
WorkflowActivation -> WorkflowActivation -> WorkflowActivation
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 :: WorkflowActivation -> WorkflowActivation -> Ordering
compare :: WorkflowActivation -> WorkflowActivation -> Ordering
$c< :: WorkflowActivation -> WorkflowActivation -> Bool
< :: WorkflowActivation -> WorkflowActivation -> Bool
$c<= :: WorkflowActivation -> WorkflowActivation -> Bool
<= :: WorkflowActivation -> WorkflowActivation -> Bool
$c> :: WorkflowActivation -> WorkflowActivation -> Bool
> :: WorkflowActivation -> WorkflowActivation -> Bool
$c>= :: WorkflowActivation -> WorkflowActivation -> Bool
>= :: WorkflowActivation -> WorkflowActivation -> Bool
$cmax :: WorkflowActivation -> WorkflowActivation -> WorkflowActivation
max :: WorkflowActivation -> WorkflowActivation -> WorkflowActivation
$cmin :: WorkflowActivation -> WorkflowActivation -> WorkflowActivation
min :: WorkflowActivation -> WorkflowActivation -> WorkflowActivation
Prelude.Ord)
instance Prelude.Show WorkflowActivation where
  showsPrec :: Int -> WorkflowActivation -> ShowS
showsPrec Int
_ WorkflowActivation
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowActivation -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowActivation
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowActivation "runId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "runId"
-> (Text -> f Text) -> WorkflowActivation -> f WorkflowActivation
fieldOf Proxy# "runId"
_
    = ((Text -> f Text) -> WorkflowActivation -> f WorkflowActivation)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowActivation
-> f WorkflowActivation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivation -> Text)
-> (WorkflowActivation -> Text -> WorkflowActivation)
-> Lens WorkflowActivation WorkflowActivation Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivation -> Text
_WorkflowActivation'runId
           (\ WorkflowActivation
x__ Text
y__ -> WorkflowActivation
x__ {_WorkflowActivation'runId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowActivation "timestamp" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "timestamp"
-> (Timestamp -> f Timestamp)
-> WorkflowActivation
-> f WorkflowActivation
fieldOf Proxy# "timestamp"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> WorkflowActivation -> f WorkflowActivation)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> WorkflowActivation
-> f WorkflowActivation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivation -> Maybe Timestamp)
-> (WorkflowActivation -> Maybe Timestamp -> WorkflowActivation)
-> Lens
     WorkflowActivation
     WorkflowActivation
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivation -> Maybe Timestamp
_WorkflowActivation'timestamp
           (\ WorkflowActivation
x__ Maybe Timestamp
y__ -> WorkflowActivation
x__ {_WorkflowActivation'timestamp = 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 WorkflowActivation "maybe'timestamp" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'timestamp"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowActivation
-> f WorkflowActivation
fieldOf Proxy# "maybe'timestamp"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> WorkflowActivation -> f WorkflowActivation)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowActivation
-> f WorkflowActivation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivation -> Maybe Timestamp)
-> (WorkflowActivation -> Maybe Timestamp -> WorkflowActivation)
-> Lens
     WorkflowActivation
     WorkflowActivation
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivation -> Maybe Timestamp
_WorkflowActivation'timestamp
           (\ WorkflowActivation
x__ Maybe Timestamp
y__ -> WorkflowActivation
x__ {_WorkflowActivation'timestamp = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowActivation "isReplaying" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "isReplaying"
-> (Bool -> f Bool) -> WorkflowActivation -> f WorkflowActivation
fieldOf Proxy# "isReplaying"
_
    = ((Bool -> f Bool) -> WorkflowActivation -> f WorkflowActivation)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> WorkflowActivation
-> f WorkflowActivation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivation -> Bool)
-> (WorkflowActivation -> Bool -> WorkflowActivation)
-> Lens WorkflowActivation WorkflowActivation Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivation -> Bool
_WorkflowActivation'isReplaying
           (\ WorkflowActivation
x__ Bool
y__ -> WorkflowActivation
x__ {_WorkflowActivation'isReplaying = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowActivation "historyLength" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "historyLength"
-> (Word32 -> f Word32)
-> WorkflowActivation
-> f WorkflowActivation
fieldOf Proxy# "historyLength"
_
    = ((Word32 -> f Word32)
 -> WorkflowActivation -> f WorkflowActivation)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> WorkflowActivation
-> f WorkflowActivation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivation -> Word32)
-> (WorkflowActivation -> Word32 -> WorkflowActivation)
-> Lens WorkflowActivation WorkflowActivation Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivation -> Word32
_WorkflowActivation'historyLength
           (\ WorkflowActivation
x__ Word32
y__ -> WorkflowActivation
x__ {_WorkflowActivation'historyLength = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowActivation "jobs" [WorkflowActivationJob] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "jobs"
-> ([WorkflowActivationJob] -> f [WorkflowActivationJob])
-> WorkflowActivation
-> f WorkflowActivation
fieldOf Proxy# "jobs"
_
    = ((Vector WorkflowActivationJob -> f (Vector WorkflowActivationJob))
 -> WorkflowActivation -> f WorkflowActivation)
-> (([WorkflowActivationJob] -> f [WorkflowActivationJob])
    -> Vector WorkflowActivationJob
    -> f (Vector WorkflowActivationJob))
-> ([WorkflowActivationJob] -> f [WorkflowActivationJob])
-> WorkflowActivation
-> f WorkflowActivation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivation -> Vector WorkflowActivationJob)
-> (WorkflowActivation
    -> Vector WorkflowActivationJob -> WorkflowActivation)
-> Lens
     WorkflowActivation
     WorkflowActivation
     (Vector WorkflowActivationJob)
     (Vector WorkflowActivationJob)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivation -> Vector WorkflowActivationJob
_WorkflowActivation'jobs
           (\ WorkflowActivation
x__ Vector WorkflowActivationJob
y__ -> WorkflowActivation
x__ {_WorkflowActivation'jobs = y__}))
        ((Vector WorkflowActivationJob -> [WorkflowActivationJob])
-> (Vector WorkflowActivationJob
    -> [WorkflowActivationJob] -> Vector WorkflowActivationJob)
-> Lens
     (Vector WorkflowActivationJob)
     (Vector WorkflowActivationJob)
     [WorkflowActivationJob]
     [WorkflowActivationJob]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector WorkflowActivationJob -> [WorkflowActivationJob]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector WorkflowActivationJob
_ [WorkflowActivationJob]
y__ -> [WorkflowActivationJob] -> Vector WorkflowActivationJob
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [WorkflowActivationJob]
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivation "vec'jobs" (Data.Vector.Vector WorkflowActivationJob) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'jobs"
-> (Vector WorkflowActivationJob
    -> f (Vector WorkflowActivationJob))
-> WorkflowActivation
-> f WorkflowActivation
fieldOf Proxy# "vec'jobs"
_
    = ((Vector WorkflowActivationJob -> f (Vector WorkflowActivationJob))
 -> WorkflowActivation -> f WorkflowActivation)
-> ((Vector WorkflowActivationJob
     -> f (Vector WorkflowActivationJob))
    -> Vector WorkflowActivationJob
    -> f (Vector WorkflowActivationJob))
-> (Vector WorkflowActivationJob
    -> f (Vector WorkflowActivationJob))
-> WorkflowActivation
-> f WorkflowActivation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivation -> Vector WorkflowActivationJob)
-> (WorkflowActivation
    -> Vector WorkflowActivationJob -> WorkflowActivation)
-> Lens
     WorkflowActivation
     WorkflowActivation
     (Vector WorkflowActivationJob)
     (Vector WorkflowActivationJob)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivation -> Vector WorkflowActivationJob
_WorkflowActivation'jobs
           (\ WorkflowActivation
x__ Vector WorkflowActivationJob
y__ -> WorkflowActivation
x__ {_WorkflowActivation'jobs = y__}))
        (Vector WorkflowActivationJob -> f (Vector WorkflowActivationJob))
-> Vector WorkflowActivationJob -> f (Vector WorkflowActivationJob)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowActivation "availableInternalFlags" [Data.Word.Word32] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "availableInternalFlags"
-> ([Word32] -> f [Word32])
-> WorkflowActivation
-> f WorkflowActivation
fieldOf Proxy# "availableInternalFlags"
_
    = ((Vector Word32 -> f (Vector Word32))
 -> WorkflowActivation -> f WorkflowActivation)
-> (([Word32] -> f [Word32]) -> Vector Word32 -> f (Vector Word32))
-> ([Word32] -> f [Word32])
-> WorkflowActivation
-> f WorkflowActivation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivation -> Vector Word32)
-> (WorkflowActivation -> Vector Word32 -> WorkflowActivation)
-> Lens
     WorkflowActivation
     WorkflowActivation
     (Vector Word32)
     (Vector Word32)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivation -> Vector Word32
_WorkflowActivation'availableInternalFlags
           (\ WorkflowActivation
x__ Vector Word32
y__
              -> WorkflowActivation
x__ {_WorkflowActivation'availableInternalFlags = y__}))
        ((Vector Word32 -> [Word32])
-> (Vector Word32 -> [Word32] -> Vector Word32)
-> Lens (Vector Word32) (Vector Word32) [Word32] [Word32]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Word32 -> [Word32]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Word32
_ [Word32]
y__ -> [Word32] -> Vector Word32
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Word32]
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivation "vec'availableInternalFlags" (Data.Vector.Unboxed.Vector Data.Word.Word32) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'availableInternalFlags"
-> (Vector Word32 -> f (Vector Word32))
-> WorkflowActivation
-> f WorkflowActivation
fieldOf Proxy# "vec'availableInternalFlags"
_
    = ((Vector Word32 -> f (Vector Word32))
 -> WorkflowActivation -> f WorkflowActivation)
-> ((Vector Word32 -> f (Vector Word32))
    -> Vector Word32 -> f (Vector Word32))
-> (Vector Word32 -> f (Vector Word32))
-> WorkflowActivation
-> f WorkflowActivation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivation -> Vector Word32)
-> (WorkflowActivation -> Vector Word32 -> WorkflowActivation)
-> Lens
     WorkflowActivation
     WorkflowActivation
     (Vector Word32)
     (Vector Word32)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivation -> Vector Word32
_WorkflowActivation'availableInternalFlags
           (\ WorkflowActivation
x__ Vector Word32
y__
              -> WorkflowActivation
x__ {_WorkflowActivation'availableInternalFlags = y__}))
        (Vector Word32 -> f (Vector Word32))
-> Vector Word32 -> f (Vector Word32)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowActivation "historySizeBytes" Data.Word.Word64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "historySizeBytes"
-> (Word64 -> f Word64)
-> WorkflowActivation
-> f WorkflowActivation
fieldOf Proxy# "historySizeBytes"
_
    = ((Word64 -> f Word64)
 -> WorkflowActivation -> f WorkflowActivation)
-> ((Word64 -> f Word64) -> Word64 -> f Word64)
-> (Word64 -> f Word64)
-> WorkflowActivation
-> f WorkflowActivation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivation -> Word64)
-> (WorkflowActivation -> Word64 -> WorkflowActivation)
-> Lens WorkflowActivation WorkflowActivation Word64 Word64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivation -> Word64
_WorkflowActivation'historySizeBytes
           (\ WorkflowActivation
x__ Word64
y__ -> WorkflowActivation
x__ {_WorkflowActivation'historySizeBytes = y__}))
        (Word64 -> f Word64) -> Word64 -> f Word64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowActivation "continueAsNewSuggested" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "continueAsNewSuggested"
-> (Bool -> f Bool) -> WorkflowActivation -> f WorkflowActivation
fieldOf Proxy# "continueAsNewSuggested"
_
    = ((Bool -> f Bool) -> WorkflowActivation -> f WorkflowActivation)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> WorkflowActivation
-> f WorkflowActivation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivation -> Bool)
-> (WorkflowActivation -> Bool -> WorkflowActivation)
-> Lens WorkflowActivation WorkflowActivation Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivation -> Bool
_WorkflowActivation'continueAsNewSuggested
           (\ WorkflowActivation
x__ Bool
y__
              -> WorkflowActivation
x__ {_WorkflowActivation'continueAsNewSuggested = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowActivation "buildIdForCurrentTask" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "buildIdForCurrentTask"
-> (Text -> f Text) -> WorkflowActivation -> f WorkflowActivation
fieldOf Proxy# "buildIdForCurrentTask"
_
    = ((Text -> f Text) -> WorkflowActivation -> f WorkflowActivation)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowActivation
-> f WorkflowActivation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivation -> Text)
-> (WorkflowActivation -> Text -> WorkflowActivation)
-> Lens WorkflowActivation WorkflowActivation Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivation -> Text
_WorkflowActivation'buildIdForCurrentTask
           (\ WorkflowActivation
x__ Text
y__
              -> WorkflowActivation
x__ {_WorkflowActivation'buildIdForCurrentTask = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowActivation where
  messageName :: Proxy WorkflowActivation -> Text
messageName Proxy WorkflowActivation
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_activation.WorkflowActivation"
  packedMessageDescriptor :: Proxy WorkflowActivation -> ByteString
packedMessageDescriptor Proxy WorkflowActivation
_
    = ByteString
"\n\
      \\DC2WorkflowActivation\DC2\NAK\n\
      \\ACKrun_id\CAN\SOH \SOH(\tR\ENQrunId\DC28\n\
      \\ttimestamp\CAN\STX \SOH(\v2\SUB.google.protobuf.TimestampR\ttimestamp\DC2!\n\
      \\fis_replaying\CAN\ETX \SOH(\bR\visReplaying\DC2%\n\
      \\SOhistory_length\CAN\EOT \SOH(\rR\rhistoryLength\DC2F\n\
      \\EOTjobs\CAN\ENQ \ETX(\v22.coresdk.workflow_activation.WorkflowActivationJobR\EOTjobs\DC28\n\
      \\CANavailable_internal_flags\CAN\ACK \ETX(\rR\SYNavailableInternalFlags\DC2,\n\
      \\DC2history_size_bytes\CAN\a \SOH(\EOTR\DLEhistorySizeBytes\DC29\n\
      \\EMcontinue_as_new_suggested\CAN\b \SOH(\bR\SYNcontinueAsNewSuggested\DC28\n\
      \\EMbuild_id_for_current_task\CAN\t \SOH(\tR\NAKbuildIdForCurrentTask"
  packedFileDescriptor :: Proxy WorkflowActivation -> ByteString
packedFileDescriptor Proxy WorkflowActivation
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor WorkflowActivation)
fieldsByTag
    = let
        runId__field_descriptor :: FieldDescriptor WorkflowActivation
runId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowActivation Text
-> FieldDescriptor WorkflowActivation
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"run_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens WorkflowActivation WorkflowActivation Text Text
-> FieldAccessor WorkflowActivation Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivation
        timestamp__field_descriptor :: FieldDescriptor WorkflowActivation
timestamp__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor WorkflowActivation Timestamp
-> FieldDescriptor WorkflowActivation
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"timestamp"
              (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
  WorkflowActivation
  WorkflowActivation
  (Maybe Timestamp)
  (Maybe Timestamp)
-> FieldAccessor WorkflowActivation 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'timestamp")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivation
        isReplaying__field_descriptor :: FieldDescriptor WorkflowActivation
isReplaying__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor WorkflowActivation Bool
-> FieldDescriptor WorkflowActivation
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"is_replaying"
              (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 WorkflowActivation WorkflowActivation Bool Bool
-> FieldAccessor WorkflowActivation 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 @"isReplaying")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivation
        historyLength__field_descriptor :: FieldDescriptor WorkflowActivation
historyLength__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor WorkflowActivation Word32
-> FieldDescriptor WorkflowActivation
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"history_length"
              (ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
              (WireDefault Word32
-> Lens WorkflowActivation WorkflowActivation Word32 Word32
-> FieldAccessor WorkflowActivation Word32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"historyLength")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivation
        jobs__field_descriptor :: FieldDescriptor WorkflowActivation
jobs__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowActivationJob
-> FieldAccessor WorkflowActivation WorkflowActivationJob
-> FieldDescriptor WorkflowActivation
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"jobs"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowActivationJob
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowActivationJob)
              (Packing
-> Lens' WorkflowActivation [WorkflowActivationJob]
-> FieldAccessor WorkflowActivation WorkflowActivationJob
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 @"jobs")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivation
        availableInternalFlags__field_descriptor :: FieldDescriptor WorkflowActivation
availableInternalFlags__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor WorkflowActivation Word32
-> FieldDescriptor WorkflowActivation
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"available_internal_flags"
              (ScalarField Word32 -> FieldTypeDescriptor Word32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word32
Data.ProtoLens.UInt32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word32)
              (Packing
-> Lens' WorkflowActivation [Word32]
-> FieldAccessor WorkflowActivation Word32
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"availableInternalFlags")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivation
        historySizeBytes__field_descriptor :: FieldDescriptor WorkflowActivation
historySizeBytes__field_descriptor
          = String
-> FieldTypeDescriptor Word64
-> FieldAccessor WorkflowActivation Word64
-> FieldDescriptor WorkflowActivation
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"history_size_bytes"
              (ScalarField Word64 -> FieldTypeDescriptor Word64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Word64
Data.ProtoLens.UInt64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Word.Word64)
              (WireDefault Word64
-> Lens WorkflowActivation WorkflowActivation Word64 Word64
-> FieldAccessor WorkflowActivation Word64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Word64
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 WorkflowActivation
        continueAsNewSuggested__field_descriptor :: FieldDescriptor WorkflowActivation
continueAsNewSuggested__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor WorkflowActivation Bool
-> FieldDescriptor WorkflowActivation
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"continue_as_new_suggested"
              (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 WorkflowActivation WorkflowActivation Bool Bool
-> FieldAccessor WorkflowActivation 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 @"continueAsNewSuggested")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivation
        buildIdForCurrentTask__field_descriptor :: FieldDescriptor WorkflowActivation
buildIdForCurrentTask__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowActivation Text
-> FieldDescriptor WorkflowActivation
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"build_id_for_current_task"
              (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 WorkflowActivation WorkflowActivation Text Text
-> FieldAccessor WorkflowActivation 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 @"buildIdForCurrentTask")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivation
      in
        [(Tag, FieldDescriptor WorkflowActivation)]
-> Map Tag (FieldDescriptor WorkflowActivation)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowActivation
runId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowActivation
timestamp__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowActivation
isReplaying__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor WorkflowActivation
historyLength__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor WorkflowActivation
jobs__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor WorkflowActivation
availableInternalFlags__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor WorkflowActivation
historySizeBytes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor WorkflowActivation
continueAsNewSuggested__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor WorkflowActivation
buildIdForCurrentTask__field_descriptor)]
  unknownFields :: Lens' WorkflowActivation FieldSet
unknownFields
    = (WorkflowActivation -> FieldSet)
-> (WorkflowActivation -> FieldSet -> WorkflowActivation)
-> Lens' WorkflowActivation FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowActivation -> FieldSet
_WorkflowActivation'_unknownFields
        (\ WorkflowActivation
x__ FieldSet
y__ -> WorkflowActivation
x__ {_WorkflowActivation'_unknownFields = y__})
  defMessage :: WorkflowActivation
defMessage
    = WorkflowActivation'_constructor
        {_WorkflowActivation'runId :: Text
_WorkflowActivation'runId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowActivation'timestamp :: Maybe Timestamp
_WorkflowActivation'timestamp = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _WorkflowActivation'isReplaying :: Bool
_WorkflowActivation'isReplaying = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowActivation'historyLength :: Word32
_WorkflowActivation'historyLength = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowActivation'jobs :: Vector WorkflowActivationJob
_WorkflowActivation'jobs = Vector WorkflowActivationJob
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _WorkflowActivation'availableInternalFlags :: Vector Word32
_WorkflowActivation'availableInternalFlags = Vector Word32
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _WorkflowActivation'historySizeBytes :: Word64
_WorkflowActivation'historySizeBytes = Word64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowActivation'continueAsNewSuggested :: Bool
_WorkflowActivation'continueAsNewSuggested = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowActivation'buildIdForCurrentTask :: Text
_WorkflowActivation'buildIdForCurrentTask = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowActivation'_unknownFields :: FieldSet
_WorkflowActivation'_unknownFields = []}
  parseMessage :: Parser WorkflowActivation
parseMessage
    = let
        loop ::
          WorkflowActivation
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Unboxed.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Word.Word32
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld WorkflowActivationJob
                -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowActivation
        loop :: WorkflowActivation
-> Growing Vector RealWorld Word32
-> Growing Vector RealWorld WorkflowActivationJob
-> Parser WorkflowActivation
loop WorkflowActivation
x Growing Vector RealWorld Word32
mutable'availableInternalFlags Growing Vector RealWorld WorkflowActivationJob
mutable'jobs
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'availableInternalFlags <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                         (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                            mutable'availableInternalFlags)
                      frozen'jobs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'jobs)
                      (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'availableInternalFlags")
                              frozen'availableInternalFlags
                              (Lens.Family2.set
                                 (Data.ProtoLens.Field.field @"vec'jobs") frozen'jobs 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
"run_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"runId") y x)
                                  mutable'availableInternalFlags mutable'jobs
                        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
"timestamp"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"timestamp") y x)
                                  mutable'availableInternalFlags mutable'jobs
                        Word64
24
                          -> 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
"is_replaying"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"isReplaying") y x)
                                  mutable'availableInternalFlags mutable'jobs
                        Word64
32
                          -> do y <- Parser Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"history_length"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"historyLength") y x)
                                  mutable'availableInternalFlags mutable'jobs
                        Word64
42
                          -> do !y <- Parser WorkflowActivationJob
-> String -> Parser WorkflowActivationJob
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
"jobs"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'jobs y)
                                loop x mutable'availableInternalFlags v
                        Word64
48
                          -> do !y <- Parser Word32 -> String -> Parser Word32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        ((Word64 -> Word32) -> Parser Word64 -> Parser Word32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                           Word64 -> Word32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                           Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                        String
"available_internal_flags"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'availableInternalFlags y)
                                loop x v mutable'jobs
                        Word64
50
                          -> do y <- do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Data.ProtoLens.Encoding.Bytes.isolate
                                          (Prelude.fromIntegral len)
                                          ((let
                                              ploop Growing v RealWorld a
qs
                                                = do packedEnd <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
                                                     if packedEnd then
                                                         Prelude.return qs
                                                     else
                                                         do !q <- (Data.ProtoLens.Encoding.Bytes.<?>)
                                                                    (Prelude.fmap
                                                                       Prelude.fromIntegral
                                                                       Data.ProtoLens.Encoding.Bytes.getVarInt)
                                                                    "available_internal_flags"
                                                            qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                                     (Data.ProtoLens.Encoding.Growing.append
                                                                        qs q)
                                                            ploop qs'
                                            in ploop)
                                             mutable'availableInternalFlags)
                                loop x y mutable'jobs
                        Word64
56
                          -> do y <- Parser Word64 -> String -> Parser Word64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt String
"history_size_bytes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"historySizeBytes") y x)
                                  mutable'availableInternalFlags mutable'jobs
                        Word64
64
                          -> 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
"continue_as_new_suggested"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"continueAsNewSuggested") y x)
                                  mutable'availableInternalFlags mutable'jobs
                        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
"build_id_for_current_task"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"buildIdForCurrentTask") y x)
                                  mutable'availableInternalFlags mutable'jobs
                        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'availableInternalFlags mutable'jobs
      in
        Parser WorkflowActivation -> String -> Parser WorkflowActivation
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'availableInternalFlags <- IO (Growing Vector RealWorld Word32)
-> Parser (Growing Vector RealWorld Word32)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                  IO (Growing Vector RealWorld Word32)
IO (Growing Vector (PrimState IO) Word32)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              mutable'jobs <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                Data.ProtoLens.Encoding.Growing.new
              loop
                Data.ProtoLens.defMessage mutable'availableInternalFlags
                mutable'jobs)
          String
"WorkflowActivation"
  buildMessage :: WorkflowActivation -> Builder
buildMessage
    = \ WorkflowActivation
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike Text WorkflowActivation WorkflowActivation Text Text
-> WorkflowActivation -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId") WorkflowActivation
_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 Timestamp)
  WorkflowActivation
  WorkflowActivation
  (Maybe Timestamp)
  (Maybe Timestamp)
-> WorkflowActivation -> 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'timestamp") WorkflowActivation
_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 :: Bool
_v
                        = FoldLike Bool WorkflowActivation WorkflowActivation Bool Bool
-> WorkflowActivation -> 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 @"isReplaying") WorkflowActivation
_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
24)
                            ((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 :: Word32
_v
                           = FoldLike Word32 WorkflowActivation WorkflowActivation Word32 Word32
-> WorkflowActivation -> Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"historyLength") WorkflowActivation
_x
                       in
                         if Word32 -> Word32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word32
_v Word32
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) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Word32
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         ((WorkflowActivationJob -> Builder)
-> Vector WorkflowActivationJob -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                            (\ WorkflowActivationJob
_v
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                    ((ByteString -> Builder)
-> (WorkflowActivationJob -> ByteString)
-> WorkflowActivationJob
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                       (\ ByteString
bs
                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                     (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                       WorkflowActivationJob -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowActivationJob
_v))
                            (FoldLike
  (Vector WorkflowActivationJob)
  WorkflowActivation
  WorkflowActivation
  (Vector WorkflowActivationJob)
  (Vector WorkflowActivationJob)
-> WorkflowActivation -> Vector WorkflowActivationJob
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'jobs") WorkflowActivation
_x))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               p :: Vector Word32
p = FoldLike
  (Vector Word32)
  WorkflowActivation
  WorkflowActivation
  (Vector Word32)
  (Vector Word32)
-> WorkflowActivation -> Vector Word32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'availableInternalFlags") WorkflowActivation
_x
                             in
                               if Vector Word32 -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector Word32
p 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
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        (Builder -> ByteString
Data.ProtoLens.Encoding.Bytes.runBuilder
                                           ((Word32 -> Builder) -> Vector Word32 -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                              ((Word64 -> Builder) -> (Word32 -> Word64) -> Word32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                 Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 Word32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
                                              Vector Word32
p))))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Word64
_v
                                    = FoldLike Word64 WorkflowActivation WorkflowActivation Word64 Word64
-> WorkflowActivation -> Word64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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") WorkflowActivation
_x
                                in
                                  if Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Word64
_v Word64
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
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
_v))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (let
                                     _v :: Bool
_v
                                       = FoldLike Bool WorkflowActivation WorkflowActivation Bool Bool
-> WorkflowActivation -> 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 @"continueAsNewSuggested") WorkflowActivation
_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
64)
                                           ((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 WorkflowActivation WorkflowActivation Text Text
-> WorkflowActivation -> 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 @"buildIdForCurrentTask")
                                              WorkflowActivation
_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))
                                     (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                        (FoldLike
  FieldSet WorkflowActivation WorkflowActivation FieldSet FieldSet
-> WorkflowActivation -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet WorkflowActivation WorkflowActivation FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowActivation FieldSet
Data.ProtoLens.unknownFields WorkflowActivation
_x))))))))))
instance Control.DeepSeq.NFData WorkflowActivation where
  rnf :: WorkflowActivation -> ()
rnf
    = \ WorkflowActivation
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowActivation -> FieldSet
_WorkflowActivation'_unknownFields WorkflowActivation
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowActivation -> Text
_WorkflowActivation'runId WorkflowActivation
x__)
                (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowActivation -> Maybe Timestamp
_WorkflowActivation'timestamp WorkflowActivation
x__)
                   (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowActivation -> Bool
_WorkflowActivation'isReplaying WorkflowActivation
x__)
                      (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (WorkflowActivation -> Word32
_WorkflowActivation'historyLength WorkflowActivation
x__)
                         (Vector WorkflowActivationJob -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (WorkflowActivation -> Vector WorkflowActivationJob
_WorkflowActivation'jobs WorkflowActivation
x__)
                            (Vector Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (WorkflowActivation -> Vector Word32
_WorkflowActivation'availableInternalFlags WorkflowActivation
x__)
                               (Word64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (WorkflowActivation -> Word64
_WorkflowActivation'historySizeBytes WorkflowActivation
x__)
                                  (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (WorkflowActivation -> Bool
_WorkflowActivation'continueAsNewSuggested WorkflowActivation
x__)
                                     (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (WorkflowActivation -> Text
_WorkflowActivation'buildIdForCurrentTask WorkflowActivation
x__) ())))))))))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'variant' @:: Lens' WorkflowActivationJob (Prelude.Maybe WorkflowActivationJob'Variant)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'startWorkflow' @:: Lens' WorkflowActivationJob (Prelude.Maybe StartWorkflow)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.startWorkflow' @:: Lens' WorkflowActivationJob StartWorkflow@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'fireTimer' @:: Lens' WorkflowActivationJob (Prelude.Maybe FireTimer)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.fireTimer' @:: Lens' WorkflowActivationJob FireTimer@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'updateRandomSeed' @:: Lens' WorkflowActivationJob (Prelude.Maybe UpdateRandomSeed)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.updateRandomSeed' @:: Lens' WorkflowActivationJob UpdateRandomSeed@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'queryWorkflow' @:: Lens' WorkflowActivationJob (Prelude.Maybe QueryWorkflow)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.queryWorkflow' @:: Lens' WorkflowActivationJob QueryWorkflow@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'cancelWorkflow' @:: Lens' WorkflowActivationJob (Prelude.Maybe CancelWorkflow)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.cancelWorkflow' @:: Lens' WorkflowActivationJob CancelWorkflow@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'signalWorkflow' @:: Lens' WorkflowActivationJob (Prelude.Maybe SignalWorkflow)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.signalWorkflow' @:: Lens' WorkflowActivationJob SignalWorkflow@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'resolveActivity' @:: Lens' WorkflowActivationJob (Prelude.Maybe ResolveActivity)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.resolveActivity' @:: Lens' WorkflowActivationJob ResolveActivity@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'notifyHasPatch' @:: Lens' WorkflowActivationJob (Prelude.Maybe NotifyHasPatch)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.notifyHasPatch' @:: Lens' WorkflowActivationJob NotifyHasPatch@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'resolveChildWorkflowExecutionStart' @:: Lens' WorkflowActivationJob (Prelude.Maybe ResolveChildWorkflowExecutionStart)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.resolveChildWorkflowExecutionStart' @:: Lens' WorkflowActivationJob ResolveChildWorkflowExecutionStart@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'resolveChildWorkflowExecution' @:: Lens' WorkflowActivationJob (Prelude.Maybe ResolveChildWorkflowExecution)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.resolveChildWorkflowExecution' @:: Lens' WorkflowActivationJob ResolveChildWorkflowExecution@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'resolveSignalExternalWorkflow' @:: Lens' WorkflowActivationJob (Prelude.Maybe ResolveSignalExternalWorkflow)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.resolveSignalExternalWorkflow' @:: Lens' WorkflowActivationJob ResolveSignalExternalWorkflow@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'resolveRequestCancelExternalWorkflow' @:: Lens' WorkflowActivationJob (Prelude.Maybe ResolveRequestCancelExternalWorkflow)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.resolveRequestCancelExternalWorkflow' @:: Lens' WorkflowActivationJob ResolveRequestCancelExternalWorkflow@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'doUpdate' @:: Lens' WorkflowActivationJob (Prelude.Maybe DoUpdate)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.doUpdate' @:: Lens' WorkflowActivationJob DoUpdate@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.maybe'removeFromCache' @:: Lens' WorkflowActivationJob (Prelude.Maybe RemoveFromCache)@
         * 'Proto.Temporal.Sdk.Core.WorkflowActivation.WorkflowActivation_Fields.removeFromCache' @:: Lens' WorkflowActivationJob RemoveFromCache@ -}
data WorkflowActivationJob
  = WorkflowActivationJob'_constructor {WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant :: !(Prelude.Maybe WorkflowActivationJob'Variant),
                                        WorkflowActivationJob -> FieldSet
_WorkflowActivationJob'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowActivationJob -> WorkflowActivationJob -> Bool
(WorkflowActivationJob -> WorkflowActivationJob -> Bool)
-> (WorkflowActivationJob -> WorkflowActivationJob -> Bool)
-> Eq WorkflowActivationJob
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowActivationJob -> WorkflowActivationJob -> Bool
== :: WorkflowActivationJob -> WorkflowActivationJob -> Bool
$c/= :: WorkflowActivationJob -> WorkflowActivationJob -> Bool
/= :: WorkflowActivationJob -> WorkflowActivationJob -> Bool
Prelude.Eq, Eq WorkflowActivationJob
Eq WorkflowActivationJob =>
(WorkflowActivationJob -> WorkflowActivationJob -> Ordering)
-> (WorkflowActivationJob -> WorkflowActivationJob -> Bool)
-> (WorkflowActivationJob -> WorkflowActivationJob -> Bool)
-> (WorkflowActivationJob -> WorkflowActivationJob -> Bool)
-> (WorkflowActivationJob -> WorkflowActivationJob -> Bool)
-> (WorkflowActivationJob
    -> WorkflowActivationJob -> WorkflowActivationJob)
-> (WorkflowActivationJob
    -> WorkflowActivationJob -> WorkflowActivationJob)
-> Ord WorkflowActivationJob
WorkflowActivationJob -> WorkflowActivationJob -> Bool
WorkflowActivationJob -> WorkflowActivationJob -> Ordering
WorkflowActivationJob
-> WorkflowActivationJob -> WorkflowActivationJob
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 :: WorkflowActivationJob -> WorkflowActivationJob -> Ordering
compare :: WorkflowActivationJob -> WorkflowActivationJob -> Ordering
$c< :: WorkflowActivationJob -> WorkflowActivationJob -> Bool
< :: WorkflowActivationJob -> WorkflowActivationJob -> Bool
$c<= :: WorkflowActivationJob -> WorkflowActivationJob -> Bool
<= :: WorkflowActivationJob -> WorkflowActivationJob -> Bool
$c> :: WorkflowActivationJob -> WorkflowActivationJob -> Bool
> :: WorkflowActivationJob -> WorkflowActivationJob -> Bool
$c>= :: WorkflowActivationJob -> WorkflowActivationJob -> Bool
>= :: WorkflowActivationJob -> WorkflowActivationJob -> Bool
$cmax :: WorkflowActivationJob
-> WorkflowActivationJob -> WorkflowActivationJob
max :: WorkflowActivationJob
-> WorkflowActivationJob -> WorkflowActivationJob
$cmin :: WorkflowActivationJob
-> WorkflowActivationJob -> WorkflowActivationJob
min :: WorkflowActivationJob
-> WorkflowActivationJob -> WorkflowActivationJob
Prelude.Ord)
instance Prelude.Show WorkflowActivationJob where
  showsPrec :: Int -> WorkflowActivationJob -> ShowS
showsPrec Int
_ WorkflowActivationJob
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowActivationJob -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowActivationJob
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data WorkflowActivationJob'Variant
  = WorkflowActivationJob'StartWorkflow !StartWorkflow |
    WorkflowActivationJob'FireTimer !FireTimer |
    WorkflowActivationJob'UpdateRandomSeed !UpdateRandomSeed |
    WorkflowActivationJob'QueryWorkflow !QueryWorkflow |
    WorkflowActivationJob'CancelWorkflow !CancelWorkflow |
    WorkflowActivationJob'SignalWorkflow !SignalWorkflow |
    WorkflowActivationJob'ResolveActivity !ResolveActivity |
    WorkflowActivationJob'NotifyHasPatch !NotifyHasPatch |
    WorkflowActivationJob'ResolveChildWorkflowExecutionStart !ResolveChildWorkflowExecutionStart |
    WorkflowActivationJob'ResolveChildWorkflowExecution !ResolveChildWorkflowExecution |
    WorkflowActivationJob'ResolveSignalExternalWorkflow !ResolveSignalExternalWorkflow |
    WorkflowActivationJob'ResolveRequestCancelExternalWorkflow !ResolveRequestCancelExternalWorkflow |
    WorkflowActivationJob'DoUpdate !DoUpdate |
    WorkflowActivationJob'RemoveFromCache !RemoveFromCache
  deriving stock (Int -> WorkflowActivationJob'Variant -> ShowS
[WorkflowActivationJob'Variant] -> ShowS
WorkflowActivationJob'Variant -> String
(Int -> WorkflowActivationJob'Variant -> ShowS)
-> (WorkflowActivationJob'Variant -> String)
-> ([WorkflowActivationJob'Variant] -> ShowS)
-> Show WorkflowActivationJob'Variant
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> WorkflowActivationJob'Variant -> ShowS
showsPrec :: Int -> WorkflowActivationJob'Variant -> ShowS
$cshow :: WorkflowActivationJob'Variant -> String
show :: WorkflowActivationJob'Variant -> String
$cshowList :: [WorkflowActivationJob'Variant] -> ShowS
showList :: [WorkflowActivationJob'Variant] -> ShowS
Prelude.Show, WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Bool
(WorkflowActivationJob'Variant
 -> WorkflowActivationJob'Variant -> Bool)
-> (WorkflowActivationJob'Variant
    -> WorkflowActivationJob'Variant -> Bool)
-> Eq WorkflowActivationJob'Variant
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Bool
== :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Bool
$c/= :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Bool
/= :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Bool
Prelude.Eq, Eq WorkflowActivationJob'Variant
Eq WorkflowActivationJob'Variant =>
(WorkflowActivationJob'Variant
 -> WorkflowActivationJob'Variant -> Ordering)
-> (WorkflowActivationJob'Variant
    -> WorkflowActivationJob'Variant -> Bool)
-> (WorkflowActivationJob'Variant
    -> WorkflowActivationJob'Variant -> Bool)
-> (WorkflowActivationJob'Variant
    -> WorkflowActivationJob'Variant -> Bool)
-> (WorkflowActivationJob'Variant
    -> WorkflowActivationJob'Variant -> Bool)
-> (WorkflowActivationJob'Variant
    -> WorkflowActivationJob'Variant -> WorkflowActivationJob'Variant)
-> (WorkflowActivationJob'Variant
    -> WorkflowActivationJob'Variant -> WorkflowActivationJob'Variant)
-> Ord WorkflowActivationJob'Variant
WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Bool
WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Ordering
WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> WorkflowActivationJob'Variant
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Ordering
compare :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Ordering
$c< :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Bool
< :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Bool
$c<= :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Bool
<= :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Bool
$c> :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Bool
> :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Bool
$c>= :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Bool
>= :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> Bool
$cmax :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> WorkflowActivationJob'Variant
max :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> WorkflowActivationJob'Variant
$cmin :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> WorkflowActivationJob'Variant
min :: WorkflowActivationJob'Variant
-> WorkflowActivationJob'Variant -> WorkflowActivationJob'Variant
Prelude.Ord)
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "maybe'variant" (Prelude.Maybe WorkflowActivationJob'Variant) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'variant"
-> (Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "maybe'variant"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((Maybe WorkflowActivationJob'Variant
     -> f (Maybe WorkflowActivationJob'Variant))
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        (Maybe WorkflowActivationJob'Variant
 -> f (Maybe WorkflowActivationJob'Variant))
-> Maybe WorkflowActivationJob'Variant
-> f (Maybe WorkflowActivationJob'Variant)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "maybe'startWorkflow" (Prelude.Maybe StartWorkflow) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startWorkflow"
-> (Maybe StartWorkflow -> f (Maybe StartWorkflow))
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "maybe'startWorkflow"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((Maybe StartWorkflow -> f (Maybe StartWorkflow))
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (Maybe StartWorkflow -> f (Maybe StartWorkflow))
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        ((Maybe WorkflowActivationJob'Variant -> Maybe StartWorkflow)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe StartWorkflow -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe StartWorkflow)
     (Maybe StartWorkflow)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowActivationJob'Variant
x__
              -> case Maybe WorkflowActivationJob'Variant
x__ of
                   (Prelude.Just (WorkflowActivationJob'StartWorkflow StartWorkflow
x__val))
                     -> StartWorkflow -> Maybe StartWorkflow
forall a. a -> Maybe a
Prelude.Just StartWorkflow
x__val
                   Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe StartWorkflow
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowActivationJob'Variant
_ Maybe StartWorkflow
y__ -> (StartWorkflow -> WorkflowActivationJob'Variant)
-> Maybe StartWorkflow -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap StartWorkflow -> WorkflowActivationJob'Variant
WorkflowActivationJob'StartWorkflow Maybe StartWorkflow
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "startWorkflow" StartWorkflow where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startWorkflow"
-> (StartWorkflow -> f StartWorkflow)
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "startWorkflow"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((StartWorkflow -> f StartWorkflow)
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (StartWorkflow -> f StartWorkflow)
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        (((Maybe StartWorkflow -> f (Maybe StartWorkflow))
 -> Maybe WorkflowActivationJob'Variant
 -> f (Maybe WorkflowActivationJob'Variant))
-> ((StartWorkflow -> f StartWorkflow)
    -> Maybe StartWorkflow -> f (Maybe StartWorkflow))
-> (StartWorkflow -> f StartWorkflow)
-> Maybe WorkflowActivationJob'Variant
-> f (Maybe WorkflowActivationJob'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowActivationJob'Variant -> Maybe StartWorkflow)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe StartWorkflow -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe StartWorkflow)
     (Maybe StartWorkflow)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowActivationJob'Variant
x__
                 -> case Maybe WorkflowActivationJob'Variant
x__ of
                      (Prelude.Just (WorkflowActivationJob'StartWorkflow StartWorkflow
x__val))
                        -> StartWorkflow -> Maybe StartWorkflow
forall a. a -> Maybe a
Prelude.Just StartWorkflow
x__val
                      Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe StartWorkflow
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowActivationJob'Variant
_ Maybe StartWorkflow
y__ -> (StartWorkflow -> WorkflowActivationJob'Variant)
-> Maybe StartWorkflow -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap StartWorkflow -> WorkflowActivationJob'Variant
WorkflowActivationJob'StartWorkflow Maybe StartWorkflow
y__))
           (StartWorkflow -> Lens' (Maybe StartWorkflow) StartWorkflow
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens StartWorkflow
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "maybe'fireTimer" (Prelude.Maybe FireTimer) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'fireTimer"
-> (Maybe FireTimer -> f (Maybe FireTimer))
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "maybe'fireTimer"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((Maybe FireTimer -> f (Maybe FireTimer))
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (Maybe FireTimer -> f (Maybe FireTimer))
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        ((Maybe WorkflowActivationJob'Variant -> Maybe FireTimer)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe FireTimer -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe FireTimer)
     (Maybe FireTimer)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowActivationJob'Variant
x__
              -> case Maybe WorkflowActivationJob'Variant
x__ of
                   (Prelude.Just (WorkflowActivationJob'FireTimer FireTimer
x__val))
                     -> FireTimer -> Maybe FireTimer
forall a. a -> Maybe a
Prelude.Just FireTimer
x__val
                   Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe FireTimer
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowActivationJob'Variant
_ Maybe FireTimer
y__ -> (FireTimer -> WorkflowActivationJob'Variant)
-> Maybe FireTimer -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap FireTimer -> WorkflowActivationJob'Variant
WorkflowActivationJob'FireTimer Maybe FireTimer
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "fireTimer" FireTimer where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "fireTimer"
-> (FireTimer -> f FireTimer)
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "fireTimer"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((FireTimer -> f FireTimer)
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (FireTimer -> f FireTimer)
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        (((Maybe FireTimer -> f (Maybe FireTimer))
 -> Maybe WorkflowActivationJob'Variant
 -> f (Maybe WorkflowActivationJob'Variant))
-> ((FireTimer -> f FireTimer)
    -> Maybe FireTimer -> f (Maybe FireTimer))
-> (FireTimer -> f FireTimer)
-> Maybe WorkflowActivationJob'Variant
-> f (Maybe WorkflowActivationJob'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowActivationJob'Variant -> Maybe FireTimer)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe FireTimer -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe FireTimer)
     (Maybe FireTimer)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowActivationJob'Variant
x__
                 -> case Maybe WorkflowActivationJob'Variant
x__ of
                      (Prelude.Just (WorkflowActivationJob'FireTimer FireTimer
x__val))
                        -> FireTimer -> Maybe FireTimer
forall a. a -> Maybe a
Prelude.Just FireTimer
x__val
                      Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe FireTimer
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowActivationJob'Variant
_ Maybe FireTimer
y__ -> (FireTimer -> WorkflowActivationJob'Variant)
-> Maybe FireTimer -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap FireTimer -> WorkflowActivationJob'Variant
WorkflowActivationJob'FireTimer Maybe FireTimer
y__))
           (FireTimer -> Lens' (Maybe FireTimer) FireTimer
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens FireTimer
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "maybe'updateRandomSeed" (Prelude.Maybe UpdateRandomSeed) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'updateRandomSeed"
-> (Maybe UpdateRandomSeed -> f (Maybe UpdateRandomSeed))
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "maybe'updateRandomSeed"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((Maybe UpdateRandomSeed -> f (Maybe UpdateRandomSeed))
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (Maybe UpdateRandomSeed -> f (Maybe UpdateRandomSeed))
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        ((Maybe WorkflowActivationJob'Variant -> Maybe UpdateRandomSeed)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe UpdateRandomSeed -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe UpdateRandomSeed)
     (Maybe UpdateRandomSeed)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowActivationJob'Variant
x__
              -> case Maybe WorkflowActivationJob'Variant
x__ of
                   (Prelude.Just (WorkflowActivationJob'UpdateRandomSeed UpdateRandomSeed
x__val))
                     -> UpdateRandomSeed -> Maybe UpdateRandomSeed
forall a. a -> Maybe a
Prelude.Just UpdateRandomSeed
x__val
                   Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe UpdateRandomSeed
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowActivationJob'Variant
_ Maybe UpdateRandomSeed
y__
              -> (UpdateRandomSeed -> WorkflowActivationJob'Variant)
-> Maybe UpdateRandomSeed -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap UpdateRandomSeed -> WorkflowActivationJob'Variant
WorkflowActivationJob'UpdateRandomSeed Maybe UpdateRandomSeed
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "updateRandomSeed" UpdateRandomSeed where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "updateRandomSeed"
-> (UpdateRandomSeed -> f UpdateRandomSeed)
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "updateRandomSeed"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((UpdateRandomSeed -> f UpdateRandomSeed)
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (UpdateRandomSeed -> f UpdateRandomSeed)
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        (((Maybe UpdateRandomSeed -> f (Maybe UpdateRandomSeed))
 -> Maybe WorkflowActivationJob'Variant
 -> f (Maybe WorkflowActivationJob'Variant))
-> ((UpdateRandomSeed -> f UpdateRandomSeed)
    -> Maybe UpdateRandomSeed -> f (Maybe UpdateRandomSeed))
-> (UpdateRandomSeed -> f UpdateRandomSeed)
-> Maybe WorkflowActivationJob'Variant
-> f (Maybe WorkflowActivationJob'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowActivationJob'Variant -> Maybe UpdateRandomSeed)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe UpdateRandomSeed -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe UpdateRandomSeed)
     (Maybe UpdateRandomSeed)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowActivationJob'Variant
x__
                 -> case Maybe WorkflowActivationJob'Variant
x__ of
                      (Prelude.Just (WorkflowActivationJob'UpdateRandomSeed UpdateRandomSeed
x__val))
                        -> UpdateRandomSeed -> Maybe UpdateRandomSeed
forall a. a -> Maybe a
Prelude.Just UpdateRandomSeed
x__val
                      Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe UpdateRandomSeed
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowActivationJob'Variant
_ Maybe UpdateRandomSeed
y__
                 -> (UpdateRandomSeed -> WorkflowActivationJob'Variant)
-> Maybe UpdateRandomSeed -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap UpdateRandomSeed -> WorkflowActivationJob'Variant
WorkflowActivationJob'UpdateRandomSeed Maybe UpdateRandomSeed
y__))
           (UpdateRandomSeed -> Lens' (Maybe UpdateRandomSeed) UpdateRandomSeed
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateRandomSeed
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "maybe'queryWorkflow" (Prelude.Maybe QueryWorkflow) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'queryWorkflow"
-> (Maybe QueryWorkflow -> f (Maybe QueryWorkflow))
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "maybe'queryWorkflow"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((Maybe QueryWorkflow -> f (Maybe QueryWorkflow))
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (Maybe QueryWorkflow -> f (Maybe QueryWorkflow))
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        ((Maybe WorkflowActivationJob'Variant -> Maybe QueryWorkflow)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe QueryWorkflow -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe QueryWorkflow)
     (Maybe QueryWorkflow)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowActivationJob'Variant
x__
              -> case Maybe WorkflowActivationJob'Variant
x__ of
                   (Prelude.Just (WorkflowActivationJob'QueryWorkflow QueryWorkflow
x__val))
                     -> QueryWorkflow -> Maybe QueryWorkflow
forall a. a -> Maybe a
Prelude.Just QueryWorkflow
x__val
                   Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe QueryWorkflow
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowActivationJob'Variant
_ Maybe QueryWorkflow
y__ -> (QueryWorkflow -> WorkflowActivationJob'Variant)
-> Maybe QueryWorkflow -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap QueryWorkflow -> WorkflowActivationJob'Variant
WorkflowActivationJob'QueryWorkflow Maybe QueryWorkflow
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "queryWorkflow" QueryWorkflow where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "queryWorkflow"
-> (QueryWorkflow -> f QueryWorkflow)
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "queryWorkflow"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((QueryWorkflow -> f QueryWorkflow)
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (QueryWorkflow -> f QueryWorkflow)
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        (((Maybe QueryWorkflow -> f (Maybe QueryWorkflow))
 -> Maybe WorkflowActivationJob'Variant
 -> f (Maybe WorkflowActivationJob'Variant))
-> ((QueryWorkflow -> f QueryWorkflow)
    -> Maybe QueryWorkflow -> f (Maybe QueryWorkflow))
-> (QueryWorkflow -> f QueryWorkflow)
-> Maybe WorkflowActivationJob'Variant
-> f (Maybe WorkflowActivationJob'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowActivationJob'Variant -> Maybe QueryWorkflow)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe QueryWorkflow -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe QueryWorkflow)
     (Maybe QueryWorkflow)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowActivationJob'Variant
x__
                 -> case Maybe WorkflowActivationJob'Variant
x__ of
                      (Prelude.Just (WorkflowActivationJob'QueryWorkflow QueryWorkflow
x__val))
                        -> QueryWorkflow -> Maybe QueryWorkflow
forall a. a -> Maybe a
Prelude.Just QueryWorkflow
x__val
                      Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe QueryWorkflow
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowActivationJob'Variant
_ Maybe QueryWorkflow
y__ -> (QueryWorkflow -> WorkflowActivationJob'Variant)
-> Maybe QueryWorkflow -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap QueryWorkflow -> WorkflowActivationJob'Variant
WorkflowActivationJob'QueryWorkflow Maybe QueryWorkflow
y__))
           (QueryWorkflow -> Lens' (Maybe QueryWorkflow) QueryWorkflow
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens QueryWorkflow
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "maybe'cancelWorkflow" (Prelude.Maybe CancelWorkflow) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'cancelWorkflow"
-> (Maybe CancelWorkflow -> f (Maybe CancelWorkflow))
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "maybe'cancelWorkflow"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((Maybe CancelWorkflow -> f (Maybe CancelWorkflow))
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (Maybe CancelWorkflow -> f (Maybe CancelWorkflow))
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        ((Maybe WorkflowActivationJob'Variant -> Maybe CancelWorkflow)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe CancelWorkflow -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe CancelWorkflow)
     (Maybe CancelWorkflow)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowActivationJob'Variant
x__
              -> case Maybe WorkflowActivationJob'Variant
x__ of
                   (Prelude.Just (WorkflowActivationJob'CancelWorkflow CancelWorkflow
x__val))
                     -> CancelWorkflow -> Maybe CancelWorkflow
forall a. a -> Maybe a
Prelude.Just CancelWorkflow
x__val
                   Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe CancelWorkflow
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowActivationJob'Variant
_ Maybe CancelWorkflow
y__ -> (CancelWorkflow -> WorkflowActivationJob'Variant)
-> Maybe CancelWorkflow -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CancelWorkflow -> WorkflowActivationJob'Variant
WorkflowActivationJob'CancelWorkflow Maybe CancelWorkflow
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "cancelWorkflow" CancelWorkflow where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cancelWorkflow"
-> (CancelWorkflow -> f CancelWorkflow)
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "cancelWorkflow"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((CancelWorkflow -> f CancelWorkflow)
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (CancelWorkflow -> f CancelWorkflow)
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        (((Maybe CancelWorkflow -> f (Maybe CancelWorkflow))
 -> Maybe WorkflowActivationJob'Variant
 -> f (Maybe WorkflowActivationJob'Variant))
-> ((CancelWorkflow -> f CancelWorkflow)
    -> Maybe CancelWorkflow -> f (Maybe CancelWorkflow))
-> (CancelWorkflow -> f CancelWorkflow)
-> Maybe WorkflowActivationJob'Variant
-> f (Maybe WorkflowActivationJob'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowActivationJob'Variant -> Maybe CancelWorkflow)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe CancelWorkflow -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe CancelWorkflow)
     (Maybe CancelWorkflow)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowActivationJob'Variant
x__
                 -> case Maybe WorkflowActivationJob'Variant
x__ of
                      (Prelude.Just (WorkflowActivationJob'CancelWorkflow CancelWorkflow
x__val))
                        -> CancelWorkflow -> Maybe CancelWorkflow
forall a. a -> Maybe a
Prelude.Just CancelWorkflow
x__val
                      Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe CancelWorkflow
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowActivationJob'Variant
_ Maybe CancelWorkflow
y__ -> (CancelWorkflow -> WorkflowActivationJob'Variant)
-> Maybe CancelWorkflow -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CancelWorkflow -> WorkflowActivationJob'Variant
WorkflowActivationJob'CancelWorkflow Maybe CancelWorkflow
y__))
           (CancelWorkflow -> Lens' (Maybe CancelWorkflow) CancelWorkflow
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CancelWorkflow
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "maybe'signalWorkflow" (Prelude.Maybe SignalWorkflow) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'signalWorkflow"
-> (Maybe SignalWorkflow -> f (Maybe SignalWorkflow))
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "maybe'signalWorkflow"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((Maybe SignalWorkflow -> f (Maybe SignalWorkflow))
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (Maybe SignalWorkflow -> f (Maybe SignalWorkflow))
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        ((Maybe WorkflowActivationJob'Variant -> Maybe SignalWorkflow)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe SignalWorkflow -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe SignalWorkflow)
     (Maybe SignalWorkflow)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowActivationJob'Variant
x__
              -> case Maybe WorkflowActivationJob'Variant
x__ of
                   (Prelude.Just (WorkflowActivationJob'SignalWorkflow SignalWorkflow
x__val))
                     -> SignalWorkflow -> Maybe SignalWorkflow
forall a. a -> Maybe a
Prelude.Just SignalWorkflow
x__val
                   Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe SignalWorkflow
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowActivationJob'Variant
_ Maybe SignalWorkflow
y__ -> (SignalWorkflow -> WorkflowActivationJob'Variant)
-> Maybe SignalWorkflow -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap SignalWorkflow -> WorkflowActivationJob'Variant
WorkflowActivationJob'SignalWorkflow Maybe SignalWorkflow
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "signalWorkflow" SignalWorkflow where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "signalWorkflow"
-> (SignalWorkflow -> f SignalWorkflow)
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "signalWorkflow"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((SignalWorkflow -> f SignalWorkflow)
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (SignalWorkflow -> f SignalWorkflow)
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        (((Maybe SignalWorkflow -> f (Maybe SignalWorkflow))
 -> Maybe WorkflowActivationJob'Variant
 -> f (Maybe WorkflowActivationJob'Variant))
-> ((SignalWorkflow -> f SignalWorkflow)
    -> Maybe SignalWorkflow -> f (Maybe SignalWorkflow))
-> (SignalWorkflow -> f SignalWorkflow)
-> Maybe WorkflowActivationJob'Variant
-> f (Maybe WorkflowActivationJob'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowActivationJob'Variant -> Maybe SignalWorkflow)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe SignalWorkflow -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe SignalWorkflow)
     (Maybe SignalWorkflow)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowActivationJob'Variant
x__
                 -> case Maybe WorkflowActivationJob'Variant
x__ of
                      (Prelude.Just (WorkflowActivationJob'SignalWorkflow SignalWorkflow
x__val))
                        -> SignalWorkflow -> Maybe SignalWorkflow
forall a. a -> Maybe a
Prelude.Just SignalWorkflow
x__val
                      Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe SignalWorkflow
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowActivationJob'Variant
_ Maybe SignalWorkflow
y__ -> (SignalWorkflow -> WorkflowActivationJob'Variant)
-> Maybe SignalWorkflow -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap SignalWorkflow -> WorkflowActivationJob'Variant
WorkflowActivationJob'SignalWorkflow Maybe SignalWorkflow
y__))
           (SignalWorkflow -> Lens' (Maybe SignalWorkflow) SignalWorkflow
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SignalWorkflow
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "maybe'resolveActivity" (Prelude.Maybe ResolveActivity) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'resolveActivity"
-> (Maybe ResolveActivity -> f (Maybe ResolveActivity))
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "maybe'resolveActivity"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((Maybe ResolveActivity -> f (Maybe ResolveActivity))
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (Maybe ResolveActivity -> f (Maybe ResolveActivity))
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        ((Maybe WorkflowActivationJob'Variant -> Maybe ResolveActivity)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe ResolveActivity -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe ResolveActivity)
     (Maybe ResolveActivity)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowActivationJob'Variant
x__
              -> case Maybe WorkflowActivationJob'Variant
x__ of
                   (Prelude.Just (WorkflowActivationJob'ResolveActivity ResolveActivity
x__val))
                     -> ResolveActivity -> Maybe ResolveActivity
forall a. a -> Maybe a
Prelude.Just ResolveActivity
x__val
                   Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe ResolveActivity
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowActivationJob'Variant
_ Maybe ResolveActivity
y__
              -> (ResolveActivity -> WorkflowActivationJob'Variant)
-> Maybe ResolveActivity -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ResolveActivity -> WorkflowActivationJob'Variant
WorkflowActivationJob'ResolveActivity Maybe ResolveActivity
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "resolveActivity" ResolveActivity where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "resolveActivity"
-> (ResolveActivity -> f ResolveActivity)
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "resolveActivity"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((ResolveActivity -> f ResolveActivity)
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (ResolveActivity -> f ResolveActivity)
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        (((Maybe ResolveActivity -> f (Maybe ResolveActivity))
 -> Maybe WorkflowActivationJob'Variant
 -> f (Maybe WorkflowActivationJob'Variant))
-> ((ResolveActivity -> f ResolveActivity)
    -> Maybe ResolveActivity -> f (Maybe ResolveActivity))
-> (ResolveActivity -> f ResolveActivity)
-> Maybe WorkflowActivationJob'Variant
-> f (Maybe WorkflowActivationJob'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowActivationJob'Variant -> Maybe ResolveActivity)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe ResolveActivity -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe ResolveActivity)
     (Maybe ResolveActivity)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowActivationJob'Variant
x__
                 -> case Maybe WorkflowActivationJob'Variant
x__ of
                      (Prelude.Just (WorkflowActivationJob'ResolveActivity ResolveActivity
x__val))
                        -> ResolveActivity -> Maybe ResolveActivity
forall a. a -> Maybe a
Prelude.Just ResolveActivity
x__val
                      Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe ResolveActivity
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowActivationJob'Variant
_ Maybe ResolveActivity
y__
                 -> (ResolveActivity -> WorkflowActivationJob'Variant)
-> Maybe ResolveActivity -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ResolveActivity -> WorkflowActivationJob'Variant
WorkflowActivationJob'ResolveActivity Maybe ResolveActivity
y__))
           (ResolveActivity -> Lens' (Maybe ResolveActivity) ResolveActivity
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ResolveActivity
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "maybe'notifyHasPatch" (Prelude.Maybe NotifyHasPatch) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'notifyHasPatch"
-> (Maybe NotifyHasPatch -> f (Maybe NotifyHasPatch))
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "maybe'notifyHasPatch"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((Maybe NotifyHasPatch -> f (Maybe NotifyHasPatch))
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (Maybe NotifyHasPatch -> f (Maybe NotifyHasPatch))
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        ((Maybe WorkflowActivationJob'Variant -> Maybe NotifyHasPatch)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe NotifyHasPatch -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe NotifyHasPatch)
     (Maybe NotifyHasPatch)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowActivationJob'Variant
x__
              -> case Maybe WorkflowActivationJob'Variant
x__ of
                   (Prelude.Just (WorkflowActivationJob'NotifyHasPatch NotifyHasPatch
x__val))
                     -> NotifyHasPatch -> Maybe NotifyHasPatch
forall a. a -> Maybe a
Prelude.Just NotifyHasPatch
x__val
                   Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe NotifyHasPatch
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowActivationJob'Variant
_ Maybe NotifyHasPatch
y__ -> (NotifyHasPatch -> WorkflowActivationJob'Variant)
-> Maybe NotifyHasPatch -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap NotifyHasPatch -> WorkflowActivationJob'Variant
WorkflowActivationJob'NotifyHasPatch Maybe NotifyHasPatch
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "notifyHasPatch" NotifyHasPatch where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "notifyHasPatch"
-> (NotifyHasPatch -> f NotifyHasPatch)
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "notifyHasPatch"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((NotifyHasPatch -> f NotifyHasPatch)
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (NotifyHasPatch -> f NotifyHasPatch)
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        (((Maybe NotifyHasPatch -> f (Maybe NotifyHasPatch))
 -> Maybe WorkflowActivationJob'Variant
 -> f (Maybe WorkflowActivationJob'Variant))
-> ((NotifyHasPatch -> f NotifyHasPatch)
    -> Maybe NotifyHasPatch -> f (Maybe NotifyHasPatch))
-> (NotifyHasPatch -> f NotifyHasPatch)
-> Maybe WorkflowActivationJob'Variant
-> f (Maybe WorkflowActivationJob'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowActivationJob'Variant -> Maybe NotifyHasPatch)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe NotifyHasPatch -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe NotifyHasPatch)
     (Maybe NotifyHasPatch)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowActivationJob'Variant
x__
                 -> case Maybe WorkflowActivationJob'Variant
x__ of
                      (Prelude.Just (WorkflowActivationJob'NotifyHasPatch NotifyHasPatch
x__val))
                        -> NotifyHasPatch -> Maybe NotifyHasPatch
forall a. a -> Maybe a
Prelude.Just NotifyHasPatch
x__val
                      Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe NotifyHasPatch
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowActivationJob'Variant
_ Maybe NotifyHasPatch
y__ -> (NotifyHasPatch -> WorkflowActivationJob'Variant)
-> Maybe NotifyHasPatch -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap NotifyHasPatch -> WorkflowActivationJob'Variant
WorkflowActivationJob'NotifyHasPatch Maybe NotifyHasPatch
y__))
           (NotifyHasPatch -> Lens' (Maybe NotifyHasPatch) NotifyHasPatch
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NotifyHasPatch
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "maybe'resolveChildWorkflowExecutionStart" (Prelude.Maybe ResolveChildWorkflowExecutionStart) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'resolveChildWorkflowExecutionStart"
-> (Maybe ResolveChildWorkflowExecutionStart
    -> f (Maybe ResolveChildWorkflowExecutionStart))
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "maybe'resolveChildWorkflowExecutionStart"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((Maybe ResolveChildWorkflowExecutionStart
     -> f (Maybe ResolveChildWorkflowExecutionStart))
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (Maybe ResolveChildWorkflowExecutionStart
    -> f (Maybe ResolveChildWorkflowExecutionStart))
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        ((Maybe WorkflowActivationJob'Variant
 -> Maybe ResolveChildWorkflowExecutionStart)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe ResolveChildWorkflowExecutionStart
    -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe ResolveChildWorkflowExecutionStart)
     (Maybe ResolveChildWorkflowExecutionStart)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowActivationJob'Variant
x__
              -> case Maybe WorkflowActivationJob'Variant
x__ of
                   (Prelude.Just (WorkflowActivationJob'ResolveChildWorkflowExecutionStart ResolveChildWorkflowExecutionStart
x__val))
                     -> ResolveChildWorkflowExecutionStart
-> Maybe ResolveChildWorkflowExecutionStart
forall a. a -> Maybe a
Prelude.Just ResolveChildWorkflowExecutionStart
x__val
                   Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe ResolveChildWorkflowExecutionStart
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowActivationJob'Variant
_ Maybe ResolveChildWorkflowExecutionStart
y__
              -> (ResolveChildWorkflowExecutionStart
 -> WorkflowActivationJob'Variant)
-> Maybe ResolveChildWorkflowExecutionStart
-> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ResolveChildWorkflowExecutionStart -> WorkflowActivationJob'Variant
WorkflowActivationJob'ResolveChildWorkflowExecutionStart Maybe ResolveChildWorkflowExecutionStart
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "resolveChildWorkflowExecutionStart" ResolveChildWorkflowExecutionStart where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "resolveChildWorkflowExecutionStart"
-> (ResolveChildWorkflowExecutionStart
    -> f ResolveChildWorkflowExecutionStart)
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "resolveChildWorkflowExecutionStart"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((ResolveChildWorkflowExecutionStart
     -> f ResolveChildWorkflowExecutionStart)
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (ResolveChildWorkflowExecutionStart
    -> f ResolveChildWorkflowExecutionStart)
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        (((Maybe ResolveChildWorkflowExecutionStart
  -> f (Maybe ResolveChildWorkflowExecutionStart))
 -> Maybe WorkflowActivationJob'Variant
 -> f (Maybe WorkflowActivationJob'Variant))
-> ((ResolveChildWorkflowExecutionStart
     -> f ResolveChildWorkflowExecutionStart)
    -> Maybe ResolveChildWorkflowExecutionStart
    -> f (Maybe ResolveChildWorkflowExecutionStart))
-> (ResolveChildWorkflowExecutionStart
    -> f ResolveChildWorkflowExecutionStart)
-> Maybe WorkflowActivationJob'Variant
-> f (Maybe WorkflowActivationJob'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowActivationJob'Variant
 -> Maybe ResolveChildWorkflowExecutionStart)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe ResolveChildWorkflowExecutionStart
    -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe ResolveChildWorkflowExecutionStart)
     (Maybe ResolveChildWorkflowExecutionStart)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowActivationJob'Variant
x__
                 -> case Maybe WorkflowActivationJob'Variant
x__ of
                      (Prelude.Just (WorkflowActivationJob'ResolveChildWorkflowExecutionStart ResolveChildWorkflowExecutionStart
x__val))
                        -> ResolveChildWorkflowExecutionStart
-> Maybe ResolveChildWorkflowExecutionStart
forall a. a -> Maybe a
Prelude.Just ResolveChildWorkflowExecutionStart
x__val
                      Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe ResolveChildWorkflowExecutionStart
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowActivationJob'Variant
_ Maybe ResolveChildWorkflowExecutionStart
y__
                 -> (ResolveChildWorkflowExecutionStart
 -> WorkflowActivationJob'Variant)
-> Maybe ResolveChildWorkflowExecutionStart
-> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ResolveChildWorkflowExecutionStart -> WorkflowActivationJob'Variant
WorkflowActivationJob'ResolveChildWorkflowExecutionStart Maybe ResolveChildWorkflowExecutionStart
y__))
           (ResolveChildWorkflowExecutionStart
-> Lens'
     (Maybe ResolveChildWorkflowExecutionStart)
     ResolveChildWorkflowExecutionStart
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ResolveChildWorkflowExecutionStart
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "maybe'resolveChildWorkflowExecution" (Prelude.Maybe ResolveChildWorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'resolveChildWorkflowExecution"
-> (Maybe ResolveChildWorkflowExecution
    -> f (Maybe ResolveChildWorkflowExecution))
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "maybe'resolveChildWorkflowExecution"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((Maybe ResolveChildWorkflowExecution
     -> f (Maybe ResolveChildWorkflowExecution))
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (Maybe ResolveChildWorkflowExecution
    -> f (Maybe ResolveChildWorkflowExecution))
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        ((Maybe WorkflowActivationJob'Variant
 -> Maybe ResolveChildWorkflowExecution)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe ResolveChildWorkflowExecution
    -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe ResolveChildWorkflowExecution)
     (Maybe ResolveChildWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowActivationJob'Variant
x__
              -> case Maybe WorkflowActivationJob'Variant
x__ of
                   (Prelude.Just (WorkflowActivationJob'ResolveChildWorkflowExecution ResolveChildWorkflowExecution
x__val))
                     -> ResolveChildWorkflowExecution
-> Maybe ResolveChildWorkflowExecution
forall a. a -> Maybe a
Prelude.Just ResolveChildWorkflowExecution
x__val
                   Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe ResolveChildWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowActivationJob'Variant
_ Maybe ResolveChildWorkflowExecution
y__
              -> (ResolveChildWorkflowExecution -> WorkflowActivationJob'Variant)
-> Maybe ResolveChildWorkflowExecution
-> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ResolveChildWorkflowExecution -> WorkflowActivationJob'Variant
WorkflowActivationJob'ResolveChildWorkflowExecution Maybe ResolveChildWorkflowExecution
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "resolveChildWorkflowExecution" ResolveChildWorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "resolveChildWorkflowExecution"
-> (ResolveChildWorkflowExecution
    -> f ResolveChildWorkflowExecution)
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "resolveChildWorkflowExecution"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((ResolveChildWorkflowExecution
     -> f ResolveChildWorkflowExecution)
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (ResolveChildWorkflowExecution
    -> f ResolveChildWorkflowExecution)
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        (((Maybe ResolveChildWorkflowExecution
  -> f (Maybe ResolveChildWorkflowExecution))
 -> Maybe WorkflowActivationJob'Variant
 -> f (Maybe WorkflowActivationJob'Variant))
-> ((ResolveChildWorkflowExecution
     -> f ResolveChildWorkflowExecution)
    -> Maybe ResolveChildWorkflowExecution
    -> f (Maybe ResolveChildWorkflowExecution))
-> (ResolveChildWorkflowExecution
    -> f ResolveChildWorkflowExecution)
-> Maybe WorkflowActivationJob'Variant
-> f (Maybe WorkflowActivationJob'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowActivationJob'Variant
 -> Maybe ResolveChildWorkflowExecution)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe ResolveChildWorkflowExecution
    -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe ResolveChildWorkflowExecution)
     (Maybe ResolveChildWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowActivationJob'Variant
x__
                 -> case Maybe WorkflowActivationJob'Variant
x__ of
                      (Prelude.Just (WorkflowActivationJob'ResolveChildWorkflowExecution ResolveChildWorkflowExecution
x__val))
                        -> ResolveChildWorkflowExecution
-> Maybe ResolveChildWorkflowExecution
forall a. a -> Maybe a
Prelude.Just ResolveChildWorkflowExecution
x__val
                      Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe ResolveChildWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowActivationJob'Variant
_ Maybe ResolveChildWorkflowExecution
y__
                 -> (ResolveChildWorkflowExecution -> WorkflowActivationJob'Variant)
-> Maybe ResolveChildWorkflowExecution
-> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ResolveChildWorkflowExecution -> WorkflowActivationJob'Variant
WorkflowActivationJob'ResolveChildWorkflowExecution Maybe ResolveChildWorkflowExecution
y__))
           (ResolveChildWorkflowExecution
-> Lens'
     (Maybe ResolveChildWorkflowExecution) ResolveChildWorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ResolveChildWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "maybe'resolveSignalExternalWorkflow" (Prelude.Maybe ResolveSignalExternalWorkflow) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'resolveSignalExternalWorkflow"
-> (Maybe ResolveSignalExternalWorkflow
    -> f (Maybe ResolveSignalExternalWorkflow))
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "maybe'resolveSignalExternalWorkflow"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((Maybe ResolveSignalExternalWorkflow
     -> f (Maybe ResolveSignalExternalWorkflow))
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (Maybe ResolveSignalExternalWorkflow
    -> f (Maybe ResolveSignalExternalWorkflow))
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        ((Maybe WorkflowActivationJob'Variant
 -> Maybe ResolveSignalExternalWorkflow)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe ResolveSignalExternalWorkflow
    -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe ResolveSignalExternalWorkflow)
     (Maybe ResolveSignalExternalWorkflow)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowActivationJob'Variant
x__
              -> case Maybe WorkflowActivationJob'Variant
x__ of
                   (Prelude.Just (WorkflowActivationJob'ResolveSignalExternalWorkflow ResolveSignalExternalWorkflow
x__val))
                     -> ResolveSignalExternalWorkflow
-> Maybe ResolveSignalExternalWorkflow
forall a. a -> Maybe a
Prelude.Just ResolveSignalExternalWorkflow
x__val
                   Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe ResolveSignalExternalWorkflow
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowActivationJob'Variant
_ Maybe ResolveSignalExternalWorkflow
y__
              -> (ResolveSignalExternalWorkflow -> WorkflowActivationJob'Variant)
-> Maybe ResolveSignalExternalWorkflow
-> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ResolveSignalExternalWorkflow -> WorkflowActivationJob'Variant
WorkflowActivationJob'ResolveSignalExternalWorkflow Maybe ResolveSignalExternalWorkflow
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "resolveSignalExternalWorkflow" ResolveSignalExternalWorkflow where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "resolveSignalExternalWorkflow"
-> (ResolveSignalExternalWorkflow
    -> f ResolveSignalExternalWorkflow)
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "resolveSignalExternalWorkflow"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((ResolveSignalExternalWorkflow
     -> f ResolveSignalExternalWorkflow)
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (ResolveSignalExternalWorkflow
    -> f ResolveSignalExternalWorkflow)
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        (((Maybe ResolveSignalExternalWorkflow
  -> f (Maybe ResolveSignalExternalWorkflow))
 -> Maybe WorkflowActivationJob'Variant
 -> f (Maybe WorkflowActivationJob'Variant))
-> ((ResolveSignalExternalWorkflow
     -> f ResolveSignalExternalWorkflow)
    -> Maybe ResolveSignalExternalWorkflow
    -> f (Maybe ResolveSignalExternalWorkflow))
-> (ResolveSignalExternalWorkflow
    -> f ResolveSignalExternalWorkflow)
-> Maybe WorkflowActivationJob'Variant
-> f (Maybe WorkflowActivationJob'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowActivationJob'Variant
 -> Maybe ResolveSignalExternalWorkflow)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe ResolveSignalExternalWorkflow
    -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe ResolveSignalExternalWorkflow)
     (Maybe ResolveSignalExternalWorkflow)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowActivationJob'Variant
x__
                 -> case Maybe WorkflowActivationJob'Variant
x__ of
                      (Prelude.Just (WorkflowActivationJob'ResolveSignalExternalWorkflow ResolveSignalExternalWorkflow
x__val))
                        -> ResolveSignalExternalWorkflow
-> Maybe ResolveSignalExternalWorkflow
forall a. a -> Maybe a
Prelude.Just ResolveSignalExternalWorkflow
x__val
                      Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe ResolveSignalExternalWorkflow
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowActivationJob'Variant
_ Maybe ResolveSignalExternalWorkflow
y__
                 -> (ResolveSignalExternalWorkflow -> WorkflowActivationJob'Variant)
-> Maybe ResolveSignalExternalWorkflow
-> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ResolveSignalExternalWorkflow -> WorkflowActivationJob'Variant
WorkflowActivationJob'ResolveSignalExternalWorkflow Maybe ResolveSignalExternalWorkflow
y__))
           (ResolveSignalExternalWorkflow
-> Lens'
     (Maybe ResolveSignalExternalWorkflow) ResolveSignalExternalWorkflow
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ResolveSignalExternalWorkflow
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "maybe'resolveRequestCancelExternalWorkflow" (Prelude.Maybe ResolveRequestCancelExternalWorkflow) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'resolveRequestCancelExternalWorkflow"
-> (Maybe ResolveRequestCancelExternalWorkflow
    -> f (Maybe ResolveRequestCancelExternalWorkflow))
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "maybe'resolveRequestCancelExternalWorkflow"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((Maybe ResolveRequestCancelExternalWorkflow
     -> f (Maybe ResolveRequestCancelExternalWorkflow))
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (Maybe ResolveRequestCancelExternalWorkflow
    -> f (Maybe ResolveRequestCancelExternalWorkflow))
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        ((Maybe WorkflowActivationJob'Variant
 -> Maybe ResolveRequestCancelExternalWorkflow)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe ResolveRequestCancelExternalWorkflow
    -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe ResolveRequestCancelExternalWorkflow)
     (Maybe ResolveRequestCancelExternalWorkflow)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowActivationJob'Variant
x__
              -> case Maybe WorkflowActivationJob'Variant
x__ of
                   (Prelude.Just (WorkflowActivationJob'ResolveRequestCancelExternalWorkflow ResolveRequestCancelExternalWorkflow
x__val))
                     -> ResolveRequestCancelExternalWorkflow
-> Maybe ResolveRequestCancelExternalWorkflow
forall a. a -> Maybe a
Prelude.Just ResolveRequestCancelExternalWorkflow
x__val
                   Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe ResolveRequestCancelExternalWorkflow
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowActivationJob'Variant
_ Maybe ResolveRequestCancelExternalWorkflow
y__
              -> (ResolveRequestCancelExternalWorkflow
 -> WorkflowActivationJob'Variant)
-> Maybe ResolveRequestCancelExternalWorkflow
-> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ResolveRequestCancelExternalWorkflow
-> WorkflowActivationJob'Variant
WorkflowActivationJob'ResolveRequestCancelExternalWorkflow Maybe ResolveRequestCancelExternalWorkflow
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "resolveRequestCancelExternalWorkflow" ResolveRequestCancelExternalWorkflow where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "resolveRequestCancelExternalWorkflow"
-> (ResolveRequestCancelExternalWorkflow
    -> f ResolveRequestCancelExternalWorkflow)
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "resolveRequestCancelExternalWorkflow"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((ResolveRequestCancelExternalWorkflow
     -> f ResolveRequestCancelExternalWorkflow)
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (ResolveRequestCancelExternalWorkflow
    -> f ResolveRequestCancelExternalWorkflow)
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        (((Maybe ResolveRequestCancelExternalWorkflow
  -> f (Maybe ResolveRequestCancelExternalWorkflow))
 -> Maybe WorkflowActivationJob'Variant
 -> f (Maybe WorkflowActivationJob'Variant))
-> ((ResolveRequestCancelExternalWorkflow
     -> f ResolveRequestCancelExternalWorkflow)
    -> Maybe ResolveRequestCancelExternalWorkflow
    -> f (Maybe ResolveRequestCancelExternalWorkflow))
-> (ResolveRequestCancelExternalWorkflow
    -> f ResolveRequestCancelExternalWorkflow)
-> Maybe WorkflowActivationJob'Variant
-> f (Maybe WorkflowActivationJob'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowActivationJob'Variant
 -> Maybe ResolveRequestCancelExternalWorkflow)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe ResolveRequestCancelExternalWorkflow
    -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe ResolveRequestCancelExternalWorkflow)
     (Maybe ResolveRequestCancelExternalWorkflow)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowActivationJob'Variant
x__
                 -> case Maybe WorkflowActivationJob'Variant
x__ of
                      (Prelude.Just (WorkflowActivationJob'ResolveRequestCancelExternalWorkflow ResolveRequestCancelExternalWorkflow
x__val))
                        -> ResolveRequestCancelExternalWorkflow
-> Maybe ResolveRequestCancelExternalWorkflow
forall a. a -> Maybe a
Prelude.Just ResolveRequestCancelExternalWorkflow
x__val
                      Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe ResolveRequestCancelExternalWorkflow
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowActivationJob'Variant
_ Maybe ResolveRequestCancelExternalWorkflow
y__
                 -> (ResolveRequestCancelExternalWorkflow
 -> WorkflowActivationJob'Variant)
-> Maybe ResolveRequestCancelExternalWorkflow
-> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ResolveRequestCancelExternalWorkflow
-> WorkflowActivationJob'Variant
WorkflowActivationJob'ResolveRequestCancelExternalWorkflow Maybe ResolveRequestCancelExternalWorkflow
y__))
           (ResolveRequestCancelExternalWorkflow
-> Lens'
     (Maybe ResolveRequestCancelExternalWorkflow)
     ResolveRequestCancelExternalWorkflow
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ResolveRequestCancelExternalWorkflow
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "maybe'doUpdate" (Prelude.Maybe DoUpdate) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'doUpdate"
-> (Maybe DoUpdate -> f (Maybe DoUpdate))
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "maybe'doUpdate"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((Maybe DoUpdate -> f (Maybe DoUpdate))
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (Maybe DoUpdate -> f (Maybe DoUpdate))
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        ((Maybe WorkflowActivationJob'Variant -> Maybe DoUpdate)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe DoUpdate -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe DoUpdate)
     (Maybe DoUpdate)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowActivationJob'Variant
x__
              -> case Maybe WorkflowActivationJob'Variant
x__ of
                   (Prelude.Just (WorkflowActivationJob'DoUpdate DoUpdate
x__val))
                     -> DoUpdate -> Maybe DoUpdate
forall a. a -> Maybe a
Prelude.Just DoUpdate
x__val
                   Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe DoUpdate
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowActivationJob'Variant
_ Maybe DoUpdate
y__ -> (DoUpdate -> WorkflowActivationJob'Variant)
-> Maybe DoUpdate -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap DoUpdate -> WorkflowActivationJob'Variant
WorkflowActivationJob'DoUpdate Maybe DoUpdate
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "doUpdate" DoUpdate where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "doUpdate"
-> (DoUpdate -> f DoUpdate)
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "doUpdate"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((DoUpdate -> f DoUpdate)
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (DoUpdate -> f DoUpdate)
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        (((Maybe DoUpdate -> f (Maybe DoUpdate))
 -> Maybe WorkflowActivationJob'Variant
 -> f (Maybe WorkflowActivationJob'Variant))
-> ((DoUpdate -> f DoUpdate)
    -> Maybe DoUpdate -> f (Maybe DoUpdate))
-> (DoUpdate -> f DoUpdate)
-> Maybe WorkflowActivationJob'Variant
-> f (Maybe WorkflowActivationJob'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowActivationJob'Variant -> Maybe DoUpdate)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe DoUpdate -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe DoUpdate)
     (Maybe DoUpdate)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowActivationJob'Variant
x__
                 -> case Maybe WorkflowActivationJob'Variant
x__ of
                      (Prelude.Just (WorkflowActivationJob'DoUpdate DoUpdate
x__val))
                        -> DoUpdate -> Maybe DoUpdate
forall a. a -> Maybe a
Prelude.Just DoUpdate
x__val
                      Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe DoUpdate
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowActivationJob'Variant
_ Maybe DoUpdate
y__ -> (DoUpdate -> WorkflowActivationJob'Variant)
-> Maybe DoUpdate -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap DoUpdate -> WorkflowActivationJob'Variant
WorkflowActivationJob'DoUpdate Maybe DoUpdate
y__))
           (DoUpdate -> Lens' (Maybe DoUpdate) DoUpdate
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens DoUpdate
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "maybe'removeFromCache" (Prelude.Maybe RemoveFromCache) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'removeFromCache"
-> (Maybe RemoveFromCache -> f (Maybe RemoveFromCache))
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "maybe'removeFromCache"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((Maybe RemoveFromCache -> f (Maybe RemoveFromCache))
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (Maybe RemoveFromCache -> f (Maybe RemoveFromCache))
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        ((Maybe WorkflowActivationJob'Variant -> Maybe RemoveFromCache)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe RemoveFromCache -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe RemoveFromCache)
     (Maybe RemoveFromCache)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowActivationJob'Variant
x__
              -> case Maybe WorkflowActivationJob'Variant
x__ of
                   (Prelude.Just (WorkflowActivationJob'RemoveFromCache RemoveFromCache
x__val))
                     -> RemoveFromCache -> Maybe RemoveFromCache
forall a. a -> Maybe a
Prelude.Just RemoveFromCache
x__val
                   Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe RemoveFromCache
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowActivationJob'Variant
_ Maybe RemoveFromCache
y__
              -> (RemoveFromCache -> WorkflowActivationJob'Variant)
-> Maybe RemoveFromCache -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap RemoveFromCache -> WorkflowActivationJob'Variant
WorkflowActivationJob'RemoveFromCache Maybe RemoveFromCache
y__))
instance Data.ProtoLens.Field.HasField WorkflowActivationJob "removeFromCache" RemoveFromCache where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "removeFromCache"
-> (RemoveFromCache -> f RemoveFromCache)
-> WorkflowActivationJob
-> f WorkflowActivationJob
fieldOf Proxy# "removeFromCache"
_
    = ((Maybe WorkflowActivationJob'Variant
  -> f (Maybe WorkflowActivationJob'Variant))
 -> WorkflowActivationJob -> f WorkflowActivationJob)
-> ((RemoveFromCache -> f RemoveFromCache)
    -> Maybe WorkflowActivationJob'Variant
    -> f (Maybe WorkflowActivationJob'Variant))
-> (RemoveFromCache -> f RemoveFromCache)
-> WorkflowActivationJob
-> f WorkflowActivationJob
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant)
-> (WorkflowActivationJob
    -> Maybe WorkflowActivationJob'Variant -> WorkflowActivationJob)
-> Lens
     WorkflowActivationJob
     WorkflowActivationJob
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant
           (\ WorkflowActivationJob
x__ Maybe WorkflowActivationJob'Variant
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'variant = y__}))
        (((Maybe RemoveFromCache -> f (Maybe RemoveFromCache))
 -> Maybe WorkflowActivationJob'Variant
 -> f (Maybe WorkflowActivationJob'Variant))
-> ((RemoveFromCache -> f RemoveFromCache)
    -> Maybe RemoveFromCache -> f (Maybe RemoveFromCache))
-> (RemoveFromCache -> f RemoveFromCache)
-> Maybe WorkflowActivationJob'Variant
-> f (Maybe WorkflowActivationJob'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowActivationJob'Variant -> Maybe RemoveFromCache)
-> (Maybe WorkflowActivationJob'Variant
    -> Maybe RemoveFromCache -> Maybe WorkflowActivationJob'Variant)
-> Lens
     (Maybe WorkflowActivationJob'Variant)
     (Maybe WorkflowActivationJob'Variant)
     (Maybe RemoveFromCache)
     (Maybe RemoveFromCache)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowActivationJob'Variant
x__
                 -> case Maybe WorkflowActivationJob'Variant
x__ of
                      (Prelude.Just (WorkflowActivationJob'RemoveFromCache RemoveFromCache
x__val))
                        -> RemoveFromCache -> Maybe RemoveFromCache
forall a. a -> Maybe a
Prelude.Just RemoveFromCache
x__val
                      Maybe WorkflowActivationJob'Variant
_otherwise -> Maybe RemoveFromCache
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowActivationJob'Variant
_ Maybe RemoveFromCache
y__
                 -> (RemoveFromCache -> WorkflowActivationJob'Variant)
-> Maybe RemoveFromCache -> Maybe WorkflowActivationJob'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap RemoveFromCache -> WorkflowActivationJob'Variant
WorkflowActivationJob'RemoveFromCache Maybe RemoveFromCache
y__))
           (RemoveFromCache -> Lens' (Maybe RemoveFromCache) RemoveFromCache
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens RemoveFromCache
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message WorkflowActivationJob where
  messageName :: Proxy WorkflowActivationJob -> Text
messageName Proxy WorkflowActivationJob
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_activation.WorkflowActivationJob"
  packedMessageDescriptor :: Proxy WorkflowActivationJob -> ByteString
packedMessageDescriptor Proxy WorkflowActivationJob
_
    = ByteString
"\n\
      \\NAKWorkflowActivationJob\DC2S\n\
      \\SOstart_workflow\CAN\SOH \SOH(\v2*.coresdk.workflow_activation.StartWorkflowH\NULR\rstartWorkflow\DC2G\n\
      \\n\
      \fire_timer\CAN\STX \SOH(\v2&.coresdk.workflow_activation.FireTimerH\NULR\tfireTimer\DC2]\n\
      \\DC2update_random_seed\CAN\EOT \SOH(\v2-.coresdk.workflow_activation.UpdateRandomSeedH\NULR\DLEupdateRandomSeed\DC2S\n\
      \\SOquery_workflow\CAN\ENQ \SOH(\v2*.coresdk.workflow_activation.QueryWorkflowH\NULR\rqueryWorkflow\DC2V\n\
      \\SIcancel_workflow\CAN\ACK \SOH(\v2+.coresdk.workflow_activation.CancelWorkflowH\NULR\SOcancelWorkflow\DC2V\n\
      \\SIsignal_workflow\CAN\a \SOH(\v2+.coresdk.workflow_activation.SignalWorkflowH\NULR\SOsignalWorkflow\DC2Y\n\
      \\DLEresolve_activity\CAN\b \SOH(\v2,.coresdk.workflow_activation.ResolveActivityH\NULR\SIresolveActivity\DC2W\n\
      \\DLEnotify_has_patch\CAN\t \SOH(\v2+.coresdk.workflow_activation.NotifyHasPatchH\NULR\SOnotifyHasPatch\DC2\149\SOH\n\
      \&resolve_child_workflow_execution_start\CAN\n\
      \ \SOH(\v2?.coresdk.workflow_activation.ResolveChildWorkflowExecutionStartH\NULR\"resolveChildWorkflowExecutionStart\DC2\133\SOH\n\
      \ resolve_child_workflow_execution\CAN\v \SOH(\v2:.coresdk.workflow_activation.ResolveChildWorkflowExecutionH\NULR\GSresolveChildWorkflowExecution\DC2\133\SOH\n\
      \ resolve_signal_external_workflow\CAN\f \SOH(\v2:.coresdk.workflow_activation.ResolveSignalExternalWorkflowH\NULR\GSresolveSignalExternalWorkflow\DC2\155\SOH\n\
      \(resolve_request_cancel_external_workflow\CAN\r \SOH(\v2A.coresdk.workflow_activation.ResolveRequestCancelExternalWorkflowH\NULR$resolveRequestCancelExternalWorkflow\DC2D\n\
      \\tdo_update\CAN\SO \SOH(\v2%.coresdk.workflow_activation.DoUpdateH\NULR\bdoUpdate\DC2Z\n\
      \\DC1remove_from_cache\CAN2 \SOH(\v2,.coresdk.workflow_activation.RemoveFromCacheH\NULR\SIremoveFromCacheB\t\n\
      \\avariant"
  packedFileDescriptor :: Proxy WorkflowActivationJob -> ByteString
packedFileDescriptor Proxy WorkflowActivationJob
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor WorkflowActivationJob)
fieldsByTag
    = let
        startWorkflow__field_descriptor :: FieldDescriptor WorkflowActivationJob
startWorkflow__field_descriptor
          = String
-> FieldTypeDescriptor StartWorkflow
-> FieldAccessor WorkflowActivationJob StartWorkflow
-> FieldDescriptor WorkflowActivationJob
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_workflow"
              (MessageOrGroup -> FieldTypeDescriptor StartWorkflow
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor StartWorkflow)
              (Lens' WorkflowActivationJob (Maybe StartWorkflow)
-> FieldAccessor WorkflowActivationJob StartWorkflow
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'startWorkflow")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivationJob
        fireTimer__field_descriptor :: FieldDescriptor WorkflowActivationJob
fireTimer__field_descriptor
          = String
-> FieldTypeDescriptor FireTimer
-> FieldAccessor WorkflowActivationJob FireTimer
-> FieldDescriptor WorkflowActivationJob
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"fire_timer"
              (MessageOrGroup -> FieldTypeDescriptor FireTimer
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor FireTimer)
              (Lens' WorkflowActivationJob (Maybe FireTimer)
-> FieldAccessor WorkflowActivationJob FireTimer
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'fireTimer")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivationJob
        updateRandomSeed__field_descriptor :: FieldDescriptor WorkflowActivationJob
updateRandomSeed__field_descriptor
          = String
-> FieldTypeDescriptor UpdateRandomSeed
-> FieldAccessor WorkflowActivationJob UpdateRandomSeed
-> FieldDescriptor WorkflowActivationJob
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"update_random_seed"
              (MessageOrGroup -> FieldTypeDescriptor UpdateRandomSeed
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpdateRandomSeed)
              (Lens' WorkflowActivationJob (Maybe UpdateRandomSeed)
-> FieldAccessor WorkflowActivationJob UpdateRandomSeed
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'updateRandomSeed")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivationJob
        queryWorkflow__field_descriptor :: FieldDescriptor WorkflowActivationJob
queryWorkflow__field_descriptor
          = String
-> FieldTypeDescriptor QueryWorkflow
-> FieldAccessor WorkflowActivationJob QueryWorkflow
-> FieldDescriptor WorkflowActivationJob
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"query_workflow"
              (MessageOrGroup -> FieldTypeDescriptor QueryWorkflow
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor QueryWorkflow)
              (Lens' WorkflowActivationJob (Maybe QueryWorkflow)
-> FieldAccessor WorkflowActivationJob QueryWorkflow
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'queryWorkflow")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivationJob
        cancelWorkflow__field_descriptor :: FieldDescriptor WorkflowActivationJob
cancelWorkflow__field_descriptor
          = String
-> FieldTypeDescriptor CancelWorkflow
-> FieldAccessor WorkflowActivationJob CancelWorkflow
-> FieldDescriptor WorkflowActivationJob
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cancel_workflow"
              (MessageOrGroup -> FieldTypeDescriptor CancelWorkflow
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor CancelWorkflow)
              (Lens' WorkflowActivationJob (Maybe CancelWorkflow)
-> FieldAccessor WorkflowActivationJob CancelWorkflow
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'cancelWorkflow")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivationJob
        signalWorkflow__field_descriptor :: FieldDescriptor WorkflowActivationJob
signalWorkflow__field_descriptor
          = String
-> FieldTypeDescriptor SignalWorkflow
-> FieldAccessor WorkflowActivationJob SignalWorkflow
-> FieldDescriptor WorkflowActivationJob
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"signal_workflow"
              (MessageOrGroup -> FieldTypeDescriptor SignalWorkflow
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor SignalWorkflow)
              (Lens' WorkflowActivationJob (Maybe SignalWorkflow)
-> FieldAccessor WorkflowActivationJob SignalWorkflow
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'signalWorkflow")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivationJob
        resolveActivity__field_descriptor :: FieldDescriptor WorkflowActivationJob
resolveActivity__field_descriptor
          = String
-> FieldTypeDescriptor ResolveActivity
-> FieldAccessor WorkflowActivationJob ResolveActivity
-> FieldDescriptor WorkflowActivationJob
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"resolve_activity"
              (MessageOrGroup -> FieldTypeDescriptor ResolveActivity
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ResolveActivity)
              (Lens' WorkflowActivationJob (Maybe ResolveActivity)
-> FieldAccessor WorkflowActivationJob ResolveActivity
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'resolveActivity")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivationJob
        notifyHasPatch__field_descriptor :: FieldDescriptor WorkflowActivationJob
notifyHasPatch__field_descriptor
          = String
-> FieldTypeDescriptor NotifyHasPatch
-> FieldAccessor WorkflowActivationJob NotifyHasPatch
-> FieldDescriptor WorkflowActivationJob
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"notify_has_patch"
              (MessageOrGroup -> FieldTypeDescriptor NotifyHasPatch
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor NotifyHasPatch)
              (Lens' WorkflowActivationJob (Maybe NotifyHasPatch)
-> FieldAccessor WorkflowActivationJob NotifyHasPatch
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'notifyHasPatch")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivationJob
        resolveChildWorkflowExecutionStart__field_descriptor :: FieldDescriptor WorkflowActivationJob
resolveChildWorkflowExecutionStart__field_descriptor
          = String
-> FieldTypeDescriptor ResolveChildWorkflowExecutionStart
-> FieldAccessor
     WorkflowActivationJob ResolveChildWorkflowExecutionStart
-> FieldDescriptor WorkflowActivationJob
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"resolve_child_workflow_execution_start"
              (MessageOrGroup
-> FieldTypeDescriptor ResolveChildWorkflowExecutionStart
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ResolveChildWorkflowExecutionStart)
              (Lens'
  WorkflowActivationJob (Maybe ResolveChildWorkflowExecutionStart)
-> FieldAccessor
     WorkflowActivationJob ResolveChildWorkflowExecutionStart
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'resolveChildWorkflowExecutionStart")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivationJob
        resolveChildWorkflowExecution__field_descriptor :: FieldDescriptor WorkflowActivationJob
resolveChildWorkflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor ResolveChildWorkflowExecution
-> FieldAccessor
     WorkflowActivationJob ResolveChildWorkflowExecution
-> FieldDescriptor WorkflowActivationJob
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"resolve_child_workflow_execution"
              (MessageOrGroup -> FieldTypeDescriptor ResolveChildWorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ResolveChildWorkflowExecution)
              (Lens' WorkflowActivationJob (Maybe ResolveChildWorkflowExecution)
-> FieldAccessor
     WorkflowActivationJob ResolveChildWorkflowExecution
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'resolveChildWorkflowExecution")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivationJob
        resolveSignalExternalWorkflow__field_descriptor :: FieldDescriptor WorkflowActivationJob
resolveSignalExternalWorkflow__field_descriptor
          = String
-> FieldTypeDescriptor ResolveSignalExternalWorkflow
-> FieldAccessor
     WorkflowActivationJob ResolveSignalExternalWorkflow
-> FieldDescriptor WorkflowActivationJob
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"resolve_signal_external_workflow"
              (MessageOrGroup -> FieldTypeDescriptor ResolveSignalExternalWorkflow
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ResolveSignalExternalWorkflow)
              (Lens' WorkflowActivationJob (Maybe ResolveSignalExternalWorkflow)
-> FieldAccessor
     WorkflowActivationJob ResolveSignalExternalWorkflow
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'resolveSignalExternalWorkflow")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivationJob
        resolveRequestCancelExternalWorkflow__field_descriptor :: FieldDescriptor WorkflowActivationJob
resolveRequestCancelExternalWorkflow__field_descriptor
          = String
-> FieldTypeDescriptor ResolveRequestCancelExternalWorkflow
-> FieldAccessor
     WorkflowActivationJob ResolveRequestCancelExternalWorkflow
-> FieldDescriptor WorkflowActivationJob
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"resolve_request_cancel_external_workflow"
              (MessageOrGroup
-> FieldTypeDescriptor ResolveRequestCancelExternalWorkflow
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ResolveRequestCancelExternalWorkflow)
              (Lens'
  WorkflowActivationJob (Maybe ResolveRequestCancelExternalWorkflow)
-> FieldAccessor
     WorkflowActivationJob ResolveRequestCancelExternalWorkflow
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'resolveRequestCancelExternalWorkflow")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivationJob
        doUpdate__field_descriptor :: FieldDescriptor WorkflowActivationJob
doUpdate__field_descriptor
          = String
-> FieldTypeDescriptor DoUpdate
-> FieldAccessor WorkflowActivationJob DoUpdate
-> FieldDescriptor WorkflowActivationJob
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"do_update"
              (MessageOrGroup -> FieldTypeDescriptor DoUpdate
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor DoUpdate)
              (Lens' WorkflowActivationJob (Maybe DoUpdate)
-> FieldAccessor WorkflowActivationJob DoUpdate
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'doUpdate")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivationJob
        removeFromCache__field_descriptor :: FieldDescriptor WorkflowActivationJob
removeFromCache__field_descriptor
          = String
-> FieldTypeDescriptor RemoveFromCache
-> FieldAccessor WorkflowActivationJob RemoveFromCache
-> FieldDescriptor WorkflowActivationJob
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"remove_from_cache"
              (MessageOrGroup -> FieldTypeDescriptor RemoveFromCache
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor RemoveFromCache)
              (Lens' WorkflowActivationJob (Maybe RemoveFromCache)
-> FieldAccessor WorkflowActivationJob RemoveFromCache
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'removeFromCache")) ::
              Data.ProtoLens.FieldDescriptor WorkflowActivationJob
      in
        [(Tag, FieldDescriptor WorkflowActivationJob)]
-> Map Tag (FieldDescriptor WorkflowActivationJob)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowActivationJob
startWorkflow__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowActivationJob
fireTimer__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor WorkflowActivationJob
updateRandomSeed__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor WorkflowActivationJob
queryWorkflow__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor WorkflowActivationJob
cancelWorkflow__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor WorkflowActivationJob
signalWorkflow__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor WorkflowActivationJob
resolveActivity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor WorkflowActivationJob
notifyHasPatch__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, 
            FieldDescriptor WorkflowActivationJob
resolveChildWorkflowExecutionStart__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, 
            FieldDescriptor WorkflowActivationJob
resolveChildWorkflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, 
            FieldDescriptor WorkflowActivationJob
resolveSignalExternalWorkflow__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, 
            FieldDescriptor WorkflowActivationJob
resolveRequestCancelExternalWorkflow__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
14, FieldDescriptor WorkflowActivationJob
doUpdate__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
50, FieldDescriptor WorkflowActivationJob
removeFromCache__field_descriptor)]
  unknownFields :: Lens' WorkflowActivationJob FieldSet
unknownFields
    = (WorkflowActivationJob -> FieldSet)
-> (WorkflowActivationJob -> FieldSet -> WorkflowActivationJob)
-> Lens' WorkflowActivationJob FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowActivationJob -> FieldSet
_WorkflowActivationJob'_unknownFields
        (\ WorkflowActivationJob
x__ FieldSet
y__ -> WorkflowActivationJob
x__ {_WorkflowActivationJob'_unknownFields = y__})
  defMessage :: WorkflowActivationJob
defMessage
    = WorkflowActivationJob'_constructor
        {_WorkflowActivationJob'variant :: Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant = Maybe WorkflowActivationJob'Variant
forall a. Maybe a
Prelude.Nothing,
         _WorkflowActivationJob'_unknownFields :: FieldSet
_WorkflowActivationJob'_unknownFields = []}
  parseMessage :: Parser WorkflowActivationJob
parseMessage
    = let
        loop ::
          WorkflowActivationJob
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowActivationJob
        loop :: WorkflowActivationJob -> Parser WorkflowActivationJob
loop WorkflowActivationJob
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 StartWorkflow -> String -> Parser StartWorkflow
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_workflow"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startWorkflow") y x)
                        Word64
18
                          -> do y <- Parser FireTimer -> String -> Parser FireTimer
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
"fire_timer"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"fireTimer") y x)
                        Word64
34
                          -> do y <- Parser UpdateRandomSeed -> String -> Parser UpdateRandomSeed
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
"update_random_seed"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"updateRandomSeed") y x)
                        Word64
42
                          -> do y <- Parser QueryWorkflow -> String -> Parser QueryWorkflow
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
"query_workflow"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"queryWorkflow") y x)
                        Word64
50
                          -> do y <- Parser CancelWorkflow -> String -> Parser CancelWorkflow
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
"cancel_workflow"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cancelWorkflow") y x)
                        Word64
58
                          -> do y <- Parser SignalWorkflow -> String -> Parser SignalWorkflow
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_workflow"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"signalWorkflow") y x)
                        Word64
66
                          -> do y <- Parser ResolveActivity -> String -> Parser ResolveActivity
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
"resolve_activity"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"resolveActivity") y x)
                        Word64
74
                          -> do y <- Parser NotifyHasPatch -> String -> Parser NotifyHasPatch
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
"notify_has_patch"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"notifyHasPatch") y x)
                        Word64
82
                          -> do y <- Parser ResolveChildWorkflowExecutionStart
-> String -> Parser ResolveChildWorkflowExecutionStart
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
"resolve_child_workflow_execution_start"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"resolveChildWorkflowExecutionStart")
                                     y x)
                        Word64
90
                          -> do y <- Parser ResolveChildWorkflowExecution
-> String -> Parser ResolveChildWorkflowExecution
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
"resolve_child_workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"resolveChildWorkflowExecution") y
                                     x)
                        Word64
98
                          -> do y <- Parser ResolveSignalExternalWorkflow
-> String -> Parser ResolveSignalExternalWorkflow
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
"resolve_signal_external_workflow"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"resolveSignalExternalWorkflow") y
                                     x)
                        Word64
106
                          -> do y <- Parser ResolveRequestCancelExternalWorkflow
-> String -> Parser ResolveRequestCancelExternalWorkflow
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
"resolve_request_cancel_external_workflow"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"resolveRequestCancelExternalWorkflow")
                                     y x)
                        Word64
114
                          -> do y <- Parser DoUpdate -> String -> Parser DoUpdate
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
"do_update"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"doUpdate") y x)
                        Word64
402
                          -> do y <- Parser RemoveFromCache -> String -> Parser RemoveFromCache
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
"remove_from_cache"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"removeFromCache") 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 WorkflowActivationJob
-> String -> Parser WorkflowActivationJob
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowActivationJob -> Parser WorkflowActivationJob
loop WorkflowActivationJob
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"WorkflowActivationJob"
  buildMessage :: WorkflowActivationJob -> Builder
buildMessage
    = \ WorkflowActivationJob
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe WorkflowActivationJob'Variant)
  WorkflowActivationJob
  WorkflowActivationJob
  (Maybe WorkflowActivationJob'Variant)
  (Maybe WorkflowActivationJob'Variant)
-> WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'variant") WorkflowActivationJob
_x
              of
                Maybe WorkflowActivationJob'Variant
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just (WorkflowActivationJob'StartWorkflow StartWorkflow
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (StartWorkflow -> ByteString) -> StartWorkflow -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          StartWorkflow -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage StartWorkflow
v)
                (Prelude.Just (WorkflowActivationJob'FireTimer FireTimer
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                       ((ByteString -> Builder)
-> (FireTimer -> ByteString) -> FireTimer -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          FireTimer -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage FireTimer
v)
                (Prelude.Just (WorkflowActivationJob'UpdateRandomSeed UpdateRandomSeed
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                       ((ByteString -> Builder)
-> (UpdateRandomSeed -> ByteString) -> UpdateRandomSeed -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          UpdateRandomSeed -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateRandomSeed
v)
                (Prelude.Just (WorkflowActivationJob'QueryWorkflow QueryWorkflow
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                       ((ByteString -> Builder)
-> (QueryWorkflow -> ByteString) -> QueryWorkflow -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          QueryWorkflow -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage QueryWorkflow
v)
                (Prelude.Just (WorkflowActivationJob'CancelWorkflow CancelWorkflow
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                       ((ByteString -> Builder)
-> (CancelWorkflow -> ByteString) -> CancelWorkflow -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          CancelWorkflow -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage CancelWorkflow
v)
                (Prelude.Just (WorkflowActivationJob'SignalWorkflow SignalWorkflow
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                       ((ByteString -> Builder)
-> (SignalWorkflow -> ByteString) -> SignalWorkflow -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          SignalWorkflow -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage SignalWorkflow
v)
                (Prelude.Just (WorkflowActivationJob'ResolveActivity ResolveActivity
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                       ((ByteString -> Builder)
-> (ResolveActivity -> ByteString) -> ResolveActivity -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          ResolveActivity -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ResolveActivity
v)
                (Prelude.Just (WorkflowActivationJob'NotifyHasPatch NotifyHasPatch
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
                       ((ByteString -> Builder)
-> (NotifyHasPatch -> ByteString) -> NotifyHasPatch -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          NotifyHasPatch -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NotifyHasPatch
v)
                (Prelude.Just (WorkflowActivationJob'ResolveChildWorkflowExecutionStart ResolveChildWorkflowExecutionStart
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
                       ((ByteString -> Builder)
-> (ResolveChildWorkflowExecutionStart -> ByteString)
-> ResolveChildWorkflowExecutionStart
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          ResolveChildWorkflowExecutionStart -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ResolveChildWorkflowExecutionStart
v)
                (Prelude.Just (WorkflowActivationJob'ResolveChildWorkflowExecution ResolveChildWorkflowExecution
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
90)
                       ((ByteString -> Builder)
-> (ResolveChildWorkflowExecution -> ByteString)
-> ResolveChildWorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          ResolveChildWorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ResolveChildWorkflowExecution
v)
                (Prelude.Just (WorkflowActivationJob'ResolveSignalExternalWorkflow ResolveSignalExternalWorkflow
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
98)
                       ((ByteString -> Builder)
-> (ResolveSignalExternalWorkflow -> ByteString)
-> ResolveSignalExternalWorkflow
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          ResolveSignalExternalWorkflow -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ResolveSignalExternalWorkflow
v)
                (Prelude.Just (WorkflowActivationJob'ResolveRequestCancelExternalWorkflow ResolveRequestCancelExternalWorkflow
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
106)
                       ((ByteString -> Builder)
-> (ResolveRequestCancelExternalWorkflow -> ByteString)
-> ResolveRequestCancelExternalWorkflow
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          ResolveRequestCancelExternalWorkflow -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ResolveRequestCancelExternalWorkflow
v)
                (Prelude.Just (WorkflowActivationJob'DoUpdate DoUpdate
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
114)
                       ((ByteString -> Builder)
-> (DoUpdate -> ByteString) -> DoUpdate -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          DoUpdate -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage DoUpdate
v)
                (Prelude.Just (WorkflowActivationJob'RemoveFromCache RemoveFromCache
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
402)
                       ((ByteString -> Builder)
-> (RemoveFromCache -> ByteString) -> RemoveFromCache -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          RemoveFromCache -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage RemoveFromCache
v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  WorkflowActivationJob
  WorkflowActivationJob
  FieldSet
  FieldSet
-> WorkflowActivationJob -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowActivationJob
  WorkflowActivationJob
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowActivationJob FieldSet
Data.ProtoLens.unknownFields WorkflowActivationJob
_x))
instance Control.DeepSeq.NFData WorkflowActivationJob where
  rnf :: WorkflowActivationJob -> ()
rnf
    = \ WorkflowActivationJob
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowActivationJob -> FieldSet
_WorkflowActivationJob'_unknownFields WorkflowActivationJob
x__)
             (Maybe WorkflowActivationJob'Variant -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (WorkflowActivationJob -> Maybe WorkflowActivationJob'Variant
_WorkflowActivationJob'variant WorkflowActivationJob
x__) ())
instance Control.DeepSeq.NFData WorkflowActivationJob'Variant where
  rnf :: WorkflowActivationJob'Variant -> ()
rnf (WorkflowActivationJob'StartWorkflow StartWorkflow
x__)
    = StartWorkflow -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf StartWorkflow
x__
  rnf (WorkflowActivationJob'FireTimer FireTimer
x__) = FireTimer -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf FireTimer
x__
  rnf (WorkflowActivationJob'UpdateRandomSeed UpdateRandomSeed
x__)
    = UpdateRandomSeed -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf UpdateRandomSeed
x__
  rnf (WorkflowActivationJob'QueryWorkflow QueryWorkflow
x__)
    = QueryWorkflow -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf QueryWorkflow
x__
  rnf (WorkflowActivationJob'CancelWorkflow CancelWorkflow
x__)
    = CancelWorkflow -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf CancelWorkflow
x__
  rnf (WorkflowActivationJob'SignalWorkflow SignalWorkflow
x__)
    = SignalWorkflow -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf SignalWorkflow
x__
  rnf (WorkflowActivationJob'ResolveActivity ResolveActivity
x__)
    = ResolveActivity -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ResolveActivity
x__
  rnf (WorkflowActivationJob'NotifyHasPatch NotifyHasPatch
x__)
    = NotifyHasPatch -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf NotifyHasPatch
x__
  rnf (WorkflowActivationJob'ResolveChildWorkflowExecutionStart ResolveChildWorkflowExecutionStart
x__)
    = ResolveChildWorkflowExecutionStart -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ResolveChildWorkflowExecutionStart
x__
  rnf (WorkflowActivationJob'ResolveChildWorkflowExecution ResolveChildWorkflowExecution
x__)
    = ResolveChildWorkflowExecution -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ResolveChildWorkflowExecution
x__
  rnf (WorkflowActivationJob'ResolveSignalExternalWorkflow ResolveSignalExternalWorkflow
x__)
    = ResolveSignalExternalWorkflow -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ResolveSignalExternalWorkflow
x__
  rnf
    (WorkflowActivationJob'ResolveRequestCancelExternalWorkflow ResolveRequestCancelExternalWorkflow
x__)
    = ResolveRequestCancelExternalWorkflow -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ResolveRequestCancelExternalWorkflow
x__
  rnf (WorkflowActivationJob'DoUpdate DoUpdate
x__) = DoUpdate -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf DoUpdate
x__
  rnf (WorkflowActivationJob'RemoveFromCache RemoveFromCache
x__)
    = RemoveFromCache -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf RemoveFromCache
x__
_WorkflowActivationJob'StartWorkflow ::
  Data.ProtoLens.Prism.Prism' WorkflowActivationJob'Variant StartWorkflow
_WorkflowActivationJob'StartWorkflow :: Prism' WorkflowActivationJob'Variant StartWorkflow
_WorkflowActivationJob'StartWorkflow
  = (StartWorkflow -> WorkflowActivationJob'Variant)
-> (WorkflowActivationJob'Variant -> Maybe StartWorkflow)
-> Prism' WorkflowActivationJob'Variant StartWorkflow
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      StartWorkflow -> WorkflowActivationJob'Variant
WorkflowActivationJob'StartWorkflow
      (\ WorkflowActivationJob'Variant
p__
         -> case WorkflowActivationJob'Variant
p__ of
              (WorkflowActivationJob'StartWorkflow StartWorkflow
p__val) -> StartWorkflow -> Maybe StartWorkflow
forall a. a -> Maybe a
Prelude.Just StartWorkflow
p__val
              WorkflowActivationJob'Variant
_otherwise -> Maybe StartWorkflow
forall a. Maybe a
Prelude.Nothing)
_WorkflowActivationJob'FireTimer ::
  Data.ProtoLens.Prism.Prism' WorkflowActivationJob'Variant FireTimer
_WorkflowActivationJob'FireTimer :: Prism' WorkflowActivationJob'Variant FireTimer
_WorkflowActivationJob'FireTimer
  = (FireTimer -> WorkflowActivationJob'Variant)
-> (WorkflowActivationJob'Variant -> Maybe FireTimer)
-> Prism' WorkflowActivationJob'Variant FireTimer
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      FireTimer -> WorkflowActivationJob'Variant
WorkflowActivationJob'FireTimer
      (\ WorkflowActivationJob'Variant
p__
         -> case WorkflowActivationJob'Variant
p__ of
              (WorkflowActivationJob'FireTimer FireTimer
p__val) -> FireTimer -> Maybe FireTimer
forall a. a -> Maybe a
Prelude.Just FireTimer
p__val
              WorkflowActivationJob'Variant
_otherwise -> Maybe FireTimer
forall a. Maybe a
Prelude.Nothing)
_WorkflowActivationJob'UpdateRandomSeed ::
  Data.ProtoLens.Prism.Prism' WorkflowActivationJob'Variant UpdateRandomSeed
_WorkflowActivationJob'UpdateRandomSeed :: Prism' WorkflowActivationJob'Variant UpdateRandomSeed
_WorkflowActivationJob'UpdateRandomSeed
  = (UpdateRandomSeed -> WorkflowActivationJob'Variant)
-> (WorkflowActivationJob'Variant -> Maybe UpdateRandomSeed)
-> Prism' WorkflowActivationJob'Variant UpdateRandomSeed
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      UpdateRandomSeed -> WorkflowActivationJob'Variant
WorkflowActivationJob'UpdateRandomSeed
      (\ WorkflowActivationJob'Variant
p__
         -> case WorkflowActivationJob'Variant
p__ of
              (WorkflowActivationJob'UpdateRandomSeed UpdateRandomSeed
p__val)
                -> UpdateRandomSeed -> Maybe UpdateRandomSeed
forall a. a -> Maybe a
Prelude.Just UpdateRandomSeed
p__val
              WorkflowActivationJob'Variant
_otherwise -> Maybe UpdateRandomSeed
forall a. Maybe a
Prelude.Nothing)
_WorkflowActivationJob'QueryWorkflow ::
  Data.ProtoLens.Prism.Prism' WorkflowActivationJob'Variant QueryWorkflow
_WorkflowActivationJob'QueryWorkflow :: Prism' WorkflowActivationJob'Variant QueryWorkflow
_WorkflowActivationJob'QueryWorkflow
  = (QueryWorkflow -> WorkflowActivationJob'Variant)
-> (WorkflowActivationJob'Variant -> Maybe QueryWorkflow)
-> Prism' WorkflowActivationJob'Variant QueryWorkflow
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      QueryWorkflow -> WorkflowActivationJob'Variant
WorkflowActivationJob'QueryWorkflow
      (\ WorkflowActivationJob'Variant
p__
         -> case WorkflowActivationJob'Variant
p__ of
              (WorkflowActivationJob'QueryWorkflow QueryWorkflow
p__val) -> QueryWorkflow -> Maybe QueryWorkflow
forall a. a -> Maybe a
Prelude.Just QueryWorkflow
p__val
              WorkflowActivationJob'Variant
_otherwise -> Maybe QueryWorkflow
forall a. Maybe a
Prelude.Nothing)
_WorkflowActivationJob'CancelWorkflow ::
  Data.ProtoLens.Prism.Prism' WorkflowActivationJob'Variant CancelWorkflow
_WorkflowActivationJob'CancelWorkflow :: Prism' WorkflowActivationJob'Variant CancelWorkflow
_WorkflowActivationJob'CancelWorkflow
  = (CancelWorkflow -> WorkflowActivationJob'Variant)
-> (WorkflowActivationJob'Variant -> Maybe CancelWorkflow)
-> Prism' WorkflowActivationJob'Variant CancelWorkflow
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      CancelWorkflow -> WorkflowActivationJob'Variant
WorkflowActivationJob'CancelWorkflow
      (\ WorkflowActivationJob'Variant
p__
         -> case WorkflowActivationJob'Variant
p__ of
              (WorkflowActivationJob'CancelWorkflow CancelWorkflow
p__val)
                -> CancelWorkflow -> Maybe CancelWorkflow
forall a. a -> Maybe a
Prelude.Just CancelWorkflow
p__val
              WorkflowActivationJob'Variant
_otherwise -> Maybe CancelWorkflow
forall a. Maybe a
Prelude.Nothing)
_WorkflowActivationJob'SignalWorkflow ::
  Data.ProtoLens.Prism.Prism' WorkflowActivationJob'Variant SignalWorkflow
_WorkflowActivationJob'SignalWorkflow :: Prism' WorkflowActivationJob'Variant SignalWorkflow
_WorkflowActivationJob'SignalWorkflow
  = (SignalWorkflow -> WorkflowActivationJob'Variant)
-> (WorkflowActivationJob'Variant -> Maybe SignalWorkflow)
-> Prism' WorkflowActivationJob'Variant SignalWorkflow
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      SignalWorkflow -> WorkflowActivationJob'Variant
WorkflowActivationJob'SignalWorkflow
      (\ WorkflowActivationJob'Variant
p__
         -> case WorkflowActivationJob'Variant
p__ of
              (WorkflowActivationJob'SignalWorkflow SignalWorkflow
p__val)
                -> SignalWorkflow -> Maybe SignalWorkflow
forall a. a -> Maybe a
Prelude.Just SignalWorkflow
p__val
              WorkflowActivationJob'Variant
_otherwise -> Maybe SignalWorkflow
forall a. Maybe a
Prelude.Nothing)
_WorkflowActivationJob'ResolveActivity ::
  Data.ProtoLens.Prism.Prism' WorkflowActivationJob'Variant ResolveActivity
_WorkflowActivationJob'ResolveActivity :: Prism' WorkflowActivationJob'Variant ResolveActivity
_WorkflowActivationJob'ResolveActivity
  = (ResolveActivity -> WorkflowActivationJob'Variant)
-> (WorkflowActivationJob'Variant -> Maybe ResolveActivity)
-> Prism' WorkflowActivationJob'Variant ResolveActivity
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ResolveActivity -> WorkflowActivationJob'Variant
WorkflowActivationJob'ResolveActivity
      (\ WorkflowActivationJob'Variant
p__
         -> case WorkflowActivationJob'Variant
p__ of
              (WorkflowActivationJob'ResolveActivity ResolveActivity
p__val)
                -> ResolveActivity -> Maybe ResolveActivity
forall a. a -> Maybe a
Prelude.Just ResolveActivity
p__val
              WorkflowActivationJob'Variant
_otherwise -> Maybe ResolveActivity
forall a. Maybe a
Prelude.Nothing)
_WorkflowActivationJob'NotifyHasPatch ::
  Data.ProtoLens.Prism.Prism' WorkflowActivationJob'Variant NotifyHasPatch
_WorkflowActivationJob'NotifyHasPatch :: Prism' WorkflowActivationJob'Variant NotifyHasPatch
_WorkflowActivationJob'NotifyHasPatch
  = (NotifyHasPatch -> WorkflowActivationJob'Variant)
-> (WorkflowActivationJob'Variant -> Maybe NotifyHasPatch)
-> Prism' WorkflowActivationJob'Variant NotifyHasPatch
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      NotifyHasPatch -> WorkflowActivationJob'Variant
WorkflowActivationJob'NotifyHasPatch
      (\ WorkflowActivationJob'Variant
p__
         -> case WorkflowActivationJob'Variant
p__ of
              (WorkflowActivationJob'NotifyHasPatch NotifyHasPatch
p__val)
                -> NotifyHasPatch -> Maybe NotifyHasPatch
forall a. a -> Maybe a
Prelude.Just NotifyHasPatch
p__val
              WorkflowActivationJob'Variant
_otherwise -> Maybe NotifyHasPatch
forall a. Maybe a
Prelude.Nothing)
_WorkflowActivationJob'ResolveChildWorkflowExecutionStart ::
  Data.ProtoLens.Prism.Prism' WorkflowActivationJob'Variant ResolveChildWorkflowExecutionStart
_WorkflowActivationJob'ResolveChildWorkflowExecutionStart :: Prism'
  WorkflowActivationJob'Variant ResolveChildWorkflowExecutionStart
_WorkflowActivationJob'ResolveChildWorkflowExecutionStart
  = (ResolveChildWorkflowExecutionStart
 -> WorkflowActivationJob'Variant)
-> (WorkflowActivationJob'Variant
    -> Maybe ResolveChildWorkflowExecutionStart)
-> Prism'
     WorkflowActivationJob'Variant ResolveChildWorkflowExecutionStart
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ResolveChildWorkflowExecutionStart -> WorkflowActivationJob'Variant
WorkflowActivationJob'ResolveChildWorkflowExecutionStart
      (\ WorkflowActivationJob'Variant
p__
         -> case WorkflowActivationJob'Variant
p__ of
              (WorkflowActivationJob'ResolveChildWorkflowExecutionStart ResolveChildWorkflowExecutionStart
p__val)
                -> ResolveChildWorkflowExecutionStart
-> Maybe ResolveChildWorkflowExecutionStart
forall a. a -> Maybe a
Prelude.Just ResolveChildWorkflowExecutionStart
p__val
              WorkflowActivationJob'Variant
_otherwise -> Maybe ResolveChildWorkflowExecutionStart
forall a. Maybe a
Prelude.Nothing)
_WorkflowActivationJob'ResolveChildWorkflowExecution ::
  Data.ProtoLens.Prism.Prism' WorkflowActivationJob'Variant ResolveChildWorkflowExecution
_WorkflowActivationJob'ResolveChildWorkflowExecution :: Prism' WorkflowActivationJob'Variant ResolveChildWorkflowExecution
_WorkflowActivationJob'ResolveChildWorkflowExecution
  = (ResolveChildWorkflowExecution -> WorkflowActivationJob'Variant)
-> (WorkflowActivationJob'Variant
    -> Maybe ResolveChildWorkflowExecution)
-> Prism'
     WorkflowActivationJob'Variant ResolveChildWorkflowExecution
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ResolveChildWorkflowExecution -> WorkflowActivationJob'Variant
WorkflowActivationJob'ResolveChildWorkflowExecution
      (\ WorkflowActivationJob'Variant
p__
         -> case WorkflowActivationJob'Variant
p__ of
              (WorkflowActivationJob'ResolveChildWorkflowExecution ResolveChildWorkflowExecution
p__val)
                -> ResolveChildWorkflowExecution
-> Maybe ResolveChildWorkflowExecution
forall a. a -> Maybe a
Prelude.Just ResolveChildWorkflowExecution
p__val
              WorkflowActivationJob'Variant
_otherwise -> Maybe ResolveChildWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
_WorkflowActivationJob'ResolveSignalExternalWorkflow ::
  Data.ProtoLens.Prism.Prism' WorkflowActivationJob'Variant ResolveSignalExternalWorkflow
_WorkflowActivationJob'ResolveSignalExternalWorkflow :: Prism' WorkflowActivationJob'Variant ResolveSignalExternalWorkflow
_WorkflowActivationJob'ResolveSignalExternalWorkflow
  = (ResolveSignalExternalWorkflow -> WorkflowActivationJob'Variant)
-> (WorkflowActivationJob'Variant
    -> Maybe ResolveSignalExternalWorkflow)
-> Prism'
     WorkflowActivationJob'Variant ResolveSignalExternalWorkflow
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ResolveSignalExternalWorkflow -> WorkflowActivationJob'Variant
WorkflowActivationJob'ResolveSignalExternalWorkflow
      (\ WorkflowActivationJob'Variant
p__
         -> case WorkflowActivationJob'Variant
p__ of
              (WorkflowActivationJob'ResolveSignalExternalWorkflow ResolveSignalExternalWorkflow
p__val)
                -> ResolveSignalExternalWorkflow
-> Maybe ResolveSignalExternalWorkflow
forall a. a -> Maybe a
Prelude.Just ResolveSignalExternalWorkflow
p__val
              WorkflowActivationJob'Variant
_otherwise -> Maybe ResolveSignalExternalWorkflow
forall a. Maybe a
Prelude.Nothing)
_WorkflowActivationJob'ResolveRequestCancelExternalWorkflow ::
  Data.ProtoLens.Prism.Prism' WorkflowActivationJob'Variant ResolveRequestCancelExternalWorkflow
_WorkflowActivationJob'ResolveRequestCancelExternalWorkflow :: Prism'
  WorkflowActivationJob'Variant ResolveRequestCancelExternalWorkflow
_WorkflowActivationJob'ResolveRequestCancelExternalWorkflow
  = (ResolveRequestCancelExternalWorkflow
 -> WorkflowActivationJob'Variant)
-> (WorkflowActivationJob'Variant
    -> Maybe ResolveRequestCancelExternalWorkflow)
-> Prism'
     WorkflowActivationJob'Variant ResolveRequestCancelExternalWorkflow
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ResolveRequestCancelExternalWorkflow
-> WorkflowActivationJob'Variant
WorkflowActivationJob'ResolveRequestCancelExternalWorkflow
      (\ WorkflowActivationJob'Variant
p__
         -> case WorkflowActivationJob'Variant
p__ of
              (WorkflowActivationJob'ResolveRequestCancelExternalWorkflow ResolveRequestCancelExternalWorkflow
p__val)
                -> ResolveRequestCancelExternalWorkflow
-> Maybe ResolveRequestCancelExternalWorkflow
forall a. a -> Maybe a
Prelude.Just ResolveRequestCancelExternalWorkflow
p__val
              WorkflowActivationJob'Variant
_otherwise -> Maybe ResolveRequestCancelExternalWorkflow
forall a. Maybe a
Prelude.Nothing)
_WorkflowActivationJob'DoUpdate ::
  Data.ProtoLens.Prism.Prism' WorkflowActivationJob'Variant DoUpdate
_WorkflowActivationJob'DoUpdate :: Prism' WorkflowActivationJob'Variant DoUpdate
_WorkflowActivationJob'DoUpdate
  = (DoUpdate -> WorkflowActivationJob'Variant)
-> (WorkflowActivationJob'Variant -> Maybe DoUpdate)
-> Prism' WorkflowActivationJob'Variant DoUpdate
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      DoUpdate -> WorkflowActivationJob'Variant
WorkflowActivationJob'DoUpdate
      (\ WorkflowActivationJob'Variant
p__
         -> case WorkflowActivationJob'Variant
p__ of
              (WorkflowActivationJob'DoUpdate DoUpdate
p__val) -> DoUpdate -> Maybe DoUpdate
forall a. a -> Maybe a
Prelude.Just DoUpdate
p__val
              WorkflowActivationJob'Variant
_otherwise -> Maybe DoUpdate
forall a. Maybe a
Prelude.Nothing)
_WorkflowActivationJob'RemoveFromCache ::
  Data.ProtoLens.Prism.Prism' WorkflowActivationJob'Variant RemoveFromCache
_WorkflowActivationJob'RemoveFromCache :: Prism' WorkflowActivationJob'Variant RemoveFromCache
_WorkflowActivationJob'RemoveFromCache
  = (RemoveFromCache -> WorkflowActivationJob'Variant)
-> (WorkflowActivationJob'Variant -> Maybe RemoveFromCache)
-> Prism' WorkflowActivationJob'Variant RemoveFromCache
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      RemoveFromCache -> WorkflowActivationJob'Variant
WorkflowActivationJob'RemoveFromCache
      (\ WorkflowActivationJob'Variant
p__
         -> case WorkflowActivationJob'Variant
p__ of
              (WorkflowActivationJob'RemoveFromCache RemoveFromCache
p__val)
                -> RemoveFromCache -> Maybe RemoveFromCache
forall a. a -> Maybe a
Prelude.Just RemoveFromCache
p__val
              WorkflowActivationJob'Variant
_otherwise -> Maybe RemoveFromCache
forall a. Maybe a
Prelude.Nothing)
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
  = ByteString
"\n\
    \?temporal/sdk/core/workflow_activation/workflow_activation.proto\DC2\ESCcoresdk.workflow_activation\SUB\USgoogle/protobuf/timestamp.proto\SUB\RSgoogle/protobuf/duration.proto\SUB%temporal/api/failure/v1/message.proto\SUB$temporal/api/update/v1/message.proto\SUB$temporal/api/common/v1/message.proto\SUB$temporal/api/enums/v1/workflow.proto\SUB7temporal/sdk/core/activity_result/activity_result.proto\SUB5temporal/sdk/core/child_workflow/child_workflow.proto\SUB%temporal/sdk/core/common/common.proto\"\212\ETX\n\
    \\DC2WorkflowActivation\DC2\NAK\n\
    \\ACKrun_id\CAN\SOH \SOH(\tR\ENQrunId\DC28\n\
    \\ttimestamp\CAN\STX \SOH(\v2\SUB.google.protobuf.TimestampR\ttimestamp\DC2!\n\
    \\fis_replaying\CAN\ETX \SOH(\bR\visReplaying\DC2%\n\
    \\SOhistory_length\CAN\EOT \SOH(\rR\rhistoryLength\DC2F\n\
    \\EOTjobs\CAN\ENQ \ETX(\v22.coresdk.workflow_activation.WorkflowActivationJobR\EOTjobs\DC28\n\
    \\CANavailable_internal_flags\CAN\ACK \ETX(\rR\SYNavailableInternalFlags\DC2,\n\
    \\DC2history_size_bytes\CAN\a \SOH(\EOTR\DLEhistorySizeBytes\DC29\n\
    \\EMcontinue_as_new_suggested\CAN\b \SOH(\bR\SYNcontinueAsNewSuggested\DC28\n\
    \\EMbuild_id_for_current_task\CAN\t \SOH(\tR\NAKbuildIdForCurrentTask\"\192\v\n\
    \\NAKWorkflowActivationJob\DC2S\n\
    \\SOstart_workflow\CAN\SOH \SOH(\v2*.coresdk.workflow_activation.StartWorkflowH\NULR\rstartWorkflow\DC2G\n\
    \\n\
    \fire_timer\CAN\STX \SOH(\v2&.coresdk.workflow_activation.FireTimerH\NULR\tfireTimer\DC2]\n\
    \\DC2update_random_seed\CAN\EOT \SOH(\v2-.coresdk.workflow_activation.UpdateRandomSeedH\NULR\DLEupdateRandomSeed\DC2S\n\
    \\SOquery_workflow\CAN\ENQ \SOH(\v2*.coresdk.workflow_activation.QueryWorkflowH\NULR\rqueryWorkflow\DC2V\n\
    \\SIcancel_workflow\CAN\ACK \SOH(\v2+.coresdk.workflow_activation.CancelWorkflowH\NULR\SOcancelWorkflow\DC2V\n\
    \\SIsignal_workflow\CAN\a \SOH(\v2+.coresdk.workflow_activation.SignalWorkflowH\NULR\SOsignalWorkflow\DC2Y\n\
    \\DLEresolve_activity\CAN\b \SOH(\v2,.coresdk.workflow_activation.ResolveActivityH\NULR\SIresolveActivity\DC2W\n\
    \\DLEnotify_has_patch\CAN\t \SOH(\v2+.coresdk.workflow_activation.NotifyHasPatchH\NULR\SOnotifyHasPatch\DC2\149\SOH\n\
    \&resolve_child_workflow_execution_start\CAN\n\
    \ \SOH(\v2?.coresdk.workflow_activation.ResolveChildWorkflowExecutionStartH\NULR\"resolveChildWorkflowExecutionStart\DC2\133\SOH\n\
    \ resolve_child_workflow_execution\CAN\v \SOH(\v2:.coresdk.workflow_activation.ResolveChildWorkflowExecutionH\NULR\GSresolveChildWorkflowExecution\DC2\133\SOH\n\
    \ resolve_signal_external_workflow\CAN\f \SOH(\v2:.coresdk.workflow_activation.ResolveSignalExternalWorkflowH\NULR\GSresolveSignalExternalWorkflow\DC2\155\SOH\n\
    \(resolve_request_cancel_external_workflow\CAN\r \SOH(\v2A.coresdk.workflow_activation.ResolveRequestCancelExternalWorkflowH\NULR$resolveRequestCancelExternalWorkflow\DC2D\n\
    \\tdo_update\CAN\SO \SOH(\v2%.coresdk.workflow_activation.DoUpdateH\NULR\bdoUpdate\DC2Z\n\
    \\DC1remove_from_cache\CAN2 \SOH(\v2,.coresdk.workflow_activation.RemoveFromCacheH\NULR\SIremoveFromCacheB\t\n\
    \\avariant\"\250\f\n\
    \\rStartWorkflow\DC2#\n\
    \\rworkflow_type\CAN\SOH \SOH(\tR\fworkflowType\DC2\US\n\
    \\vworkflow_id\CAN\STX \SOH(\tR\n\
    \workflowId\DC2=\n\
    \\targuments\CAN\ETX \ETX(\v2\US.temporal.api.common.v1.PayloadR\targuments\DC2'\n\
    \\SIrandomness_seed\CAN\EOT \SOH(\EOTR\SOrandomnessSeed\DC2Q\n\
    \\aheaders\CAN\ENQ \ETX(\v27.coresdk.workflow_activation.StartWorkflow.HeadersEntryR\aheaders\DC2\SUB\n\
    \\bidentity\CAN\ACK \SOH(\tR\bidentity\DC2]\n\
    \\DC4parent_workflow_info\CAN\a \SOH(\v2+.coresdk.common.NamespacedWorkflowExecutionR\DC2parentWorkflowInfo\DC2W\n\
    \\SUBworkflow_execution_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
    \\DC4workflow_run_timeout\CAN\t \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
    \\NAKworkflow_task_timeout\CAN\n\
    \ \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2D\n\
    \\UScontinued_from_execution_run_id\CAN\v \SOH(\tR\ESCcontinuedFromExecutionRunId\DC2^\n\
    \\DC3continued_initiator\CAN\f \SOH(\SO2-.temporal.api.enums.v1.ContinueAsNewInitiatorR\DC2continuedInitiator\DC2M\n\
    \\DC1continued_failure\CAN\r \SOH(\v2 .temporal.api.failure.v1.FailureR\DLEcontinuedFailure\DC2V\n\
    \\SYNlast_completion_result\CAN\SO \SOH(\v2 .temporal.api.common.v1.PayloadsR\DC4lastCompletionResult\DC23\n\
    \\SYNfirst_execution_run_id\CAN\SI \SOH(\tR\DC3firstExecutionRunId\DC2F\n\
    \\fretry_policy\CAN\DLE \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2\CAN\n\
    \\aattempt\CAN\DC1 \SOH(\ENQR\aattempt\DC2#\n\
    \\rcron_schedule\CAN\DC2 \SOH(\tR\fcronSchedule\DC2g\n\
    \\"workflow_execution_expiration_time\CAN\DC3 \SOH(\v2\SUB.google.protobuf.TimestampR\USworkflowExecutionExpirationTime\DC2e\n\
    \\"cron_schedule_to_schedule_interval\CAN\DC4 \SOH(\v2\EM.google.protobuf.DurationR\RScronScheduleToScheduleInterval\DC20\n\
    \\EOTmemo\CAN\NAK \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
    \\DC1search_attributes\CAN\SYN \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC29\n\
    \\n\
    \start_time\CAN\ETB \SOH(\v2\SUB.google.protobuf.TimestampR\tstartTime\SUB[\n\
    \\fHeadersEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\
    \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH\"\GS\n\
    \\tFireTimer\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\"h\n\
    \\SIResolveActivity\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2C\n\
    \\ACKresult\CAN\STX \SOH(\v2+.coresdk.activity_result.ActivityResolutionR\ACKresult\"\244\STX\n\
    \\"ResolveChildWorkflowExecutionStart\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2f\n\
    \\tsucceeded\CAN\STX \SOH(\v2F.coresdk.workflow_activation.ResolveChildWorkflowExecutionStartSuccessH\NULR\tsucceeded\DC2`\n\
    \\ACKfailed\CAN\ETX \SOH(\v2F.coresdk.workflow_activation.ResolveChildWorkflowExecutionStartFailureH\NULR\ACKfailed\DC2h\n\
    \\tcancelled\CAN\EOT \SOH(\v2H.coresdk.workflow_activation.ResolveChildWorkflowExecutionStartCancelledH\NULR\tcancelledB\b\n\
    \\ACKstatus\"B\n\
    \)ResolveChildWorkflowExecutionStartSuccess\DC2\NAK\n\
    \\ACKrun_id\CAN\SOH \SOH(\tR\ENQrunId\"\199\SOH\n\
    \)ResolveChildWorkflowExecutionStartFailure\DC2\US\n\
    \\vworkflow_id\CAN\SOH \SOH(\tR\n\
    \workflowId\DC2#\n\
    \\rworkflow_type\CAN\STX \SOH(\tR\fworkflowType\DC2T\n\
    \\ENQcause\CAN\ETX \SOH(\SO2>.coresdk.child_workflow.StartChildWorkflowExecutionFailedCauseR\ENQcause\"i\n\
    \+ResolveChildWorkflowExecutionStartCancelled\DC2:\n\
    \\afailure\CAN\SOH \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\"v\n\
    \\GSResolveChildWorkflowExecution\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2C\n\
    \\ACKresult\CAN\STX \SOH(\v2+.coresdk.child_workflow.ChildWorkflowResultR\ACKresult\";\n\
    \\DLEUpdateRandomSeed\DC2'\n\
    \\SIrandomness_seed\CAN\SOH \SOH(\EOTR\SOrandomnessSeed\"\184\STX\n\
    \\rQueryWorkflow\DC2\EM\n\
    \\bquery_id\CAN\SOH \SOH(\tR\aqueryId\DC2\GS\n\
    \\n\
    \query_type\CAN\STX \SOH(\tR\tqueryType\DC2=\n\
    \\targuments\CAN\ETX \ETX(\v2\US.temporal.api.common.v1.PayloadR\targuments\DC2Q\n\
    \\aheaders\CAN\ENQ \ETX(\v27.coresdk.workflow_activation.QueryWorkflow.HeadersEntryR\aheaders\SUB[\n\
    \\fHeadersEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\
    \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH\"K\n\
    \\SOCancelWorkflow\DC29\n\
    \\adetails\CAN\SOH \ETX(\v2\US.temporal.api.common.v1.PayloadR\adetails\"\181\STX\n\
    \\SOSignalWorkflow\DC2\US\n\
    \\vsignal_name\CAN\SOH \SOH(\tR\n\
    \signalName\DC25\n\
    \\ENQinput\CAN\STX \ETX(\v2\US.temporal.api.common.v1.PayloadR\ENQinput\DC2\SUB\n\
    \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2R\n\
    \\aheaders\CAN\ENQ \ETX(\v28.coresdk.workflow_activation.SignalWorkflow.HeadersEntryR\aheaders\SUB[\n\
    \\fHeadersEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\
    \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH\"+\n\
    \\SONotifyHasPatch\DC2\EM\n\
    \\bpatch_id\CAN\SOH \SOH(\tR\apatchId\"m\n\
    \\GSResolveSignalExternalWorkflow\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2:\n\
    \\afailure\CAN\STX \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\"t\n\
    \$ResolveRequestCancelExternalWorkflow\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2:\n\
    \\afailure\CAN\STX \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\"\153\ETX\n\
    \\bDoUpdate\DC2\SO\n\
    \\STXid\CAN\SOH \SOH(\tR\STXid\DC20\n\
    \\DC4protocol_instance_id\CAN\STX \SOH(\tR\DC2protocolInstanceId\DC2\DC2\n\
    \\EOTname\CAN\ETX \SOH(\tR\EOTname\DC25\n\
    \\ENQinput\CAN\EOT \ETX(\v2\US.temporal.api.common.v1.PayloadR\ENQinput\DC2L\n\
    \\aheaders\CAN\ENQ \ETX(\v22.coresdk.workflow_activation.DoUpdate.HeadersEntryR\aheaders\DC20\n\
    \\EOTmeta\CAN\ACK \SOH(\v2\FS.temporal.api.update.v1.MetaR\EOTmeta\DC2#\n\
    \\rrun_validator\CAN\a \SOH(\bR\frunValidator\SUB[\n\
    \\fHeadersEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC25\n\
    \\ENQvalue\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQvalue:\STX8\SOH\"\210\STX\n\
    \\SIRemoveFromCache\DC2\CAN\n\
    \\amessage\CAN\SOH \SOH(\tR\amessage\DC2S\n\
    \\ACKreason\CAN\STX \SOH(\SO2;.coresdk.workflow_activation.RemoveFromCache.EvictionReasonR\ACKreason\"\207\SOH\n\
    \\SOEvictionReason\DC2\SI\n\
    \\vUNSPECIFIED\DLE\NUL\DC2\SO\n\
    \\n\
    \CACHE_FULL\DLE\SOH\DC2\SO\n\
    \\n\
    \CACHE_MISS\DLE\STX\DC2\DC2\n\
    \\SONONDETERMINISM\DLE\ETX\DC2\r\n\
    \\tLANG_FAIL\DLE\EOT\DC2\DC2\n\
    \\SOLANG_REQUESTED\DLE\ENQ\DC2\DC2\n\
    \\SOTASK_NOT_FOUND\DLE\ACK\DC2\NAK\n\
    \\DC1UNHANDLED_COMMAND\DLE\a\DC2\t\n\
    \\ENQFATAL\DLE\b\DC2\US\n\
    \\ESCPAGINATION_OR_HISTORY_FETCH\DLE\tB.\234\STX+Temporalio::Bridge::Api::WorkflowActivationJ\186|\n\
    \\a\DC2\ENQ\NUL\NUL\200\STX\SOH\n\
    \\b\n\
    \\SOH\f\DC2\ETX\NUL\NUL\DC2\n\
    \\172\SOH\n\
    \\SOH\STX\DC2\ETX\ACK\NUL$\SUB\161\SOH*\n\
    \ Definitions of the different workflow activation jobs returned from [crate::Core::poll_task]. The\n\
    \ lang SDK applies these activation jobs to drive workflows.\n\
    \\n\
    \\b\n\
    \\SOH\b\DC2\ETX\a\NULD\n\
    \\t\n\
    \\STX\b-\DC2\ETX\a\NULD\n\
    \\t\n\
    \\STX\ETX\NUL\DC2\ETX\t\NUL)\n\
    \\t\n\
    \\STX\ETX\SOH\DC2\ETX\n\
    \\NUL(\n\
    \\t\n\
    \\STX\ETX\STX\DC2\ETX\v\NUL/\n\
    \\t\n\
    \\STX\ETX\ETX\DC2\ETX\f\NUL.\n\
    \\t\n\
    \\STX\ETX\EOT\DC2\ETX\r\NUL.\n\
    \\t\n\
    \\STX\ETX\ENQ\DC2\ETX\SO\NUL.\n\
    \\t\n\
    \\STX\ETX\ACK\DC2\ETX\SI\NULA\n\
    \\t\n\
    \\STX\ETX\a\DC2\ETX\DLE\NUL?\n\
    \\t\n\
    \\STX\ETX\b\DC2\ETX\DC1\NUL/\n\
    \\149\f\n\
    \\STX\EOT\NUL\DC2\EOT/\NULH\SOH\SUB\136\f An instruction to the lang sdk to run some workflow code, whether for the first time or from\n\
    \ a cached state.\n\
    \\n\
    \ ## Job ordering guarantees and semantics\n\
    \\n\
    \ Core will, by default, order jobs within the activation as follows:\n\
    \ `patches -> signals/updates -> other -> queries -> evictions`\n\
    \\n\
    \ This is because:\n\
    \ * Patches are expected to apply to the entire activation\n\
    \ * Signal and update handlers should be invoked before workflow routines are iterated. That is to\n\
    \   say before the users' main workflow function and anything spawned by it is allowed to continue.\n\
    \ * Queries always go last (and, in fact, always come in their own activation)\n\
    \ * Evictions also always come in their own activation\n\
    \\n\
    \ The downside of this reordering is that a signal or update handler may not observe that some\n\
    \ other event had already happened (ex: an activity completed) when it is first invoked, though it\n\
    \ will subsequently when workflow routines are driven. Core only does this reordering to make life\n\
    \ easier for languages that cannot explicitly control when workflow routines are iterated.\n\
    \ Languages that can explicitly control such iteration should prefer to apply all the jobs to state\n\
    \ (by resolving promises/futures, invoking handlers, etc as they iterate over the jobs) and then\n\
    \ only *after* that is done, drive the workflow routines.\n\
    \\n\
    \ ## Evictions\n\
    \\n\
    \ Evictions appear as an activations that contains only a `remove_from_cache` job. Such activations\n\
    \ should not cause the workflow code to be invoked and may be responded to with an empty command\n\
    \ list.\n\
    \\n\
    \\n\
    \\n\
    \\ETX\EOT\NUL\SOH\DC2\ETX/\b\SUB\n\
    \\187\SOH\n\
    \\EOT\EOT\NUL\STX\NUL\DC2\ETX2\EOT\SYN\SUB\173\SOH The id of the currently active run of the workflow. Also used as a cache key. There may\n\
    \ only ever be one active workflow task (and hence activation) of a run at one time.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX2\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX2\v\DC1\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX2\DC4\NAK\n\
    \k\n\
    \\EOT\EOT\NUL\STX\SOH\DC2\ETX4\EOT,\SUB^ The current time as understood by the workflow, which is set by workflow task started events\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETX4\EOT\GS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX4\RS'\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX4*+\n\
    \E\n\
    \\EOT\EOT\NUL\STX\STX\DC2\ETX6\EOT\SUB\SUB8 Whether or not the activation is replaying past events\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ENQ\DC2\ETX6\EOT\b\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX6\t\NAK\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX6\CAN\EM\n\
    \\160\SOH\n\
    \\EOT\EOT\NUL\STX\ETX\DC2\ETX9\EOT\RS\SUB\146\SOH Current history length as determined by the event id of the most recently processed event.\n\
    \ This ensures that the number is always deterministic\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ENQ\DC2\ETX9\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX9\v\EM\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX9\FS\GS\n\
    \<\n\
    \\EOT\EOT\NUL\STX\EOT\DC2\ETX;\EOT,\SUB/ The things to do upon activating the workflow\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\EOT\DC2\ETX;\EOT\f\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ACK\DC2\ETX;\r\"\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETX;#'\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETX;*+\n\
    \\227\SOH\n\
    \\EOT\EOT\NUL\STX\ENQ\DC2\ETX?\EOT1\SUB\213\SOH Internal flags which are available for use by lang. If `is_replaying` is false, all\n\
    \ internal flags may be used. This is not a delta - all previously used flags always\n\
    \ appear since this representation is cheap.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\EOT\DC2\ETX?\EOT\f\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ENQ\DC2\ETX?\r\DC3\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\SOH\DC2\ETX?\DC4,\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ETX\DC2\ETX?/0\n\
    \I\n\
    \\EOT\EOT\NUL\STX\ACK\DC2\ETXA\EOT\"\SUB< The history size in bytes as of the last WFT started event\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ENQ\DC2\ETXA\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\SOH\DC2\ETXA\v\GS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ETX\DC2\ETXA !\n\
    \P\n\
    \\EOT\EOT\NUL\STX\a\DC2\ETXC\EOT'\SUBC Set true if the most recent WFT started event had this suggestion\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\ENQ\DC2\ETXC\EOT\b\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\SOH\DC2\ETXC\t\"\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\ETX\DC2\ETXC%&\n\
    \\167\STX\n\
    \\EOT\EOT\NUL\STX\b\DC2\ETXG\EOT)\SUB\153\STX Set to the Build ID of the worker that processed this task, which may be empty. During replay\n\
    \ this id may not equal the id of the replaying worker. If not replaying and this worker has\n\
    \ a defined Build ID, it will equal that ID. It will also be empty for evict-only activations.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\ENQ\DC2\ETXG\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\SOH\DC2\ETXG\v$\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\ETX\DC2\ETXG'(\n\
    \\n\
    \\n\
    \\STX\EOT\SOH\DC2\EOTJ\NULn\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\SOH\SOH\DC2\ETXJ\b\GS\n\
    \\f\n\
    \\EOT\EOT\SOH\b\NUL\DC2\EOTK\EOTm\ENQ\n\
    \\f\n\
    \\ENQ\EOT\SOH\b\NUL\SOH\DC2\ETXK\n\
    \\DC1\n\
    \2\n\
    \\EOT\EOT\SOH\STX\NUL\DC2\ETXM\b)\SUB% Begin a workflow for the first time\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\ACK\DC2\ETXM\b\NAK\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETXM\SYN$\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETXM'(\n\
    \^\n\
    \\EOT\EOT\SOH\STX\SOH\DC2\ETXO\b!\SUBQ A timer has fired, allowing whatever was waiting on it (if anything) to proceed\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\ACK\DC2\ETXO\b\DC1\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETXO\DC2\FS\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETXO\US \n\
    \G\n\
    \\EOT\EOT\SOH\STX\STX\DC2\ETXQ\b0\SUB: Workflow was reset. The randomness seed must be updated.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\STX\ACK\DC2\ETXQ\b\CAN\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\STX\SOH\DC2\ETXQ\EM+\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\STX\ETX\DC2\ETXQ./\n\
    \\169\SOH\n\
    \\EOT\EOT\SOH\STX\ETX\DC2\ETXT\b)\SUB\155\SOH A request to query the workflow was received. It is guaranteed that queries (one or more)\n\
    \ always come in their own activation after other mutating jobs.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\ETX\ACK\DC2\ETXT\b\NAK\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\ETX\SOH\DC2\ETXT\SYN$\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\ETX\ETX\DC2\ETXT'(\n\
    \=\n\
    \\EOT\EOT\SOH\STX\EOT\DC2\ETXV\b+\SUB0 A request to cancel the workflow was received.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\EOT\ACK\DC2\ETXV\b\SYN\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\EOT\SOH\DC2\ETXV\ETB&\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\EOT\ETX\DC2\ETXV)*\n\
    \=\n\
    \\EOT\EOT\SOH\STX\ENQ\DC2\ETXX\b+\SUB0 A request to signal the workflow was received.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\ENQ\ACK\DC2\ETXX\b\SYN\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\ENQ\SOH\DC2\ETXX\ETB&\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\ENQ\ETX\DC2\ETXX)*\n\
    \W\n\
    \\EOT\EOT\SOH\STX\ACK\DC2\ETXZ\b-\SUBJ An activity was resolved, result could be completed, failed or cancelled\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\ACK\ACK\DC2\ETXZ\b\ETB\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\ACK\SOH\DC2\ETXZ\CAN(\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\ACK\ETX\DC2\ETXZ+,\n\
    \\206\SOH\n\
    \\EOT\EOT\SOH\STX\a\DC2\ETX^\b,\SUB\192\SOH A patch marker has been detected and lang is being told that change exists. This\n\
    \ job is strange in that it is sent pre-emptively to lang without any corresponding\n\
    \ command being sent first.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\a\ACK\DC2\ETX^\b\SYN\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\a\SOH\DC2\ETX^\ETB'\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\a\ETX\DC2\ETX^*+\n\
    \H\n\
    \\EOT\EOT\SOH\STX\b\DC2\ETX`\bW\SUB; A child workflow execution has started or failed to start\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\b\ACK\DC2\ETX`\b*\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\b\SOH\DC2\ETX`+Q\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\b\ETX\DC2\ETX`TV\n\
    \Q\n\
    \\EOT\EOT\SOH\STX\t\DC2\ETXb\bL\SUBD A child workflow was resolved, result could be completed or failed\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\t\ACK\DC2\ETXb\b%\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\t\SOH\DC2\ETXb&F\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\t\ETX\DC2\ETXbIK\n\
    \A\n\
    \\EOT\EOT\SOH\STX\n\
    \\DC2\ETXd\bL\SUB4 An attempt to signal an external workflow resolved\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\n\
    \\ACK\DC2\ETXd\b%\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\n\
    \\SOH\DC2\ETXd&F\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\n\
    \\ETX\DC2\ETXdIK\n\
    \A\n\
    \\EOT\EOT\SOH\STX\v\DC2\ETXf\b[\SUB4 An attempt to cancel an external workflow resolved\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\v\ACK\DC2\ETXf\b,\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\v\SOH\DC2\ETXf-U\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\v\ETX\DC2\ETXfXZ\n\
    \5\n\
    \\EOT\EOT\SOH\STX\f\DC2\ETXh\b \SUB( A request to handle a workflow update.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\f\ACK\DC2\ETXh\b\DLE\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\f\SOH\DC2\ETXh\DC1\SUB\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\f\ETX\DC2\ETXh\GS\US\n\
    \\222\SOH\n\
    \\EOT\EOT\SOH\STX\r\DC2\ETXl\b/\SUB\208\SOH Remove the workflow identified by the [WorkflowActivation] containing this job from the\n\
    \ cache after performing the activation. It is guaranteed that this will be the only job\n\
    \ in the activation if present.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\r\ACK\DC2\ETXl\b\ETB\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\r\SOH\DC2\ETXl\CAN)\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\r\ETX\DC2\ETXl,.\n\
    \#\n\
    \\STX\EOT\STX\DC2\ENQq\NUL\164\SOH\SOH\SUB\SYN Start a new workflow\n\
    \\n\
    \\n\
    \\n\
    \\ETX\EOT\STX\SOH\DC2\ETXq\b\NAK\n\
    \Q\n\
    \\EOT\EOT\STX\STX\NUL\DC2\ETXs\EOT\GS\SUBD The identifier the lang-specific sdk uses to execute workflow code\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\ETXs\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETXs\v\CAN\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETXs\ESC\FS\n\
    \:\n\
    \\EOT\EOT\STX\STX\SOH\DC2\ETXu\EOT\ESC\SUB- The workflow id used on the temporal server\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\SOH\ENQ\DC2\ETXu\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETXu\v\SYN\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETXu\EM\SUB\n\
    \*\n\
    \\EOT\EOT\STX\STX\STX\DC2\ETXw\EOT:\SUB\GS Inputs to the workflow code\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\STX\EOT\DC2\ETXw\EOT\f\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\STX\ACK\DC2\ETXw\r+\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\STX\SOH\DC2\ETXw,5\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\STX\ETX\DC2\ETXw89\n\
    \\148\SOH\n\
    \\EOT\EOT\STX\STX\ETX\DC2\ETXz\EOT\US\SUB\134\SOH The seed must be used to initialize the random generator used by SDK.\n\
    \ RandomSeedUpdatedAttributes are used to deliver seed updates.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\ETX\ENQ\DC2\ETXz\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\ETX\SOH\DC2\ETXz\v\SUB\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\ETX\ETX\DC2\ETXz\GS\RS\n\
    \o\n\
    \\EOT\EOT\STX\STX\EOT\DC2\ETX|\EOT<\SUBb Used to add metadata e.g. for tracing and auth, meant to be read and written to by interceptors.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\EOT\ACK\DC2\ETX|\EOT/\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\EOT\SOH\DC2\ETX|07\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\EOT\ETX\DC2\ETX|:;\n\
    \B\n\
    \\EOT\EOT\STX\STX\ENQ\DC2\ETX~\EOT\CAN\SUB5 Identity of the client who requested this execution\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\ENQ\ENQ\DC2\ETX~\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\ENQ\SOH\DC2\ETX~\v\DC3\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\ENQ\ETX\DC2\ETX~\SYN\ETB\n\
    \I\n\
    \\EOT\EOT\STX\STX\ACK\DC2\EOT\128\SOH\EOT@\SUB; If this workflow is a child, information about the parent\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ACK\ACK\DC2\EOT\128\SOH\EOT&\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ACK\SOH\DC2\EOT\128\SOH';\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ACK\ETX\DC2\EOT\128\SOH>?\n\
    \W\n\
    \\EOT\EOT\STX\STX\a\DC2\EOT\130\SOH\EOT<\SUBI Total workflow execution timeout including retries and continue as new.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\a\ACK\DC2\EOT\130\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\a\SOH\DC2\EOT\130\SOH\GS7\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\a\ETX\DC2\EOT\130\SOH:;\n\
    \1\n\
    \\EOT\EOT\STX\STX\b\DC2\EOT\132\SOH\EOT6\SUB# Timeout of a single workflow run.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\b\ACK\DC2\EOT\132\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\b\SOH\DC2\EOT\132\SOH\GS1\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\b\ETX\DC2\EOT\132\SOH45\n\
    \2\n\
    \\EOT\EOT\STX\STX\t\DC2\EOT\134\SOH\EOT8\SUB$ Timeout of a single workflow task.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\t\ACK\DC2\EOT\134\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\t\SOH\DC2\EOT\134\SOH\GS2\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\t\ETX\DC2\EOT\134\SOH57\n\
    \\DEL\n\
    \\EOT\EOT\STX\STX\n\
    \\DC2\EOT\137\SOH\EOT0\SUBq Run id of the previous workflow which continued-as-new or retired or cron executed into this\n\
    \ workflow, if any.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\n\
    \\ENQ\DC2\EOT\137\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\n\
    \\SOH\DC2\EOT\137\SOH\v*\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\n\
    \\ETX\DC2\EOT\137\SOH-/\n\
    \X\n\
    \\EOT\EOT\STX\STX\v\DC2\EOT\139\SOH\EOTJ\SUBJ If this workflow was a continuation, indicates the type of continuation.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\v\ACK\DC2\EOT\139\SOH\EOT0\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\v\SOH\DC2\EOT\139\SOH1D\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\v\ETX\DC2\EOT\139\SOHGI\n\
    \f\n\
    \\EOT\EOT\STX\STX\f\DC2\EOT\141\SOH\EOT;\SUBX If this workflow was a continuation and that continuation failed, the details of that.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\f\ACK\DC2\EOT\141\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\f\SOH\DC2\EOT\141\SOH$5\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\f\ETX\DC2\EOT\141\SOH8:\n\
    \i\n\
    \\EOT\EOT\STX\STX\r\DC2\EOT\143\SOH\EOT@\SUB[ If this workflow was a continuation and that continuation completed, the details of that.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\r\ACK\DC2\EOT\143\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\r\SOH\DC2\EOT\143\SOH$:\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\r\ETX\DC2\EOT\143\SOH=?\n\
    \c\n\
    \\EOT\EOT\STX\STX\SO\DC2\EOT\145\SOH\EOT'\SUBU This is the very first run id the workflow ever had, following continuation chains.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SO\ENQ\DC2\EOT\145\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SO\SOH\DC2\EOT\145\SOH\v!\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SO\ETX\DC2\EOT\145\SOH$&\n\
    \,\n\
    \\EOT\EOT\STX\STX\SI\DC2\EOT\147\SOH\EOT9\SUB\RS This workflow's retry policy\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SI\ACK\DC2\EOT\147\SOH\EOT&\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SI\SOH\DC2\EOT\147\SOH'3\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SI\ETX\DC2\EOT\147\SOH68\n\
    \Y\n\
    \\EOT\EOT\STX\STX\DLE\DC2\EOT\149\SOH\EOT\ETB\SUBK Starting at 1, the number of times we have tried to execute this workflow\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\DLE\ENQ\DC2\EOT\149\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\DLE\SOH\DC2\EOT\149\SOH\n\
    \\DC1\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\DLE\ETX\DC2\EOT\149\SOH\DC4\SYN\n\
    \M\n\
    \\EOT\EOT\STX\STX\DC1\DC2\EOT\151\SOH\EOT\RS\SUB? If this workflow runs on a cron schedule, it will appear here\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\DC1\ENQ\DC2\EOT\151\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\DC1\SOH\DC2\EOT\151\SOH\v\CAN\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\DC1\ETX\DC2\EOT\151\SOH\ESC\GS\n\
    \\143\SOH\n\
    \\EOT\EOT\STX\STX\DC2\DC2\EOT\154\SOH\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\
    \\r\n\
    \\ENQ\EOT\STX\STX\DC2\ACK\DC2\EOT\154\SOH\EOT\GS\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\DC2\SOH\DC2\EOT\154\SOH\RS@\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\DC2\ETX\DC2\EOT\154\SOHCE\n\
    \\185\SOH\n\
    \\EOT\EOT\STX\STX\DC3\DC2\EOT\157\SOH\EOTE\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\
    \\r\n\
    \\ENQ\EOT\STX\STX\DC3\ACK\DC2\EOT\157\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\DC3\SOH\DC2\EOT\157\SOH\GS?\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\DC3\ETX\DC2\EOT\157\SOHBD\n\
    \!\n\
    \\EOT\EOT\STX\STX\DC4\DC2\EOT\159\SOH\EOT*\SUB\DC3 User-defined memo\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\DC4\ACK\DC2\EOT\159\SOH\EOT\US\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\DC4\SOH\DC2\EOT\159\SOH $\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\DC4\ETX\DC2\EOT\159\SOH')\n\
    \P\n\
    \\EOT\EOT\STX\STX\NAK\DC2\EOT\161\SOH\EOTC\SUBB Search attributes created/updated when this workflow was started\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\NAK\ACK\DC2\EOT\161\SOH\EOT+\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\NAK\SOH\DC2\EOT\161\SOH,=\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\NAK\ETX\DC2\EOT\161\SOH@B\n\
    \K\n\
    \\EOT\EOT\STX\STX\SYN\DC2\EOT\163\SOH\EOT.\SUB= When the workflow execution started event was first written\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SYN\ACK\DC2\EOT\163\SOH\EOT\GS\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SYN\SOH\DC2\EOT\163\SOH\RS(\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SYN\ETX\DC2\EOT\163\SOH+-\n\
    \8\n\
    \\STX\EOT\ETX\DC2\ACK\167\SOH\NUL\170\SOH\SOH\SUB* Notify a workflow that a timer has fired\n\
    \\n\
    \\v\n\
    \\ETX\EOT\ETX\SOH\DC2\EOT\167\SOH\b\DC1\n\
    \[\n\
    \\EOT\EOT\ETX\STX\NUL\DC2\EOT\169\SOH\EOT\DC3\SUBM Sequence number as provided by lang in the corresponding StartTimer command\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\NUL\ENQ\DC2\EOT\169\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\EOT\169\SOH\v\SO\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\EOT\169\SOH\DC1\DC2\n\
    \D\n\
    \\STX\EOT\EOT\DC2\ACK\173\SOH\NUL\177\SOH\SOH\SUB6 Notify a workflow that an activity has been resolved\n\
    \\n\
    \\v\n\
    \\ETX\EOT\EOT\SOH\DC2\EOT\173\SOH\b\ETB\n\
    \a\n\
    \\EOT\EOT\EOT\STX\NUL\DC2\EOT\175\SOH\EOT\DC3\SUBS Sequence number as provided by lang in the corresponding ScheduleActivity command\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\ENQ\DC2\EOT\175\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\EOT\175\SOH\v\SO\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\EOT\175\SOH\DC1\DC2\n\
    \\f\n\
    \\EOT\EOT\EOT\STX\SOH\DC2\EOT\176\SOH\EOT2\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\SOH\ACK\DC2\EOT\176\SOH\EOT&\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\EOT\176\SOH'-\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\EOT\176\SOH01\n\
    \x\n\
    \\STX\EOT\ENQ\DC2\ACK\181\SOH\NUL\189\SOH\SOH\SUBj Notify a workflow that a start child workflow execution request has succeeded, failed or was\n\
    \ cancelled.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\ENQ\SOH\DC2\EOT\181\SOH\b*\n\
    \l\n\
    \\EOT\EOT\ENQ\STX\NUL\DC2\EOT\183\SOH\EOT\DC3\SUB^ Sequence number as provided by lang in the corresponding StartChildWorkflowExecution command\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\ENQ\DC2\EOT\183\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\SOH\DC2\EOT\183\SOH\v\SO\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\ETX\DC2\EOT\183\SOH\DC1\DC2\n\
    \\SO\n\
    \\EOT\EOT\ENQ\b\NUL\DC2\ACK\184\SOH\EOT\188\SOH\ENQ\n\
    \\r\n\
    \\ENQ\EOT\ENQ\b\NUL\SOH\DC2\EOT\184\SOH\n\
    \\DLE\n\
    \\f\n\
    \\EOT\EOT\ENQ\STX\SOH\DC2\EOT\185\SOH\b@\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\SOH\ACK\DC2\EOT\185\SOH\b1\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\SOH\SOH\DC2\EOT\185\SOH2;\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\SOH\ETX\DC2\EOT\185\SOH>?\n\
    \\f\n\
    \\EOT\EOT\ENQ\STX\STX\DC2\EOT\186\SOH\b=\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\STX\ACK\DC2\EOT\186\SOH\b1\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\STX\SOH\DC2\EOT\186\SOH28\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\STX\ETX\DC2\EOT\186\SOH;<\n\
    \\f\n\
    \\EOT\EOT\ENQ\STX\ETX\DC2\EOT\187\SOH\bB\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\ETX\ACK\DC2\EOT\187\SOH\b3\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\ETX\SOH\DC2\EOT\187\SOH4=\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\ETX\ETX\DC2\EOT\187\SOH@A\n\
    \.\n\
    \\STX\EOT\ACK\DC2\ACK\192\SOH\NUL\194\SOH\SOH\SUB  Simply pass the run_id to lang\n\
    \\n\
    \\v\n\
    \\ETX\EOT\ACK\SOH\DC2\EOT\192\SOH\b1\n\
    \\f\n\
    \\EOT\EOT\ACK\STX\NUL\DC2\EOT\193\SOH\EOT\SYN\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\ENQ\DC2\EOT\193\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\SOH\DC2\EOT\193\SOH\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\ETX\DC2\EOT\193\SOH\DC4\NAK\n\
    \1\n\
    \\STX\EOT\a\DC2\ACK\197\SOH\NUL\203\SOH\SOH\SUB# Provide lang the cause of failure\n\
    \\n\
    \\v\n\
    \\ETX\EOT\a\SOH\DC2\EOT\197\SOH\b1\n\
    \\132\SOH\n\
    \\EOT\EOT\a\STX\NUL\DC2\EOT\200\SOH\EOT\ESC\SUBv Lang should have this information but it's more convenient to pass it back\n\
    \ for error construction on the lang side.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\ENQ\DC2\EOT\200\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\SOH\DC2\EOT\200\SOH\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\ETX\DC2\EOT\200\SOH\EM\SUB\n\
    \\f\n\
    \\EOT\EOT\a\STX\SOH\DC2\EOT\201\SOH\EOT\GS\n\
    \\r\n\
    \\ENQ\EOT\a\STX\SOH\ENQ\DC2\EOT\201\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\SOH\SOH\DC2\EOT\201\SOH\v\CAN\n\
    \\r\n\
    \\ENQ\EOT\a\STX\SOH\ETX\DC2\EOT\201\SOH\ESC\FS\n\
    \\f\n\
    \\EOT\EOT\a\STX\STX\DC2\EOT\202\SOH\EOTD\n\
    \\r\n\
    \\ENQ\EOT\a\STX\STX\ACK\DC2\EOT\202\SOH\EOT9\n\
    \\r\n\
    \\ENQ\EOT\a\STX\STX\SOH\DC2\EOT\202\SOH:?\n\
    \\r\n\
    \\ENQ\EOT\a\STX\STX\ETX\DC2\EOT\202\SOHBC\n\
    \\153\SOH\n\
    \\STX\EOT\b\DC2\ACK\207\SOH\NUL\209\SOH\SOH\SUB\138\SOH `failure` should be ChildWorkflowFailure with cause set to CancelledFailure.\n\
    \ The failure is constructed in core for lang's convenience.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\b\SOH\DC2\EOT\207\SOH\b3\n\
    \\f\n\
    \\EOT\EOT\b\STX\NUL\DC2\EOT\208\SOH\EOT0\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\ACK\DC2\EOT\208\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\SOH\DC2\EOT\208\SOH$+\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\ETX\DC2\EOT\208\SOH./\n\
    \S\n\
    \\STX\EOT\t\DC2\ACK\212\SOH\NUL\216\SOH\SOH\SUBE Notify a workflow that a child workflow execution has been resolved\n\
    \\n\
    \\v\n\
    \\ETX\EOT\t\SOH\DC2\EOT\212\SOH\b%\n\
    \l\n\
    \\EOT\EOT\t\STX\NUL\DC2\EOT\214\SOH\EOT\DC3\SUB^ Sequence number as provided by lang in the corresponding StartChildWorkflowExecution command\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\ENQ\DC2\EOT\214\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\SOH\DC2\EOT\214\SOH\v\SO\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\ETX\DC2\EOT\214\SOH\DC1\DC2\n\
    \\f\n\
    \\EOT\EOT\t\STX\SOH\DC2\EOT\215\SOH\EOT2\n\
    \\r\n\
    \\ENQ\EOT\t\STX\SOH\ACK\DC2\EOT\215\SOH\EOT&\n\
    \\r\n\
    \\ENQ\EOT\t\STX\SOH\SOH\DC2\EOT\215\SOH'-\n\
    \\r\n\
    \\ENQ\EOT\t\STX\SOH\ETX\DC2\EOT\215\SOH01\n\
    \1\n\
    \\STX\EOT\n\
    \\DC2\ACK\219\SOH\NUL\221\SOH\SOH\SUB# Update the workflow's random seed\n\
    \\n\
    \\v\n\
    \\ETX\EOT\n\
    \\SOH\DC2\EOT\219\SOH\b\CAN\n\
    \\f\n\
    \\EOT\EOT\n\
    \\STX\NUL\DC2\EOT\220\SOH\EOT\US\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\ENQ\DC2\EOT\220\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\SOH\DC2\EOT\220\SOH\v\SUB\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\ETX\DC2\EOT\220\SOH\GS\RS\n\
    \ \n\
    \\STX\EOT\v\DC2\ACK\224\SOH\NUL\234\SOH\SOH\SUB\DC2 Query a workflow\n\
    \\n\
    \\v\n\
    \\ETX\EOT\v\SOH\DC2\EOT\224\SOH\b\NAK\n\
    \\137\STX\n\
    \\EOT\EOT\v\STX\NUL\DC2\EOT\228\SOH\EOT\CAN\SUB\250\SOH For PollWFTResp `query` field, this will be set to the special value `legacy`. For the\n\
    \ `queries` field, the server provides a unique identifier. If it is a `legacy` query,\n\
    \ lang cannot issue any commands in response other than to answer the query.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\ENQ\DC2\EOT\228\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\SOH\DC2\EOT\228\SOH\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\ETX\DC2\EOT\228\SOH\SYN\ETB\n\
    \4\n\
    \\EOT\EOT\v\STX\SOH\DC2\EOT\230\SOH\EOT\SUB\SUB& The query's function/method/etc name\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\SOH\ENQ\DC2\EOT\230\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\SOH\SOH\DC2\EOT\230\SOH\v\NAK\n\
    \\r\n\
    \\ENQ\EOT\v\STX\SOH\ETX\DC2\EOT\230\SOH\CAN\EM\n\
    \\f\n\
    \\EOT\EOT\v\STX\STX\DC2\EOT\231\SOH\EOT:\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\EOT\DC2\EOT\231\SOH\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\ACK\DC2\EOT\231\SOH\r+\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\SOH\DC2\EOT\231\SOH,5\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\ETX\DC2\EOT\231\SOH89\n\
    \-\n\
    \\EOT\EOT\v\STX\ETX\DC2\EOT\233\SOH\EOT<\SUB\US Headers attached to the query\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ETX\ACK\DC2\EOT\233\SOH\EOT/\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ETX\SOH\DC2\EOT\233\SOH07\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ETX\ETX\DC2\EOT\233\SOH:;\n\
    \)\n\
    \\STX\EOT\f\DC2\ACK\237\SOH\NUL\240\SOH\SOH\SUB\ESC Cancel a running workflow\n\
    \\n\
    \\v\n\
    \\ETX\EOT\f\SOH\DC2\EOT\237\SOH\b\SYN\n\
    \9\n\
    \\EOT\EOT\f\STX\NUL\DC2\EOT\239\SOH\EOT8\SUB+ Information from the cancellation request\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\NUL\EOT\DC2\EOT\239\SOH\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\f\STX\NUL\ACK\DC2\EOT\239\SOH\r+\n\
    \\r\n\
    \\ENQ\EOT\f\STX\NUL\SOH\DC2\EOT\239\SOH,3\n\
    \\r\n\
    \\ENQ\EOT\f\STX\NUL\ETX\DC2\EOT\239\SOH67\n\
    \+\n\
    \\STX\EOT\r\DC2\ACK\243\SOH\NUL\250\SOH\SOH\SUB\GS Send a signal to a workflow\n\
    \\n\
    \\v\n\
    \\ETX\EOT\r\SOH\DC2\EOT\243\SOH\b\SYN\n\
    \\f\n\
    \\EOT\EOT\r\STX\NUL\DC2\EOT\244\SOH\EOT\ESC\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\ENQ\DC2\EOT\244\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\SOH\DC2\EOT\244\SOH\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\ETX\DC2\EOT\244\SOH\EM\SUB\n\
    \\f\n\
    \\EOT\EOT\r\STX\SOH\DC2\EOT\245\SOH\EOT6\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\EOT\DC2\EOT\245\SOH\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\ACK\DC2\EOT\245\SOH\r+\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\SOH\DC2\EOT\245\SOH,1\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\ETX\DC2\EOT\245\SOH45\n\
    \4\n\
    \\EOT\EOT\r\STX\STX\DC2\EOT\247\SOH\EOT\CAN\SUB& Identity of the sender of the signal\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\STX\ENQ\DC2\EOT\247\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\STX\SOH\DC2\EOT\247\SOH\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\r\STX\STX\ETX\DC2\EOT\247\SOH\SYN\ETB\n\
    \.\n\
    \\EOT\EOT\r\STX\ETX\DC2\EOT\249\SOH\EOT<\SUB  Headers attached to the signal\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ETX\ACK\DC2\EOT\249\SOH\EOT/\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ETX\SOH\DC2\EOT\249\SOH07\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ETX\ETX\DC2\EOT\249\SOH:;\n\
    \\176\SOH\n\
    \\STX\EOT\SO\DC2\ACK\254\SOH\NUL\128\STX\SOH\SUB\161\SOH Inform lang what the result of a call to `patched` or similar API should be -- this is always\n\
    \ sent pre-emptively, so any time it is sent the change is present\n\
    \\n\
    \\v\n\
    \\ETX\EOT\SO\SOH\DC2\EOT\254\SOH\b\SYN\n\
    \\f\n\
    \\EOT\EOT\SO\STX\NUL\DC2\EOT\255\SOH\EOT\CAN\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\NUL\ENQ\DC2\EOT\255\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\NUL\SOH\DC2\EOT\255\SOH\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\NUL\ETX\DC2\EOT\255\SOH\SYN\ETB\n\
    \\f\n\
    \\STX\EOT\SI\DC2\ACK\130\STX\NUL\137\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\SI\SOH\DC2\EOT\130\STX\b%\n\
    \q\n\
    \\EOT\EOT\SI\STX\NUL\DC2\EOT\133\STX\EOT\DC3\SUBc Sequence number as provided by lang in the corresponding SignalExternalWorkflowExecution\n\
    \ command\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\NUL\ENQ\DC2\EOT\133\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\NUL\SOH\DC2\EOT\133\STX\v\SO\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\NUL\ETX\DC2\EOT\133\STX\DC1\DC2\n\
    \v\n\
    \\EOT\EOT\SI\STX\SOH\DC2\EOT\136\STX\EOT0\SUBh If populated, this signal either failed to be sent or was cancelled depending on failure\n\
    \ type / info.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\SOH\ACK\DC2\EOT\136\STX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\SOH\SOH\DC2\EOT\136\STX$+\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\SOH\ETX\DC2\EOT\136\STX./\n\
    \\f\n\
    \\STX\EOT\DLE\DC2\ACK\139\STX\NUL\146\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\DLE\SOH\DC2\EOT\139\STX\b,\n\
    \x\n\
    \\EOT\EOT\DLE\STX\NUL\DC2\EOT\142\STX\EOT\DC3\SUBj Sequence number as provided by lang in the corresponding\n\
    \ RequestCancelExternalWorkflowExecution command\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\NUL\ENQ\DC2\EOT\142\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\NUL\SOH\DC2\EOT\142\STX\v\SO\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\NUL\ETX\DC2\EOT\142\STX\DC1\DC2\n\
    \v\n\
    \\EOT\EOT\DLE\STX\SOH\DC2\EOT\145\STX\EOT0\SUBh If populated, this signal either failed to be sent or was cancelled depending on failure\n\
    \ type / info.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\SOH\ACK\DC2\EOT\145\STX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\SOH\SOH\DC2\EOT\145\STX$+\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\SOH\ETX\DC2\EOT\145\STX./\n\
    \\160\STX\n\
    \\STX\EOT\DC1\DC2\ACK\151\STX\NUL\169\STX\SOH\SUB\145\STX Lang is requested to invoke an update handler on the workflow. Lang should invoke the update\n\
    \ validator first (if requested). If it accepts the update, immediately invoke the update handler.\n\
    \ Lang must reply to the activation containing this job with an `UpdateResponse`.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\DC1\SOH\DC2\EOT\151\STX\b\DLE\n\
    \<\n\
    \\EOT\EOT\DC1\STX\NUL\DC2\EOT\153\STX\EOT\DC2\SUB. A workflow-unique identifier for this update\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\NUL\ENQ\DC2\EOT\153\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\NUL\SOH\DC2\EOT\153\STX\v\r\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\NUL\ETX\DC2\EOT\153\STX\DLE\DC1\n\
    \u\n\
    \\EOT\EOT\DC1\STX\SOH\DC2\EOT\156\STX\EOT$\SUBg The protocol message instance ID - this is used to uniquely track the ID server side and\n\
    \ internally.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SOH\ENQ\DC2\EOT\156\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SOH\SOH\DC2\EOT\156\STX\v\US\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SOH\ETX\DC2\EOT\156\STX\"#\n\
    \.\n\
    \\EOT\EOT\DC1\STX\STX\DC2\EOT\158\STX\EOT\DC4\SUB  The name of the update handler\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\STX\ENQ\DC2\EOT\158\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\STX\SOH\DC2\EOT\158\STX\v\SI\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\STX\ETX\DC2\EOT\158\STX\DC2\DC3\n\
    \'\n\
    \\EOT\EOT\DC1\STX\ETX\DC2\EOT\160\STX\EOT6\SUB\EM The input to the update\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ETX\EOT\DC2\EOT\160\STX\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ETX\ACK\DC2\EOT\160\STX\r+\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ETX\SOH\DC2\EOT\160\STX,1\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ETX\ETX\DC2\EOT\160\STX45\n\
    \.\n\
    \\EOT\EOT\DC1\STX\EOT\DC2\EOT\162\STX\EOT<\SUB  Headers attached to the update\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\EOT\ACK\DC2\EOT\162\STX\EOT/\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\EOT\SOH\DC2\EOT\162\STX07\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\EOT\ETX\DC2\EOT\162\STX:;\n\
    \\165\SOH\n\
    \\EOT\EOT\DC1\STX\ENQ\DC2\EOT\165\STX\EOT)\SUB\150\SOH Remaining metadata associated with the update. The `update_id` field is stripped from here\n\
    \ and moved to `id`, since it is guaranteed to be present.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ENQ\ACK\DC2\EOT\165\STX\EOT\US\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ENQ\SOH\DC2\EOT\165\STX $\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ENQ\ETX\DC2\EOT\165\STX'(\n\
    \\179\SOH\n\
    \\EOT\EOT\DC1\STX\ACK\DC2\EOT\168\STX\EOT\ESC\SUB\164\SOH If set true, lang must run the update's validator before running the handler. This will be\n\
    \ set false during replay, since validation is not re-run during replay.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ACK\ENQ\DC2\EOT\168\STX\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ACK\SOH\DC2\EOT\168\STX\t\SYN\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ACK\ETX\DC2\EOT\168\STX\EM\SUB\n\
    \\f\n\
    \\STX\EOT\DC2\DC2\ACK\171\STX\NUL\200\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\DC2\SOH\DC2\EOT\171\STX\b\ETB\n\
    \\f\n\
    \\EOT\EOT\DC2\STX\NUL\DC2\EOT\172\STX\EOT\ETB\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\NUL\ENQ\DC2\EOT\172\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\NUL\SOH\DC2\EOT\172\STX\v\DC2\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\NUL\ETX\DC2\EOT\172\STX\NAK\SYN\n\
    \\SO\n\
    \\EOT\EOT\DC2\EOT\NUL\DC2\ACK\174\STX\EOT\198\STX\ENQ\n\
    \\r\n\
    \\ENQ\EOT\DC2\EOT\NUL\SOH\DC2\EOT\174\STX\t\ETB\n\
    \\SO\n\
    \\ACK\EOT\DC2\EOT\NUL\STX\NUL\DC2\EOT\175\STX\b\CAN\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\NUL\SOH\DC2\EOT\175\STX\b\DC3\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\NUL\STX\DC2\EOT\175\STX\SYN\ETB\n\
    \(\n\
    \\ACK\EOT\DC2\EOT\NUL\STX\SOH\DC2\EOT\177\STX\b\ETB\SUB\CAN Workflow cache is full\n\
    \\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\SOH\SOH\DC2\EOT\177\STX\b\DC2\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\SOH\STX\DC2\EOT\177\STX\NAK\SYN\n\
    \\176\SOH\n\
    \\ACK\EOT\DC2\EOT\NUL\STX\STX\DC2\EOT\180\STX\b\ETB\SUB\159\SOH Workflow received a partial task but was not in the cache. Typically it won't be in the\n\
    \ lang cache either at this point, but we send an eviction to be sure.\n\
    \\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\STX\SOH\DC2\EOT\180\STX\b\DC2\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\STX\STX\DC2\EOT\180\STX\NAK\SYN\n\
    \J\n\
    \\ACK\EOT\DC2\EOT\NUL\STX\ETX\DC2\EOT\182\STX\b\ESC\SUB: The workflow produced results inconsistent with history.\n\
    \\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\ETX\SOH\DC2\EOT\182\STX\b\SYN\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\ETX\STX\DC2\EOT\182\STX\EM\SUB\n\
    \Q\n\
    \\ACK\EOT\DC2\EOT\NUL\STX\EOT\DC2\EOT\184\STX\b\SYN\SUBA The lang side completed the workflow activation with a failure.\n\
    \\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\EOT\SOH\DC2\EOT\184\STX\b\DC1\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\EOT\STX\DC2\EOT\184\STX\DC4\NAK\n\
    \N\n\
    \\ACK\EOT\DC2\EOT\NUL\STX\ENQ\DC2\EOT\186\STX\b\ESC\SUB> The lang side explicitly requested this workflow be evicted.\n\
    \\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\ENQ\SOH\DC2\EOT\186\STX\b\SYN\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\ENQ\STX\DC2\EOT\186\STX\EM\SUB\n\
    \\173\SOH\n\
    \\ACK\EOT\DC2\EOT\NUL\STX\ACK\DC2\EOT\189\STX\b\ESC\SUB\156\SOH The workflow task we tried to respond to didn't exist. The workflow might have already\n\
    \ finished, or the WFT timed out but we didn't learn about that yet.\n\
    \\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\ACK\SOH\DC2\EOT\189\STX\b\SYN\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\ACK\STX\DC2\EOT\189\STX\EM\SUB\n\
    \\163\SOH\n\
    \\ACK\EOT\DC2\EOT\NUL\STX\a\DC2\EOT\192\STX\b\RS\SUB\146\SOH There was new work that must be handled while we attempted to complete the WFT. Ex:\n\
    \ a new signal came in while trying to complete the workflow.\n\
    \\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\a\SOH\DC2\EOT\192\STX\b\EM\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\a\STX\DC2\EOT\192\STX\FS\GS\n\
    \\186\SOH\n\
    \\ACK\EOT\DC2\EOT\NUL\STX\b\DC2\EOT\195\STX\b\DC2\SUB\169\SOH There was some fatal error processing the workflow, typically an internal error, but\n\
    \ can also happen if then network drops out while paginating. Check message string.\n\
    \\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\b\SOH\DC2\EOT\195\STX\b\r\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\b\STX\DC2\EOT\195\STX\DLE\DC1\n\
    \O\n\
    \\ACK\EOT\DC2\EOT\NUL\STX\t\DC2\EOT\197\STX\b(\SUB? Something went wrong attempting to fetch more history events.\n\
    \\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\t\SOH\DC2\EOT\197\STX\b#\n\
    \\SI\n\
    \\a\EOT\DC2\EOT\NUL\STX\t\STX\DC2\EOT\197\STX&'\n\
    \\f\n\
    \\EOT\EOT\DC2\STX\SOH\DC2\EOT\199\STX\EOT\RS\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\SOH\ACK\DC2\EOT\199\STX\EOT\DC2\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\SOH\SOH\DC2\EOT\199\STX\DC3\EM\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\SOH\ETX\DC2\EOT\199\STX\FS\GSb\ACKproto3"