{- This file was auto-generated from temporal/sdk/core/workflow_commands/workflow_commands.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.WorkflowCommands.WorkflowCommands (
        ActivityCancellationType(..), ActivityCancellationType(),
        ActivityCancellationType'UnrecognizedValue,
        CancelChildWorkflowExecution(), CancelSignalWorkflow(),
        CancelTimer(), CancelWorkflowExecution(),
        CompleteWorkflowExecution(), ContinueAsNewWorkflowExecution(),
        ContinueAsNewWorkflowExecution'HeadersEntry(),
        ContinueAsNewWorkflowExecution'MemoEntry(),
        ContinueAsNewWorkflowExecution'SearchAttributesEntry(),
        FailWorkflowExecution(), ModifyWorkflowProperties(), QueryResult(),
        QueryResult'Variant(..), _QueryResult'Succeeded,
        _QueryResult'Failed, QuerySuccess(), RequestCancelActivity(),
        RequestCancelExternalWorkflowExecution(),
        RequestCancelExternalWorkflowExecution'Target(..),
        _RequestCancelExternalWorkflowExecution'WorkflowExecution,
        _RequestCancelExternalWorkflowExecution'ChildWorkflowId,
        RequestCancelLocalActivity(), ScheduleActivity(),
        ScheduleActivity'HeadersEntry(), ScheduleLocalActivity(),
        ScheduleLocalActivity'HeadersEntry(), SetPatchMarker(),
        SignalExternalWorkflowExecution(),
        SignalExternalWorkflowExecution'Target(..),
        _SignalExternalWorkflowExecution'WorkflowExecution,
        _SignalExternalWorkflowExecution'ChildWorkflowId,
        SignalExternalWorkflowExecution'HeadersEntry(),
        StartChildWorkflowExecution(),
        StartChildWorkflowExecution'HeadersEntry(),
        StartChildWorkflowExecution'MemoEntry(),
        StartChildWorkflowExecution'SearchAttributesEntry(), StartTimer(),
        UpdateResponse(), UpdateResponse'Response(..),
        _UpdateResponse'Accepted, _UpdateResponse'Rejected,
        _UpdateResponse'Completed, UpsertWorkflowSearchAttributes(),
        UpsertWorkflowSearchAttributes'SearchAttributesEntry(),
        WorkflowCommand(), WorkflowCommand'Variant(..),
        _WorkflowCommand'StartTimer, _WorkflowCommand'ScheduleActivity,
        _WorkflowCommand'RespondToQuery,
        _WorkflowCommand'RequestCancelActivity,
        _WorkflowCommand'CancelTimer,
        _WorkflowCommand'CompleteWorkflowExecution,
        _WorkflowCommand'FailWorkflowExecution,
        _WorkflowCommand'ContinueAsNewWorkflowExecution,
        _WorkflowCommand'CancelWorkflowExecution,
        _WorkflowCommand'SetPatchMarker,
        _WorkflowCommand'StartChildWorkflowExecution,
        _WorkflowCommand'CancelChildWorkflowExecution,
        _WorkflowCommand'RequestCancelExternalWorkflowExecution,
        _WorkflowCommand'SignalExternalWorkflowExecution,
        _WorkflowCommand'CancelSignalWorkflow,
        _WorkflowCommand'ScheduleLocalActivity,
        _WorkflowCommand'RequestCancelLocalActivity,
        _WorkflowCommand'UpsertWorkflowSearchAttributes,
        _WorkflowCommand'ModifyWorkflowProperties,
        _WorkflowCommand'UpdateResponse
    ) where
import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism
import qualified Data.ProtoLens.Runtime.Prelude as Prelude
import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int
import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid
import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word
import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types
import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2
import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked
import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text
import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map
import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString
import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8
import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding
import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector
import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic
import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed
import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read
import qualified Proto.Google.Protobuf.Duration
import qualified Proto.Google.Protobuf.Empty
import qualified Proto.Google.Protobuf.Timestamp
import qualified Proto.Temporal.Api.Common.V1.Message
import qualified Proto.Temporal.Api.Enums.V1.Workflow
import qualified Proto.Temporal.Api.Failure.V1.Message
import qualified Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow
import qualified Proto.Temporal.Sdk.Core.Common.Common
newtype ActivityCancellationType'UnrecognizedValue
  = ActivityCancellationType'UnrecognizedValue Data.Int.Int32
  deriving stock (ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Bool
(ActivityCancellationType'UnrecognizedValue
 -> ActivityCancellationType'UnrecognizedValue -> Bool)
-> (ActivityCancellationType'UnrecognizedValue
    -> ActivityCancellationType'UnrecognizedValue -> Bool)
-> Eq ActivityCancellationType'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Bool
== :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Bool
$c/= :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Bool
/= :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Bool
Prelude.Eq, Eq ActivityCancellationType'UnrecognizedValue
Eq ActivityCancellationType'UnrecognizedValue =>
(ActivityCancellationType'UnrecognizedValue
 -> ActivityCancellationType'UnrecognizedValue -> Ordering)
-> (ActivityCancellationType'UnrecognizedValue
    -> ActivityCancellationType'UnrecognizedValue -> Bool)
-> (ActivityCancellationType'UnrecognizedValue
    -> ActivityCancellationType'UnrecognizedValue -> Bool)
-> (ActivityCancellationType'UnrecognizedValue
    -> ActivityCancellationType'UnrecognizedValue -> Bool)
-> (ActivityCancellationType'UnrecognizedValue
    -> ActivityCancellationType'UnrecognizedValue -> Bool)
-> (ActivityCancellationType'UnrecognizedValue
    -> ActivityCancellationType'UnrecognizedValue
    -> ActivityCancellationType'UnrecognizedValue)
-> (ActivityCancellationType'UnrecognizedValue
    -> ActivityCancellationType'UnrecognizedValue
    -> ActivityCancellationType'UnrecognizedValue)
-> Ord ActivityCancellationType'UnrecognizedValue
ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Bool
ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Ordering
ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'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 :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Ordering
compare :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Ordering
$c< :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Bool
< :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Bool
$c<= :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Bool
<= :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Bool
$c> :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Bool
> :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Bool
$c>= :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Bool
>= :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue -> Bool
$cmax :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue
max :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue
$cmin :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue
min :: ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType'UnrecognizedValue
Prelude.Ord, Int -> ActivityCancellationType'UnrecognizedValue -> ShowS
[ActivityCancellationType'UnrecognizedValue] -> ShowS
ActivityCancellationType'UnrecognizedValue -> String
(Int -> ActivityCancellationType'UnrecognizedValue -> ShowS)
-> (ActivityCancellationType'UnrecognizedValue -> String)
-> ([ActivityCancellationType'UnrecognizedValue] -> ShowS)
-> Show ActivityCancellationType'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ActivityCancellationType'UnrecognizedValue -> ShowS
showsPrec :: Int -> ActivityCancellationType'UnrecognizedValue -> ShowS
$cshow :: ActivityCancellationType'UnrecognizedValue -> String
show :: ActivityCancellationType'UnrecognizedValue -> String
$cshowList :: [ActivityCancellationType'UnrecognizedValue] -> ShowS
showList :: [ActivityCancellationType'UnrecognizedValue] -> ShowS
Prelude.Show)
data ActivityCancellationType
  = TRY_CANCEL |
    WAIT_CANCELLATION_COMPLETED |
    ABANDON |
    ActivityCancellationType'Unrecognized !ActivityCancellationType'UnrecognizedValue
  deriving stock (Int -> ActivityCancellationType -> ShowS
[ActivityCancellationType] -> ShowS
ActivityCancellationType -> String
(Int -> ActivityCancellationType -> ShowS)
-> (ActivityCancellationType -> String)
-> ([ActivityCancellationType] -> ShowS)
-> Show ActivityCancellationType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ActivityCancellationType -> ShowS
showsPrec :: Int -> ActivityCancellationType -> ShowS
$cshow :: ActivityCancellationType -> String
show :: ActivityCancellationType -> String
$cshowList :: [ActivityCancellationType] -> ShowS
showList :: [ActivityCancellationType] -> ShowS
Prelude.Show, ActivityCancellationType -> ActivityCancellationType -> Bool
(ActivityCancellationType -> ActivityCancellationType -> Bool)
-> (ActivityCancellationType -> ActivityCancellationType -> Bool)
-> Eq ActivityCancellationType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ActivityCancellationType -> ActivityCancellationType -> Bool
== :: ActivityCancellationType -> ActivityCancellationType -> Bool
$c/= :: ActivityCancellationType -> ActivityCancellationType -> Bool
/= :: ActivityCancellationType -> ActivityCancellationType -> Bool
Prelude.Eq, Eq ActivityCancellationType
Eq ActivityCancellationType =>
(ActivityCancellationType -> ActivityCancellationType -> Ordering)
-> (ActivityCancellationType -> ActivityCancellationType -> Bool)
-> (ActivityCancellationType -> ActivityCancellationType -> Bool)
-> (ActivityCancellationType -> ActivityCancellationType -> Bool)
-> (ActivityCancellationType -> ActivityCancellationType -> Bool)
-> (ActivityCancellationType
    -> ActivityCancellationType -> ActivityCancellationType)
-> (ActivityCancellationType
    -> ActivityCancellationType -> ActivityCancellationType)
-> Ord ActivityCancellationType
ActivityCancellationType -> ActivityCancellationType -> Bool
ActivityCancellationType -> ActivityCancellationType -> Ordering
ActivityCancellationType
-> ActivityCancellationType -> ActivityCancellationType
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 :: ActivityCancellationType -> ActivityCancellationType -> Ordering
compare :: ActivityCancellationType -> ActivityCancellationType -> Ordering
$c< :: ActivityCancellationType -> ActivityCancellationType -> Bool
< :: ActivityCancellationType -> ActivityCancellationType -> Bool
$c<= :: ActivityCancellationType -> ActivityCancellationType -> Bool
<= :: ActivityCancellationType -> ActivityCancellationType -> Bool
$c> :: ActivityCancellationType -> ActivityCancellationType -> Bool
> :: ActivityCancellationType -> ActivityCancellationType -> Bool
$c>= :: ActivityCancellationType -> ActivityCancellationType -> Bool
>= :: ActivityCancellationType -> ActivityCancellationType -> Bool
$cmax :: ActivityCancellationType
-> ActivityCancellationType -> ActivityCancellationType
max :: ActivityCancellationType
-> ActivityCancellationType -> ActivityCancellationType
$cmin :: ActivityCancellationType
-> ActivityCancellationType -> ActivityCancellationType
min :: ActivityCancellationType
-> ActivityCancellationType -> ActivityCancellationType
Prelude.Ord)
instance Data.ProtoLens.MessageEnum ActivityCancellationType where
  maybeToEnum :: Int -> Maybe ActivityCancellationType
maybeToEnum Int
0 = ActivityCancellationType -> Maybe ActivityCancellationType
forall a. a -> Maybe a
Prelude.Just ActivityCancellationType
TRY_CANCEL
  maybeToEnum Int
1 = ActivityCancellationType -> Maybe ActivityCancellationType
forall a. a -> Maybe a
Prelude.Just ActivityCancellationType
WAIT_CANCELLATION_COMPLETED
  maybeToEnum Int
2 = ActivityCancellationType -> Maybe ActivityCancellationType
forall a. a -> Maybe a
Prelude.Just ActivityCancellationType
ABANDON
  maybeToEnum Int
k
    = ActivityCancellationType -> Maybe ActivityCancellationType
forall a. a -> Maybe a
Prelude.Just
        (ActivityCancellationType'UnrecognizedValue
-> ActivityCancellationType
ActivityCancellationType'Unrecognized
           (Int32 -> ActivityCancellationType'UnrecognizedValue
ActivityCancellationType'UnrecognizedValue
              (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: ActivityCancellationType -> String
showEnum ActivityCancellationType
TRY_CANCEL = String
"TRY_CANCEL"
  showEnum ActivityCancellationType
WAIT_CANCELLATION_COMPLETED
    = String
"WAIT_CANCELLATION_COMPLETED"
  showEnum ActivityCancellationType
ABANDON = String
"ABANDON"
  showEnum
    (ActivityCancellationType'Unrecognized (ActivityCancellationType'UnrecognizedValue Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe ActivityCancellationType
readEnum String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TRY_CANCEL" = ActivityCancellationType -> Maybe ActivityCancellationType
forall a. a -> Maybe a
Prelude.Just ActivityCancellationType
TRY_CANCEL
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WAIT_CANCELLATION_COMPLETED"
    = ActivityCancellationType -> Maybe ActivityCancellationType
forall a. a -> Maybe a
Prelude.Just ActivityCancellationType
WAIT_CANCELLATION_COMPLETED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"ABANDON" = ActivityCancellationType -> Maybe ActivityCancellationType
forall a. a -> Maybe a
Prelude.Just ActivityCancellationType
ABANDON
    | Bool
Prelude.otherwise
    = Maybe Int
-> (Int -> Maybe ActivityCancellationType)
-> Maybe ActivityCancellationType
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 ActivityCancellationType
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded ActivityCancellationType where
  minBound :: ActivityCancellationType
minBound = ActivityCancellationType
TRY_CANCEL
  maxBound :: ActivityCancellationType
maxBound = ActivityCancellationType
ABANDON
instance Prelude.Enum ActivityCancellationType where
  toEnum :: Int -> ActivityCancellationType
toEnum Int
k__
    = ActivityCancellationType
-> (ActivityCancellationType -> ActivityCancellationType)
-> Maybe ActivityCancellationType
-> ActivityCancellationType
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> ActivityCancellationType
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              String
"toEnum: unknown value for enum ActivityCancellationType: "
              (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        ActivityCancellationType -> ActivityCancellationType
forall a. a -> a
Prelude.id (Int -> Maybe ActivityCancellationType
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: ActivityCancellationType -> Int
fromEnum ActivityCancellationType
TRY_CANCEL = Int
0
  fromEnum ActivityCancellationType
WAIT_CANCELLATION_COMPLETED = Int
1
  fromEnum ActivityCancellationType
ABANDON = Int
2
  fromEnum
    (ActivityCancellationType'Unrecognized (ActivityCancellationType'UnrecognizedValue Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: ActivityCancellationType -> ActivityCancellationType
succ ActivityCancellationType
ABANDON
    = String -> ActivityCancellationType
forall a. HasCallStack => String -> a
Prelude.error
        String
"ActivityCancellationType.succ: bad argument ABANDON. This value would be out of bounds."
  succ ActivityCancellationType
TRY_CANCEL = ActivityCancellationType
WAIT_CANCELLATION_COMPLETED
  succ ActivityCancellationType
WAIT_CANCELLATION_COMPLETED = ActivityCancellationType
ABANDON
  succ (ActivityCancellationType'Unrecognized ActivityCancellationType'UnrecognizedValue
_)
    = String -> ActivityCancellationType
forall a. HasCallStack => String -> a
Prelude.error
        String
"ActivityCancellationType.succ: bad argument: unrecognized value"
  pred :: ActivityCancellationType -> ActivityCancellationType
pred ActivityCancellationType
TRY_CANCEL
    = String -> ActivityCancellationType
forall a. HasCallStack => String -> a
Prelude.error
        String
"ActivityCancellationType.pred: bad argument TRY_CANCEL. This value would be out of bounds."
  pred ActivityCancellationType
WAIT_CANCELLATION_COMPLETED = ActivityCancellationType
TRY_CANCEL
  pred ActivityCancellationType
ABANDON = ActivityCancellationType
WAIT_CANCELLATION_COMPLETED
  pred (ActivityCancellationType'Unrecognized ActivityCancellationType'UnrecognizedValue
_)
    = String -> ActivityCancellationType
forall a. HasCallStack => String -> a
Prelude.error
        String
"ActivityCancellationType.pred: bad argument: unrecognized value"
  enumFrom :: ActivityCancellationType -> [ActivityCancellationType]
enumFrom = ActivityCancellationType -> [ActivityCancellationType]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: ActivityCancellationType
-> ActivityCancellationType -> [ActivityCancellationType]
enumFromTo = ActivityCancellationType
-> ActivityCancellationType -> [ActivityCancellationType]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: ActivityCancellationType
-> ActivityCancellationType -> [ActivityCancellationType]
enumFromThen = ActivityCancellationType
-> ActivityCancellationType -> [ActivityCancellationType]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: ActivityCancellationType
-> ActivityCancellationType
-> ActivityCancellationType
-> [ActivityCancellationType]
enumFromThenTo = ActivityCancellationType
-> ActivityCancellationType
-> ActivityCancellationType
-> [ActivityCancellationType]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault ActivityCancellationType where
  fieldDefault :: ActivityCancellationType
fieldDefault = ActivityCancellationType
TRY_CANCEL
instance Control.DeepSeq.NFData ActivityCancellationType where
  rnf :: ActivityCancellationType -> ()
rnf ActivityCancellationType
x__ = ActivityCancellationType -> () -> ()
forall a b. a -> b -> b
Prelude.seq ActivityCancellationType
x__ ()
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.childWorkflowSeq' @:: Lens' CancelChildWorkflowExecution Data.Word.Word32@ -}
data CancelChildWorkflowExecution
  = CancelChildWorkflowExecution'_constructor {CancelChildWorkflowExecution -> Word32
_CancelChildWorkflowExecution'childWorkflowSeq :: !Data.Word.Word32,
                                               CancelChildWorkflowExecution -> FieldSet
_CancelChildWorkflowExecution'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Bool
(CancelChildWorkflowExecution
 -> CancelChildWorkflowExecution -> Bool)
-> (CancelChildWorkflowExecution
    -> CancelChildWorkflowExecution -> Bool)
-> Eq CancelChildWorkflowExecution
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Bool
== :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Bool
$c/= :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Bool
/= :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Bool
Prelude.Eq, Eq CancelChildWorkflowExecution
Eq CancelChildWorkflowExecution =>
(CancelChildWorkflowExecution
 -> CancelChildWorkflowExecution -> Ordering)
-> (CancelChildWorkflowExecution
    -> CancelChildWorkflowExecution -> Bool)
-> (CancelChildWorkflowExecution
    -> CancelChildWorkflowExecution -> Bool)
-> (CancelChildWorkflowExecution
    -> CancelChildWorkflowExecution -> Bool)
-> (CancelChildWorkflowExecution
    -> CancelChildWorkflowExecution -> Bool)
-> (CancelChildWorkflowExecution
    -> CancelChildWorkflowExecution -> CancelChildWorkflowExecution)
-> (CancelChildWorkflowExecution
    -> CancelChildWorkflowExecution -> CancelChildWorkflowExecution)
-> Ord CancelChildWorkflowExecution
CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Bool
CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Ordering
CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> CancelChildWorkflowExecution
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 :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Ordering
compare :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Ordering
$c< :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Bool
< :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Bool
$c<= :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Bool
<= :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Bool
$c> :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Bool
> :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Bool
$c>= :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Bool
>= :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> Bool
$cmax :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> CancelChildWorkflowExecution
max :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> CancelChildWorkflowExecution
$cmin :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> CancelChildWorkflowExecution
min :: CancelChildWorkflowExecution
-> CancelChildWorkflowExecution -> CancelChildWorkflowExecution
Prelude.Ord)
instance Prelude.Show CancelChildWorkflowExecution where
  showsPrec :: Int -> CancelChildWorkflowExecution -> ShowS
showsPrec Int
_ CancelChildWorkflowExecution
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (CancelChildWorkflowExecution -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CancelChildWorkflowExecution
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField CancelChildWorkflowExecution "childWorkflowSeq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "childWorkflowSeq"
-> (Word32 -> f Word32)
-> CancelChildWorkflowExecution
-> f CancelChildWorkflowExecution
fieldOf Proxy# "childWorkflowSeq"
_
    = ((Word32 -> f Word32)
 -> CancelChildWorkflowExecution -> f CancelChildWorkflowExecution)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> CancelChildWorkflowExecution
-> f CancelChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CancelChildWorkflowExecution -> Word32)
-> (CancelChildWorkflowExecution
    -> Word32 -> CancelChildWorkflowExecution)
-> Lens
     CancelChildWorkflowExecution
     CancelChildWorkflowExecution
     Word32
     Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CancelChildWorkflowExecution -> Word32
_CancelChildWorkflowExecution'childWorkflowSeq
           (\ CancelChildWorkflowExecution
x__ Word32
y__
              -> CancelChildWorkflowExecution
x__ {_CancelChildWorkflowExecution'childWorkflowSeq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CancelChildWorkflowExecution where
  messageName :: Proxy CancelChildWorkflowExecution -> Text
messageName Proxy CancelChildWorkflowExecution
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.CancelChildWorkflowExecution"
  packedMessageDescriptor :: Proxy CancelChildWorkflowExecution -> ByteString
packedMessageDescriptor Proxy CancelChildWorkflowExecution
_
    = ByteString
"\n\
      \\FSCancelChildWorkflowExecution\DC2,\n\
      \\DC2child_workflow_seq\CAN\SOH \SOH(\rR\DLEchildWorkflowSeq"
  packedFileDescriptor :: Proxy CancelChildWorkflowExecution -> ByteString
packedFileDescriptor Proxy CancelChildWorkflowExecution
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CancelChildWorkflowExecution)
fieldsByTag
    = let
        childWorkflowSeq__field_descriptor :: FieldDescriptor CancelChildWorkflowExecution
childWorkflowSeq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor CancelChildWorkflowExecution Word32
-> FieldDescriptor CancelChildWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"child_workflow_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
     CancelChildWorkflowExecution
     CancelChildWorkflowExecution
     Word32
     Word32
-> FieldAccessor CancelChildWorkflowExecution 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 @"childWorkflowSeq")) ::
              Data.ProtoLens.FieldDescriptor CancelChildWorkflowExecution
      in
        [(Tag, FieldDescriptor CancelChildWorkflowExecution)]
-> Map Tag (FieldDescriptor CancelChildWorkflowExecution)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor CancelChildWorkflowExecution
childWorkflowSeq__field_descriptor)]
  unknownFields :: Lens' CancelChildWorkflowExecution FieldSet
unknownFields
    = (CancelChildWorkflowExecution -> FieldSet)
-> (CancelChildWorkflowExecution
    -> FieldSet -> CancelChildWorkflowExecution)
-> Lens' CancelChildWorkflowExecution FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CancelChildWorkflowExecution -> FieldSet
_CancelChildWorkflowExecution'_unknownFields
        (\ CancelChildWorkflowExecution
x__ FieldSet
y__
           -> CancelChildWorkflowExecution
x__ {_CancelChildWorkflowExecution'_unknownFields = y__})
  defMessage :: CancelChildWorkflowExecution
defMessage
    = CancelChildWorkflowExecution'_constructor
        {_CancelChildWorkflowExecution'childWorkflowSeq :: Word32
_CancelChildWorkflowExecution'childWorkflowSeq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CancelChildWorkflowExecution'_unknownFields :: FieldSet
_CancelChildWorkflowExecution'_unknownFields = []}
  parseMessage :: Parser CancelChildWorkflowExecution
parseMessage
    = let
        loop ::
          CancelChildWorkflowExecution
          -> Data.ProtoLens.Encoding.Bytes.Parser CancelChildWorkflowExecution
        loop :: CancelChildWorkflowExecution -> Parser CancelChildWorkflowExecution
loop CancelChildWorkflowExecution
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
"child_workflow_seq"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"childWorkflowSeq") 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 CancelChildWorkflowExecution
-> String -> Parser CancelChildWorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do CancelChildWorkflowExecution -> Parser CancelChildWorkflowExecution
loop CancelChildWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"CancelChildWorkflowExecution"
  buildMessage :: CancelChildWorkflowExecution -> Builder
buildMessage
    = \ CancelChildWorkflowExecution
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Word32
_v
                  = FoldLike
  Word32
  CancelChildWorkflowExecution
  CancelChildWorkflowExecution
  Word32
  Word32
-> CancelChildWorkflowExecution -> 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 @"childWorkflowSeq") CancelChildWorkflowExecution
_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
  CancelChildWorkflowExecution
  CancelChildWorkflowExecution
  FieldSet
  FieldSet
-> CancelChildWorkflowExecution -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CancelChildWorkflowExecution
  CancelChildWorkflowExecution
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' CancelChildWorkflowExecution FieldSet
Data.ProtoLens.unknownFields CancelChildWorkflowExecution
_x))
instance Control.DeepSeq.NFData CancelChildWorkflowExecution where
  rnf :: CancelChildWorkflowExecution -> ()
rnf
    = \ CancelChildWorkflowExecution
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CancelChildWorkflowExecution -> FieldSet
_CancelChildWorkflowExecution'_unknownFields CancelChildWorkflowExecution
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (CancelChildWorkflowExecution -> Word32
_CancelChildWorkflowExecution'childWorkflowSeq CancelChildWorkflowExecution
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.seq' @:: Lens' CancelSignalWorkflow Data.Word.Word32@ -}
data CancelSignalWorkflow
  = CancelSignalWorkflow'_constructor {CancelSignalWorkflow -> Word32
_CancelSignalWorkflow'seq :: !Data.Word.Word32,
                                       CancelSignalWorkflow -> FieldSet
_CancelSignalWorkflow'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CancelSignalWorkflow -> CancelSignalWorkflow -> Bool
(CancelSignalWorkflow -> CancelSignalWorkflow -> Bool)
-> (CancelSignalWorkflow -> CancelSignalWorkflow -> Bool)
-> Eq CancelSignalWorkflow
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CancelSignalWorkflow -> CancelSignalWorkflow -> Bool
== :: CancelSignalWorkflow -> CancelSignalWorkflow -> Bool
$c/= :: CancelSignalWorkflow -> CancelSignalWorkflow -> Bool
/= :: CancelSignalWorkflow -> CancelSignalWorkflow -> Bool
Prelude.Eq, Eq CancelSignalWorkflow
Eq CancelSignalWorkflow =>
(CancelSignalWorkflow -> CancelSignalWorkflow -> Ordering)
-> (CancelSignalWorkflow -> CancelSignalWorkflow -> Bool)
-> (CancelSignalWorkflow -> CancelSignalWorkflow -> Bool)
-> (CancelSignalWorkflow -> CancelSignalWorkflow -> Bool)
-> (CancelSignalWorkflow -> CancelSignalWorkflow -> Bool)
-> (CancelSignalWorkflow
    -> CancelSignalWorkflow -> CancelSignalWorkflow)
-> (CancelSignalWorkflow
    -> CancelSignalWorkflow -> CancelSignalWorkflow)
-> Ord CancelSignalWorkflow
CancelSignalWorkflow -> CancelSignalWorkflow -> Bool
CancelSignalWorkflow -> CancelSignalWorkflow -> Ordering
CancelSignalWorkflow
-> CancelSignalWorkflow -> CancelSignalWorkflow
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 :: CancelSignalWorkflow -> CancelSignalWorkflow -> Ordering
compare :: CancelSignalWorkflow -> CancelSignalWorkflow -> Ordering
$c< :: CancelSignalWorkflow -> CancelSignalWorkflow -> Bool
< :: CancelSignalWorkflow -> CancelSignalWorkflow -> Bool
$c<= :: CancelSignalWorkflow -> CancelSignalWorkflow -> Bool
<= :: CancelSignalWorkflow -> CancelSignalWorkflow -> Bool
$c> :: CancelSignalWorkflow -> CancelSignalWorkflow -> Bool
> :: CancelSignalWorkflow -> CancelSignalWorkflow -> Bool
$c>= :: CancelSignalWorkflow -> CancelSignalWorkflow -> Bool
>= :: CancelSignalWorkflow -> CancelSignalWorkflow -> Bool
$cmax :: CancelSignalWorkflow
-> CancelSignalWorkflow -> CancelSignalWorkflow
max :: CancelSignalWorkflow
-> CancelSignalWorkflow -> CancelSignalWorkflow
$cmin :: CancelSignalWorkflow
-> CancelSignalWorkflow -> CancelSignalWorkflow
min :: CancelSignalWorkflow
-> CancelSignalWorkflow -> CancelSignalWorkflow
Prelude.Ord)
instance Prelude.Show CancelSignalWorkflow where
  showsPrec :: Int -> CancelSignalWorkflow -> ShowS
showsPrec Int
_ CancelSignalWorkflow
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (CancelSignalWorkflow -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CancelSignalWorkflow
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField CancelSignalWorkflow "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq"
-> (Word32 -> f Word32)
-> CancelSignalWorkflow
-> f CancelSignalWorkflow
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32)
 -> CancelSignalWorkflow -> f CancelSignalWorkflow)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> CancelSignalWorkflow
-> f CancelSignalWorkflow
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CancelSignalWorkflow -> Word32)
-> (CancelSignalWorkflow -> Word32 -> CancelSignalWorkflow)
-> Lens CancelSignalWorkflow CancelSignalWorkflow Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CancelSignalWorkflow -> Word32
_CancelSignalWorkflow'seq
           (\ CancelSignalWorkflow
x__ Word32
y__ -> CancelSignalWorkflow
x__ {_CancelSignalWorkflow'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CancelSignalWorkflow where
  messageName :: Proxy CancelSignalWorkflow -> Text
messageName Proxy CancelSignalWorkflow
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_commands.CancelSignalWorkflow"
  packedMessageDescriptor :: Proxy CancelSignalWorkflow -> ByteString
packedMessageDescriptor Proxy CancelSignalWorkflow
_
    = ByteString
"\n\
      \\DC4CancelSignalWorkflow\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq"
  packedFileDescriptor :: Proxy CancelSignalWorkflow -> ByteString
packedFileDescriptor Proxy CancelSignalWorkflow
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CancelSignalWorkflow)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor CancelSignalWorkflow
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor CancelSignalWorkflow Word32
-> FieldDescriptor CancelSignalWorkflow
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 CancelSignalWorkflow CancelSignalWorkflow Word32 Word32
-> FieldAccessor CancelSignalWorkflow 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 CancelSignalWorkflow
      in
        [(Tag, FieldDescriptor CancelSignalWorkflow)]
-> Map Tag (FieldDescriptor CancelSignalWorkflow)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor CancelSignalWorkflow
seq__field_descriptor)]
  unknownFields :: Lens' CancelSignalWorkflow FieldSet
unknownFields
    = (CancelSignalWorkflow -> FieldSet)
-> (CancelSignalWorkflow -> FieldSet -> CancelSignalWorkflow)
-> Lens' CancelSignalWorkflow FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CancelSignalWorkflow -> FieldSet
_CancelSignalWorkflow'_unknownFields
        (\ CancelSignalWorkflow
x__ FieldSet
y__ -> CancelSignalWorkflow
x__ {_CancelSignalWorkflow'_unknownFields = y__})
  defMessage :: CancelSignalWorkflow
defMessage
    = CancelSignalWorkflow'_constructor
        {_CancelSignalWorkflow'seq :: Word32
_CancelSignalWorkflow'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CancelSignalWorkflow'_unknownFields :: FieldSet
_CancelSignalWorkflow'_unknownFields = []}
  parseMessage :: Parser CancelSignalWorkflow
parseMessage
    = let
        loop ::
          CancelSignalWorkflow
          -> Data.ProtoLens.Encoding.Bytes.Parser CancelSignalWorkflow
        loop :: CancelSignalWorkflow -> Parser CancelSignalWorkflow
loop CancelSignalWorkflow
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 CancelSignalWorkflow
-> String -> Parser CancelSignalWorkflow
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do CancelSignalWorkflow -> Parser CancelSignalWorkflow
loop CancelSignalWorkflow
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"CancelSignalWorkflow"
  buildMessage :: CancelSignalWorkflow -> Builder
buildMessage
    = \ CancelSignalWorkflow
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike
  Word32 CancelSignalWorkflow CancelSignalWorkflow Word32 Word32
-> CancelSignalWorkflow -> 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") CancelSignalWorkflow
_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
  CancelSignalWorkflow
  CancelSignalWorkflow
  FieldSet
  FieldSet
-> CancelSignalWorkflow -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CancelSignalWorkflow
  CancelSignalWorkflow
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' CancelSignalWorkflow FieldSet
Data.ProtoLens.unknownFields CancelSignalWorkflow
_x))
instance Control.DeepSeq.NFData CancelSignalWorkflow where
  rnf :: CancelSignalWorkflow -> ()
rnf
    = \ CancelSignalWorkflow
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CancelSignalWorkflow -> FieldSet
_CancelSignalWorkflow'_unknownFields CancelSignalWorkflow
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (CancelSignalWorkflow -> Word32
_CancelSignalWorkflow'seq CancelSignalWorkflow
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.seq' @:: Lens' CancelTimer Data.Word.Word32@ -}
data CancelTimer
  = CancelTimer'_constructor {CancelTimer -> Word32
_CancelTimer'seq :: !Data.Word.Word32,
                              CancelTimer -> FieldSet
_CancelTimer'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CancelTimer -> CancelTimer -> Bool
(CancelTimer -> CancelTimer -> Bool)
-> (CancelTimer -> CancelTimer -> Bool) -> Eq CancelTimer
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CancelTimer -> CancelTimer -> Bool
== :: CancelTimer -> CancelTimer -> Bool
$c/= :: CancelTimer -> CancelTimer -> Bool
/= :: CancelTimer -> CancelTimer -> Bool
Prelude.Eq, Eq CancelTimer
Eq CancelTimer =>
(CancelTimer -> CancelTimer -> Ordering)
-> (CancelTimer -> CancelTimer -> Bool)
-> (CancelTimer -> CancelTimer -> Bool)
-> (CancelTimer -> CancelTimer -> Bool)
-> (CancelTimer -> CancelTimer -> Bool)
-> (CancelTimer -> CancelTimer -> CancelTimer)
-> (CancelTimer -> CancelTimer -> CancelTimer)
-> Ord CancelTimer
CancelTimer -> CancelTimer -> Bool
CancelTimer -> CancelTimer -> Ordering
CancelTimer -> CancelTimer -> CancelTimer
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 :: CancelTimer -> CancelTimer -> Ordering
compare :: CancelTimer -> CancelTimer -> Ordering
$c< :: CancelTimer -> CancelTimer -> Bool
< :: CancelTimer -> CancelTimer -> Bool
$c<= :: CancelTimer -> CancelTimer -> Bool
<= :: CancelTimer -> CancelTimer -> Bool
$c> :: CancelTimer -> CancelTimer -> Bool
> :: CancelTimer -> CancelTimer -> Bool
$c>= :: CancelTimer -> CancelTimer -> Bool
>= :: CancelTimer -> CancelTimer -> Bool
$cmax :: CancelTimer -> CancelTimer -> CancelTimer
max :: CancelTimer -> CancelTimer -> CancelTimer
$cmin :: CancelTimer -> CancelTimer -> CancelTimer
min :: CancelTimer -> CancelTimer -> CancelTimer
Prelude.Ord)
instance Prelude.Show CancelTimer where
  showsPrec :: Int -> CancelTimer -> ShowS
showsPrec Int
_ CancelTimer
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (CancelTimer -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CancelTimer
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField CancelTimer "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq"
-> (Word32 -> f Word32) -> CancelTimer -> f CancelTimer
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32) -> CancelTimer -> f CancelTimer)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> CancelTimer
-> f CancelTimer
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CancelTimer -> Word32)
-> (CancelTimer -> Word32 -> CancelTimer)
-> Lens CancelTimer CancelTimer Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CancelTimer -> Word32
_CancelTimer'seq (\ CancelTimer
x__ Word32
y__ -> CancelTimer
x__ {_CancelTimer'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CancelTimer where
  messageName :: Proxy CancelTimer -> Text
messageName Proxy CancelTimer
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_commands.CancelTimer"
  packedMessageDescriptor :: Proxy CancelTimer -> ByteString
packedMessageDescriptor Proxy CancelTimer
_
    = ByteString
"\n\
      \\vCancelTimer\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq"
  packedFileDescriptor :: Proxy CancelTimer -> ByteString
packedFileDescriptor Proxy CancelTimer
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CancelTimer)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor CancelTimer
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor CancelTimer Word32
-> FieldDescriptor CancelTimer
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 CancelTimer CancelTimer Word32 Word32
-> FieldAccessor CancelTimer 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 CancelTimer
      in
        [(Tag, FieldDescriptor CancelTimer)]
-> Map Tag (FieldDescriptor CancelTimer)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor CancelTimer
seq__field_descriptor)]
  unknownFields :: Lens' CancelTimer FieldSet
unknownFields
    = (CancelTimer -> FieldSet)
-> (CancelTimer -> FieldSet -> CancelTimer)
-> Lens' CancelTimer FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CancelTimer -> FieldSet
_CancelTimer'_unknownFields
        (\ CancelTimer
x__ FieldSet
y__ -> CancelTimer
x__ {_CancelTimer'_unknownFields = y__})
  defMessage :: CancelTimer
defMessage
    = CancelTimer'_constructor
        {_CancelTimer'seq :: Word32
_CancelTimer'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CancelTimer'_unknownFields :: FieldSet
_CancelTimer'_unknownFields = []}
  parseMessage :: Parser CancelTimer
parseMessage
    = let
        loop ::
          CancelTimer -> Data.ProtoLens.Encoding.Bytes.Parser CancelTimer
        loop :: CancelTimer -> Parser CancelTimer
loop CancelTimer
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 CancelTimer -> String -> Parser CancelTimer
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do CancelTimer -> Parser CancelTimer
loop CancelTimer
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"CancelTimer"
  buildMessage :: CancelTimer -> Builder
buildMessage
    = \ CancelTimer
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike Word32 CancelTimer CancelTimer Word32 Word32
-> CancelTimer -> 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") CancelTimer
_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 CancelTimer CancelTimer FieldSet FieldSet
-> CancelTimer -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet CancelTimer CancelTimer FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' CancelTimer FieldSet
Data.ProtoLens.unknownFields CancelTimer
_x))
instance Control.DeepSeq.NFData CancelTimer where
  rnf :: CancelTimer -> ()
rnf
    = \ CancelTimer
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CancelTimer -> FieldSet
_CancelTimer'_unknownFields CancelTimer
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (CancelTimer -> Word32
_CancelTimer'seq CancelTimer
x__) ())
{- | Fields :
      -}
data CancelWorkflowExecution
  = CancelWorkflowExecution'_constructor {CancelWorkflowExecution -> FieldSet
_CancelWorkflowExecution'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CancelWorkflowExecution -> CancelWorkflowExecution -> Bool
(CancelWorkflowExecution -> CancelWorkflowExecution -> Bool)
-> (CancelWorkflowExecution -> CancelWorkflowExecution -> Bool)
-> Eq CancelWorkflowExecution
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CancelWorkflowExecution -> CancelWorkflowExecution -> Bool
== :: CancelWorkflowExecution -> CancelWorkflowExecution -> Bool
$c/= :: CancelWorkflowExecution -> CancelWorkflowExecution -> Bool
/= :: CancelWorkflowExecution -> CancelWorkflowExecution -> Bool
Prelude.Eq, Eq CancelWorkflowExecution
Eq CancelWorkflowExecution =>
(CancelWorkflowExecution -> CancelWorkflowExecution -> Ordering)
-> (CancelWorkflowExecution -> CancelWorkflowExecution -> Bool)
-> (CancelWorkflowExecution -> CancelWorkflowExecution -> Bool)
-> (CancelWorkflowExecution -> CancelWorkflowExecution -> Bool)
-> (CancelWorkflowExecution -> CancelWorkflowExecution -> Bool)
-> (CancelWorkflowExecution
    -> CancelWorkflowExecution -> CancelWorkflowExecution)
-> (CancelWorkflowExecution
    -> CancelWorkflowExecution -> CancelWorkflowExecution)
-> Ord CancelWorkflowExecution
CancelWorkflowExecution -> CancelWorkflowExecution -> Bool
CancelWorkflowExecution -> CancelWorkflowExecution -> Ordering
CancelWorkflowExecution
-> CancelWorkflowExecution -> CancelWorkflowExecution
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 :: CancelWorkflowExecution -> CancelWorkflowExecution -> Ordering
compare :: CancelWorkflowExecution -> CancelWorkflowExecution -> Ordering
$c< :: CancelWorkflowExecution -> CancelWorkflowExecution -> Bool
< :: CancelWorkflowExecution -> CancelWorkflowExecution -> Bool
$c<= :: CancelWorkflowExecution -> CancelWorkflowExecution -> Bool
<= :: CancelWorkflowExecution -> CancelWorkflowExecution -> Bool
$c> :: CancelWorkflowExecution -> CancelWorkflowExecution -> Bool
> :: CancelWorkflowExecution -> CancelWorkflowExecution -> Bool
$c>= :: CancelWorkflowExecution -> CancelWorkflowExecution -> Bool
>= :: CancelWorkflowExecution -> CancelWorkflowExecution -> Bool
$cmax :: CancelWorkflowExecution
-> CancelWorkflowExecution -> CancelWorkflowExecution
max :: CancelWorkflowExecution
-> CancelWorkflowExecution -> CancelWorkflowExecution
$cmin :: CancelWorkflowExecution
-> CancelWorkflowExecution -> CancelWorkflowExecution
min :: CancelWorkflowExecution
-> CancelWorkflowExecution -> CancelWorkflowExecution
Prelude.Ord)
instance Prelude.Show CancelWorkflowExecution where
  showsPrec :: Int -> CancelWorkflowExecution -> ShowS
showsPrec Int
_ CancelWorkflowExecution
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (CancelWorkflowExecution -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CancelWorkflowExecution
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message CancelWorkflowExecution where
  messageName :: Proxy CancelWorkflowExecution -> Text
messageName Proxy CancelWorkflowExecution
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.CancelWorkflowExecution"
  packedMessageDescriptor :: Proxy CancelWorkflowExecution -> ByteString
packedMessageDescriptor Proxy CancelWorkflowExecution
_
    = ByteString
"\n\
      \\ETBCancelWorkflowExecution"
  packedFileDescriptor :: Proxy CancelWorkflowExecution -> ByteString
packedFileDescriptor Proxy CancelWorkflowExecution
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CancelWorkflowExecution)
fieldsByTag = let in [(Tag, FieldDescriptor CancelWorkflowExecution)]
-> Map Tag (FieldDescriptor CancelWorkflowExecution)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' CancelWorkflowExecution FieldSet
unknownFields
    = (CancelWorkflowExecution -> FieldSet)
-> (CancelWorkflowExecution -> FieldSet -> CancelWorkflowExecution)
-> Lens' CancelWorkflowExecution FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CancelWorkflowExecution -> FieldSet
_CancelWorkflowExecution'_unknownFields
        (\ CancelWorkflowExecution
x__ FieldSet
y__ -> CancelWorkflowExecution
x__ {_CancelWorkflowExecution'_unknownFields = y__})
  defMessage :: CancelWorkflowExecution
defMessage
    = CancelWorkflowExecution'_constructor
        {_CancelWorkflowExecution'_unknownFields :: FieldSet
_CancelWorkflowExecution'_unknownFields = []}
  parseMessage :: Parser CancelWorkflowExecution
parseMessage
    = let
        loop ::
          CancelWorkflowExecution
          -> Data.ProtoLens.Encoding.Bytes.Parser CancelWorkflowExecution
        loop :: CancelWorkflowExecution -> Parser CancelWorkflowExecution
loop CancelWorkflowExecution
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser CancelWorkflowExecution
-> String -> Parser CancelWorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do CancelWorkflowExecution -> Parser CancelWorkflowExecution
loop CancelWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"CancelWorkflowExecution"
  buildMessage :: CancelWorkflowExecution -> Builder
buildMessage
    = \ CancelWorkflowExecution
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  CancelWorkflowExecution
  CancelWorkflowExecution
  FieldSet
  FieldSet
-> CancelWorkflowExecution -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CancelWorkflowExecution
  CancelWorkflowExecution
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' CancelWorkflowExecution FieldSet
Data.ProtoLens.unknownFields CancelWorkflowExecution
_x)
instance Control.DeepSeq.NFData CancelWorkflowExecution where
  rnf :: CancelWorkflowExecution -> ()
rnf
    = \ CancelWorkflowExecution
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CancelWorkflowExecution -> FieldSet
_CancelWorkflowExecution'_unknownFields CancelWorkflowExecution
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.result' @:: Lens' CompleteWorkflowExecution Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'result' @:: Lens' CompleteWorkflowExecution (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data CompleteWorkflowExecution
  = CompleteWorkflowExecution'_constructor {CompleteWorkflowExecution -> Maybe Payload
_CompleteWorkflowExecution'result :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                            CompleteWorkflowExecution -> FieldSet
_CompleteWorkflowExecution'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool
(CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool)
-> (CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool)
-> Eq CompleteWorkflowExecution
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool
== :: CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool
$c/= :: CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool
/= :: CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool
Prelude.Eq, Eq CompleteWorkflowExecution
Eq CompleteWorkflowExecution =>
(CompleteWorkflowExecution
 -> CompleteWorkflowExecution -> Ordering)
-> (CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool)
-> (CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool)
-> (CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool)
-> (CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool)
-> (CompleteWorkflowExecution
    -> CompleteWorkflowExecution -> CompleteWorkflowExecution)
-> (CompleteWorkflowExecution
    -> CompleteWorkflowExecution -> CompleteWorkflowExecution)
-> Ord CompleteWorkflowExecution
CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool
CompleteWorkflowExecution -> CompleteWorkflowExecution -> Ordering
CompleteWorkflowExecution
-> CompleteWorkflowExecution -> CompleteWorkflowExecution
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 :: CompleteWorkflowExecution -> CompleteWorkflowExecution -> Ordering
compare :: CompleteWorkflowExecution -> CompleteWorkflowExecution -> Ordering
$c< :: CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool
< :: CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool
$c<= :: CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool
<= :: CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool
$c> :: CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool
> :: CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool
$c>= :: CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool
>= :: CompleteWorkflowExecution -> CompleteWorkflowExecution -> Bool
$cmax :: CompleteWorkflowExecution
-> CompleteWorkflowExecution -> CompleteWorkflowExecution
max :: CompleteWorkflowExecution
-> CompleteWorkflowExecution -> CompleteWorkflowExecution
$cmin :: CompleteWorkflowExecution
-> CompleteWorkflowExecution -> CompleteWorkflowExecution
min :: CompleteWorkflowExecution
-> CompleteWorkflowExecution -> CompleteWorkflowExecution
Prelude.Ord)
instance Prelude.Show CompleteWorkflowExecution where
  showsPrec :: Int -> CompleteWorkflowExecution -> ShowS
showsPrec Int
_ CompleteWorkflowExecution
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (CompleteWorkflowExecution -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CompleteWorkflowExecution
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField CompleteWorkflowExecution "result" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "result"
-> (Payload -> f Payload)
-> CompleteWorkflowExecution
-> f CompleteWorkflowExecution
fieldOf Proxy# "result"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> CompleteWorkflowExecution -> f CompleteWorkflowExecution)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> CompleteWorkflowExecution
-> f CompleteWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CompleteWorkflowExecution -> Maybe Payload)
-> (CompleteWorkflowExecution
    -> Maybe Payload -> CompleteWorkflowExecution)
-> Lens
     CompleteWorkflowExecution
     CompleteWorkflowExecution
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CompleteWorkflowExecution -> Maybe Payload
_CompleteWorkflowExecution'result
           (\ CompleteWorkflowExecution
x__ Maybe Payload
y__ -> CompleteWorkflowExecution
x__ {_CompleteWorkflowExecution'result = y__}))
        (Payload -> Lens' (Maybe Payload) Payload
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payload
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField CompleteWorkflowExecution "maybe'result" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'result"
-> (Maybe Payload -> f (Maybe Payload))
-> CompleteWorkflowExecution
-> f CompleteWorkflowExecution
fieldOf Proxy# "maybe'result"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> CompleteWorkflowExecution -> f CompleteWorkflowExecution)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> CompleteWorkflowExecution
-> f CompleteWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CompleteWorkflowExecution -> Maybe Payload)
-> (CompleteWorkflowExecution
    -> Maybe Payload -> CompleteWorkflowExecution)
-> Lens
     CompleteWorkflowExecution
     CompleteWorkflowExecution
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CompleteWorkflowExecution -> Maybe Payload
_CompleteWorkflowExecution'result
           (\ CompleteWorkflowExecution
x__ Maybe Payload
y__ -> CompleteWorkflowExecution
x__ {_CompleteWorkflowExecution'result = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CompleteWorkflowExecution where
  messageName :: Proxy CompleteWorkflowExecution -> Text
messageName Proxy CompleteWorkflowExecution
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.CompleteWorkflowExecution"
  packedMessageDescriptor :: Proxy CompleteWorkflowExecution -> ByteString
packedMessageDescriptor Proxy CompleteWorkflowExecution
_
    = ByteString
"\n\
      \\EMCompleteWorkflowExecution\DC27\n\
      \\ACKresult\CAN\SOH \SOH(\v2\US.temporal.api.common.v1.PayloadR\ACKresult"
  packedFileDescriptor :: Proxy CompleteWorkflowExecution -> ByteString
packedFileDescriptor Proxy CompleteWorkflowExecution
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CompleteWorkflowExecution)
fieldsByTag
    = let
        result__field_descriptor :: FieldDescriptor CompleteWorkflowExecution
result__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor CompleteWorkflowExecution Payload
-> FieldDescriptor CompleteWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"result"
              (MessageOrGroup -> FieldTypeDescriptor Payload
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payload)
              (Lens
  CompleteWorkflowExecution
  CompleteWorkflowExecution
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor CompleteWorkflowExecution Payload
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'result")) ::
              Data.ProtoLens.FieldDescriptor CompleteWorkflowExecution
      in
        [(Tag, FieldDescriptor CompleteWorkflowExecution)]
-> Map Tag (FieldDescriptor CompleteWorkflowExecution)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor CompleteWorkflowExecution
result__field_descriptor)]
  unknownFields :: Lens' CompleteWorkflowExecution FieldSet
unknownFields
    = (CompleteWorkflowExecution -> FieldSet)
-> (CompleteWorkflowExecution
    -> FieldSet -> CompleteWorkflowExecution)
-> Lens' CompleteWorkflowExecution FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CompleteWorkflowExecution -> FieldSet
_CompleteWorkflowExecution'_unknownFields
        (\ CompleteWorkflowExecution
x__ FieldSet
y__
           -> CompleteWorkflowExecution
x__ {_CompleteWorkflowExecution'_unknownFields = y__})
  defMessage :: CompleteWorkflowExecution
defMessage
    = CompleteWorkflowExecution'_constructor
        {_CompleteWorkflowExecution'result :: Maybe Payload
_CompleteWorkflowExecution'result = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _CompleteWorkflowExecution'_unknownFields :: FieldSet
_CompleteWorkflowExecution'_unknownFields = []}
  parseMessage :: Parser CompleteWorkflowExecution
parseMessage
    = let
        loop ::
          CompleteWorkflowExecution
          -> Data.ProtoLens.Encoding.Bytes.Parser CompleteWorkflowExecution
        loop :: CompleteWorkflowExecution -> Parser CompleteWorkflowExecution
loop CompleteWorkflowExecution
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 Payload -> String -> Parser Payload
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"result"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"result") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser CompleteWorkflowExecution
-> String -> Parser CompleteWorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do CompleteWorkflowExecution -> Parser CompleteWorkflowExecution
loop CompleteWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"CompleteWorkflowExecution"
  buildMessage :: CompleteWorkflowExecution -> Builder
buildMessage
    = \ CompleteWorkflowExecution
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Payload)
  CompleteWorkflowExecution
  CompleteWorkflowExecution
  (Maybe Payload)
  (Maybe Payload)
-> CompleteWorkflowExecution -> Maybe Payload
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'result") CompleteWorkflowExecution
_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
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))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  CompleteWorkflowExecution
  CompleteWorkflowExecution
  FieldSet
  FieldSet
-> CompleteWorkflowExecution -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CompleteWorkflowExecution
  CompleteWorkflowExecution
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' CompleteWorkflowExecution FieldSet
Data.ProtoLens.unknownFields CompleteWorkflowExecution
_x))
instance Control.DeepSeq.NFData CompleteWorkflowExecution where
  rnf :: CompleteWorkflowExecution -> ()
rnf
    = \ CompleteWorkflowExecution
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CompleteWorkflowExecution -> FieldSet
_CompleteWorkflowExecution'_unknownFields CompleteWorkflowExecution
x__)
             (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (CompleteWorkflowExecution -> Maybe Payload
_CompleteWorkflowExecution'result CompleteWorkflowExecution
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.workflowType' @:: Lens' ContinueAsNewWorkflowExecution Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.taskQueue' @:: Lens' ContinueAsNewWorkflowExecution Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.arguments' @:: Lens' ContinueAsNewWorkflowExecution [Proto.Temporal.Api.Common.V1.Message.Payload]@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.vec'arguments' @:: Lens' ContinueAsNewWorkflowExecution (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.workflowRunTimeout' @:: Lens' ContinueAsNewWorkflowExecution Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'workflowRunTimeout' @:: Lens' ContinueAsNewWorkflowExecution (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.workflowTaskTimeout' @:: Lens' ContinueAsNewWorkflowExecution Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'workflowTaskTimeout' @:: Lens' ContinueAsNewWorkflowExecution (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.memo' @:: Lens' ContinueAsNewWorkflowExecution (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.headers' @:: Lens' ContinueAsNewWorkflowExecution (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.searchAttributes' @:: Lens' ContinueAsNewWorkflowExecution (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.retryPolicy' @:: Lens' ContinueAsNewWorkflowExecution Proto.Temporal.Api.Common.V1.Message.RetryPolicy@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'retryPolicy' @:: Lens' ContinueAsNewWorkflowExecution (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.versioningIntent' @:: Lens' ContinueAsNewWorkflowExecution Proto.Temporal.Sdk.Core.Common.Common.VersioningIntent@ -}
data ContinueAsNewWorkflowExecution
  = ContinueAsNewWorkflowExecution'_constructor {ContinueAsNewWorkflowExecution -> Text
_ContinueAsNewWorkflowExecution'workflowType :: !Data.Text.Text,
                                                 ContinueAsNewWorkflowExecution -> Text
_ContinueAsNewWorkflowExecution'taskQueue :: !Data.Text.Text,
                                                 ContinueAsNewWorkflowExecution -> Vector Payload
_ContinueAsNewWorkflowExecution'arguments :: !(Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload),
                                                 ContinueAsNewWorkflowExecution -> Maybe Duration
_ContinueAsNewWorkflowExecution'workflowRunTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                 ContinueAsNewWorkflowExecution -> Maybe Duration
_ContinueAsNewWorkflowExecution'workflowTaskTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                 ContinueAsNewWorkflowExecution -> Map Text Payload
_ContinueAsNewWorkflowExecution'memo :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload),
                                                 ContinueAsNewWorkflowExecution -> Map Text Payload
_ContinueAsNewWorkflowExecution'headers :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload),
                                                 ContinueAsNewWorkflowExecution -> Map Text Payload
_ContinueAsNewWorkflowExecution'searchAttributes :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload),
                                                 ContinueAsNewWorkflowExecution -> Maybe RetryPolicy
_ContinueAsNewWorkflowExecution'retryPolicy :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy),
                                                 ContinueAsNewWorkflowExecution -> VersioningIntent
_ContinueAsNewWorkflowExecution'versioningIntent :: !Proto.Temporal.Sdk.Core.Common.Common.VersioningIntent,
                                                 ContinueAsNewWorkflowExecution -> FieldSet
_ContinueAsNewWorkflowExecution'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Bool
(ContinueAsNewWorkflowExecution
 -> ContinueAsNewWorkflowExecution -> Bool)
-> (ContinueAsNewWorkflowExecution
    -> ContinueAsNewWorkflowExecution -> Bool)
-> Eq ContinueAsNewWorkflowExecution
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Bool
== :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Bool
$c/= :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Bool
/= :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Bool
Prelude.Eq, Eq ContinueAsNewWorkflowExecution
Eq ContinueAsNewWorkflowExecution =>
(ContinueAsNewWorkflowExecution
 -> ContinueAsNewWorkflowExecution -> Ordering)
-> (ContinueAsNewWorkflowExecution
    -> ContinueAsNewWorkflowExecution -> Bool)
-> (ContinueAsNewWorkflowExecution
    -> ContinueAsNewWorkflowExecution -> Bool)
-> (ContinueAsNewWorkflowExecution
    -> ContinueAsNewWorkflowExecution -> Bool)
-> (ContinueAsNewWorkflowExecution
    -> ContinueAsNewWorkflowExecution -> Bool)
-> (ContinueAsNewWorkflowExecution
    -> ContinueAsNewWorkflowExecution
    -> ContinueAsNewWorkflowExecution)
-> (ContinueAsNewWorkflowExecution
    -> ContinueAsNewWorkflowExecution
    -> ContinueAsNewWorkflowExecution)
-> Ord ContinueAsNewWorkflowExecution
ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Bool
ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Ordering
ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> ContinueAsNewWorkflowExecution
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 :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Ordering
compare :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Ordering
$c< :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Bool
< :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Bool
$c<= :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Bool
<= :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Bool
$c> :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Bool
> :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Bool
$c>= :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Bool
>= :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> Bool
$cmax :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> ContinueAsNewWorkflowExecution
max :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> ContinueAsNewWorkflowExecution
$cmin :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> ContinueAsNewWorkflowExecution
min :: ContinueAsNewWorkflowExecution
-> ContinueAsNewWorkflowExecution -> ContinueAsNewWorkflowExecution
Prelude.Ord)
instance Prelude.Show ContinueAsNewWorkflowExecution where
  showsPrec :: Int -> ContinueAsNewWorkflowExecution -> ShowS
showsPrec Int
_ ContinueAsNewWorkflowExecution
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ContinueAsNewWorkflowExecution -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ContinueAsNewWorkflowExecution
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ContinueAsNewWorkflowExecution "workflowType" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (Text -> f Text)
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
fieldOf Proxy# "workflowType"
_
    = ((Text -> f Text)
 -> ContinueAsNewWorkflowExecution
 -> f ContinueAsNewWorkflowExecution)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution -> Text)
-> (ContinueAsNewWorkflowExecution
    -> Text -> ContinueAsNewWorkflowExecution)
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution -> Text
_ContinueAsNewWorkflowExecution'workflowType
           (\ ContinueAsNewWorkflowExecution
x__ Text
y__
              -> ContinueAsNewWorkflowExecution
x__ {_ContinueAsNewWorkflowExecution'workflowType = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ContinueAsNewWorkflowExecution "taskQueue" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (Text -> f Text)
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
fieldOf Proxy# "taskQueue"
_
    = ((Text -> f Text)
 -> ContinueAsNewWorkflowExecution
 -> f ContinueAsNewWorkflowExecution)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution -> Text)
-> (ContinueAsNewWorkflowExecution
    -> Text -> ContinueAsNewWorkflowExecution)
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution -> Text
_ContinueAsNewWorkflowExecution'taskQueue
           (\ ContinueAsNewWorkflowExecution
x__ Text
y__
              -> ContinueAsNewWorkflowExecution
x__ {_ContinueAsNewWorkflowExecution'taskQueue = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ContinueAsNewWorkflowExecution "arguments" [Proto.Temporal.Api.Common.V1.Message.Payload] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "arguments"
-> ([Payload] -> f [Payload])
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
fieldOf Proxy# "arguments"
_
    = ((Vector Payload -> f (Vector Payload))
 -> ContinueAsNewWorkflowExecution
 -> f ContinueAsNewWorkflowExecution)
-> (([Payload] -> f [Payload])
    -> Vector Payload -> f (Vector Payload))
-> ([Payload] -> f [Payload])
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution -> Vector Payload)
-> (ContinueAsNewWorkflowExecution
    -> Vector Payload -> ContinueAsNewWorkflowExecution)
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     (Vector Payload)
     (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution -> Vector Payload
_ContinueAsNewWorkflowExecution'arguments
           (\ ContinueAsNewWorkflowExecution
x__ Vector Payload
y__
              -> ContinueAsNewWorkflowExecution
x__ {_ContinueAsNewWorkflowExecution'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 ContinueAsNewWorkflowExecution "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))
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
fieldOf Proxy# "vec'arguments"
_
    = ((Vector Payload -> f (Vector Payload))
 -> ContinueAsNewWorkflowExecution
 -> f ContinueAsNewWorkflowExecution)
-> ((Vector Payload -> f (Vector Payload))
    -> Vector Payload -> f (Vector Payload))
-> (Vector Payload -> f (Vector Payload))
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution -> Vector Payload)
-> (ContinueAsNewWorkflowExecution
    -> Vector Payload -> ContinueAsNewWorkflowExecution)
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     (Vector Payload)
     (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution -> Vector Payload
_ContinueAsNewWorkflowExecution'arguments
           (\ ContinueAsNewWorkflowExecution
x__ Vector Payload
y__
              -> ContinueAsNewWorkflowExecution
x__ {_ContinueAsNewWorkflowExecution'arguments = y__}))
        (Vector Payload -> f (Vector Payload))
-> Vector Payload -> f (Vector Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ContinueAsNewWorkflowExecution "workflowRunTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowRunTimeout"
-> (Duration -> f Duration)
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
fieldOf Proxy# "workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ContinueAsNewWorkflowExecution
 -> f ContinueAsNewWorkflowExecution)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution -> Maybe Duration)
-> (ContinueAsNewWorkflowExecution
    -> Maybe Duration -> ContinueAsNewWorkflowExecution)
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution -> Maybe Duration
_ContinueAsNewWorkflowExecution'workflowRunTimeout
           (\ ContinueAsNewWorkflowExecution
x__ Maybe Duration
y__
              -> ContinueAsNewWorkflowExecution
x__ {_ContinueAsNewWorkflowExecution'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 ContinueAsNewWorkflowExecution "maybe'workflowRunTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowRunTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
fieldOf Proxy# "maybe'workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ContinueAsNewWorkflowExecution
 -> f ContinueAsNewWorkflowExecution)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution -> Maybe Duration)
-> (ContinueAsNewWorkflowExecution
    -> Maybe Duration -> ContinueAsNewWorkflowExecution)
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution -> Maybe Duration
_ContinueAsNewWorkflowExecution'workflowRunTimeout
           (\ ContinueAsNewWorkflowExecution
x__ Maybe Duration
y__
              -> ContinueAsNewWorkflowExecution
x__ {_ContinueAsNewWorkflowExecution'workflowRunTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ContinueAsNewWorkflowExecution "workflowTaskTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskTimeout"
-> (Duration -> f Duration)
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
fieldOf Proxy# "workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ContinueAsNewWorkflowExecution
 -> f ContinueAsNewWorkflowExecution)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution -> Maybe Duration)
-> (ContinueAsNewWorkflowExecution
    -> Maybe Duration -> ContinueAsNewWorkflowExecution)
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution -> Maybe Duration
_ContinueAsNewWorkflowExecution'workflowTaskTimeout
           (\ ContinueAsNewWorkflowExecution
x__ Maybe Duration
y__
              -> ContinueAsNewWorkflowExecution
x__
                   {_ContinueAsNewWorkflowExecution'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 ContinueAsNewWorkflowExecution "maybe'workflowTaskTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowTaskTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
fieldOf Proxy# "maybe'workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ContinueAsNewWorkflowExecution
 -> f ContinueAsNewWorkflowExecution)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution -> Maybe Duration)
-> (ContinueAsNewWorkflowExecution
    -> Maybe Duration -> ContinueAsNewWorkflowExecution)
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution -> Maybe Duration
_ContinueAsNewWorkflowExecution'workflowTaskTimeout
           (\ ContinueAsNewWorkflowExecution
x__ Maybe Duration
y__
              -> ContinueAsNewWorkflowExecution
x__
                   {_ContinueAsNewWorkflowExecution'workflowTaskTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ContinueAsNewWorkflowExecution "memo" (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "memo"
-> (Map Text Payload -> f (Map Text Payload))
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
fieldOf Proxy# "memo"
_
    = ((Map Text Payload -> f (Map Text Payload))
 -> ContinueAsNewWorkflowExecution
 -> f ContinueAsNewWorkflowExecution)
-> ((Map Text Payload -> f (Map Text Payload))
    -> Map Text Payload -> f (Map Text Payload))
-> (Map Text Payload -> f (Map Text Payload))
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution -> Map Text Payload)
-> (ContinueAsNewWorkflowExecution
    -> Map Text Payload -> ContinueAsNewWorkflowExecution)
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     (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
           ContinueAsNewWorkflowExecution -> Map Text Payload
_ContinueAsNewWorkflowExecution'memo
           (\ ContinueAsNewWorkflowExecution
x__ Map Text Payload
y__ -> ContinueAsNewWorkflowExecution
x__ {_ContinueAsNewWorkflowExecution'memo = 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 ContinueAsNewWorkflowExecution "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))
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
fieldOf Proxy# "headers"
_
    = ((Map Text Payload -> f (Map Text Payload))
 -> ContinueAsNewWorkflowExecution
 -> f ContinueAsNewWorkflowExecution)
-> ((Map Text Payload -> f (Map Text Payload))
    -> Map Text Payload -> f (Map Text Payload))
-> (Map Text Payload -> f (Map Text Payload))
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution -> Map Text Payload)
-> (ContinueAsNewWorkflowExecution
    -> Map Text Payload -> ContinueAsNewWorkflowExecution)
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     (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
           ContinueAsNewWorkflowExecution -> Map Text Payload
_ContinueAsNewWorkflowExecution'headers
           (\ ContinueAsNewWorkflowExecution
x__ Map Text Payload
y__ -> ContinueAsNewWorkflowExecution
x__ {_ContinueAsNewWorkflowExecution'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 ContinueAsNewWorkflowExecution "searchAttributes" (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "searchAttributes"
-> (Map Text Payload -> f (Map Text Payload))
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
fieldOf Proxy# "searchAttributes"
_
    = ((Map Text Payload -> f (Map Text Payload))
 -> ContinueAsNewWorkflowExecution
 -> f ContinueAsNewWorkflowExecution)
-> ((Map Text Payload -> f (Map Text Payload))
    -> Map Text Payload -> f (Map Text Payload))
-> (Map Text Payload -> f (Map Text Payload))
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution -> Map Text Payload)
-> (ContinueAsNewWorkflowExecution
    -> Map Text Payload -> ContinueAsNewWorkflowExecution)
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     (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
           ContinueAsNewWorkflowExecution -> Map Text Payload
_ContinueAsNewWorkflowExecution'searchAttributes
           (\ ContinueAsNewWorkflowExecution
x__ Map Text Payload
y__
              -> ContinueAsNewWorkflowExecution
x__ {_ContinueAsNewWorkflowExecution'searchAttributes = 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 ContinueAsNewWorkflowExecution "retryPolicy" Proto.Temporal.Api.Common.V1.Message.RetryPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryPolicy"
-> (RetryPolicy -> f RetryPolicy)
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
fieldOf Proxy# "retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> ContinueAsNewWorkflowExecution
 -> f ContinueAsNewWorkflowExecution)
-> ((RetryPolicy -> f RetryPolicy)
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (RetryPolicy -> f RetryPolicy)
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution -> Maybe RetryPolicy)
-> (ContinueAsNewWorkflowExecution
    -> Maybe RetryPolicy -> ContinueAsNewWorkflowExecution)
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution -> Maybe RetryPolicy
_ContinueAsNewWorkflowExecution'retryPolicy
           (\ ContinueAsNewWorkflowExecution
x__ Maybe RetryPolicy
y__
              -> ContinueAsNewWorkflowExecution
x__ {_ContinueAsNewWorkflowExecution'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 ContinueAsNewWorkflowExecution "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))
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
fieldOf Proxy# "maybe'retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> ContinueAsNewWorkflowExecution
 -> f ContinueAsNewWorkflowExecution)
-> ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution -> Maybe RetryPolicy)
-> (ContinueAsNewWorkflowExecution
    -> Maybe RetryPolicy -> ContinueAsNewWorkflowExecution)
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution -> Maybe RetryPolicy
_ContinueAsNewWorkflowExecution'retryPolicy
           (\ ContinueAsNewWorkflowExecution
x__ Maybe RetryPolicy
y__
              -> ContinueAsNewWorkflowExecution
x__ {_ContinueAsNewWorkflowExecution'retryPolicy = y__}))
        (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> Maybe RetryPolicy -> f (Maybe RetryPolicy)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ContinueAsNewWorkflowExecution "versioningIntent" Proto.Temporal.Sdk.Core.Common.Common.VersioningIntent where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "versioningIntent"
-> (VersioningIntent -> f VersioningIntent)
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
fieldOf Proxy# "versioningIntent"
_
    = ((VersioningIntent -> f VersioningIntent)
 -> ContinueAsNewWorkflowExecution
 -> f ContinueAsNewWorkflowExecution)
-> ((VersioningIntent -> f VersioningIntent)
    -> VersioningIntent -> f VersioningIntent)
-> (VersioningIntent -> f VersioningIntent)
-> ContinueAsNewWorkflowExecution
-> f ContinueAsNewWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution -> VersioningIntent)
-> (ContinueAsNewWorkflowExecution
    -> VersioningIntent -> ContinueAsNewWorkflowExecution)
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     VersioningIntent
     VersioningIntent
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution -> VersioningIntent
_ContinueAsNewWorkflowExecution'versioningIntent
           (\ ContinueAsNewWorkflowExecution
x__ VersioningIntent
y__
              -> ContinueAsNewWorkflowExecution
x__ {_ContinueAsNewWorkflowExecution'versioningIntent = y__}))
        (VersioningIntent -> f VersioningIntent)
-> VersioningIntent -> f VersioningIntent
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ContinueAsNewWorkflowExecution where
  messageName :: Proxy ContinueAsNewWorkflowExecution -> Text
messageName Proxy ContinueAsNewWorkflowExecution
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.ContinueAsNewWorkflowExecution"
  packedMessageDescriptor :: Proxy ContinueAsNewWorkflowExecution -> ByteString
packedMessageDescriptor Proxy ContinueAsNewWorkflowExecution
_
    = ByteString
"\n\
      \\RSContinueAsNewWorkflowExecution\DC2#\n\
      \\rworkflow_type\CAN\SOH \SOH(\tR\fworkflowType\DC2\GS\n\
      \\n\
      \task_queue\CAN\STX \SOH(\tR\ttaskQueue\DC2=\n\
      \\targuments\CAN\ETX \ETX(\v2\US.temporal.api.common.v1.PayloadR\targuments\DC2K\n\
      \\DC4workflow_run_timeout\CAN\EOT \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
      \\NAKworkflow_task_timeout\CAN\ENQ \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2W\n\
      \\EOTmemo\CAN\ACK \ETX(\v2C.coresdk.workflow_commands.ContinueAsNewWorkflowExecution.MemoEntryR\EOTmemo\DC2`\n\
      \\aheaders\CAN\a \ETX(\v2F.coresdk.workflow_commands.ContinueAsNewWorkflowExecution.HeadersEntryR\aheaders\DC2|\n\
      \\DC1search_attributes\CAN\b \ETX(\v2O.coresdk.workflow_commands.ContinueAsNewWorkflowExecution.SearchAttributesEntryR\DLEsearchAttributes\DC2F\n\
      \\fretry_policy\CAN\t \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2M\n\
      \\DC1versioning_intent\CAN\n\
      \ \SOH(\SO2 .coresdk.common.VersioningIntentR\DLEversioningIntent\SUBX\n\
      \\tMemoEntry\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\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\SUBd\n\
      \\NAKSearchAttributesEntry\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 ContinueAsNewWorkflowExecution -> ByteString
packedFileDescriptor Proxy ContinueAsNewWorkflowExecution
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ContinueAsNewWorkflowExecution)
fieldsByTag
    = let
        workflowType__field_descriptor :: FieldDescriptor ContinueAsNewWorkflowExecution
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ContinueAsNewWorkflowExecution Text
-> FieldDescriptor ContinueAsNewWorkflowExecution
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
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     Text
     Text
-> FieldAccessor ContinueAsNewWorkflowExecution 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 ContinueAsNewWorkflowExecution
        taskQueue__field_descriptor :: FieldDescriptor ContinueAsNewWorkflowExecution
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ContinueAsNewWorkflowExecution Text
-> FieldDescriptor ContinueAsNewWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_queue"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     Text
     Text
-> FieldAccessor ContinueAsNewWorkflowExecution Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskQueue")) ::
              Data.ProtoLens.FieldDescriptor ContinueAsNewWorkflowExecution
        arguments__field_descriptor :: FieldDescriptor ContinueAsNewWorkflowExecution
arguments__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor ContinueAsNewWorkflowExecution Payload
-> FieldDescriptor ContinueAsNewWorkflowExecution
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' ContinueAsNewWorkflowExecution [Payload]
-> FieldAccessor ContinueAsNewWorkflowExecution 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 ContinueAsNewWorkflowExecution
        workflowRunTimeout__field_descriptor :: FieldDescriptor ContinueAsNewWorkflowExecution
workflowRunTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor ContinueAsNewWorkflowExecution Duration
-> FieldDescriptor ContinueAsNewWorkflowExecution
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
  ContinueAsNewWorkflowExecution
  ContinueAsNewWorkflowExecution
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor ContinueAsNewWorkflowExecution 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 ContinueAsNewWorkflowExecution
        workflowTaskTimeout__field_descriptor :: FieldDescriptor ContinueAsNewWorkflowExecution
workflowTaskTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor ContinueAsNewWorkflowExecution Duration
-> FieldDescriptor ContinueAsNewWorkflowExecution
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
  ContinueAsNewWorkflowExecution
  ContinueAsNewWorkflowExecution
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor ContinueAsNewWorkflowExecution 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 ContinueAsNewWorkflowExecution
        memo__field_descriptor :: FieldDescriptor ContinueAsNewWorkflowExecution
memo__field_descriptor
          = String
-> FieldTypeDescriptor ContinueAsNewWorkflowExecution'MemoEntry
-> FieldAccessor
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution'MemoEntry
-> FieldDescriptor ContinueAsNewWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"memo"
              (MessageOrGroup
-> FieldTypeDescriptor ContinueAsNewWorkflowExecution'MemoEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ContinueAsNewWorkflowExecution'MemoEntry)
              (Lens' ContinueAsNewWorkflowExecution'MemoEntry Text
-> Lens' ContinueAsNewWorkflowExecution'MemoEntry Payload
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     (Map Text Payload)
     (Map Text Payload)
-> FieldAccessor
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution'MemoEntry
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 @"memo")) ::
              Data.ProtoLens.FieldDescriptor ContinueAsNewWorkflowExecution
        headers__field_descriptor :: FieldDescriptor ContinueAsNewWorkflowExecution
headers__field_descriptor
          = String
-> FieldTypeDescriptor ContinueAsNewWorkflowExecution'HeadersEntry
-> FieldAccessor
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution'HeadersEntry
-> FieldDescriptor ContinueAsNewWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"headers"
              (MessageOrGroup
-> FieldTypeDescriptor ContinueAsNewWorkflowExecution'HeadersEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ContinueAsNewWorkflowExecution'HeadersEntry)
              (Lens' ContinueAsNewWorkflowExecution'HeadersEntry Text
-> Lens' ContinueAsNewWorkflowExecution'HeadersEntry Payload
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     (Map Text Payload)
     (Map Text Payload)
-> FieldAccessor
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution'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 ContinueAsNewWorkflowExecution
        searchAttributes__field_descriptor :: FieldDescriptor ContinueAsNewWorkflowExecution
searchAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> FieldAccessor
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> FieldDescriptor ContinueAsNewWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"search_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     ContinueAsNewWorkflowExecution'SearchAttributesEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ContinueAsNewWorkflowExecution'SearchAttributesEntry)
              (Lens' ContinueAsNewWorkflowExecution'SearchAttributesEntry Text
-> Lens'
     ContinueAsNewWorkflowExecution'SearchAttributesEntry Payload
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     (Map Text Payload)
     (Map Text Payload)
-> FieldAccessor
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution'SearchAttributesEntry
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 @"searchAttributes")) ::
              Data.ProtoLens.FieldDescriptor ContinueAsNewWorkflowExecution
        retryPolicy__field_descriptor :: FieldDescriptor ContinueAsNewWorkflowExecution
retryPolicy__field_descriptor
          = String
-> FieldTypeDescriptor RetryPolicy
-> FieldAccessor ContinueAsNewWorkflowExecution RetryPolicy
-> FieldDescriptor ContinueAsNewWorkflowExecution
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
  ContinueAsNewWorkflowExecution
  ContinueAsNewWorkflowExecution
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> FieldAccessor ContinueAsNewWorkflowExecution 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 ContinueAsNewWorkflowExecution
        versioningIntent__field_descriptor :: FieldDescriptor ContinueAsNewWorkflowExecution
versioningIntent__field_descriptor
          = String
-> FieldTypeDescriptor VersioningIntent
-> FieldAccessor ContinueAsNewWorkflowExecution VersioningIntent
-> FieldDescriptor ContinueAsNewWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"versioning_intent"
              (ScalarField VersioningIntent
-> FieldTypeDescriptor VersioningIntent
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField VersioningIntent
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Sdk.Core.Common.Common.VersioningIntent)
              (WireDefault VersioningIntent
-> Lens
     ContinueAsNewWorkflowExecution
     ContinueAsNewWorkflowExecution
     VersioningIntent
     VersioningIntent
-> FieldAccessor ContinueAsNewWorkflowExecution VersioningIntent
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault VersioningIntent
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"versioningIntent")) ::
              Data.ProtoLens.FieldDescriptor ContinueAsNewWorkflowExecution
      in
        [(Tag, FieldDescriptor ContinueAsNewWorkflowExecution)]
-> Map Tag (FieldDescriptor ContinueAsNewWorkflowExecution)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ContinueAsNewWorkflowExecution
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ContinueAsNewWorkflowExecution
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ContinueAsNewWorkflowExecution
arguments__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ContinueAsNewWorkflowExecution
workflowRunTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ContinueAsNewWorkflowExecution
workflowTaskTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ContinueAsNewWorkflowExecution
memo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor ContinueAsNewWorkflowExecution
headers__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor ContinueAsNewWorkflowExecution
searchAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor ContinueAsNewWorkflowExecution
retryPolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor ContinueAsNewWorkflowExecution
versioningIntent__field_descriptor)]
  unknownFields :: Lens' ContinueAsNewWorkflowExecution FieldSet
unknownFields
    = (ContinueAsNewWorkflowExecution -> FieldSet)
-> (ContinueAsNewWorkflowExecution
    -> FieldSet -> ContinueAsNewWorkflowExecution)
-> Lens' ContinueAsNewWorkflowExecution FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ContinueAsNewWorkflowExecution -> FieldSet
_ContinueAsNewWorkflowExecution'_unknownFields
        (\ ContinueAsNewWorkflowExecution
x__ FieldSet
y__
           -> ContinueAsNewWorkflowExecution
x__ {_ContinueAsNewWorkflowExecution'_unknownFields = y__})
  defMessage :: ContinueAsNewWorkflowExecution
defMessage
    = ContinueAsNewWorkflowExecution'_constructor
        {_ContinueAsNewWorkflowExecution'workflowType :: Text
_ContinueAsNewWorkflowExecution'workflowType = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ContinueAsNewWorkflowExecution'taskQueue :: Text
_ContinueAsNewWorkflowExecution'taskQueue = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ContinueAsNewWorkflowExecution'arguments :: Vector Payload
_ContinueAsNewWorkflowExecution'arguments = Vector Payload
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ContinueAsNewWorkflowExecution'workflowRunTimeout :: Maybe Duration
_ContinueAsNewWorkflowExecution'workflowRunTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _ContinueAsNewWorkflowExecution'workflowTaskTimeout :: Maybe Duration
_ContinueAsNewWorkflowExecution'workflowTaskTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _ContinueAsNewWorkflowExecution'memo :: Map Text Payload
_ContinueAsNewWorkflowExecution'memo = Map Text Payload
forall k a. Map k a
Data.Map.empty,
         _ContinueAsNewWorkflowExecution'headers :: Map Text Payload
_ContinueAsNewWorkflowExecution'headers = Map Text Payload
forall k a. Map k a
Data.Map.empty,
         _ContinueAsNewWorkflowExecution'searchAttributes :: Map Text Payload
_ContinueAsNewWorkflowExecution'searchAttributes = Map Text Payload
forall k a. Map k a
Data.Map.empty,
         _ContinueAsNewWorkflowExecution'retryPolicy :: Maybe RetryPolicy
_ContinueAsNewWorkflowExecution'retryPolicy = Maybe RetryPolicy
forall a. Maybe a
Prelude.Nothing,
         _ContinueAsNewWorkflowExecution'versioningIntent :: VersioningIntent
_ContinueAsNewWorkflowExecution'versioningIntent = VersioningIntent
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ContinueAsNewWorkflowExecution'_unknownFields :: FieldSet
_ContinueAsNewWorkflowExecution'_unknownFields = []}
  parseMessage :: Parser ContinueAsNewWorkflowExecution
parseMessage
    = let
        loop ::
          ContinueAsNewWorkflowExecution
          -> 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 ContinueAsNewWorkflowExecution
        loop :: ContinueAsNewWorkflowExecution
-> Growing Vector RealWorld Payload
-> Parser ContinueAsNewWorkflowExecution
loop ContinueAsNewWorkflowExecution
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
"task_queue"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskQueue") 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
34
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_run_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowRunTimeout") y x)
                                  mutable'arguments
                        Word64
42
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_task_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskTimeout") y x)
                                  mutable'arguments
                        Word64
50
                          -> do !(entry :: ContinueAsNewWorkflowExecution'MemoEntry) <- Parser ContinueAsNewWorkflowExecution'MemoEntry
-> String -> Parser ContinueAsNewWorkflowExecution'MemoEntry
forall a. Parser a -> String -> Parser a
(Data.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"
                                (let
                                   key = FoldLike
  Text
  ContinueAsNewWorkflowExecution'MemoEntry
  ContinueAsNewWorkflowExecution'MemoEntry
  Text
  Text
-> ContinueAsNewWorkflowExecution'MemoEntry -> 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") ContinueAsNewWorkflowExecution'MemoEntry
entry
                                   value
                                     = FoldLike
  Payload
  ContinueAsNewWorkflowExecution'MemoEntry
  ContinueAsNewWorkflowExecution'MemoEntry
  Payload
  Payload
-> ContinueAsNewWorkflowExecution'MemoEntry -> 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") ContinueAsNewWorkflowExecution'MemoEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"memo")
                                        (\ !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
58
                          -> do !(entry :: ContinueAsNewWorkflowExecution'HeadersEntry) <- Parser ContinueAsNewWorkflowExecution'HeadersEntry
-> String -> Parser ContinueAsNewWorkflowExecution'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
  ContinueAsNewWorkflowExecution'HeadersEntry
  ContinueAsNewWorkflowExecution'HeadersEntry
  Text
  Text
-> ContinueAsNewWorkflowExecution'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") ContinueAsNewWorkflowExecution'HeadersEntry
entry
                                   value
                                     = FoldLike
  Payload
  ContinueAsNewWorkflowExecution'HeadersEntry
  ContinueAsNewWorkflowExecution'HeadersEntry
  Payload
  Payload
-> ContinueAsNewWorkflowExecution'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") ContinueAsNewWorkflowExecution'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
66
                          -> do !(entry :: ContinueAsNewWorkflowExecution'SearchAttributesEntry) <- Parser ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> String
-> Parser ContinueAsNewWorkflowExecution'SearchAttributesEntry
forall a. Parser a -> String -> Parser a
(Data.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"
                                (let
                                   key = FoldLike
  Text
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  Text
  Text
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> 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") ContinueAsNewWorkflowExecution'SearchAttributesEntry
entry
                                   value
                                     = FoldLike
  Payload
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  Payload
  Payload
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> 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") ContinueAsNewWorkflowExecution'SearchAttributesEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"searchAttributes")
                                        (\ !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
74
                          -> do y <- Parser RetryPolicy -> String -> Parser RetryPolicy
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"retry_policy"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"retryPolicy") y x)
                                  mutable'arguments
                        Word64
80
                          -> do y <- Parser VersioningIntent -> String -> Parser VersioningIntent
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> VersioningIntent) -> Parser Int -> Parser VersioningIntent
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> VersioningIntent
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
"versioning_intent"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"versioningIntent") 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 ContinueAsNewWorkflowExecution
-> String -> Parser ContinueAsNewWorkflowExecution
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
"ContinueAsNewWorkflowExecution"
  buildMessage :: ContinueAsNewWorkflowExecution -> Builder
buildMessage
    = \ ContinueAsNewWorkflowExecution
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike
  Text
  ContinueAsNewWorkflowExecution
  ContinueAsNewWorkflowExecution
  Text
  Text
-> ContinueAsNewWorkflowExecution -> 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") ContinueAsNewWorkflowExecution
_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
  ContinueAsNewWorkflowExecution
  ContinueAsNewWorkflowExecution
  Text
  Text
-> ContinueAsNewWorkflowExecution -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskQueue") ContinueAsNewWorkflowExecution
_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)
  ContinueAsNewWorkflowExecution
  ContinueAsNewWorkflowExecution
  (Vector Payload)
  (Vector Payload)
-> ContinueAsNewWorkflowExecution -> 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") ContinueAsNewWorkflowExecution
_x))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe Duration)
  ContinueAsNewWorkflowExecution
  ContinueAsNewWorkflowExecution
  (Maybe Duration)
  (Maybe Duration)
-> ContinueAsNewWorkflowExecution -> 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") ContinueAsNewWorkflowExecution
_x
                       of
                         Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just Duration
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Duration)
  ContinueAsNewWorkflowExecution
  ContinueAsNewWorkflowExecution
  (Maybe Duration)
  (Maybe Duration)
-> ContinueAsNewWorkflowExecution -> 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") ContinueAsNewWorkflowExecution
_x
                          of
                            Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just Duration
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                               (((Text, 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
50)
                                          ((ByteString -> Builder)
-> (ContinueAsNewWorkflowExecution'MemoEntry -> ByteString)
-> ContinueAsNewWorkflowExecution'MemoEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                             (\ ByteString
bs
                                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                           (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                             ContinueAsNewWorkflowExecution'MemoEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                             (Setter
  ContinueAsNewWorkflowExecution'MemoEntry
  ContinueAsNewWorkflowExecution'MemoEntry
  Text
  Text
-> Text
-> ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry
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
  ContinueAsNewWorkflowExecution'MemoEntry
  ContinueAsNewWorkflowExecution'MemoEntry
  Payload
  Payload
-> Payload
-> ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry
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)
                                                   (ContinueAsNewWorkflowExecution'MemoEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                      ContinueAsNewWorkflowExecution'MemoEntry)))))
                                  (Map Text Payload -> [(Text, Payload)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                     (FoldLike
  (Map Text Payload)
  ContinueAsNewWorkflowExecution
  ContinueAsNewWorkflowExecution
  (Map Text Payload)
  (Map Text Payload)
-> ContinueAsNewWorkflowExecution -> 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 @"memo") ContinueAsNewWorkflowExecution
_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
58)
                                             ((ByteString -> Builder)
-> (ContinueAsNewWorkflowExecution'HeadersEntry -> ByteString)
-> ContinueAsNewWorkflowExecution'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))
                                                ContinueAsNewWorkflowExecution'HeadersEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                (Setter
  ContinueAsNewWorkflowExecution'HeadersEntry
  ContinueAsNewWorkflowExecution'HeadersEntry
  Text
  Text
-> Text
-> ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'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
  ContinueAsNewWorkflowExecution'HeadersEntry
  ContinueAsNewWorkflowExecution'HeadersEntry
  Payload
  Payload
-> Payload
-> ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'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)
                                                      (ContinueAsNewWorkflowExecution'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                         ContinueAsNewWorkflowExecution'HeadersEntry)))))
                                     (Map Text Payload -> [(Text, Payload)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                        (FoldLike
  (Map Text Payload)
  ContinueAsNewWorkflowExecution
  ContinueAsNewWorkflowExecution
  (Map Text Payload)
  (Map Text Payload)
-> ContinueAsNewWorkflowExecution -> 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") ContinueAsNewWorkflowExecution
_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
66)
                                                ((ByteString -> Builder)
-> (ContinueAsNewWorkflowExecution'SearchAttributesEntry
    -> ByteString)
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                   (\ ByteString
bs
                                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                 (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                              ByteString
bs))
                                                   ContinueAsNewWorkflowExecution'SearchAttributesEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                   (Setter
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  Text
  Text
-> Text
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
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
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  Payload
  Payload
-> Payload
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
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)
                                                         (ContinueAsNewWorkflowExecution'SearchAttributesEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                            ContinueAsNewWorkflowExecution'SearchAttributesEntry)))))
                                        (Map Text Payload -> [(Text, Payload)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                           (FoldLike
  (Map Text Payload)
  ContinueAsNewWorkflowExecution
  ContinueAsNewWorkflowExecution
  (Map Text Payload)
  (Map Text Payload)
-> ContinueAsNewWorkflowExecution -> 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 @"searchAttributes")
                                              ContinueAsNewWorkflowExecution
_x))))
                                  (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (case
                                          FoldLike
  (Maybe RetryPolicy)
  ContinueAsNewWorkflowExecution
  ContinueAsNewWorkflowExecution
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> ContinueAsNewWorkflowExecution -> 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") ContinueAsNewWorkflowExecution
_x
                                      of
                                        Maybe RetryPolicy
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                        (Prelude.Just RetryPolicy
_v)
                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
                                               ((ByteString -> Builder)
-> (RetryPolicy -> ByteString) -> RetryPolicy -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                  (\ ByteString
bs
                                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                             ByteString
bs))
                                                  RetryPolicy -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage RetryPolicy
_v))
                                     (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (let
                                           _v :: VersioningIntent
_v
                                             = FoldLike
  VersioningIntent
  ContinueAsNewWorkflowExecution
  ContinueAsNewWorkflowExecution
  VersioningIntent
  VersioningIntent
-> ContinueAsNewWorkflowExecution -> VersioningIntent
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"versioningIntent") ContinueAsNewWorkflowExecution
_x
                                         in
                                           if VersioningIntent -> VersioningIntent -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) VersioningIntent
_v VersioningIntent
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                               Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                           else
                                               Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
80)
                                                 ((Int -> Builder)
-> (VersioningIntent -> Int) -> VersioningIntent -> 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)
                                                    VersioningIntent -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum VersioningIntent
_v))
                                        (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                           (FoldLike
  FieldSet
  ContinueAsNewWorkflowExecution
  ContinueAsNewWorkflowExecution
  FieldSet
  FieldSet
-> ContinueAsNewWorkflowExecution -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                              FoldLike
  FieldSet
  ContinueAsNewWorkflowExecution
  ContinueAsNewWorkflowExecution
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ContinueAsNewWorkflowExecution FieldSet
Data.ProtoLens.unknownFields ContinueAsNewWorkflowExecution
_x)))))))))))
instance Control.DeepSeq.NFData ContinueAsNewWorkflowExecution where
  rnf :: ContinueAsNewWorkflowExecution -> ()
rnf
    = \ ContinueAsNewWorkflowExecution
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ContinueAsNewWorkflowExecution -> FieldSet
_ContinueAsNewWorkflowExecution'_unknownFields ContinueAsNewWorkflowExecution
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ContinueAsNewWorkflowExecution -> Text
_ContinueAsNewWorkflowExecution'workflowType ContinueAsNewWorkflowExecution
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ContinueAsNewWorkflowExecution -> Text
_ContinueAsNewWorkflowExecution'taskQueue ContinueAsNewWorkflowExecution
x__)
                   (Vector Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ContinueAsNewWorkflowExecution -> Vector Payload
_ContinueAsNewWorkflowExecution'arguments ContinueAsNewWorkflowExecution
x__)
                      (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ContinueAsNewWorkflowExecution -> Maybe Duration
_ContinueAsNewWorkflowExecution'workflowRunTimeout ContinueAsNewWorkflowExecution
x__)
                         (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ContinueAsNewWorkflowExecution -> Maybe Duration
_ContinueAsNewWorkflowExecution'workflowTaskTimeout ContinueAsNewWorkflowExecution
x__)
                            (Map Text Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ContinueAsNewWorkflowExecution -> Map Text Payload
_ContinueAsNewWorkflowExecution'memo ContinueAsNewWorkflowExecution
x__)
                               (Map Text Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (ContinueAsNewWorkflowExecution -> Map Text Payload
_ContinueAsNewWorkflowExecution'headers ContinueAsNewWorkflowExecution
x__)
                                  (Map Text Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (ContinueAsNewWorkflowExecution -> Map Text Payload
_ContinueAsNewWorkflowExecution'searchAttributes ContinueAsNewWorkflowExecution
x__)
                                     (Maybe RetryPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (ContinueAsNewWorkflowExecution -> Maybe RetryPolicy
_ContinueAsNewWorkflowExecution'retryPolicy ContinueAsNewWorkflowExecution
x__)
                                        (VersioningIntent -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (ContinueAsNewWorkflowExecution -> VersioningIntent
_ContinueAsNewWorkflowExecution'versioningIntent ContinueAsNewWorkflowExecution
x__)
                                           ()))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.key' @:: Lens' ContinueAsNewWorkflowExecution'HeadersEntry Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.value' @:: Lens' ContinueAsNewWorkflowExecution'HeadersEntry Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'value' @:: Lens' ContinueAsNewWorkflowExecution'HeadersEntry (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data ContinueAsNewWorkflowExecution'HeadersEntry
  = ContinueAsNewWorkflowExecution'HeadersEntry'_constructor {ContinueAsNewWorkflowExecution'HeadersEntry -> Text
_ContinueAsNewWorkflowExecution'HeadersEntry'key :: !Data.Text.Text,
                                                              ContinueAsNewWorkflowExecution'HeadersEntry -> Maybe Payload
_ContinueAsNewWorkflowExecution'HeadersEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                                              ContinueAsNewWorkflowExecution'HeadersEntry -> FieldSet
_ContinueAsNewWorkflowExecution'HeadersEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool
(ContinueAsNewWorkflowExecution'HeadersEntry
 -> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool)
-> (ContinueAsNewWorkflowExecution'HeadersEntry
    -> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool)
-> Eq ContinueAsNewWorkflowExecution'HeadersEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool
== :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool
$c/= :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool
/= :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool
Prelude.Eq, Eq ContinueAsNewWorkflowExecution'HeadersEntry
Eq ContinueAsNewWorkflowExecution'HeadersEntry =>
(ContinueAsNewWorkflowExecution'HeadersEntry
 -> ContinueAsNewWorkflowExecution'HeadersEntry -> Ordering)
-> (ContinueAsNewWorkflowExecution'HeadersEntry
    -> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool)
-> (ContinueAsNewWorkflowExecution'HeadersEntry
    -> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool)
-> (ContinueAsNewWorkflowExecution'HeadersEntry
    -> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool)
-> (ContinueAsNewWorkflowExecution'HeadersEntry
    -> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool)
-> (ContinueAsNewWorkflowExecution'HeadersEntry
    -> ContinueAsNewWorkflowExecution'HeadersEntry
    -> ContinueAsNewWorkflowExecution'HeadersEntry)
-> (ContinueAsNewWorkflowExecution'HeadersEntry
    -> ContinueAsNewWorkflowExecution'HeadersEntry
    -> ContinueAsNewWorkflowExecution'HeadersEntry)
-> Ord ContinueAsNewWorkflowExecution'HeadersEntry
ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool
ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Ordering
ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'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 :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Ordering
compare :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Ordering
$c< :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool
< :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool
$c<= :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool
<= :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool
$c> :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool
> :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool
$c>= :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool
>= :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry -> Bool
$cmax :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry
max :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry
$cmin :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry
min :: ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry
-> ContinueAsNewWorkflowExecution'HeadersEntry
Prelude.Ord)
instance Prelude.Show ContinueAsNewWorkflowExecution'HeadersEntry where
  showsPrec :: Int -> ContinueAsNewWorkflowExecution'HeadersEntry -> ShowS
showsPrec Int
_ ContinueAsNewWorkflowExecution'HeadersEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ContinueAsNewWorkflowExecution'HeadersEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ContinueAsNewWorkflowExecution'HeadersEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ContinueAsNewWorkflowExecution'HeadersEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> ContinueAsNewWorkflowExecution'HeadersEntry
-> f ContinueAsNewWorkflowExecution'HeadersEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> ContinueAsNewWorkflowExecution'HeadersEntry
 -> f ContinueAsNewWorkflowExecution'HeadersEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ContinueAsNewWorkflowExecution'HeadersEntry
-> f ContinueAsNewWorkflowExecution'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution'HeadersEntry -> Text)
-> (ContinueAsNewWorkflowExecution'HeadersEntry
    -> Text -> ContinueAsNewWorkflowExecution'HeadersEntry)
-> Lens' ContinueAsNewWorkflowExecution'HeadersEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution'HeadersEntry -> Text
_ContinueAsNewWorkflowExecution'HeadersEntry'key
           (\ ContinueAsNewWorkflowExecution'HeadersEntry
x__ Text
y__
              -> ContinueAsNewWorkflowExecution'HeadersEntry
x__ {_ContinueAsNewWorkflowExecution'HeadersEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ContinueAsNewWorkflowExecution'HeadersEntry "value" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Payload -> f Payload)
-> ContinueAsNewWorkflowExecution'HeadersEntry
-> f ContinueAsNewWorkflowExecution'HeadersEntry
fieldOf Proxy# "value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> ContinueAsNewWorkflowExecution'HeadersEntry
 -> f ContinueAsNewWorkflowExecution'HeadersEntry)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> ContinueAsNewWorkflowExecution'HeadersEntry
-> f ContinueAsNewWorkflowExecution'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution'HeadersEntry -> Maybe Payload)
-> (ContinueAsNewWorkflowExecution'HeadersEntry
    -> Maybe Payload -> ContinueAsNewWorkflowExecution'HeadersEntry)
-> Lens
     ContinueAsNewWorkflowExecution'HeadersEntry
     ContinueAsNewWorkflowExecution'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution'HeadersEntry -> Maybe Payload
_ContinueAsNewWorkflowExecution'HeadersEntry'value
           (\ ContinueAsNewWorkflowExecution'HeadersEntry
x__ Maybe Payload
y__
              -> ContinueAsNewWorkflowExecution'HeadersEntry
x__ {_ContinueAsNewWorkflowExecution'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 ContinueAsNewWorkflowExecution'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))
-> ContinueAsNewWorkflowExecution'HeadersEntry
-> f ContinueAsNewWorkflowExecution'HeadersEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> ContinueAsNewWorkflowExecution'HeadersEntry
 -> f ContinueAsNewWorkflowExecution'HeadersEntry)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> ContinueAsNewWorkflowExecution'HeadersEntry
-> f ContinueAsNewWorkflowExecution'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution'HeadersEntry -> Maybe Payload)
-> (ContinueAsNewWorkflowExecution'HeadersEntry
    -> Maybe Payload -> ContinueAsNewWorkflowExecution'HeadersEntry)
-> Lens
     ContinueAsNewWorkflowExecution'HeadersEntry
     ContinueAsNewWorkflowExecution'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution'HeadersEntry -> Maybe Payload
_ContinueAsNewWorkflowExecution'HeadersEntry'value
           (\ ContinueAsNewWorkflowExecution'HeadersEntry
x__ Maybe Payload
y__
              -> ContinueAsNewWorkflowExecution'HeadersEntry
x__ {_ContinueAsNewWorkflowExecution'HeadersEntry'value = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ContinueAsNewWorkflowExecution'HeadersEntry where
  messageName :: Proxy ContinueAsNewWorkflowExecution'HeadersEntry -> Text
messageName Proxy ContinueAsNewWorkflowExecution'HeadersEntry
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.ContinueAsNewWorkflowExecution.HeadersEntry"
  packedMessageDescriptor :: Proxy ContinueAsNewWorkflowExecution'HeadersEntry -> ByteString
packedMessageDescriptor Proxy ContinueAsNewWorkflowExecution'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 ContinueAsNewWorkflowExecution'HeadersEntry -> ByteString
packedFileDescriptor Proxy ContinueAsNewWorkflowExecution'HeadersEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor ContinueAsNewWorkflowExecution'HeadersEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor ContinueAsNewWorkflowExecution'HeadersEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ContinueAsNewWorkflowExecution'HeadersEntry Text
-> FieldDescriptor ContinueAsNewWorkflowExecution'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' ContinueAsNewWorkflowExecution'HeadersEntry Text
-> FieldAccessor ContinueAsNewWorkflowExecution'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 ContinueAsNewWorkflowExecution'HeadersEntry
        value__field_descriptor :: FieldDescriptor ContinueAsNewWorkflowExecution'HeadersEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor
     ContinueAsNewWorkflowExecution'HeadersEntry Payload
-> FieldDescriptor ContinueAsNewWorkflowExecution'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
  ContinueAsNewWorkflowExecution'HeadersEntry
  ContinueAsNewWorkflowExecution'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor
     ContinueAsNewWorkflowExecution'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 ContinueAsNewWorkflowExecution'HeadersEntry
      in
        [(Tag,
  FieldDescriptor ContinueAsNewWorkflowExecution'HeadersEntry)]
-> Map
     Tag (FieldDescriptor ContinueAsNewWorkflowExecution'HeadersEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ContinueAsNewWorkflowExecution'HeadersEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ContinueAsNewWorkflowExecution'HeadersEntry
value__field_descriptor)]
  unknownFields :: Lens' ContinueAsNewWorkflowExecution'HeadersEntry FieldSet
unknownFields
    = (ContinueAsNewWorkflowExecution'HeadersEntry -> FieldSet)
-> (ContinueAsNewWorkflowExecution'HeadersEntry
    -> FieldSet -> ContinueAsNewWorkflowExecution'HeadersEntry)
-> Lens' ContinueAsNewWorkflowExecution'HeadersEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ContinueAsNewWorkflowExecution'HeadersEntry -> FieldSet
_ContinueAsNewWorkflowExecution'HeadersEntry'_unknownFields
        (\ ContinueAsNewWorkflowExecution'HeadersEntry
x__ FieldSet
y__
           -> ContinueAsNewWorkflowExecution'HeadersEntry
x__
                {_ContinueAsNewWorkflowExecution'HeadersEntry'_unknownFields = y__})
  defMessage :: ContinueAsNewWorkflowExecution'HeadersEntry
defMessage
    = ContinueAsNewWorkflowExecution'HeadersEntry'_constructor
        {_ContinueAsNewWorkflowExecution'HeadersEntry'key :: Text
_ContinueAsNewWorkflowExecution'HeadersEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ContinueAsNewWorkflowExecution'HeadersEntry'value :: Maybe Payload
_ContinueAsNewWorkflowExecution'HeadersEntry'value = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _ContinueAsNewWorkflowExecution'HeadersEntry'_unknownFields :: FieldSet
_ContinueAsNewWorkflowExecution'HeadersEntry'_unknownFields = []}
  parseMessage :: Parser ContinueAsNewWorkflowExecution'HeadersEntry
parseMessage
    = let
        loop ::
          ContinueAsNewWorkflowExecution'HeadersEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser ContinueAsNewWorkflowExecution'HeadersEntry
        loop :: ContinueAsNewWorkflowExecution'HeadersEntry
-> Parser ContinueAsNewWorkflowExecution'HeadersEntry
loop ContinueAsNewWorkflowExecution'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 ContinueAsNewWorkflowExecution'HeadersEntry
-> String -> Parser ContinueAsNewWorkflowExecution'HeadersEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ContinueAsNewWorkflowExecution'HeadersEntry
-> Parser ContinueAsNewWorkflowExecution'HeadersEntry
loop ContinueAsNewWorkflowExecution'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"HeadersEntry"
  buildMessage :: ContinueAsNewWorkflowExecution'HeadersEntry -> Builder
buildMessage
    = \ ContinueAsNewWorkflowExecution'HeadersEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  ContinueAsNewWorkflowExecution'HeadersEntry
  ContinueAsNewWorkflowExecution'HeadersEntry
  Text
  Text
-> ContinueAsNewWorkflowExecution'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") ContinueAsNewWorkflowExecution'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)
  ContinueAsNewWorkflowExecution'HeadersEntry
  ContinueAsNewWorkflowExecution'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> ContinueAsNewWorkflowExecution'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") ContinueAsNewWorkflowExecution'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
  ContinueAsNewWorkflowExecution'HeadersEntry
  ContinueAsNewWorkflowExecution'HeadersEntry
  FieldSet
  FieldSet
-> ContinueAsNewWorkflowExecution'HeadersEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ContinueAsNewWorkflowExecution'HeadersEntry
  ContinueAsNewWorkflowExecution'HeadersEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ContinueAsNewWorkflowExecution'HeadersEntry FieldSet
Data.ProtoLens.unknownFields ContinueAsNewWorkflowExecution'HeadersEntry
_x)))
instance Control.DeepSeq.NFData ContinueAsNewWorkflowExecution'HeadersEntry where
  rnf :: ContinueAsNewWorkflowExecution'HeadersEntry -> ()
rnf
    = \ ContinueAsNewWorkflowExecution'HeadersEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ContinueAsNewWorkflowExecution'HeadersEntry -> FieldSet
_ContinueAsNewWorkflowExecution'HeadersEntry'_unknownFields ContinueAsNewWorkflowExecution'HeadersEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ContinueAsNewWorkflowExecution'HeadersEntry -> Text
_ContinueAsNewWorkflowExecution'HeadersEntry'key ContinueAsNewWorkflowExecution'HeadersEntry
x__)
                (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ContinueAsNewWorkflowExecution'HeadersEntry -> Maybe Payload
_ContinueAsNewWorkflowExecution'HeadersEntry'value ContinueAsNewWorkflowExecution'HeadersEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.key' @:: Lens' ContinueAsNewWorkflowExecution'MemoEntry Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.value' @:: Lens' ContinueAsNewWorkflowExecution'MemoEntry Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'value' @:: Lens' ContinueAsNewWorkflowExecution'MemoEntry (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data ContinueAsNewWorkflowExecution'MemoEntry
  = ContinueAsNewWorkflowExecution'MemoEntry'_constructor {ContinueAsNewWorkflowExecution'MemoEntry -> Text
_ContinueAsNewWorkflowExecution'MemoEntry'key :: !Data.Text.Text,
                                                           ContinueAsNewWorkflowExecution'MemoEntry -> Maybe Payload
_ContinueAsNewWorkflowExecution'MemoEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                                           ContinueAsNewWorkflowExecution'MemoEntry -> FieldSet
_ContinueAsNewWorkflowExecution'MemoEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Bool
(ContinueAsNewWorkflowExecution'MemoEntry
 -> ContinueAsNewWorkflowExecution'MemoEntry -> Bool)
-> (ContinueAsNewWorkflowExecution'MemoEntry
    -> ContinueAsNewWorkflowExecution'MemoEntry -> Bool)
-> Eq ContinueAsNewWorkflowExecution'MemoEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Bool
== :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Bool
$c/= :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Bool
/= :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Bool
Prelude.Eq, Eq ContinueAsNewWorkflowExecution'MemoEntry
Eq ContinueAsNewWorkflowExecution'MemoEntry =>
(ContinueAsNewWorkflowExecution'MemoEntry
 -> ContinueAsNewWorkflowExecution'MemoEntry -> Ordering)
-> (ContinueAsNewWorkflowExecution'MemoEntry
    -> ContinueAsNewWorkflowExecution'MemoEntry -> Bool)
-> (ContinueAsNewWorkflowExecution'MemoEntry
    -> ContinueAsNewWorkflowExecution'MemoEntry -> Bool)
-> (ContinueAsNewWorkflowExecution'MemoEntry
    -> ContinueAsNewWorkflowExecution'MemoEntry -> Bool)
-> (ContinueAsNewWorkflowExecution'MemoEntry
    -> ContinueAsNewWorkflowExecution'MemoEntry -> Bool)
-> (ContinueAsNewWorkflowExecution'MemoEntry
    -> ContinueAsNewWorkflowExecution'MemoEntry
    -> ContinueAsNewWorkflowExecution'MemoEntry)
-> (ContinueAsNewWorkflowExecution'MemoEntry
    -> ContinueAsNewWorkflowExecution'MemoEntry
    -> ContinueAsNewWorkflowExecution'MemoEntry)
-> Ord ContinueAsNewWorkflowExecution'MemoEntry
ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Bool
ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Ordering
ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry
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 :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Ordering
compare :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Ordering
$c< :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Bool
< :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Bool
$c<= :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Bool
<= :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Bool
$c> :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Bool
> :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Bool
$c>= :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Bool
>= :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry -> Bool
$cmax :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry
max :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry
$cmin :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry
min :: ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry
-> ContinueAsNewWorkflowExecution'MemoEntry
Prelude.Ord)
instance Prelude.Show ContinueAsNewWorkflowExecution'MemoEntry where
  showsPrec :: Int -> ContinueAsNewWorkflowExecution'MemoEntry -> ShowS
showsPrec Int
_ ContinueAsNewWorkflowExecution'MemoEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ContinueAsNewWorkflowExecution'MemoEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ContinueAsNewWorkflowExecution'MemoEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ContinueAsNewWorkflowExecution'MemoEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> ContinueAsNewWorkflowExecution'MemoEntry
-> f ContinueAsNewWorkflowExecution'MemoEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> ContinueAsNewWorkflowExecution'MemoEntry
 -> f ContinueAsNewWorkflowExecution'MemoEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ContinueAsNewWorkflowExecution'MemoEntry
-> f ContinueAsNewWorkflowExecution'MemoEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution'MemoEntry -> Text)
-> (ContinueAsNewWorkflowExecution'MemoEntry
    -> Text -> ContinueAsNewWorkflowExecution'MemoEntry)
-> Lens' ContinueAsNewWorkflowExecution'MemoEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution'MemoEntry -> Text
_ContinueAsNewWorkflowExecution'MemoEntry'key
           (\ ContinueAsNewWorkflowExecution'MemoEntry
x__ Text
y__
              -> ContinueAsNewWorkflowExecution'MemoEntry
x__ {_ContinueAsNewWorkflowExecution'MemoEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ContinueAsNewWorkflowExecution'MemoEntry "value" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Payload -> f Payload)
-> ContinueAsNewWorkflowExecution'MemoEntry
-> f ContinueAsNewWorkflowExecution'MemoEntry
fieldOf Proxy# "value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> ContinueAsNewWorkflowExecution'MemoEntry
 -> f ContinueAsNewWorkflowExecution'MemoEntry)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> ContinueAsNewWorkflowExecution'MemoEntry
-> f ContinueAsNewWorkflowExecution'MemoEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution'MemoEntry -> Maybe Payload)
-> (ContinueAsNewWorkflowExecution'MemoEntry
    -> Maybe Payload -> ContinueAsNewWorkflowExecution'MemoEntry)
-> Lens
     ContinueAsNewWorkflowExecution'MemoEntry
     ContinueAsNewWorkflowExecution'MemoEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution'MemoEntry -> Maybe Payload
_ContinueAsNewWorkflowExecution'MemoEntry'value
           (\ ContinueAsNewWorkflowExecution'MemoEntry
x__ Maybe Payload
y__
              -> ContinueAsNewWorkflowExecution'MemoEntry
x__ {_ContinueAsNewWorkflowExecution'MemoEntry'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 ContinueAsNewWorkflowExecution'MemoEntry "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))
-> ContinueAsNewWorkflowExecution'MemoEntry
-> f ContinueAsNewWorkflowExecution'MemoEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> ContinueAsNewWorkflowExecution'MemoEntry
 -> f ContinueAsNewWorkflowExecution'MemoEntry)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> ContinueAsNewWorkflowExecution'MemoEntry
-> f ContinueAsNewWorkflowExecution'MemoEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution'MemoEntry -> Maybe Payload)
-> (ContinueAsNewWorkflowExecution'MemoEntry
    -> Maybe Payload -> ContinueAsNewWorkflowExecution'MemoEntry)
-> Lens
     ContinueAsNewWorkflowExecution'MemoEntry
     ContinueAsNewWorkflowExecution'MemoEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution'MemoEntry -> Maybe Payload
_ContinueAsNewWorkflowExecution'MemoEntry'value
           (\ ContinueAsNewWorkflowExecution'MemoEntry
x__ Maybe Payload
y__
              -> ContinueAsNewWorkflowExecution'MemoEntry
x__ {_ContinueAsNewWorkflowExecution'MemoEntry'value = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ContinueAsNewWorkflowExecution'MemoEntry where
  messageName :: Proxy ContinueAsNewWorkflowExecution'MemoEntry -> Text
messageName Proxy ContinueAsNewWorkflowExecution'MemoEntry
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.ContinueAsNewWorkflowExecution.MemoEntry"
  packedMessageDescriptor :: Proxy ContinueAsNewWorkflowExecution'MemoEntry -> ByteString
packedMessageDescriptor Proxy ContinueAsNewWorkflowExecution'MemoEntry
_
    = ByteString
"\n\
      \\tMemoEntry\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 ContinueAsNewWorkflowExecution'MemoEntry -> ByteString
packedFileDescriptor Proxy ContinueAsNewWorkflowExecution'MemoEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ContinueAsNewWorkflowExecution'MemoEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor ContinueAsNewWorkflowExecution'MemoEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ContinueAsNewWorkflowExecution'MemoEntry Text
-> FieldDescriptor ContinueAsNewWorkflowExecution'MemoEntry
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' ContinueAsNewWorkflowExecution'MemoEntry Text
-> FieldAccessor ContinueAsNewWorkflowExecution'MemoEntry 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 ContinueAsNewWorkflowExecution'MemoEntry
        value__field_descriptor :: FieldDescriptor ContinueAsNewWorkflowExecution'MemoEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor ContinueAsNewWorkflowExecution'MemoEntry Payload
-> FieldDescriptor ContinueAsNewWorkflowExecution'MemoEntry
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
  ContinueAsNewWorkflowExecution'MemoEntry
  ContinueAsNewWorkflowExecution'MemoEntry
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor ContinueAsNewWorkflowExecution'MemoEntry 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 ContinueAsNewWorkflowExecution'MemoEntry
      in
        [(Tag, FieldDescriptor ContinueAsNewWorkflowExecution'MemoEntry)]
-> Map
     Tag (FieldDescriptor ContinueAsNewWorkflowExecution'MemoEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ContinueAsNewWorkflowExecution'MemoEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ContinueAsNewWorkflowExecution'MemoEntry
value__field_descriptor)]
  unknownFields :: Lens' ContinueAsNewWorkflowExecution'MemoEntry FieldSet
unknownFields
    = (ContinueAsNewWorkflowExecution'MemoEntry -> FieldSet)
-> (ContinueAsNewWorkflowExecution'MemoEntry
    -> FieldSet -> ContinueAsNewWorkflowExecution'MemoEntry)
-> Lens' ContinueAsNewWorkflowExecution'MemoEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ContinueAsNewWorkflowExecution'MemoEntry -> FieldSet
_ContinueAsNewWorkflowExecution'MemoEntry'_unknownFields
        (\ ContinueAsNewWorkflowExecution'MemoEntry
x__ FieldSet
y__
           -> ContinueAsNewWorkflowExecution'MemoEntry
x__
                {_ContinueAsNewWorkflowExecution'MemoEntry'_unknownFields = y__})
  defMessage :: ContinueAsNewWorkflowExecution'MemoEntry
defMessage
    = ContinueAsNewWorkflowExecution'MemoEntry'_constructor
        {_ContinueAsNewWorkflowExecution'MemoEntry'key :: Text
_ContinueAsNewWorkflowExecution'MemoEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ContinueAsNewWorkflowExecution'MemoEntry'value :: Maybe Payload
_ContinueAsNewWorkflowExecution'MemoEntry'value = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _ContinueAsNewWorkflowExecution'MemoEntry'_unknownFields :: FieldSet
_ContinueAsNewWorkflowExecution'MemoEntry'_unknownFields = []}
  parseMessage :: Parser ContinueAsNewWorkflowExecution'MemoEntry
parseMessage
    = let
        loop ::
          ContinueAsNewWorkflowExecution'MemoEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser ContinueAsNewWorkflowExecution'MemoEntry
        loop :: ContinueAsNewWorkflowExecution'MemoEntry
-> Parser ContinueAsNewWorkflowExecution'MemoEntry
loop ContinueAsNewWorkflowExecution'MemoEntry
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 ContinueAsNewWorkflowExecution'MemoEntry
-> String -> Parser ContinueAsNewWorkflowExecution'MemoEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ContinueAsNewWorkflowExecution'MemoEntry
-> Parser ContinueAsNewWorkflowExecution'MemoEntry
loop ContinueAsNewWorkflowExecution'MemoEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"MemoEntry"
  buildMessage :: ContinueAsNewWorkflowExecution'MemoEntry -> Builder
buildMessage
    = \ ContinueAsNewWorkflowExecution'MemoEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  ContinueAsNewWorkflowExecution'MemoEntry
  ContinueAsNewWorkflowExecution'MemoEntry
  Text
  Text
-> ContinueAsNewWorkflowExecution'MemoEntry -> 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") ContinueAsNewWorkflowExecution'MemoEntry
_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)
  ContinueAsNewWorkflowExecution'MemoEntry
  ContinueAsNewWorkflowExecution'MemoEntry
  (Maybe Payload)
  (Maybe Payload)
-> ContinueAsNewWorkflowExecution'MemoEntry -> 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") ContinueAsNewWorkflowExecution'MemoEntry
_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
  ContinueAsNewWorkflowExecution'MemoEntry
  ContinueAsNewWorkflowExecution'MemoEntry
  FieldSet
  FieldSet
-> ContinueAsNewWorkflowExecution'MemoEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ContinueAsNewWorkflowExecution'MemoEntry
  ContinueAsNewWorkflowExecution'MemoEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ContinueAsNewWorkflowExecution'MemoEntry FieldSet
Data.ProtoLens.unknownFields ContinueAsNewWorkflowExecution'MemoEntry
_x)))
instance Control.DeepSeq.NFData ContinueAsNewWorkflowExecution'MemoEntry where
  rnf :: ContinueAsNewWorkflowExecution'MemoEntry -> ()
rnf
    = \ ContinueAsNewWorkflowExecution'MemoEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ContinueAsNewWorkflowExecution'MemoEntry -> FieldSet
_ContinueAsNewWorkflowExecution'MemoEntry'_unknownFields ContinueAsNewWorkflowExecution'MemoEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ContinueAsNewWorkflowExecution'MemoEntry -> Text
_ContinueAsNewWorkflowExecution'MemoEntry'key ContinueAsNewWorkflowExecution'MemoEntry
x__)
                (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ContinueAsNewWorkflowExecution'MemoEntry -> Maybe Payload
_ContinueAsNewWorkflowExecution'MemoEntry'value ContinueAsNewWorkflowExecution'MemoEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.key' @:: Lens' ContinueAsNewWorkflowExecution'SearchAttributesEntry Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.value' @:: Lens' ContinueAsNewWorkflowExecution'SearchAttributesEntry Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'value' @:: Lens' ContinueAsNewWorkflowExecution'SearchAttributesEntry (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data ContinueAsNewWorkflowExecution'SearchAttributesEntry
  = ContinueAsNewWorkflowExecution'SearchAttributesEntry'_constructor {ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Text
_ContinueAsNewWorkflowExecution'SearchAttributesEntry'key :: !Data.Text.Text,
                                                                       ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> Maybe Payload
_ContinueAsNewWorkflowExecution'SearchAttributesEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                                                       ContinueAsNewWorkflowExecution'SearchAttributesEntry -> FieldSet
_ContinueAsNewWorkflowExecution'SearchAttributesEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool
(ContinueAsNewWorkflowExecution'SearchAttributesEntry
 -> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool)
-> (ContinueAsNewWorkflowExecution'SearchAttributesEntry
    -> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool)
-> Eq ContinueAsNewWorkflowExecution'SearchAttributesEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool
== :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool
$c/= :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool
/= :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool
Prelude.Eq, Eq ContinueAsNewWorkflowExecution'SearchAttributesEntry
Eq ContinueAsNewWorkflowExecution'SearchAttributesEntry =>
(ContinueAsNewWorkflowExecution'SearchAttributesEntry
 -> ContinueAsNewWorkflowExecution'SearchAttributesEntry
 -> Ordering)
-> (ContinueAsNewWorkflowExecution'SearchAttributesEntry
    -> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool)
-> (ContinueAsNewWorkflowExecution'SearchAttributesEntry
    -> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool)
-> (ContinueAsNewWorkflowExecution'SearchAttributesEntry
    -> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool)
-> (ContinueAsNewWorkflowExecution'SearchAttributesEntry
    -> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool)
-> (ContinueAsNewWorkflowExecution'SearchAttributesEntry
    -> ContinueAsNewWorkflowExecution'SearchAttributesEntry
    -> ContinueAsNewWorkflowExecution'SearchAttributesEntry)
-> (ContinueAsNewWorkflowExecution'SearchAttributesEntry
    -> ContinueAsNewWorkflowExecution'SearchAttributesEntry
    -> ContinueAsNewWorkflowExecution'SearchAttributesEntry)
-> Ord ContinueAsNewWorkflowExecution'SearchAttributesEntry
ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool
ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Ordering
ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
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 :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Ordering
compare :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Ordering
$c< :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool
< :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool
$c<= :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool
<= :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool
$c> :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool
> :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool
$c>= :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool
>= :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Bool
$cmax :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
max :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
$cmin :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
min :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
Prelude.Ord)
instance Prelude.Show ContinueAsNewWorkflowExecution'SearchAttributesEntry where
  showsPrec :: Int
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> ShowS
showsPrec Int
_ ContinueAsNewWorkflowExecution'SearchAttributesEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ContinueAsNewWorkflowExecution'SearchAttributesEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ContinueAsNewWorkflowExecution'SearchAttributesEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ContinueAsNewWorkflowExecution'SearchAttributesEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> f ContinueAsNewWorkflowExecution'SearchAttributesEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> ContinueAsNewWorkflowExecution'SearchAttributesEntry
 -> f ContinueAsNewWorkflowExecution'SearchAttributesEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> f ContinueAsNewWorkflowExecution'SearchAttributesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Text)
-> (ContinueAsNewWorkflowExecution'SearchAttributesEntry
    -> Text -> ContinueAsNewWorkflowExecution'SearchAttributesEntry)
-> Lens' ContinueAsNewWorkflowExecution'SearchAttributesEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Text
_ContinueAsNewWorkflowExecution'SearchAttributesEntry'key
           (\ ContinueAsNewWorkflowExecution'SearchAttributesEntry
x__ Text
y__
              -> ContinueAsNewWorkflowExecution'SearchAttributesEntry
x__
                   {_ContinueAsNewWorkflowExecution'SearchAttributesEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ContinueAsNewWorkflowExecution'SearchAttributesEntry "value" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Payload -> f Payload)
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> f ContinueAsNewWorkflowExecution'SearchAttributesEntry
fieldOf Proxy# "value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> ContinueAsNewWorkflowExecution'SearchAttributesEntry
 -> f ContinueAsNewWorkflowExecution'SearchAttributesEntry)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> f ContinueAsNewWorkflowExecution'SearchAttributesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution'SearchAttributesEntry
 -> Maybe Payload)
-> (ContinueAsNewWorkflowExecution'SearchAttributesEntry
    -> Maybe Payload
    -> ContinueAsNewWorkflowExecution'SearchAttributesEntry)
-> Lens
     ContinueAsNewWorkflowExecution'SearchAttributesEntry
     ContinueAsNewWorkflowExecution'SearchAttributesEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> Maybe Payload
_ContinueAsNewWorkflowExecution'SearchAttributesEntry'value
           (\ ContinueAsNewWorkflowExecution'SearchAttributesEntry
x__ Maybe Payload
y__
              -> ContinueAsNewWorkflowExecution'SearchAttributesEntry
x__
                   {_ContinueAsNewWorkflowExecution'SearchAttributesEntry'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 ContinueAsNewWorkflowExecution'SearchAttributesEntry "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))
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> f ContinueAsNewWorkflowExecution'SearchAttributesEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> ContinueAsNewWorkflowExecution'SearchAttributesEntry
 -> f ContinueAsNewWorkflowExecution'SearchAttributesEntry)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> f ContinueAsNewWorkflowExecution'SearchAttributesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ContinueAsNewWorkflowExecution'SearchAttributesEntry
 -> Maybe Payload)
-> (ContinueAsNewWorkflowExecution'SearchAttributesEntry
    -> Maybe Payload
    -> ContinueAsNewWorkflowExecution'SearchAttributesEntry)
-> Lens
     ContinueAsNewWorkflowExecution'SearchAttributesEntry
     ContinueAsNewWorkflowExecution'SearchAttributesEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> Maybe Payload
_ContinueAsNewWorkflowExecution'SearchAttributesEntry'value
           (\ ContinueAsNewWorkflowExecution'SearchAttributesEntry
x__ Maybe Payload
y__
              -> ContinueAsNewWorkflowExecution'SearchAttributesEntry
x__
                   {_ContinueAsNewWorkflowExecution'SearchAttributesEntry'value = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ContinueAsNewWorkflowExecution'SearchAttributesEntry where
  messageName :: Proxy ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Text
messageName Proxy ContinueAsNewWorkflowExecution'SearchAttributesEntry
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.ContinueAsNewWorkflowExecution.SearchAttributesEntry"
  packedMessageDescriptor :: Proxy ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ByteString
packedMessageDescriptor Proxy ContinueAsNewWorkflowExecution'SearchAttributesEntry
_
    = ByteString
"\n\
      \\NAKSearchAttributesEntry\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 ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> ByteString
packedFileDescriptor Proxy ContinueAsNewWorkflowExecution'SearchAttributesEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     ContinueAsNewWorkflowExecution'SearchAttributesEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     ContinueAsNewWorkflowExecution'SearchAttributesEntry Text
-> FieldDescriptor
     ContinueAsNewWorkflowExecution'SearchAttributesEntry
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' ContinueAsNewWorkflowExecution'SearchAttributesEntry Text
-> FieldAccessor
     ContinueAsNewWorkflowExecution'SearchAttributesEntry 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 ContinueAsNewWorkflowExecution'SearchAttributesEntry
        value__field_descriptor :: FieldDescriptor
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor
     ContinueAsNewWorkflowExecution'SearchAttributesEntry Payload
-> FieldDescriptor
     ContinueAsNewWorkflowExecution'SearchAttributesEntry
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
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor
     ContinueAsNewWorkflowExecution'SearchAttributesEntry 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 ContinueAsNewWorkflowExecution'SearchAttributesEntry
      in
        [(Tag,
  FieldDescriptor
    ContinueAsNewWorkflowExecution'SearchAttributesEntry)]
-> Map
     Tag
     (FieldDescriptor
        ContinueAsNewWorkflowExecution'SearchAttributesEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
value__field_descriptor)]
  unknownFields :: Lens' ContinueAsNewWorkflowExecution'SearchAttributesEntry FieldSet
unknownFields
    = (ContinueAsNewWorkflowExecution'SearchAttributesEntry -> FieldSet)
-> (ContinueAsNewWorkflowExecution'SearchAttributesEntry
    -> FieldSet
    -> ContinueAsNewWorkflowExecution'SearchAttributesEntry)
-> Lens'
     ContinueAsNewWorkflowExecution'SearchAttributesEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ContinueAsNewWorkflowExecution'SearchAttributesEntry -> FieldSet
_ContinueAsNewWorkflowExecution'SearchAttributesEntry'_unknownFields
        (\ ContinueAsNewWorkflowExecution'SearchAttributesEntry
x__ FieldSet
y__
           -> ContinueAsNewWorkflowExecution'SearchAttributesEntry
x__
                {_ContinueAsNewWorkflowExecution'SearchAttributesEntry'_unknownFields = y__})
  defMessage :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
defMessage
    = ContinueAsNewWorkflowExecution'SearchAttributesEntry'_constructor
        {_ContinueAsNewWorkflowExecution'SearchAttributesEntry'key :: Text
_ContinueAsNewWorkflowExecution'SearchAttributesEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ContinueAsNewWorkflowExecution'SearchAttributesEntry'value :: Maybe Payload
_ContinueAsNewWorkflowExecution'SearchAttributesEntry'value = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _ContinueAsNewWorkflowExecution'SearchAttributesEntry'_unknownFields :: FieldSet
_ContinueAsNewWorkflowExecution'SearchAttributesEntry'_unknownFields = []}
  parseMessage :: Parser ContinueAsNewWorkflowExecution'SearchAttributesEntry
parseMessage
    = let
        loop ::
          ContinueAsNewWorkflowExecution'SearchAttributesEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser ContinueAsNewWorkflowExecution'SearchAttributesEntry
        loop :: ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> Parser ContinueAsNewWorkflowExecution'SearchAttributesEntry
loop ContinueAsNewWorkflowExecution'SearchAttributesEntry
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 ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> String
-> Parser ContinueAsNewWorkflowExecution'SearchAttributesEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> Parser ContinueAsNewWorkflowExecution'SearchAttributesEntry
loop ContinueAsNewWorkflowExecution'SearchAttributesEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"SearchAttributesEntry"
  buildMessage :: ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Builder
buildMessage
    = \ ContinueAsNewWorkflowExecution'SearchAttributesEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  Text
  Text
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> 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") ContinueAsNewWorkflowExecution'SearchAttributesEntry
_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)
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  (Maybe Payload)
  (Maybe Payload)
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> 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") ContinueAsNewWorkflowExecution'SearchAttributesEntry
_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
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  FieldSet
  FieldSet
-> ContinueAsNewWorkflowExecution'SearchAttributesEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  ContinueAsNewWorkflowExecution'SearchAttributesEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ContinueAsNewWorkflowExecution'SearchAttributesEntry FieldSet
Data.ProtoLens.unknownFields ContinueAsNewWorkflowExecution'SearchAttributesEntry
_x)))
instance Control.DeepSeq.NFData ContinueAsNewWorkflowExecution'SearchAttributesEntry where
  rnf :: ContinueAsNewWorkflowExecution'SearchAttributesEntry -> ()
rnf
    = \ ContinueAsNewWorkflowExecution'SearchAttributesEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ContinueAsNewWorkflowExecution'SearchAttributesEntry -> FieldSet
_ContinueAsNewWorkflowExecution'SearchAttributesEntry'_unknownFields
                ContinueAsNewWorkflowExecution'SearchAttributesEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ContinueAsNewWorkflowExecution'SearchAttributesEntry -> Text
_ContinueAsNewWorkflowExecution'SearchAttributesEntry'key ContinueAsNewWorkflowExecution'SearchAttributesEntry
x__)
                (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ContinueAsNewWorkflowExecution'SearchAttributesEntry
-> Maybe Payload
_ContinueAsNewWorkflowExecution'SearchAttributesEntry'value ContinueAsNewWorkflowExecution'SearchAttributesEntry
x__)
                   ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.failure' @:: Lens' FailWorkflowExecution Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'failure' @:: Lens' FailWorkflowExecution (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@ -}
data FailWorkflowExecution
  = FailWorkflowExecution'_constructor {FailWorkflowExecution -> Maybe Failure
_FailWorkflowExecution'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                        FailWorkflowExecution -> FieldSet
_FailWorkflowExecution'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (FailWorkflowExecution -> FailWorkflowExecution -> Bool
(FailWorkflowExecution -> FailWorkflowExecution -> Bool)
-> (FailWorkflowExecution -> FailWorkflowExecution -> Bool)
-> Eq FailWorkflowExecution
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: FailWorkflowExecution -> FailWorkflowExecution -> Bool
== :: FailWorkflowExecution -> FailWorkflowExecution -> Bool
$c/= :: FailWorkflowExecution -> FailWorkflowExecution -> Bool
/= :: FailWorkflowExecution -> FailWorkflowExecution -> Bool
Prelude.Eq, Eq FailWorkflowExecution
Eq FailWorkflowExecution =>
(FailWorkflowExecution -> FailWorkflowExecution -> Ordering)
-> (FailWorkflowExecution -> FailWorkflowExecution -> Bool)
-> (FailWorkflowExecution -> FailWorkflowExecution -> Bool)
-> (FailWorkflowExecution -> FailWorkflowExecution -> Bool)
-> (FailWorkflowExecution -> FailWorkflowExecution -> Bool)
-> (FailWorkflowExecution
    -> FailWorkflowExecution -> FailWorkflowExecution)
-> (FailWorkflowExecution
    -> FailWorkflowExecution -> FailWorkflowExecution)
-> Ord FailWorkflowExecution
FailWorkflowExecution -> FailWorkflowExecution -> Bool
FailWorkflowExecution -> FailWorkflowExecution -> Ordering
FailWorkflowExecution
-> FailWorkflowExecution -> FailWorkflowExecution
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 :: FailWorkflowExecution -> FailWorkflowExecution -> Ordering
compare :: FailWorkflowExecution -> FailWorkflowExecution -> Ordering
$c< :: FailWorkflowExecution -> FailWorkflowExecution -> Bool
< :: FailWorkflowExecution -> FailWorkflowExecution -> Bool
$c<= :: FailWorkflowExecution -> FailWorkflowExecution -> Bool
<= :: FailWorkflowExecution -> FailWorkflowExecution -> Bool
$c> :: FailWorkflowExecution -> FailWorkflowExecution -> Bool
> :: FailWorkflowExecution -> FailWorkflowExecution -> Bool
$c>= :: FailWorkflowExecution -> FailWorkflowExecution -> Bool
>= :: FailWorkflowExecution -> FailWorkflowExecution -> Bool
$cmax :: FailWorkflowExecution
-> FailWorkflowExecution -> FailWorkflowExecution
max :: FailWorkflowExecution
-> FailWorkflowExecution -> FailWorkflowExecution
$cmin :: FailWorkflowExecution
-> FailWorkflowExecution -> FailWorkflowExecution
min :: FailWorkflowExecution
-> FailWorkflowExecution -> FailWorkflowExecution
Prelude.Ord)
instance Prelude.Show FailWorkflowExecution where
  showsPrec :: Int -> FailWorkflowExecution -> ShowS
showsPrec Int
_ FailWorkflowExecution
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (FailWorkflowExecution -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort FailWorkflowExecution
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField FailWorkflowExecution "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> FailWorkflowExecution
-> f FailWorkflowExecution
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> FailWorkflowExecution -> f FailWorkflowExecution)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> FailWorkflowExecution
-> f FailWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((FailWorkflowExecution -> Maybe Failure)
-> (FailWorkflowExecution
    -> Maybe Failure -> FailWorkflowExecution)
-> Lens
     FailWorkflowExecution
     FailWorkflowExecution
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           FailWorkflowExecution -> Maybe Failure
_FailWorkflowExecution'failure
           (\ FailWorkflowExecution
x__ Maybe Failure
y__ -> FailWorkflowExecution
x__ {_FailWorkflowExecution'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 FailWorkflowExecution "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))
-> FailWorkflowExecution
-> f FailWorkflowExecution
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> FailWorkflowExecution -> f FailWorkflowExecution)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> FailWorkflowExecution
-> f FailWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((FailWorkflowExecution -> Maybe Failure)
-> (FailWorkflowExecution
    -> Maybe Failure -> FailWorkflowExecution)
-> Lens
     FailWorkflowExecution
     FailWorkflowExecution
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           FailWorkflowExecution -> Maybe Failure
_FailWorkflowExecution'failure
           (\ FailWorkflowExecution
x__ Maybe Failure
y__ -> FailWorkflowExecution
x__ {_FailWorkflowExecution'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message FailWorkflowExecution where
  messageName :: Proxy FailWorkflowExecution -> Text
messageName Proxy FailWorkflowExecution
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_commands.FailWorkflowExecution"
  packedMessageDescriptor :: Proxy FailWorkflowExecution -> ByteString
packedMessageDescriptor Proxy FailWorkflowExecution
_
    = ByteString
"\n\
      \\NAKFailWorkflowExecution\DC2:\n\
      \\afailure\CAN\SOH \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure"
  packedFileDescriptor :: Proxy FailWorkflowExecution -> ByteString
packedFileDescriptor Proxy FailWorkflowExecution
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor FailWorkflowExecution)
fieldsByTag
    = let
        failure__field_descriptor :: FieldDescriptor FailWorkflowExecution
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor FailWorkflowExecution Failure
-> FieldDescriptor FailWorkflowExecution
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
  FailWorkflowExecution
  FailWorkflowExecution
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor FailWorkflowExecution 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 FailWorkflowExecution
      in
        [(Tag, FieldDescriptor FailWorkflowExecution)]
-> Map Tag (FieldDescriptor FailWorkflowExecution)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor FailWorkflowExecution
failure__field_descriptor)]
  unknownFields :: Lens' FailWorkflowExecution FieldSet
unknownFields
    = (FailWorkflowExecution -> FieldSet)
-> (FailWorkflowExecution -> FieldSet -> FailWorkflowExecution)
-> Lens' FailWorkflowExecution FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        FailWorkflowExecution -> FieldSet
_FailWorkflowExecution'_unknownFields
        (\ FailWorkflowExecution
x__ FieldSet
y__ -> FailWorkflowExecution
x__ {_FailWorkflowExecution'_unknownFields = y__})
  defMessage :: FailWorkflowExecution
defMessage
    = FailWorkflowExecution'_constructor
        {_FailWorkflowExecution'failure :: Maybe Failure
_FailWorkflowExecution'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _FailWorkflowExecution'_unknownFields :: FieldSet
_FailWorkflowExecution'_unknownFields = []}
  parseMessage :: Parser FailWorkflowExecution
parseMessage
    = let
        loop ::
          FailWorkflowExecution
          -> Data.ProtoLens.Encoding.Bytes.Parser FailWorkflowExecution
        loop :: FailWorkflowExecution -> Parser FailWorkflowExecution
loop FailWorkflowExecution
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 FailWorkflowExecution
-> String -> Parser FailWorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do FailWorkflowExecution -> Parser FailWorkflowExecution
loop FailWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"FailWorkflowExecution"
  buildMessage :: FailWorkflowExecution -> Builder
buildMessage
    = \ FailWorkflowExecution
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Failure)
  FailWorkflowExecution
  FailWorkflowExecution
  (Maybe Failure)
  (Maybe Failure)
-> FailWorkflowExecution -> 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") FailWorkflowExecution
_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
  FailWorkflowExecution
  FailWorkflowExecution
  FieldSet
  FieldSet
-> FailWorkflowExecution -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  FailWorkflowExecution
  FailWorkflowExecution
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' FailWorkflowExecution FieldSet
Data.ProtoLens.unknownFields FailWorkflowExecution
_x))
instance Control.DeepSeq.NFData FailWorkflowExecution where
  rnf :: FailWorkflowExecution -> ()
rnf
    = \ FailWorkflowExecution
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (FailWorkflowExecution -> FieldSet
_FailWorkflowExecution'_unknownFields FailWorkflowExecution
x__)
             (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (FailWorkflowExecution -> Maybe Failure
_FailWorkflowExecution'failure FailWorkflowExecution
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.upsertedMemo' @:: Lens' ModifyWorkflowProperties Proto.Temporal.Api.Common.V1.Message.Memo@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'upsertedMemo' @:: Lens' ModifyWorkflowProperties (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo)@ -}
data ModifyWorkflowProperties
  = ModifyWorkflowProperties'_constructor {ModifyWorkflowProperties -> Maybe Memo
_ModifyWorkflowProperties'upsertedMemo :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo),
                                           ModifyWorkflowProperties -> FieldSet
_ModifyWorkflowProperties'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool
(ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool)
-> (ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool)
-> Eq ModifyWorkflowProperties
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool
== :: ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool
$c/= :: ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool
/= :: ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool
Prelude.Eq, Eq ModifyWorkflowProperties
Eq ModifyWorkflowProperties =>
(ModifyWorkflowProperties -> ModifyWorkflowProperties -> Ordering)
-> (ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool)
-> (ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool)
-> (ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool)
-> (ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool)
-> (ModifyWorkflowProperties
    -> ModifyWorkflowProperties -> ModifyWorkflowProperties)
-> (ModifyWorkflowProperties
    -> ModifyWorkflowProperties -> ModifyWorkflowProperties)
-> Ord ModifyWorkflowProperties
ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool
ModifyWorkflowProperties -> ModifyWorkflowProperties -> Ordering
ModifyWorkflowProperties
-> ModifyWorkflowProperties -> ModifyWorkflowProperties
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 :: ModifyWorkflowProperties -> ModifyWorkflowProperties -> Ordering
compare :: ModifyWorkflowProperties -> ModifyWorkflowProperties -> Ordering
$c< :: ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool
< :: ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool
$c<= :: ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool
<= :: ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool
$c> :: ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool
> :: ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool
$c>= :: ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool
>= :: ModifyWorkflowProperties -> ModifyWorkflowProperties -> Bool
$cmax :: ModifyWorkflowProperties
-> ModifyWorkflowProperties -> ModifyWorkflowProperties
max :: ModifyWorkflowProperties
-> ModifyWorkflowProperties -> ModifyWorkflowProperties
$cmin :: ModifyWorkflowProperties
-> ModifyWorkflowProperties -> ModifyWorkflowProperties
min :: ModifyWorkflowProperties
-> ModifyWorkflowProperties -> ModifyWorkflowProperties
Prelude.Ord)
instance Prelude.Show ModifyWorkflowProperties where
  showsPrec :: Int -> ModifyWorkflowProperties -> ShowS
showsPrec Int
_ ModifyWorkflowProperties
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ModifyWorkflowProperties -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ModifyWorkflowProperties
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ModifyWorkflowProperties "upsertedMemo" Proto.Temporal.Api.Common.V1.Message.Memo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "upsertedMemo"
-> (Memo -> f Memo)
-> ModifyWorkflowProperties
-> f ModifyWorkflowProperties
fieldOf Proxy# "upsertedMemo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> ModifyWorkflowProperties -> f ModifyWorkflowProperties)
-> ((Memo -> f Memo) -> Maybe Memo -> f (Maybe Memo))
-> (Memo -> f Memo)
-> ModifyWorkflowProperties
-> f ModifyWorkflowProperties
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ModifyWorkflowProperties -> Maybe Memo)
-> (ModifyWorkflowProperties
    -> Maybe Memo -> ModifyWorkflowProperties)
-> Lens
     ModifyWorkflowProperties
     ModifyWorkflowProperties
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ModifyWorkflowProperties -> Maybe Memo
_ModifyWorkflowProperties'upsertedMemo
           (\ ModifyWorkflowProperties
x__ Maybe Memo
y__ -> ModifyWorkflowProperties
x__ {_ModifyWorkflowProperties'upsertedMemo = y__}))
        (Memo -> Lens' (Maybe Memo) Memo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Memo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ModifyWorkflowProperties "maybe'upsertedMemo" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'upsertedMemo"
-> (Maybe Memo -> f (Maybe Memo))
-> ModifyWorkflowProperties
-> f ModifyWorkflowProperties
fieldOf Proxy# "maybe'upsertedMemo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> ModifyWorkflowProperties -> f ModifyWorkflowProperties)
-> ((Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo))
-> (Maybe Memo -> f (Maybe Memo))
-> ModifyWorkflowProperties
-> f ModifyWorkflowProperties
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ModifyWorkflowProperties -> Maybe Memo)
-> (ModifyWorkflowProperties
    -> Maybe Memo -> ModifyWorkflowProperties)
-> Lens
     ModifyWorkflowProperties
     ModifyWorkflowProperties
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ModifyWorkflowProperties -> Maybe Memo
_ModifyWorkflowProperties'upsertedMemo
           (\ ModifyWorkflowProperties
x__ Maybe Memo
y__ -> ModifyWorkflowProperties
x__ {_ModifyWorkflowProperties'upsertedMemo = y__}))
        (Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ModifyWorkflowProperties where
  messageName :: Proxy ModifyWorkflowProperties -> Text
messageName Proxy ModifyWorkflowProperties
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.ModifyWorkflowProperties"
  packedMessageDescriptor :: Proxy ModifyWorkflowProperties -> ByteString
packedMessageDescriptor Proxy ModifyWorkflowProperties
_
    = ByteString
"\n\
      \\CANModifyWorkflowProperties\DC2A\n\
      \\rupserted_memo\CAN\SOH \SOH(\v2\FS.temporal.api.common.v1.MemoR\fupsertedMemo"
  packedFileDescriptor :: Proxy ModifyWorkflowProperties -> ByteString
packedFileDescriptor Proxy ModifyWorkflowProperties
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ModifyWorkflowProperties)
fieldsByTag
    = let
        upsertedMemo__field_descriptor :: FieldDescriptor ModifyWorkflowProperties
upsertedMemo__field_descriptor
          = String
-> FieldTypeDescriptor Memo
-> FieldAccessor ModifyWorkflowProperties Memo
-> FieldDescriptor ModifyWorkflowProperties
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"upserted_memo"
              (MessageOrGroup -> FieldTypeDescriptor Memo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Memo)
              (Lens
  ModifyWorkflowProperties
  ModifyWorkflowProperties
  (Maybe Memo)
  (Maybe Memo)
-> FieldAccessor ModifyWorkflowProperties Memo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'upsertedMemo")) ::
              Data.ProtoLens.FieldDescriptor ModifyWorkflowProperties
      in
        [(Tag, FieldDescriptor ModifyWorkflowProperties)]
-> Map Tag (FieldDescriptor ModifyWorkflowProperties)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ModifyWorkflowProperties
upsertedMemo__field_descriptor)]
  unknownFields :: Lens' ModifyWorkflowProperties FieldSet
unknownFields
    = (ModifyWorkflowProperties -> FieldSet)
-> (ModifyWorkflowProperties
    -> FieldSet -> ModifyWorkflowProperties)
-> Lens' ModifyWorkflowProperties FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ModifyWorkflowProperties -> FieldSet
_ModifyWorkflowProperties'_unknownFields
        (\ ModifyWorkflowProperties
x__ FieldSet
y__ -> ModifyWorkflowProperties
x__ {_ModifyWorkflowProperties'_unknownFields = y__})
  defMessage :: ModifyWorkflowProperties
defMessage
    = ModifyWorkflowProperties'_constructor
        {_ModifyWorkflowProperties'upsertedMemo :: Maybe Memo
_ModifyWorkflowProperties'upsertedMemo = Maybe Memo
forall a. Maybe a
Prelude.Nothing,
         _ModifyWorkflowProperties'_unknownFields :: FieldSet
_ModifyWorkflowProperties'_unknownFields = []}
  parseMessage :: Parser ModifyWorkflowProperties
parseMessage
    = let
        loop ::
          ModifyWorkflowProperties
          -> Data.ProtoLens.Encoding.Bytes.Parser ModifyWorkflowProperties
        loop :: ModifyWorkflowProperties -> Parser ModifyWorkflowProperties
loop ModifyWorkflowProperties
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 Memo -> String -> Parser Memo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"upserted_memo"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"upsertedMemo") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser ModifyWorkflowProperties
-> String -> Parser ModifyWorkflowProperties
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ModifyWorkflowProperties -> Parser ModifyWorkflowProperties
loop ModifyWorkflowProperties
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ModifyWorkflowProperties"
  buildMessage :: ModifyWorkflowProperties -> Builder
buildMessage
    = \ ModifyWorkflowProperties
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Memo)
  ModifyWorkflowProperties
  ModifyWorkflowProperties
  (Maybe Memo)
  (Maybe Memo)
-> ModifyWorkflowProperties -> Maybe Memo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                    (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'upsertedMemo") ModifyWorkflowProperties
_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
10)
                       ((ByteString -> Builder) -> (Memo -> ByteString) -> Memo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          Memo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Memo
_v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  ModifyWorkflowProperties
  ModifyWorkflowProperties
  FieldSet
  FieldSet
-> ModifyWorkflowProperties -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ModifyWorkflowProperties
  ModifyWorkflowProperties
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ModifyWorkflowProperties FieldSet
Data.ProtoLens.unknownFields ModifyWorkflowProperties
_x))
instance Control.DeepSeq.NFData ModifyWorkflowProperties where
  rnf :: ModifyWorkflowProperties -> ()
rnf
    = \ ModifyWorkflowProperties
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ModifyWorkflowProperties -> FieldSet
_ModifyWorkflowProperties'_unknownFields ModifyWorkflowProperties
x__)
             (Maybe Memo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ModifyWorkflowProperties -> Maybe Memo
_ModifyWorkflowProperties'upsertedMemo ModifyWorkflowProperties
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.queryId' @:: Lens' QueryResult Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'variant' @:: Lens' QueryResult (Prelude.Maybe QueryResult'Variant)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'succeeded' @:: Lens' QueryResult (Prelude.Maybe QuerySuccess)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.succeeded' @:: Lens' QueryResult QuerySuccess@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'failed' @:: Lens' QueryResult (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.failed' @:: Lens' QueryResult Proto.Temporal.Api.Failure.V1.Message.Failure@ -}
data QueryResult
  = QueryResult'_constructor {QueryResult -> Text
_QueryResult'queryId :: !Data.Text.Text,
                              QueryResult -> Maybe QueryResult'Variant
_QueryResult'variant :: !(Prelude.Maybe QueryResult'Variant),
                              QueryResult -> FieldSet
_QueryResult'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (QueryResult -> QueryResult -> Bool
(QueryResult -> QueryResult -> Bool)
-> (QueryResult -> QueryResult -> Bool) -> Eq QueryResult
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: QueryResult -> QueryResult -> Bool
== :: QueryResult -> QueryResult -> Bool
$c/= :: QueryResult -> QueryResult -> Bool
/= :: QueryResult -> QueryResult -> Bool
Prelude.Eq, Eq QueryResult
Eq QueryResult =>
(QueryResult -> QueryResult -> Ordering)
-> (QueryResult -> QueryResult -> Bool)
-> (QueryResult -> QueryResult -> Bool)
-> (QueryResult -> QueryResult -> Bool)
-> (QueryResult -> QueryResult -> Bool)
-> (QueryResult -> QueryResult -> QueryResult)
-> (QueryResult -> QueryResult -> QueryResult)
-> Ord QueryResult
QueryResult -> QueryResult -> Bool
QueryResult -> QueryResult -> Ordering
QueryResult -> QueryResult -> QueryResult
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 :: QueryResult -> QueryResult -> Ordering
compare :: QueryResult -> QueryResult -> Ordering
$c< :: QueryResult -> QueryResult -> Bool
< :: QueryResult -> QueryResult -> Bool
$c<= :: QueryResult -> QueryResult -> Bool
<= :: QueryResult -> QueryResult -> Bool
$c> :: QueryResult -> QueryResult -> Bool
> :: QueryResult -> QueryResult -> Bool
$c>= :: QueryResult -> QueryResult -> Bool
>= :: QueryResult -> QueryResult -> Bool
$cmax :: QueryResult -> QueryResult -> QueryResult
max :: QueryResult -> QueryResult -> QueryResult
$cmin :: QueryResult -> QueryResult -> QueryResult
min :: QueryResult -> QueryResult -> QueryResult
Prelude.Ord)
instance Prelude.Show QueryResult where
  showsPrec :: Int -> QueryResult -> ShowS
showsPrec Int
_ QueryResult
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (QueryResult -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort QueryResult
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data QueryResult'Variant
  = QueryResult'Succeeded !QuerySuccess |
    QueryResult'Failed !Proto.Temporal.Api.Failure.V1.Message.Failure
  deriving stock (Int -> QueryResult'Variant -> ShowS
[QueryResult'Variant] -> ShowS
QueryResult'Variant -> String
(Int -> QueryResult'Variant -> ShowS)
-> (QueryResult'Variant -> String)
-> ([QueryResult'Variant] -> ShowS)
-> Show QueryResult'Variant
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> QueryResult'Variant -> ShowS
showsPrec :: Int -> QueryResult'Variant -> ShowS
$cshow :: QueryResult'Variant -> String
show :: QueryResult'Variant -> String
$cshowList :: [QueryResult'Variant] -> ShowS
showList :: [QueryResult'Variant] -> ShowS
Prelude.Show, QueryResult'Variant -> QueryResult'Variant -> Bool
(QueryResult'Variant -> QueryResult'Variant -> Bool)
-> (QueryResult'Variant -> QueryResult'Variant -> Bool)
-> Eq QueryResult'Variant
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: QueryResult'Variant -> QueryResult'Variant -> Bool
== :: QueryResult'Variant -> QueryResult'Variant -> Bool
$c/= :: QueryResult'Variant -> QueryResult'Variant -> Bool
/= :: QueryResult'Variant -> QueryResult'Variant -> Bool
Prelude.Eq, Eq QueryResult'Variant
Eq QueryResult'Variant =>
(QueryResult'Variant -> QueryResult'Variant -> Ordering)
-> (QueryResult'Variant -> QueryResult'Variant -> Bool)
-> (QueryResult'Variant -> QueryResult'Variant -> Bool)
-> (QueryResult'Variant -> QueryResult'Variant -> Bool)
-> (QueryResult'Variant -> QueryResult'Variant -> Bool)
-> (QueryResult'Variant
    -> QueryResult'Variant -> QueryResult'Variant)
-> (QueryResult'Variant
    -> QueryResult'Variant -> QueryResult'Variant)
-> Ord QueryResult'Variant
QueryResult'Variant -> QueryResult'Variant -> Bool
QueryResult'Variant -> QueryResult'Variant -> Ordering
QueryResult'Variant -> QueryResult'Variant -> QueryResult'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 :: QueryResult'Variant -> QueryResult'Variant -> Ordering
compare :: QueryResult'Variant -> QueryResult'Variant -> Ordering
$c< :: QueryResult'Variant -> QueryResult'Variant -> Bool
< :: QueryResult'Variant -> QueryResult'Variant -> Bool
$c<= :: QueryResult'Variant -> QueryResult'Variant -> Bool
<= :: QueryResult'Variant -> QueryResult'Variant -> Bool
$c> :: QueryResult'Variant -> QueryResult'Variant -> Bool
> :: QueryResult'Variant -> QueryResult'Variant -> Bool
$c>= :: QueryResult'Variant -> QueryResult'Variant -> Bool
>= :: QueryResult'Variant -> QueryResult'Variant -> Bool
$cmax :: QueryResult'Variant -> QueryResult'Variant -> QueryResult'Variant
max :: QueryResult'Variant -> QueryResult'Variant -> QueryResult'Variant
$cmin :: QueryResult'Variant -> QueryResult'Variant -> QueryResult'Variant
min :: QueryResult'Variant -> QueryResult'Variant -> QueryResult'Variant
Prelude.Ord)
instance Data.ProtoLens.Field.HasField QueryResult "queryId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "queryId"
-> (Text -> f Text) -> QueryResult -> f QueryResult
fieldOf Proxy# "queryId"
_
    = ((Text -> f Text) -> QueryResult -> f QueryResult)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> QueryResult
-> f QueryResult
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryResult -> Text)
-> (QueryResult -> Text -> QueryResult)
-> Lens QueryResult QueryResult Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryResult -> Text
_QueryResult'queryId
           (\ QueryResult
x__ Text
y__ -> QueryResult
x__ {_QueryResult'queryId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField QueryResult "maybe'variant" (Prelude.Maybe QueryResult'Variant) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'variant"
-> (Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
-> QueryResult
-> f QueryResult
fieldOf Proxy# "maybe'variant"
_
    = ((Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
 -> QueryResult -> f QueryResult)
-> ((Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
    -> Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
-> (Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
-> QueryResult
-> f QueryResult
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryResult -> Maybe QueryResult'Variant)
-> (QueryResult -> Maybe QueryResult'Variant -> QueryResult)
-> Lens
     QueryResult
     QueryResult
     (Maybe QueryResult'Variant)
     (Maybe QueryResult'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryResult -> Maybe QueryResult'Variant
_QueryResult'variant
           (\ QueryResult
x__ Maybe QueryResult'Variant
y__ -> QueryResult
x__ {_QueryResult'variant = y__}))
        (Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
-> Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField QueryResult "maybe'succeeded" (Prelude.Maybe QuerySuccess) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'succeeded"
-> (Maybe QuerySuccess -> f (Maybe QuerySuccess))
-> QueryResult
-> f QueryResult
fieldOf Proxy# "maybe'succeeded"
_
    = ((Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
 -> QueryResult -> f QueryResult)
-> ((Maybe QuerySuccess -> f (Maybe QuerySuccess))
    -> Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
-> (Maybe QuerySuccess -> f (Maybe QuerySuccess))
-> QueryResult
-> f QueryResult
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryResult -> Maybe QueryResult'Variant)
-> (QueryResult -> Maybe QueryResult'Variant -> QueryResult)
-> Lens
     QueryResult
     QueryResult
     (Maybe QueryResult'Variant)
     (Maybe QueryResult'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryResult -> Maybe QueryResult'Variant
_QueryResult'variant
           (\ QueryResult
x__ Maybe QueryResult'Variant
y__ -> QueryResult
x__ {_QueryResult'variant = y__}))
        ((Maybe QueryResult'Variant -> Maybe QuerySuccess)
-> (Maybe QueryResult'Variant
    -> Maybe QuerySuccess -> Maybe QueryResult'Variant)
-> Lens
     (Maybe QueryResult'Variant)
     (Maybe QueryResult'Variant)
     (Maybe QuerySuccess)
     (Maybe QuerySuccess)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe QueryResult'Variant
x__
              -> case Maybe QueryResult'Variant
x__ of
                   (Prelude.Just (QueryResult'Succeeded QuerySuccess
x__val))
                     -> QuerySuccess -> Maybe QuerySuccess
forall a. a -> Maybe a
Prelude.Just QuerySuccess
x__val
                   Maybe QueryResult'Variant
_otherwise -> Maybe QuerySuccess
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe QueryResult'Variant
_ Maybe QuerySuccess
y__ -> (QuerySuccess -> QueryResult'Variant)
-> Maybe QuerySuccess -> Maybe QueryResult'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap QuerySuccess -> QueryResult'Variant
QueryResult'Succeeded Maybe QuerySuccess
y__))
instance Data.ProtoLens.Field.HasField QueryResult "succeeded" QuerySuccess where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "succeeded"
-> (QuerySuccess -> f QuerySuccess) -> QueryResult -> f QueryResult
fieldOf Proxy# "succeeded"
_
    = ((Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
 -> QueryResult -> f QueryResult)
-> ((QuerySuccess -> f QuerySuccess)
    -> Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
-> (QuerySuccess -> f QuerySuccess)
-> QueryResult
-> f QueryResult
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryResult -> Maybe QueryResult'Variant)
-> (QueryResult -> Maybe QueryResult'Variant -> QueryResult)
-> Lens
     QueryResult
     QueryResult
     (Maybe QueryResult'Variant)
     (Maybe QueryResult'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryResult -> Maybe QueryResult'Variant
_QueryResult'variant
           (\ QueryResult
x__ Maybe QueryResult'Variant
y__ -> QueryResult
x__ {_QueryResult'variant = y__}))
        (((Maybe QuerySuccess -> f (Maybe QuerySuccess))
 -> Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
-> ((QuerySuccess -> f QuerySuccess)
    -> Maybe QuerySuccess -> f (Maybe QuerySuccess))
-> (QuerySuccess -> f QuerySuccess)
-> Maybe QueryResult'Variant
-> f (Maybe QueryResult'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe QueryResult'Variant -> Maybe QuerySuccess)
-> (Maybe QueryResult'Variant
    -> Maybe QuerySuccess -> Maybe QueryResult'Variant)
-> Lens
     (Maybe QueryResult'Variant)
     (Maybe QueryResult'Variant)
     (Maybe QuerySuccess)
     (Maybe QuerySuccess)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe QueryResult'Variant
x__
                 -> case Maybe QueryResult'Variant
x__ of
                      (Prelude.Just (QueryResult'Succeeded QuerySuccess
x__val))
                        -> QuerySuccess -> Maybe QuerySuccess
forall a. a -> Maybe a
Prelude.Just QuerySuccess
x__val
                      Maybe QueryResult'Variant
_otherwise -> Maybe QuerySuccess
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe QueryResult'Variant
_ Maybe QuerySuccess
y__ -> (QuerySuccess -> QueryResult'Variant)
-> Maybe QuerySuccess -> Maybe QueryResult'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap QuerySuccess -> QueryResult'Variant
QueryResult'Succeeded Maybe QuerySuccess
y__))
           (QuerySuccess -> Lens' (Maybe QuerySuccess) QuerySuccess
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens QuerySuccess
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField QueryResult "maybe'failed" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'failed"
-> (Maybe Failure -> f (Maybe Failure))
-> QueryResult
-> f QueryResult
fieldOf Proxy# "maybe'failed"
_
    = ((Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
 -> QueryResult -> f QueryResult)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
-> (Maybe Failure -> f (Maybe Failure))
-> QueryResult
-> f QueryResult
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryResult -> Maybe QueryResult'Variant)
-> (QueryResult -> Maybe QueryResult'Variant -> QueryResult)
-> Lens
     QueryResult
     QueryResult
     (Maybe QueryResult'Variant)
     (Maybe QueryResult'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryResult -> Maybe QueryResult'Variant
_QueryResult'variant
           (\ QueryResult
x__ Maybe QueryResult'Variant
y__ -> QueryResult
x__ {_QueryResult'variant = y__}))
        ((Maybe QueryResult'Variant -> Maybe Failure)
-> (Maybe QueryResult'Variant
    -> Maybe Failure -> Maybe QueryResult'Variant)
-> Lens
     (Maybe QueryResult'Variant)
     (Maybe QueryResult'Variant)
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe QueryResult'Variant
x__
              -> case Maybe QueryResult'Variant
x__ of
                   (Prelude.Just (QueryResult'Failed Failure
x__val)) -> Failure -> Maybe Failure
forall a. a -> Maybe a
Prelude.Just Failure
x__val
                   Maybe QueryResult'Variant
_otherwise -> Maybe Failure
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe QueryResult'Variant
_ Maybe Failure
y__ -> (Failure -> QueryResult'Variant)
-> Maybe Failure -> Maybe QueryResult'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Failure -> QueryResult'Variant
QueryResult'Failed Maybe Failure
y__))
instance Data.ProtoLens.Field.HasField QueryResult "failed" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failed"
-> (Failure -> f Failure) -> QueryResult -> f QueryResult
fieldOf Proxy# "failed"
_
    = ((Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
 -> QueryResult -> f QueryResult)
-> ((Failure -> f Failure)
    -> Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
-> (Failure -> f Failure)
-> QueryResult
-> f QueryResult
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryResult -> Maybe QueryResult'Variant)
-> (QueryResult -> Maybe QueryResult'Variant -> QueryResult)
-> Lens
     QueryResult
     QueryResult
     (Maybe QueryResult'Variant)
     (Maybe QueryResult'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryResult -> Maybe QueryResult'Variant
_QueryResult'variant
           (\ QueryResult
x__ Maybe QueryResult'Variant
y__ -> QueryResult
x__ {_QueryResult'variant = y__}))
        (((Maybe Failure -> f (Maybe Failure))
 -> Maybe QueryResult'Variant -> f (Maybe QueryResult'Variant))
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> Maybe QueryResult'Variant
-> f (Maybe QueryResult'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe QueryResult'Variant -> Maybe Failure)
-> (Maybe QueryResult'Variant
    -> Maybe Failure -> Maybe QueryResult'Variant)
-> Lens
     (Maybe QueryResult'Variant)
     (Maybe QueryResult'Variant)
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe QueryResult'Variant
x__
                 -> case Maybe QueryResult'Variant
x__ of
                      (Prelude.Just (QueryResult'Failed Failure
x__val)) -> Failure -> Maybe Failure
forall a. a -> Maybe a
Prelude.Just Failure
x__val
                      Maybe QueryResult'Variant
_otherwise -> Maybe Failure
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe QueryResult'Variant
_ Maybe Failure
y__ -> (Failure -> QueryResult'Variant)
-> Maybe Failure -> Maybe QueryResult'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Failure -> QueryResult'Variant
QueryResult'Failed Maybe 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.Message QueryResult where
  messageName :: Proxy QueryResult -> Text
messageName Proxy QueryResult
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_commands.QueryResult"
  packedMessageDescriptor :: Proxy QueryResult -> ByteString
packedMessageDescriptor Proxy QueryResult
_
    = ByteString
"\n\
      \\vQueryResult\DC2\EM\n\
      \\bquery_id\CAN\SOH \SOH(\tR\aqueryId\DC2G\n\
      \\tsucceeded\CAN\STX \SOH(\v2'.coresdk.workflow_commands.QuerySuccessH\NULR\tsucceeded\DC2:\n\
      \\ACKfailed\CAN\ETX \SOH(\v2 .temporal.api.failure.v1.FailureH\NULR\ACKfailedB\t\n\
      \\avariant"
  packedFileDescriptor :: Proxy QueryResult -> ByteString
packedFileDescriptor Proxy QueryResult
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor QueryResult)
fieldsByTag
    = let
        queryId__field_descriptor :: FieldDescriptor QueryResult
queryId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor QueryResult Text
-> FieldDescriptor QueryResult
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 QueryResult QueryResult Text Text
-> FieldAccessor QueryResult 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 QueryResult
        succeeded__field_descriptor :: FieldDescriptor QueryResult
succeeded__field_descriptor
          = String
-> FieldTypeDescriptor QuerySuccess
-> FieldAccessor QueryResult QuerySuccess
-> FieldDescriptor QueryResult
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"succeeded"
              (MessageOrGroup -> FieldTypeDescriptor QuerySuccess
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor QuerySuccess)
              (Lens' QueryResult (Maybe QuerySuccess)
-> FieldAccessor QueryResult QuerySuccess
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.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 QueryResult
        failed__field_descriptor :: FieldDescriptor QueryResult
failed__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor QueryResult Failure
-> FieldDescriptor QueryResult
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"failed"
              (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' QueryResult (Maybe Failure)
-> FieldAccessor QueryResult 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'failed")) ::
              Data.ProtoLens.FieldDescriptor QueryResult
      in
        [(Tag, FieldDescriptor QueryResult)]
-> Map Tag (FieldDescriptor QueryResult)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor QueryResult
queryId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor QueryResult
succeeded__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor QueryResult
failed__field_descriptor)]
  unknownFields :: Lens' QueryResult FieldSet
unknownFields
    = (QueryResult -> FieldSet)
-> (QueryResult -> FieldSet -> QueryResult)
-> Lens' QueryResult FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        QueryResult -> FieldSet
_QueryResult'_unknownFields
        (\ QueryResult
x__ FieldSet
y__ -> QueryResult
x__ {_QueryResult'_unknownFields = y__})
  defMessage :: QueryResult
defMessage
    = QueryResult'_constructor
        {_QueryResult'queryId :: Text
_QueryResult'queryId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _QueryResult'variant :: Maybe QueryResult'Variant
_QueryResult'variant = Maybe QueryResult'Variant
forall a. Maybe a
Prelude.Nothing,
         _QueryResult'_unknownFields :: FieldSet
_QueryResult'_unknownFields = []}
  parseMessage :: Parser QueryResult
parseMessage
    = let
        loop ::
          QueryResult -> Data.ProtoLens.Encoding.Bytes.Parser QueryResult
        loop :: QueryResult -> Parser QueryResult
loop QueryResult
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
"query_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"queryId") y x)
                        Word64
18
                          -> do y <- Parser QuerySuccess -> String -> Parser QuerySuccess
forall a. Parser a -> String -> Parser a
(Data.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 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
"failed"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"failed") 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 QueryResult -> String -> Parser QueryResult
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do QueryResult -> Parser QueryResult
loop QueryResult
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"QueryResult"
  buildMessage :: QueryResult -> Builder
buildMessage
    = \ QueryResult
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike Text QueryResult QueryResult Text Text
-> QueryResult -> 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") QueryResult
_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 QueryResult'Variant)
  QueryResult
  QueryResult
  (Maybe QueryResult'Variant)
  (Maybe QueryResult'Variant)
-> QueryResult -> Maybe QueryResult'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") QueryResult
_x
                 of
                   Maybe QueryResult'Variant
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just (QueryResult'Succeeded QuerySuccess
v))
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (QuerySuccess -> ByteString) -> QuerySuccess -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             QuerySuccess -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage QuerySuccess
v)
                   (Prelude.Just (QueryResult'Failed Failure
v))
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                          ((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 QueryResult QueryResult FieldSet FieldSet
-> QueryResult -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet QueryResult QueryResult FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' QueryResult FieldSet
Data.ProtoLens.unknownFields QueryResult
_x)))
instance Control.DeepSeq.NFData QueryResult where
  rnf :: QueryResult -> ()
rnf
    = \ QueryResult
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (QueryResult -> FieldSet
_QueryResult'_unknownFields QueryResult
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (QueryResult -> Text
_QueryResult'queryId QueryResult
x__)
                (Maybe QueryResult'Variant -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (QueryResult -> Maybe QueryResult'Variant
_QueryResult'variant QueryResult
x__) ()))
instance Control.DeepSeq.NFData QueryResult'Variant where
  rnf :: QueryResult'Variant -> ()
rnf (QueryResult'Succeeded QuerySuccess
x__) = QuerySuccess -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf QuerySuccess
x__
  rnf (QueryResult'Failed Failure
x__) = Failure -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Failure
x__
_QueryResult'Succeeded ::
  Data.ProtoLens.Prism.Prism' QueryResult'Variant QuerySuccess
_QueryResult'Succeeded :: Prism' QueryResult'Variant QuerySuccess
_QueryResult'Succeeded
  = (QuerySuccess -> QueryResult'Variant)
-> (QueryResult'Variant -> Maybe QuerySuccess)
-> Prism' QueryResult'Variant QuerySuccess
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      QuerySuccess -> QueryResult'Variant
QueryResult'Succeeded
      (\ QueryResult'Variant
p__
         -> case QueryResult'Variant
p__ of
              (QueryResult'Succeeded QuerySuccess
p__val) -> QuerySuccess -> Maybe QuerySuccess
forall a. a -> Maybe a
Prelude.Just QuerySuccess
p__val
              QueryResult'Variant
_otherwise -> Maybe QuerySuccess
forall a. Maybe a
Prelude.Nothing)
_QueryResult'Failed ::
  Data.ProtoLens.Prism.Prism' QueryResult'Variant Proto.Temporal.Api.Failure.V1.Message.Failure
_QueryResult'Failed :: Prism' QueryResult'Variant Failure
_QueryResult'Failed
  = (Failure -> QueryResult'Variant)
-> (QueryResult'Variant -> Maybe Failure)
-> Prism' QueryResult'Variant Failure
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Failure -> QueryResult'Variant
QueryResult'Failed
      (\ QueryResult'Variant
p__
         -> case QueryResult'Variant
p__ of
              (QueryResult'Failed Failure
p__val) -> Failure -> Maybe Failure
forall a. a -> Maybe a
Prelude.Just Failure
p__val
              QueryResult'Variant
_otherwise -> Maybe Failure
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.response' @:: Lens' QuerySuccess Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'response' @:: Lens' QuerySuccess (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data QuerySuccess
  = QuerySuccess'_constructor {QuerySuccess -> Maybe Payload
_QuerySuccess'response :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                               QuerySuccess -> FieldSet
_QuerySuccess'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (QuerySuccess -> QuerySuccess -> Bool
(QuerySuccess -> QuerySuccess -> Bool)
-> (QuerySuccess -> QuerySuccess -> Bool) -> Eq QuerySuccess
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: QuerySuccess -> QuerySuccess -> Bool
== :: QuerySuccess -> QuerySuccess -> Bool
$c/= :: QuerySuccess -> QuerySuccess -> Bool
/= :: QuerySuccess -> QuerySuccess -> Bool
Prelude.Eq, Eq QuerySuccess
Eq QuerySuccess =>
(QuerySuccess -> QuerySuccess -> Ordering)
-> (QuerySuccess -> QuerySuccess -> Bool)
-> (QuerySuccess -> QuerySuccess -> Bool)
-> (QuerySuccess -> QuerySuccess -> Bool)
-> (QuerySuccess -> QuerySuccess -> Bool)
-> (QuerySuccess -> QuerySuccess -> QuerySuccess)
-> (QuerySuccess -> QuerySuccess -> QuerySuccess)
-> Ord QuerySuccess
QuerySuccess -> QuerySuccess -> Bool
QuerySuccess -> QuerySuccess -> Ordering
QuerySuccess -> QuerySuccess -> QuerySuccess
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 :: QuerySuccess -> QuerySuccess -> Ordering
compare :: QuerySuccess -> QuerySuccess -> Ordering
$c< :: QuerySuccess -> QuerySuccess -> Bool
< :: QuerySuccess -> QuerySuccess -> Bool
$c<= :: QuerySuccess -> QuerySuccess -> Bool
<= :: QuerySuccess -> QuerySuccess -> Bool
$c> :: QuerySuccess -> QuerySuccess -> Bool
> :: QuerySuccess -> QuerySuccess -> Bool
$c>= :: QuerySuccess -> QuerySuccess -> Bool
>= :: QuerySuccess -> QuerySuccess -> Bool
$cmax :: QuerySuccess -> QuerySuccess -> QuerySuccess
max :: QuerySuccess -> QuerySuccess -> QuerySuccess
$cmin :: QuerySuccess -> QuerySuccess -> QuerySuccess
min :: QuerySuccess -> QuerySuccess -> QuerySuccess
Prelude.Ord)
instance Prelude.Show QuerySuccess where
  showsPrec :: Int -> QuerySuccess -> ShowS
showsPrec Int
_ QuerySuccess
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (QuerySuccess -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort QuerySuccess
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField QuerySuccess "response" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "response"
-> (Payload -> f Payload) -> QuerySuccess -> f QuerySuccess
fieldOf Proxy# "response"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> QuerySuccess -> f QuerySuccess)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> QuerySuccess
-> f QuerySuccess
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QuerySuccess -> Maybe Payload)
-> (QuerySuccess -> Maybe Payload -> QuerySuccess)
-> Lens QuerySuccess QuerySuccess (Maybe Payload) (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QuerySuccess -> Maybe Payload
_QuerySuccess'response
           (\ QuerySuccess
x__ Maybe Payload
y__ -> QuerySuccess
x__ {_QuerySuccess'response = 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 QuerySuccess "maybe'response" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'response"
-> (Maybe Payload -> f (Maybe Payload))
-> QuerySuccess
-> f QuerySuccess
fieldOf Proxy# "maybe'response"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> QuerySuccess -> f QuerySuccess)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> QuerySuccess
-> f QuerySuccess
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QuerySuccess -> Maybe Payload)
-> (QuerySuccess -> Maybe Payload -> QuerySuccess)
-> Lens QuerySuccess QuerySuccess (Maybe Payload) (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QuerySuccess -> Maybe Payload
_QuerySuccess'response
           (\ QuerySuccess
x__ Maybe Payload
y__ -> QuerySuccess
x__ {_QuerySuccess'response = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message QuerySuccess where
  messageName :: Proxy QuerySuccess -> Text
messageName Proxy QuerySuccess
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_commands.QuerySuccess"
  packedMessageDescriptor :: Proxy QuerySuccess -> ByteString
packedMessageDescriptor Proxy QuerySuccess
_
    = ByteString
"\n\
      \\fQuerySuccess\DC2;\n\
      \\bresponse\CAN\SOH \SOH(\v2\US.temporal.api.common.v1.PayloadR\bresponse"
  packedFileDescriptor :: Proxy QuerySuccess -> ByteString
packedFileDescriptor Proxy QuerySuccess
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor QuerySuccess)
fieldsByTag
    = let
        response__field_descriptor :: FieldDescriptor QuerySuccess
response__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor QuerySuccess Payload
-> FieldDescriptor QuerySuccess
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"response"
              (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 QuerySuccess QuerySuccess (Maybe Payload) (Maybe Payload)
-> FieldAccessor QuerySuccess 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'response")) ::
              Data.ProtoLens.FieldDescriptor QuerySuccess
      in
        [(Tag, FieldDescriptor QuerySuccess)]
-> Map Tag (FieldDescriptor QuerySuccess)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor QuerySuccess
response__field_descriptor)]
  unknownFields :: Lens' QuerySuccess FieldSet
unknownFields
    = (QuerySuccess -> FieldSet)
-> (QuerySuccess -> FieldSet -> QuerySuccess)
-> Lens' QuerySuccess FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        QuerySuccess -> FieldSet
_QuerySuccess'_unknownFields
        (\ QuerySuccess
x__ FieldSet
y__ -> QuerySuccess
x__ {_QuerySuccess'_unknownFields = y__})
  defMessage :: QuerySuccess
defMessage
    = QuerySuccess'_constructor
        {_QuerySuccess'response :: Maybe Payload
_QuerySuccess'response = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _QuerySuccess'_unknownFields :: FieldSet
_QuerySuccess'_unknownFields = []}
  parseMessage :: Parser QuerySuccess
parseMessage
    = let
        loop ::
          QuerySuccess -> Data.ProtoLens.Encoding.Bytes.Parser QuerySuccess
        loop :: QuerySuccess -> Parser QuerySuccess
loop QuerySuccess
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 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
"response"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"response") 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 QuerySuccess -> String -> Parser QuerySuccess
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do QuerySuccess -> Parser QuerySuccess
loop QuerySuccess
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"QuerySuccess"
  buildMessage :: QuerySuccess -> Builder
buildMessage
    = \ QuerySuccess
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Payload)
  QuerySuccess
  QuerySuccess
  (Maybe Payload)
  (Maybe Payload)
-> QuerySuccess -> 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'response") QuerySuccess
_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
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))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike FieldSet QuerySuccess QuerySuccess FieldSet FieldSet
-> QuerySuccess -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet QuerySuccess QuerySuccess FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' QuerySuccess FieldSet
Data.ProtoLens.unknownFields QuerySuccess
_x))
instance Control.DeepSeq.NFData QuerySuccess where
  rnf :: QuerySuccess -> ()
rnf
    = \ QuerySuccess
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (QuerySuccess -> FieldSet
_QuerySuccess'_unknownFields QuerySuccess
x__)
             (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (QuerySuccess -> Maybe Payload
_QuerySuccess'response QuerySuccess
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.seq' @:: Lens' RequestCancelActivity Data.Word.Word32@ -}
data RequestCancelActivity
  = RequestCancelActivity'_constructor {RequestCancelActivity -> Word32
_RequestCancelActivity'seq :: !Data.Word.Word32,
                                        RequestCancelActivity -> FieldSet
_RequestCancelActivity'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RequestCancelActivity -> RequestCancelActivity -> Bool
(RequestCancelActivity -> RequestCancelActivity -> Bool)
-> (RequestCancelActivity -> RequestCancelActivity -> Bool)
-> Eq RequestCancelActivity
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RequestCancelActivity -> RequestCancelActivity -> Bool
== :: RequestCancelActivity -> RequestCancelActivity -> Bool
$c/= :: RequestCancelActivity -> RequestCancelActivity -> Bool
/= :: RequestCancelActivity -> RequestCancelActivity -> Bool
Prelude.Eq, Eq RequestCancelActivity
Eq RequestCancelActivity =>
(RequestCancelActivity -> RequestCancelActivity -> Ordering)
-> (RequestCancelActivity -> RequestCancelActivity -> Bool)
-> (RequestCancelActivity -> RequestCancelActivity -> Bool)
-> (RequestCancelActivity -> RequestCancelActivity -> Bool)
-> (RequestCancelActivity -> RequestCancelActivity -> Bool)
-> (RequestCancelActivity
    -> RequestCancelActivity -> RequestCancelActivity)
-> (RequestCancelActivity
    -> RequestCancelActivity -> RequestCancelActivity)
-> Ord RequestCancelActivity
RequestCancelActivity -> RequestCancelActivity -> Bool
RequestCancelActivity -> RequestCancelActivity -> Ordering
RequestCancelActivity
-> RequestCancelActivity -> RequestCancelActivity
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 :: RequestCancelActivity -> RequestCancelActivity -> Ordering
compare :: RequestCancelActivity -> RequestCancelActivity -> Ordering
$c< :: RequestCancelActivity -> RequestCancelActivity -> Bool
< :: RequestCancelActivity -> RequestCancelActivity -> Bool
$c<= :: RequestCancelActivity -> RequestCancelActivity -> Bool
<= :: RequestCancelActivity -> RequestCancelActivity -> Bool
$c> :: RequestCancelActivity -> RequestCancelActivity -> Bool
> :: RequestCancelActivity -> RequestCancelActivity -> Bool
$c>= :: RequestCancelActivity -> RequestCancelActivity -> Bool
>= :: RequestCancelActivity -> RequestCancelActivity -> Bool
$cmax :: RequestCancelActivity
-> RequestCancelActivity -> RequestCancelActivity
max :: RequestCancelActivity
-> RequestCancelActivity -> RequestCancelActivity
$cmin :: RequestCancelActivity
-> RequestCancelActivity -> RequestCancelActivity
min :: RequestCancelActivity
-> RequestCancelActivity -> RequestCancelActivity
Prelude.Ord)
instance Prelude.Show RequestCancelActivity where
  showsPrec :: Int -> RequestCancelActivity -> ShowS
showsPrec Int
_ RequestCancelActivity
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RequestCancelActivity -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RequestCancelActivity
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RequestCancelActivity "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq"
-> (Word32 -> f Word32)
-> RequestCancelActivity
-> f RequestCancelActivity
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32)
 -> RequestCancelActivity -> f RequestCancelActivity)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> RequestCancelActivity
-> f RequestCancelActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelActivity -> Word32)
-> (RequestCancelActivity -> Word32 -> RequestCancelActivity)
-> Lens RequestCancelActivity RequestCancelActivity Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelActivity -> Word32
_RequestCancelActivity'seq
           (\ RequestCancelActivity
x__ Word32
y__ -> RequestCancelActivity
x__ {_RequestCancelActivity'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RequestCancelActivity where
  messageName :: Proxy RequestCancelActivity -> Text
messageName Proxy RequestCancelActivity
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_commands.RequestCancelActivity"
  packedMessageDescriptor :: Proxy RequestCancelActivity -> ByteString
packedMessageDescriptor Proxy RequestCancelActivity
_
    = ByteString
"\n\
      \\NAKRequestCancelActivity\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq"
  packedFileDescriptor :: Proxy RequestCancelActivity -> ByteString
packedFileDescriptor Proxy RequestCancelActivity
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RequestCancelActivity)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor RequestCancelActivity
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor RequestCancelActivity Word32
-> FieldDescriptor RequestCancelActivity
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 RequestCancelActivity RequestCancelActivity Word32 Word32
-> FieldAccessor RequestCancelActivity 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 RequestCancelActivity
      in
        [(Tag, FieldDescriptor RequestCancelActivity)]
-> Map Tag (FieldDescriptor RequestCancelActivity)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RequestCancelActivity
seq__field_descriptor)]
  unknownFields :: Lens' RequestCancelActivity FieldSet
unknownFields
    = (RequestCancelActivity -> FieldSet)
-> (RequestCancelActivity -> FieldSet -> RequestCancelActivity)
-> Lens' RequestCancelActivity FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RequestCancelActivity -> FieldSet
_RequestCancelActivity'_unknownFields
        (\ RequestCancelActivity
x__ FieldSet
y__ -> RequestCancelActivity
x__ {_RequestCancelActivity'_unknownFields = y__})
  defMessage :: RequestCancelActivity
defMessage
    = RequestCancelActivity'_constructor
        {_RequestCancelActivity'seq :: Word32
_RequestCancelActivity'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelActivity'_unknownFields :: FieldSet
_RequestCancelActivity'_unknownFields = []}
  parseMessage :: Parser RequestCancelActivity
parseMessage
    = let
        loop ::
          RequestCancelActivity
          -> Data.ProtoLens.Encoding.Bytes.Parser RequestCancelActivity
        loop :: RequestCancelActivity -> Parser RequestCancelActivity
loop RequestCancelActivity
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 RequestCancelActivity
-> String -> Parser RequestCancelActivity
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RequestCancelActivity -> Parser RequestCancelActivity
loop RequestCancelActivity
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"RequestCancelActivity"
  buildMessage :: RequestCancelActivity -> Builder
buildMessage
    = \ RequestCancelActivity
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike
  Word32 RequestCancelActivity RequestCancelActivity Word32 Word32
-> RequestCancelActivity -> 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") RequestCancelActivity
_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
  RequestCancelActivity
  RequestCancelActivity
  FieldSet
  FieldSet
-> RequestCancelActivity -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RequestCancelActivity
  RequestCancelActivity
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RequestCancelActivity FieldSet
Data.ProtoLens.unknownFields RequestCancelActivity
_x))
instance Control.DeepSeq.NFData RequestCancelActivity where
  rnf :: RequestCancelActivity -> ()
rnf
    = \ RequestCancelActivity
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RequestCancelActivity -> FieldSet
_RequestCancelActivity'_unknownFields RequestCancelActivity
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (RequestCancelActivity -> Word32
_RequestCancelActivity'seq RequestCancelActivity
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.seq' @:: Lens' RequestCancelExternalWorkflowExecution Data.Word.Word32@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'target' @:: Lens' RequestCancelExternalWorkflowExecution (Prelude.Maybe RequestCancelExternalWorkflowExecution'Target)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'workflowExecution' @:: Lens' RequestCancelExternalWorkflowExecution (Prelude.Maybe Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.workflowExecution' @:: Lens' RequestCancelExternalWorkflowExecution Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'childWorkflowId' @:: Lens' RequestCancelExternalWorkflowExecution (Prelude.Maybe Data.Text.Text)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.childWorkflowId' @:: Lens' RequestCancelExternalWorkflowExecution Data.Text.Text@ -}
data RequestCancelExternalWorkflowExecution
  = RequestCancelExternalWorkflowExecution'_constructor {RequestCancelExternalWorkflowExecution -> Word32
_RequestCancelExternalWorkflowExecution'seq :: !Data.Word.Word32,
                                                         RequestCancelExternalWorkflowExecution
-> Maybe RequestCancelExternalWorkflowExecution'Target
_RequestCancelExternalWorkflowExecution'target :: !(Prelude.Maybe RequestCancelExternalWorkflowExecution'Target),
                                                         RequestCancelExternalWorkflowExecution -> FieldSet
_RequestCancelExternalWorkflowExecution'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Bool
(RequestCancelExternalWorkflowExecution
 -> RequestCancelExternalWorkflowExecution -> Bool)
-> (RequestCancelExternalWorkflowExecution
    -> RequestCancelExternalWorkflowExecution -> Bool)
-> Eq RequestCancelExternalWorkflowExecution
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Bool
== :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Bool
$c/= :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Bool
/= :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Bool
Prelude.Eq, Eq RequestCancelExternalWorkflowExecution
Eq RequestCancelExternalWorkflowExecution =>
(RequestCancelExternalWorkflowExecution
 -> RequestCancelExternalWorkflowExecution -> Ordering)
-> (RequestCancelExternalWorkflowExecution
    -> RequestCancelExternalWorkflowExecution -> Bool)
-> (RequestCancelExternalWorkflowExecution
    -> RequestCancelExternalWorkflowExecution -> Bool)
-> (RequestCancelExternalWorkflowExecution
    -> RequestCancelExternalWorkflowExecution -> Bool)
-> (RequestCancelExternalWorkflowExecution
    -> RequestCancelExternalWorkflowExecution -> Bool)
-> (RequestCancelExternalWorkflowExecution
    -> RequestCancelExternalWorkflowExecution
    -> RequestCancelExternalWorkflowExecution)
-> (RequestCancelExternalWorkflowExecution
    -> RequestCancelExternalWorkflowExecution
    -> RequestCancelExternalWorkflowExecution)
-> Ord RequestCancelExternalWorkflowExecution
RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Bool
RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Ordering
RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution
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 :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Ordering
compare :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Ordering
$c< :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Bool
< :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Bool
$c<= :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Bool
<= :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Bool
$c> :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Bool
> :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Bool
$c>= :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Bool
>= :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution -> Bool
$cmax :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution
max :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution
$cmin :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution
min :: RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution
-> RequestCancelExternalWorkflowExecution
Prelude.Ord)
instance Prelude.Show RequestCancelExternalWorkflowExecution where
  showsPrec :: Int -> RequestCancelExternalWorkflowExecution -> ShowS
showsPrec Int
_ RequestCancelExternalWorkflowExecution
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RequestCancelExternalWorkflowExecution -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RequestCancelExternalWorkflowExecution
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data RequestCancelExternalWorkflowExecution'Target
  = RequestCancelExternalWorkflowExecution'WorkflowExecution !Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution |
    RequestCancelExternalWorkflowExecution'ChildWorkflowId !Data.Text.Text
  deriving stock (Int -> RequestCancelExternalWorkflowExecution'Target -> ShowS
[RequestCancelExternalWorkflowExecution'Target] -> ShowS
RequestCancelExternalWorkflowExecution'Target -> String
(Int -> RequestCancelExternalWorkflowExecution'Target -> ShowS)
-> (RequestCancelExternalWorkflowExecution'Target -> String)
-> ([RequestCancelExternalWorkflowExecution'Target] -> ShowS)
-> Show RequestCancelExternalWorkflowExecution'Target
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> RequestCancelExternalWorkflowExecution'Target -> ShowS
showsPrec :: Int -> RequestCancelExternalWorkflowExecution'Target -> ShowS
$cshow :: RequestCancelExternalWorkflowExecution'Target -> String
show :: RequestCancelExternalWorkflowExecution'Target -> String
$cshowList :: [RequestCancelExternalWorkflowExecution'Target] -> ShowS
showList :: [RequestCancelExternalWorkflowExecution'Target] -> ShowS
Prelude.Show, RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Bool
(RequestCancelExternalWorkflowExecution'Target
 -> RequestCancelExternalWorkflowExecution'Target -> Bool)
-> (RequestCancelExternalWorkflowExecution'Target
    -> RequestCancelExternalWorkflowExecution'Target -> Bool)
-> Eq RequestCancelExternalWorkflowExecution'Target
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Bool
== :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Bool
$c/= :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Bool
/= :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Bool
Prelude.Eq, Eq RequestCancelExternalWorkflowExecution'Target
Eq RequestCancelExternalWorkflowExecution'Target =>
(RequestCancelExternalWorkflowExecution'Target
 -> RequestCancelExternalWorkflowExecution'Target -> Ordering)
-> (RequestCancelExternalWorkflowExecution'Target
    -> RequestCancelExternalWorkflowExecution'Target -> Bool)
-> (RequestCancelExternalWorkflowExecution'Target
    -> RequestCancelExternalWorkflowExecution'Target -> Bool)
-> (RequestCancelExternalWorkflowExecution'Target
    -> RequestCancelExternalWorkflowExecution'Target -> Bool)
-> (RequestCancelExternalWorkflowExecution'Target
    -> RequestCancelExternalWorkflowExecution'Target -> Bool)
-> (RequestCancelExternalWorkflowExecution'Target
    -> RequestCancelExternalWorkflowExecution'Target
    -> RequestCancelExternalWorkflowExecution'Target)
-> (RequestCancelExternalWorkflowExecution'Target
    -> RequestCancelExternalWorkflowExecution'Target
    -> RequestCancelExternalWorkflowExecution'Target)
-> Ord RequestCancelExternalWorkflowExecution'Target
RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Bool
RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Ordering
RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target
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 :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Ordering
compare :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Ordering
$c< :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Bool
< :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Bool
$c<= :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Bool
<= :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Bool
$c> :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Bool
> :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Bool
$c>= :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Bool
>= :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target -> Bool
$cmax :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target
max :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target
$cmin :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target
min :: RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target
-> RequestCancelExternalWorkflowExecution'Target
Prelude.Ord)
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecution "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq"
-> (Word32 -> f Word32)
-> RequestCancelExternalWorkflowExecution
-> f RequestCancelExternalWorkflowExecution
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32)
 -> RequestCancelExternalWorkflowExecution
 -> f RequestCancelExternalWorkflowExecution)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> RequestCancelExternalWorkflowExecution
-> f RequestCancelExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecution -> Word32)
-> (RequestCancelExternalWorkflowExecution
    -> Word32 -> RequestCancelExternalWorkflowExecution)
-> Lens
     RequestCancelExternalWorkflowExecution
     RequestCancelExternalWorkflowExecution
     Word32
     Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecution -> Word32
_RequestCancelExternalWorkflowExecution'seq
           (\ RequestCancelExternalWorkflowExecution
x__ Word32
y__
              -> RequestCancelExternalWorkflowExecution
x__ {_RequestCancelExternalWorkflowExecution'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecution "maybe'target" (Prelude.Maybe RequestCancelExternalWorkflowExecution'Target) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'target"
-> (Maybe RequestCancelExternalWorkflowExecution'Target
    -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
-> RequestCancelExternalWorkflowExecution
-> f RequestCancelExternalWorkflowExecution
fieldOf Proxy# "maybe'target"
_
    = ((Maybe RequestCancelExternalWorkflowExecution'Target
  -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
 -> RequestCancelExternalWorkflowExecution
 -> f RequestCancelExternalWorkflowExecution)
-> ((Maybe RequestCancelExternalWorkflowExecution'Target
     -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
    -> Maybe RequestCancelExternalWorkflowExecution'Target
    -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
-> (Maybe RequestCancelExternalWorkflowExecution'Target
    -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
-> RequestCancelExternalWorkflowExecution
-> f RequestCancelExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecution
 -> Maybe RequestCancelExternalWorkflowExecution'Target)
-> (RequestCancelExternalWorkflowExecution
    -> Maybe RequestCancelExternalWorkflowExecution'Target
    -> RequestCancelExternalWorkflowExecution)
-> Lens
     RequestCancelExternalWorkflowExecution
     RequestCancelExternalWorkflowExecution
     (Maybe RequestCancelExternalWorkflowExecution'Target)
     (Maybe RequestCancelExternalWorkflowExecution'Target)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecution
-> Maybe RequestCancelExternalWorkflowExecution'Target
_RequestCancelExternalWorkflowExecution'target
           (\ RequestCancelExternalWorkflowExecution
x__ Maybe RequestCancelExternalWorkflowExecution'Target
y__
              -> RequestCancelExternalWorkflowExecution
x__ {_RequestCancelExternalWorkflowExecution'target = y__}))
        (Maybe RequestCancelExternalWorkflowExecution'Target
 -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
-> Maybe RequestCancelExternalWorkflowExecution'Target
-> f (Maybe RequestCancelExternalWorkflowExecution'Target)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecution "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe NamespacedWorkflowExecution
    -> f (Maybe NamespacedWorkflowExecution))
-> RequestCancelExternalWorkflowExecution
-> f RequestCancelExternalWorkflowExecution
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe RequestCancelExternalWorkflowExecution'Target
  -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
 -> RequestCancelExternalWorkflowExecution
 -> f RequestCancelExternalWorkflowExecution)
-> ((Maybe NamespacedWorkflowExecution
     -> f (Maybe NamespacedWorkflowExecution))
    -> Maybe RequestCancelExternalWorkflowExecution'Target
    -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
-> (Maybe NamespacedWorkflowExecution
    -> f (Maybe NamespacedWorkflowExecution))
-> RequestCancelExternalWorkflowExecution
-> f RequestCancelExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecution
 -> Maybe RequestCancelExternalWorkflowExecution'Target)
-> (RequestCancelExternalWorkflowExecution
    -> Maybe RequestCancelExternalWorkflowExecution'Target
    -> RequestCancelExternalWorkflowExecution)
-> Lens
     RequestCancelExternalWorkflowExecution
     RequestCancelExternalWorkflowExecution
     (Maybe RequestCancelExternalWorkflowExecution'Target)
     (Maybe RequestCancelExternalWorkflowExecution'Target)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecution
-> Maybe RequestCancelExternalWorkflowExecution'Target
_RequestCancelExternalWorkflowExecution'target
           (\ RequestCancelExternalWorkflowExecution
x__ Maybe RequestCancelExternalWorkflowExecution'Target
y__
              -> RequestCancelExternalWorkflowExecution
x__ {_RequestCancelExternalWorkflowExecution'target = y__}))
        ((Maybe RequestCancelExternalWorkflowExecution'Target
 -> Maybe NamespacedWorkflowExecution)
-> (Maybe RequestCancelExternalWorkflowExecution'Target
    -> Maybe NamespacedWorkflowExecution
    -> Maybe RequestCancelExternalWorkflowExecution'Target)
-> Lens
     (Maybe RequestCancelExternalWorkflowExecution'Target)
     (Maybe RequestCancelExternalWorkflowExecution'Target)
     (Maybe NamespacedWorkflowExecution)
     (Maybe NamespacedWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe RequestCancelExternalWorkflowExecution'Target
x__
              -> case Maybe RequestCancelExternalWorkflowExecution'Target
x__ of
                   (Prelude.Just (RequestCancelExternalWorkflowExecution'WorkflowExecution NamespacedWorkflowExecution
x__val))
                     -> NamespacedWorkflowExecution -> Maybe NamespacedWorkflowExecution
forall a. a -> Maybe a
Prelude.Just NamespacedWorkflowExecution
x__val
                   Maybe RequestCancelExternalWorkflowExecution'Target
_otherwise -> Maybe NamespacedWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe RequestCancelExternalWorkflowExecution'Target
_ Maybe NamespacedWorkflowExecution
y__
              -> (NamespacedWorkflowExecution
 -> RequestCancelExternalWorkflowExecution'Target)
-> Maybe NamespacedWorkflowExecution
-> Maybe RequestCancelExternalWorkflowExecution'Target
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   NamespacedWorkflowExecution
-> RequestCancelExternalWorkflowExecution'Target
RequestCancelExternalWorkflowExecution'WorkflowExecution Maybe NamespacedWorkflowExecution
y__))
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecution "workflowExecution" Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (NamespacedWorkflowExecution -> f NamespacedWorkflowExecution)
-> RequestCancelExternalWorkflowExecution
-> f RequestCancelExternalWorkflowExecution
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe RequestCancelExternalWorkflowExecution'Target
  -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
 -> RequestCancelExternalWorkflowExecution
 -> f RequestCancelExternalWorkflowExecution)
-> ((NamespacedWorkflowExecution -> f NamespacedWorkflowExecution)
    -> Maybe RequestCancelExternalWorkflowExecution'Target
    -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
-> (NamespacedWorkflowExecution -> f NamespacedWorkflowExecution)
-> RequestCancelExternalWorkflowExecution
-> f RequestCancelExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecution
 -> Maybe RequestCancelExternalWorkflowExecution'Target)
-> (RequestCancelExternalWorkflowExecution
    -> Maybe RequestCancelExternalWorkflowExecution'Target
    -> RequestCancelExternalWorkflowExecution)
-> Lens
     RequestCancelExternalWorkflowExecution
     RequestCancelExternalWorkflowExecution
     (Maybe RequestCancelExternalWorkflowExecution'Target)
     (Maybe RequestCancelExternalWorkflowExecution'Target)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecution
-> Maybe RequestCancelExternalWorkflowExecution'Target
_RequestCancelExternalWorkflowExecution'target
           (\ RequestCancelExternalWorkflowExecution
x__ Maybe RequestCancelExternalWorkflowExecution'Target
y__
              -> RequestCancelExternalWorkflowExecution
x__ {_RequestCancelExternalWorkflowExecution'target = y__}))
        (((Maybe NamespacedWorkflowExecution
  -> f (Maybe NamespacedWorkflowExecution))
 -> Maybe RequestCancelExternalWorkflowExecution'Target
 -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
-> ((NamespacedWorkflowExecution -> f NamespacedWorkflowExecution)
    -> Maybe NamespacedWorkflowExecution
    -> f (Maybe NamespacedWorkflowExecution))
-> (NamespacedWorkflowExecution -> f NamespacedWorkflowExecution)
-> Maybe RequestCancelExternalWorkflowExecution'Target
-> f (Maybe RequestCancelExternalWorkflowExecution'Target)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe RequestCancelExternalWorkflowExecution'Target
 -> Maybe NamespacedWorkflowExecution)
-> (Maybe RequestCancelExternalWorkflowExecution'Target
    -> Maybe NamespacedWorkflowExecution
    -> Maybe RequestCancelExternalWorkflowExecution'Target)
-> Lens
     (Maybe RequestCancelExternalWorkflowExecution'Target)
     (Maybe RequestCancelExternalWorkflowExecution'Target)
     (Maybe NamespacedWorkflowExecution)
     (Maybe NamespacedWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe RequestCancelExternalWorkflowExecution'Target
x__
                 -> case Maybe RequestCancelExternalWorkflowExecution'Target
x__ of
                      (Prelude.Just (RequestCancelExternalWorkflowExecution'WorkflowExecution NamespacedWorkflowExecution
x__val))
                        -> NamespacedWorkflowExecution -> Maybe NamespacedWorkflowExecution
forall a. a -> Maybe a
Prelude.Just NamespacedWorkflowExecution
x__val
                      Maybe RequestCancelExternalWorkflowExecution'Target
_otherwise -> Maybe NamespacedWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe RequestCancelExternalWorkflowExecution'Target
_ Maybe NamespacedWorkflowExecution
y__
                 -> (NamespacedWorkflowExecution
 -> RequestCancelExternalWorkflowExecution'Target)
-> Maybe NamespacedWorkflowExecution
-> Maybe RequestCancelExternalWorkflowExecution'Target
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      NamespacedWorkflowExecution
-> RequestCancelExternalWorkflowExecution'Target
RequestCancelExternalWorkflowExecution'WorkflowExecution Maybe NamespacedWorkflowExecution
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 RequestCancelExternalWorkflowExecution "maybe'childWorkflowId" (Prelude.Maybe Data.Text.Text) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'childWorkflowId"
-> (Maybe Text -> f (Maybe Text))
-> RequestCancelExternalWorkflowExecution
-> f RequestCancelExternalWorkflowExecution
fieldOf Proxy# "maybe'childWorkflowId"
_
    = ((Maybe RequestCancelExternalWorkflowExecution'Target
  -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
 -> RequestCancelExternalWorkflowExecution
 -> f RequestCancelExternalWorkflowExecution)
-> ((Maybe Text -> f (Maybe Text))
    -> Maybe RequestCancelExternalWorkflowExecution'Target
    -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
-> (Maybe Text -> f (Maybe Text))
-> RequestCancelExternalWorkflowExecution
-> f RequestCancelExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecution
 -> Maybe RequestCancelExternalWorkflowExecution'Target)
-> (RequestCancelExternalWorkflowExecution
    -> Maybe RequestCancelExternalWorkflowExecution'Target
    -> RequestCancelExternalWorkflowExecution)
-> Lens
     RequestCancelExternalWorkflowExecution
     RequestCancelExternalWorkflowExecution
     (Maybe RequestCancelExternalWorkflowExecution'Target)
     (Maybe RequestCancelExternalWorkflowExecution'Target)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecution
-> Maybe RequestCancelExternalWorkflowExecution'Target
_RequestCancelExternalWorkflowExecution'target
           (\ RequestCancelExternalWorkflowExecution
x__ Maybe RequestCancelExternalWorkflowExecution'Target
y__
              -> RequestCancelExternalWorkflowExecution
x__ {_RequestCancelExternalWorkflowExecution'target = y__}))
        ((Maybe RequestCancelExternalWorkflowExecution'Target -> Maybe Text)
-> (Maybe RequestCancelExternalWorkflowExecution'Target
    -> Maybe Text
    -> Maybe RequestCancelExternalWorkflowExecution'Target)
-> Lens
     (Maybe RequestCancelExternalWorkflowExecution'Target)
     (Maybe RequestCancelExternalWorkflowExecution'Target)
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe RequestCancelExternalWorkflowExecution'Target
x__
              -> case Maybe RequestCancelExternalWorkflowExecution'Target
x__ of
                   (Prelude.Just (RequestCancelExternalWorkflowExecution'ChildWorkflowId Text
x__val))
                     -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
x__val
                   Maybe RequestCancelExternalWorkflowExecution'Target
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe RequestCancelExternalWorkflowExecution'Target
_ Maybe Text
y__
              -> (Text -> RequestCancelExternalWorkflowExecution'Target)
-> Maybe Text
-> Maybe RequestCancelExternalWorkflowExecution'Target
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   Text -> RequestCancelExternalWorkflowExecution'Target
RequestCancelExternalWorkflowExecution'ChildWorkflowId Maybe Text
y__))
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecution "childWorkflowId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "childWorkflowId"
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecution
-> f RequestCancelExternalWorkflowExecution
fieldOf Proxy# "childWorkflowId"
_
    = ((Maybe RequestCancelExternalWorkflowExecution'Target
  -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
 -> RequestCancelExternalWorkflowExecution
 -> f RequestCancelExternalWorkflowExecution)
-> ((Text -> f Text)
    -> Maybe RequestCancelExternalWorkflowExecution'Target
    -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecution
-> f RequestCancelExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecution
 -> Maybe RequestCancelExternalWorkflowExecution'Target)
-> (RequestCancelExternalWorkflowExecution
    -> Maybe RequestCancelExternalWorkflowExecution'Target
    -> RequestCancelExternalWorkflowExecution)
-> Lens
     RequestCancelExternalWorkflowExecution
     RequestCancelExternalWorkflowExecution
     (Maybe RequestCancelExternalWorkflowExecution'Target)
     (Maybe RequestCancelExternalWorkflowExecution'Target)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecution
-> Maybe RequestCancelExternalWorkflowExecution'Target
_RequestCancelExternalWorkflowExecution'target
           (\ RequestCancelExternalWorkflowExecution
x__ Maybe RequestCancelExternalWorkflowExecution'Target
y__
              -> RequestCancelExternalWorkflowExecution
x__ {_RequestCancelExternalWorkflowExecution'target = y__}))
        (((Maybe Text -> f (Maybe Text))
 -> Maybe RequestCancelExternalWorkflowExecution'Target
 -> f (Maybe RequestCancelExternalWorkflowExecution'Target))
-> ((Text -> f Text) -> Maybe Text -> f (Maybe Text))
-> (Text -> f Text)
-> Maybe RequestCancelExternalWorkflowExecution'Target
-> f (Maybe RequestCancelExternalWorkflowExecution'Target)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe RequestCancelExternalWorkflowExecution'Target -> Maybe Text)
-> (Maybe RequestCancelExternalWorkflowExecution'Target
    -> Maybe Text
    -> Maybe RequestCancelExternalWorkflowExecution'Target)
-> Lens
     (Maybe RequestCancelExternalWorkflowExecution'Target)
     (Maybe RequestCancelExternalWorkflowExecution'Target)
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe RequestCancelExternalWorkflowExecution'Target
x__
                 -> case Maybe RequestCancelExternalWorkflowExecution'Target
x__ of
                      (Prelude.Just (RequestCancelExternalWorkflowExecution'ChildWorkflowId Text
x__val))
                        -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
x__val
                      Maybe RequestCancelExternalWorkflowExecution'Target
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe RequestCancelExternalWorkflowExecution'Target
_ Maybe Text
y__
                 -> (Text -> RequestCancelExternalWorkflowExecution'Target)
-> Maybe Text
-> Maybe RequestCancelExternalWorkflowExecution'Target
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      Text -> RequestCancelExternalWorkflowExecution'Target
RequestCancelExternalWorkflowExecution'ChildWorkflowId Maybe Text
y__))
           (Text -> Lens' (Maybe Text) Text
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault))
instance Data.ProtoLens.Message RequestCancelExternalWorkflowExecution where
  messageName :: Proxy RequestCancelExternalWorkflowExecution -> Text
messageName Proxy RequestCancelExternalWorkflowExecution
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.RequestCancelExternalWorkflowExecution"
  packedMessageDescriptor :: Proxy RequestCancelExternalWorkflowExecution -> ByteString
packedMessageDescriptor Proxy RequestCancelExternalWorkflowExecution
_
    = ByteString
"\n\
      \&RequestCancelExternalWorkflowExecution\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2\\\n\
      \\DC2workflow_execution\CAN\STX \SOH(\v2+.coresdk.common.NamespacedWorkflowExecutionH\NULR\DC1workflowExecution\DC2,\n\
      \\DC1child_workflow_id\CAN\ETX \SOH(\tH\NULR\SIchildWorkflowIdB\b\n\
      \\ACKtarget"
  packedFileDescriptor :: Proxy RequestCancelExternalWorkflowExecution -> ByteString
packedFileDescriptor Proxy RequestCancelExternalWorkflowExecution
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RequestCancelExternalWorkflowExecution)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor RequestCancelExternalWorkflowExecution
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor RequestCancelExternalWorkflowExecution Word32
-> FieldDescriptor RequestCancelExternalWorkflowExecution
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
     RequestCancelExternalWorkflowExecution
     RequestCancelExternalWorkflowExecution
     Word32
     Word32
-> FieldAccessor RequestCancelExternalWorkflowExecution 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 RequestCancelExternalWorkflowExecution
        workflowExecution__field_descriptor :: FieldDescriptor RequestCancelExternalWorkflowExecution
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor NamespacedWorkflowExecution
-> FieldAccessor
     RequestCancelExternalWorkflowExecution NamespacedWorkflowExecution
-> FieldDescriptor RequestCancelExternalWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution"
              (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'
  RequestCancelExternalWorkflowExecution
  (Maybe NamespacedWorkflowExecution)
-> FieldAccessor
     RequestCancelExternalWorkflowExecution 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'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecution
        childWorkflowId__field_descriptor :: FieldDescriptor RequestCancelExternalWorkflowExecution
childWorkflowId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RequestCancelExternalWorkflowExecution Text
-> FieldDescriptor RequestCancelExternalWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"child_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)
              (Lens' RequestCancelExternalWorkflowExecution (Maybe Text)
-> FieldAccessor RequestCancelExternalWorkflowExecution Text
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'childWorkflowId")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecution
      in
        [(Tag, FieldDescriptor RequestCancelExternalWorkflowExecution)]
-> Map Tag (FieldDescriptor RequestCancelExternalWorkflowExecution)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RequestCancelExternalWorkflowExecution
seq__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RequestCancelExternalWorkflowExecution
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RequestCancelExternalWorkflowExecution
childWorkflowId__field_descriptor)]
  unknownFields :: Lens' RequestCancelExternalWorkflowExecution FieldSet
unknownFields
    = (RequestCancelExternalWorkflowExecution -> FieldSet)
-> (RequestCancelExternalWorkflowExecution
    -> FieldSet -> RequestCancelExternalWorkflowExecution)
-> Lens' RequestCancelExternalWorkflowExecution FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RequestCancelExternalWorkflowExecution -> FieldSet
_RequestCancelExternalWorkflowExecution'_unknownFields
        (\ RequestCancelExternalWorkflowExecution
x__ FieldSet
y__
           -> RequestCancelExternalWorkflowExecution
x__
                {_RequestCancelExternalWorkflowExecution'_unknownFields = y__})
  defMessage :: RequestCancelExternalWorkflowExecution
defMessage
    = RequestCancelExternalWorkflowExecution'_constructor
        {_RequestCancelExternalWorkflowExecution'seq :: Word32
_RequestCancelExternalWorkflowExecution'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelExternalWorkflowExecution'target :: Maybe RequestCancelExternalWorkflowExecution'Target
_RequestCancelExternalWorkflowExecution'target = Maybe RequestCancelExternalWorkflowExecution'Target
forall a. Maybe a
Prelude.Nothing,
         _RequestCancelExternalWorkflowExecution'_unknownFields :: FieldSet
_RequestCancelExternalWorkflowExecution'_unknownFields = []}
  parseMessage :: Parser RequestCancelExternalWorkflowExecution
parseMessage
    = let
        loop ::
          RequestCancelExternalWorkflowExecution
          -> Data.ProtoLens.Encoding.Bytes.Parser RequestCancelExternalWorkflowExecution
        loop :: RequestCancelExternalWorkflowExecution
-> Parser RequestCancelExternalWorkflowExecution
loop RequestCancelExternalWorkflowExecution
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 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
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"child_workflow_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"childWorkflowId") 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 RequestCancelExternalWorkflowExecution
-> String -> Parser RequestCancelExternalWorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RequestCancelExternalWorkflowExecution
-> Parser RequestCancelExternalWorkflowExecution
loop RequestCancelExternalWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RequestCancelExternalWorkflowExecution"
  buildMessage :: RequestCancelExternalWorkflowExecution -> Builder
buildMessage
    = \ RequestCancelExternalWorkflowExecution
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike
  Word32
  RequestCancelExternalWorkflowExecution
  RequestCancelExternalWorkflowExecution
  Word32
  Word32
-> RequestCancelExternalWorkflowExecution -> 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") RequestCancelExternalWorkflowExecution
_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 RequestCancelExternalWorkflowExecution'Target)
  RequestCancelExternalWorkflowExecution
  RequestCancelExternalWorkflowExecution
  (Maybe RequestCancelExternalWorkflowExecution'Target)
  (Maybe RequestCancelExternalWorkflowExecution'Target)
-> RequestCancelExternalWorkflowExecution
-> Maybe RequestCancelExternalWorkflowExecution'Target
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'target") RequestCancelExternalWorkflowExecution
_x
                 of
                   Maybe RequestCancelExternalWorkflowExecution'Target
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just (RequestCancelExternalWorkflowExecution'WorkflowExecution NamespacedWorkflowExecution
v))
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((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)
                   (Prelude.Just (RequestCancelExternalWorkflowExecution'ChildWorkflowId Text
v))
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                          ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  RequestCancelExternalWorkflowExecution
  RequestCancelExternalWorkflowExecution
  FieldSet
  FieldSet
-> RequestCancelExternalWorkflowExecution -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RequestCancelExternalWorkflowExecution
  RequestCancelExternalWorkflowExecution
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RequestCancelExternalWorkflowExecution FieldSet
Data.ProtoLens.unknownFields RequestCancelExternalWorkflowExecution
_x)))
instance Control.DeepSeq.NFData RequestCancelExternalWorkflowExecution where
  rnf :: RequestCancelExternalWorkflowExecution -> ()
rnf
    = \ RequestCancelExternalWorkflowExecution
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RequestCancelExternalWorkflowExecution -> FieldSet
_RequestCancelExternalWorkflowExecution'_unknownFields RequestCancelExternalWorkflowExecution
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RequestCancelExternalWorkflowExecution -> Word32
_RequestCancelExternalWorkflowExecution'seq RequestCancelExternalWorkflowExecution
x__)
                (Maybe RequestCancelExternalWorkflowExecution'Target -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RequestCancelExternalWorkflowExecution
-> Maybe RequestCancelExternalWorkflowExecution'Target
_RequestCancelExternalWorkflowExecution'target RequestCancelExternalWorkflowExecution
x__) ()))
instance Control.DeepSeq.NFData RequestCancelExternalWorkflowExecution'Target where
  rnf :: RequestCancelExternalWorkflowExecution'Target -> ()
rnf (RequestCancelExternalWorkflowExecution'WorkflowExecution NamespacedWorkflowExecution
x__)
    = NamespacedWorkflowExecution -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf NamespacedWorkflowExecution
x__
  rnf (RequestCancelExternalWorkflowExecution'ChildWorkflowId Text
x__)
    = Text -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Text
x__
_RequestCancelExternalWorkflowExecution'WorkflowExecution ::
  Data.ProtoLens.Prism.Prism' RequestCancelExternalWorkflowExecution'Target Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution
_RequestCancelExternalWorkflowExecution'WorkflowExecution :: Prism'
  RequestCancelExternalWorkflowExecution'Target
  NamespacedWorkflowExecution
_RequestCancelExternalWorkflowExecution'WorkflowExecution
  = (NamespacedWorkflowExecution
 -> RequestCancelExternalWorkflowExecution'Target)
-> (RequestCancelExternalWorkflowExecution'Target
    -> Maybe NamespacedWorkflowExecution)
-> Prism'
     RequestCancelExternalWorkflowExecution'Target
     NamespacedWorkflowExecution
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      NamespacedWorkflowExecution
-> RequestCancelExternalWorkflowExecution'Target
RequestCancelExternalWorkflowExecution'WorkflowExecution
      (\ RequestCancelExternalWorkflowExecution'Target
p__
         -> case RequestCancelExternalWorkflowExecution'Target
p__ of
              (RequestCancelExternalWorkflowExecution'WorkflowExecution NamespacedWorkflowExecution
p__val)
                -> NamespacedWorkflowExecution -> Maybe NamespacedWorkflowExecution
forall a. a -> Maybe a
Prelude.Just NamespacedWorkflowExecution
p__val
              RequestCancelExternalWorkflowExecution'Target
_otherwise -> Maybe NamespacedWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
_RequestCancelExternalWorkflowExecution'ChildWorkflowId ::
  Data.ProtoLens.Prism.Prism' RequestCancelExternalWorkflowExecution'Target Data.Text.Text
_RequestCancelExternalWorkflowExecution'ChildWorkflowId :: Prism' RequestCancelExternalWorkflowExecution'Target Text
_RequestCancelExternalWorkflowExecution'ChildWorkflowId
  = (Text -> RequestCancelExternalWorkflowExecution'Target)
-> (RequestCancelExternalWorkflowExecution'Target -> Maybe Text)
-> Prism' RequestCancelExternalWorkflowExecution'Target Text
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Text -> RequestCancelExternalWorkflowExecution'Target
RequestCancelExternalWorkflowExecution'ChildWorkflowId
      (\ RequestCancelExternalWorkflowExecution'Target
p__
         -> case RequestCancelExternalWorkflowExecution'Target
p__ of
              (RequestCancelExternalWorkflowExecution'ChildWorkflowId Text
p__val)
                -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
p__val
              RequestCancelExternalWorkflowExecution'Target
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.seq' @:: Lens' RequestCancelLocalActivity Data.Word.Word32@ -}
data RequestCancelLocalActivity
  = RequestCancelLocalActivity'_constructor {RequestCancelLocalActivity -> Word32
_RequestCancelLocalActivity'seq :: !Data.Word.Word32,
                                             RequestCancelLocalActivity -> FieldSet
_RequestCancelLocalActivity'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RequestCancelLocalActivity -> RequestCancelLocalActivity -> Bool
(RequestCancelLocalActivity -> RequestCancelLocalActivity -> Bool)
-> (RequestCancelLocalActivity
    -> RequestCancelLocalActivity -> Bool)
-> Eq RequestCancelLocalActivity
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RequestCancelLocalActivity -> RequestCancelLocalActivity -> Bool
== :: RequestCancelLocalActivity -> RequestCancelLocalActivity -> Bool
$c/= :: RequestCancelLocalActivity -> RequestCancelLocalActivity -> Bool
/= :: RequestCancelLocalActivity -> RequestCancelLocalActivity -> Bool
Prelude.Eq, Eq RequestCancelLocalActivity
Eq RequestCancelLocalActivity =>
(RequestCancelLocalActivity
 -> RequestCancelLocalActivity -> Ordering)
-> (RequestCancelLocalActivity
    -> RequestCancelLocalActivity -> Bool)
-> (RequestCancelLocalActivity
    -> RequestCancelLocalActivity -> Bool)
-> (RequestCancelLocalActivity
    -> RequestCancelLocalActivity -> Bool)
-> (RequestCancelLocalActivity
    -> RequestCancelLocalActivity -> Bool)
-> (RequestCancelLocalActivity
    -> RequestCancelLocalActivity -> RequestCancelLocalActivity)
-> (RequestCancelLocalActivity
    -> RequestCancelLocalActivity -> RequestCancelLocalActivity)
-> Ord RequestCancelLocalActivity
RequestCancelLocalActivity -> RequestCancelLocalActivity -> Bool
RequestCancelLocalActivity
-> RequestCancelLocalActivity -> Ordering
RequestCancelLocalActivity
-> RequestCancelLocalActivity -> RequestCancelLocalActivity
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 :: RequestCancelLocalActivity
-> RequestCancelLocalActivity -> Ordering
compare :: RequestCancelLocalActivity
-> RequestCancelLocalActivity -> Ordering
$c< :: RequestCancelLocalActivity -> RequestCancelLocalActivity -> Bool
< :: RequestCancelLocalActivity -> RequestCancelLocalActivity -> Bool
$c<= :: RequestCancelLocalActivity -> RequestCancelLocalActivity -> Bool
<= :: RequestCancelLocalActivity -> RequestCancelLocalActivity -> Bool
$c> :: RequestCancelLocalActivity -> RequestCancelLocalActivity -> Bool
> :: RequestCancelLocalActivity -> RequestCancelLocalActivity -> Bool
$c>= :: RequestCancelLocalActivity -> RequestCancelLocalActivity -> Bool
>= :: RequestCancelLocalActivity -> RequestCancelLocalActivity -> Bool
$cmax :: RequestCancelLocalActivity
-> RequestCancelLocalActivity -> RequestCancelLocalActivity
max :: RequestCancelLocalActivity
-> RequestCancelLocalActivity -> RequestCancelLocalActivity
$cmin :: RequestCancelLocalActivity
-> RequestCancelLocalActivity -> RequestCancelLocalActivity
min :: RequestCancelLocalActivity
-> RequestCancelLocalActivity -> RequestCancelLocalActivity
Prelude.Ord)
instance Prelude.Show RequestCancelLocalActivity where
  showsPrec :: Int -> RequestCancelLocalActivity -> ShowS
showsPrec Int
_ RequestCancelLocalActivity
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RequestCancelLocalActivity -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RequestCancelLocalActivity
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RequestCancelLocalActivity "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq"
-> (Word32 -> f Word32)
-> RequestCancelLocalActivity
-> f RequestCancelLocalActivity
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32)
 -> RequestCancelLocalActivity -> f RequestCancelLocalActivity)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> RequestCancelLocalActivity
-> f RequestCancelLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelLocalActivity -> Word32)
-> (RequestCancelLocalActivity
    -> Word32 -> RequestCancelLocalActivity)
-> Lens
     RequestCancelLocalActivity RequestCancelLocalActivity Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelLocalActivity -> Word32
_RequestCancelLocalActivity'seq
           (\ RequestCancelLocalActivity
x__ Word32
y__ -> RequestCancelLocalActivity
x__ {_RequestCancelLocalActivity'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RequestCancelLocalActivity where
  messageName :: Proxy RequestCancelLocalActivity -> Text
messageName Proxy RequestCancelLocalActivity
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.RequestCancelLocalActivity"
  packedMessageDescriptor :: Proxy RequestCancelLocalActivity -> ByteString
packedMessageDescriptor Proxy RequestCancelLocalActivity
_
    = ByteString
"\n\
      \\SUBRequestCancelLocalActivity\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq"
  packedFileDescriptor :: Proxy RequestCancelLocalActivity -> ByteString
packedFileDescriptor Proxy RequestCancelLocalActivity
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RequestCancelLocalActivity)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor RequestCancelLocalActivity
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor RequestCancelLocalActivity Word32
-> FieldDescriptor RequestCancelLocalActivity
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
     RequestCancelLocalActivity RequestCancelLocalActivity Word32 Word32
-> FieldAccessor RequestCancelLocalActivity 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 RequestCancelLocalActivity
      in
        [(Tag, FieldDescriptor RequestCancelLocalActivity)]
-> Map Tag (FieldDescriptor RequestCancelLocalActivity)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RequestCancelLocalActivity
seq__field_descriptor)]
  unknownFields :: Lens' RequestCancelLocalActivity FieldSet
unknownFields
    = (RequestCancelLocalActivity -> FieldSet)
-> (RequestCancelLocalActivity
    -> FieldSet -> RequestCancelLocalActivity)
-> Lens' RequestCancelLocalActivity FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RequestCancelLocalActivity -> FieldSet
_RequestCancelLocalActivity'_unknownFields
        (\ RequestCancelLocalActivity
x__ FieldSet
y__
           -> RequestCancelLocalActivity
x__ {_RequestCancelLocalActivity'_unknownFields = y__})
  defMessage :: RequestCancelLocalActivity
defMessage
    = RequestCancelLocalActivity'_constructor
        {_RequestCancelLocalActivity'seq :: Word32
_RequestCancelLocalActivity'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelLocalActivity'_unknownFields :: FieldSet
_RequestCancelLocalActivity'_unknownFields = []}
  parseMessage :: Parser RequestCancelLocalActivity
parseMessage
    = let
        loop ::
          RequestCancelLocalActivity
          -> Data.ProtoLens.Encoding.Bytes.Parser RequestCancelLocalActivity
        loop :: RequestCancelLocalActivity -> Parser RequestCancelLocalActivity
loop RequestCancelLocalActivity
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 RequestCancelLocalActivity
-> String -> Parser RequestCancelLocalActivity
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RequestCancelLocalActivity -> Parser RequestCancelLocalActivity
loop RequestCancelLocalActivity
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"RequestCancelLocalActivity"
  buildMessage :: RequestCancelLocalActivity -> Builder
buildMessage
    = \ RequestCancelLocalActivity
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike
  Word32
  RequestCancelLocalActivity
  RequestCancelLocalActivity
  Word32
  Word32
-> RequestCancelLocalActivity -> 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") RequestCancelLocalActivity
_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
  RequestCancelLocalActivity
  RequestCancelLocalActivity
  FieldSet
  FieldSet
-> RequestCancelLocalActivity -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RequestCancelLocalActivity
  RequestCancelLocalActivity
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RequestCancelLocalActivity FieldSet
Data.ProtoLens.unknownFields RequestCancelLocalActivity
_x))
instance Control.DeepSeq.NFData RequestCancelLocalActivity where
  rnf :: RequestCancelLocalActivity -> ()
rnf
    = \ RequestCancelLocalActivity
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RequestCancelLocalActivity -> FieldSet
_RequestCancelLocalActivity'_unknownFields RequestCancelLocalActivity
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (RequestCancelLocalActivity -> Word32
_RequestCancelLocalActivity'seq RequestCancelLocalActivity
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.seq' @:: Lens' ScheduleActivity Data.Word.Word32@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.activityId' @:: Lens' ScheduleActivity Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.activityType' @:: Lens' ScheduleActivity Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.taskQueue' @:: Lens' ScheduleActivity Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.headers' @:: Lens' ScheduleActivity (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.arguments' @:: Lens' ScheduleActivity [Proto.Temporal.Api.Common.V1.Message.Payload]@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.vec'arguments' @:: Lens' ScheduleActivity (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.scheduleToCloseTimeout' @:: Lens' ScheduleActivity Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'scheduleToCloseTimeout' @:: Lens' ScheduleActivity (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.scheduleToStartTimeout' @:: Lens' ScheduleActivity Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'scheduleToStartTimeout' @:: Lens' ScheduleActivity (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.startToCloseTimeout' @:: Lens' ScheduleActivity Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'startToCloseTimeout' @:: Lens' ScheduleActivity (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.heartbeatTimeout' @:: Lens' ScheduleActivity Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'heartbeatTimeout' @:: Lens' ScheduleActivity (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.retryPolicy' @:: Lens' ScheduleActivity Proto.Temporal.Api.Common.V1.Message.RetryPolicy@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'retryPolicy' @:: Lens' ScheduleActivity (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.cancellationType' @:: Lens' ScheduleActivity ActivityCancellationType@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.doNotEagerlyExecute' @:: Lens' ScheduleActivity Prelude.Bool@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.versioningIntent' @:: Lens' ScheduleActivity Proto.Temporal.Sdk.Core.Common.Common.VersioningIntent@ -}
data ScheduleActivity
  = ScheduleActivity'_constructor {ScheduleActivity -> Word32
_ScheduleActivity'seq :: !Data.Word.Word32,
                                   ScheduleActivity -> Text
_ScheduleActivity'activityId :: !Data.Text.Text,
                                   ScheduleActivity -> Text
_ScheduleActivity'activityType :: !Data.Text.Text,
                                   ScheduleActivity -> Text
_ScheduleActivity'taskQueue :: !Data.Text.Text,
                                   ScheduleActivity -> Map Text Payload
_ScheduleActivity'headers :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload),
                                   ScheduleActivity -> Vector Payload
_ScheduleActivity'arguments :: !(Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload),
                                   ScheduleActivity -> Maybe Duration
_ScheduleActivity'scheduleToCloseTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                   ScheduleActivity -> Maybe Duration
_ScheduleActivity'scheduleToStartTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                   ScheduleActivity -> Maybe Duration
_ScheduleActivity'startToCloseTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                   ScheduleActivity -> Maybe Duration
_ScheduleActivity'heartbeatTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                   ScheduleActivity -> Maybe RetryPolicy
_ScheduleActivity'retryPolicy :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy),
                                   ScheduleActivity -> ActivityCancellationType
_ScheduleActivity'cancellationType :: !ActivityCancellationType,
                                   ScheduleActivity -> Bool
_ScheduleActivity'doNotEagerlyExecute :: !Prelude.Bool,
                                   ScheduleActivity -> VersioningIntent
_ScheduleActivity'versioningIntent :: !Proto.Temporal.Sdk.Core.Common.Common.VersioningIntent,
                                   ScheduleActivity -> FieldSet
_ScheduleActivity'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ScheduleActivity -> ScheduleActivity -> Bool
(ScheduleActivity -> ScheduleActivity -> Bool)
-> (ScheduleActivity -> ScheduleActivity -> Bool)
-> Eq ScheduleActivity
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ScheduleActivity -> ScheduleActivity -> Bool
== :: ScheduleActivity -> ScheduleActivity -> Bool
$c/= :: ScheduleActivity -> ScheduleActivity -> Bool
/= :: ScheduleActivity -> ScheduleActivity -> Bool
Prelude.Eq, Eq ScheduleActivity
Eq ScheduleActivity =>
(ScheduleActivity -> ScheduleActivity -> Ordering)
-> (ScheduleActivity -> ScheduleActivity -> Bool)
-> (ScheduleActivity -> ScheduleActivity -> Bool)
-> (ScheduleActivity -> ScheduleActivity -> Bool)
-> (ScheduleActivity -> ScheduleActivity -> Bool)
-> (ScheduleActivity -> ScheduleActivity -> ScheduleActivity)
-> (ScheduleActivity -> ScheduleActivity -> ScheduleActivity)
-> Ord ScheduleActivity
ScheduleActivity -> ScheduleActivity -> Bool
ScheduleActivity -> ScheduleActivity -> Ordering
ScheduleActivity -> ScheduleActivity -> ScheduleActivity
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 :: ScheduleActivity -> ScheduleActivity -> Ordering
compare :: ScheduleActivity -> ScheduleActivity -> Ordering
$c< :: ScheduleActivity -> ScheduleActivity -> Bool
< :: ScheduleActivity -> ScheduleActivity -> Bool
$c<= :: ScheduleActivity -> ScheduleActivity -> Bool
<= :: ScheduleActivity -> ScheduleActivity -> Bool
$c> :: ScheduleActivity -> ScheduleActivity -> Bool
> :: ScheduleActivity -> ScheduleActivity -> Bool
$c>= :: ScheduleActivity -> ScheduleActivity -> Bool
>= :: ScheduleActivity -> ScheduleActivity -> Bool
$cmax :: ScheduleActivity -> ScheduleActivity -> ScheduleActivity
max :: ScheduleActivity -> ScheduleActivity -> ScheduleActivity
$cmin :: ScheduleActivity -> ScheduleActivity -> ScheduleActivity
min :: ScheduleActivity -> ScheduleActivity -> ScheduleActivity
Prelude.Ord)
instance Prelude.Show ScheduleActivity where
  showsPrec :: Int -> ScheduleActivity -> ShowS
showsPrec Int
_ ScheduleActivity
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ScheduleActivity -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ScheduleActivity
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ScheduleActivity "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq"
-> (Word32 -> f Word32) -> ScheduleActivity -> f ScheduleActivity
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32) -> ScheduleActivity -> f ScheduleActivity)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Word32)
-> (ScheduleActivity -> Word32 -> ScheduleActivity)
-> Lens ScheduleActivity ScheduleActivity Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Word32
_ScheduleActivity'seq
           (\ ScheduleActivity
x__ Word32
y__ -> ScheduleActivity
x__ {_ScheduleActivity'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleActivity "activityId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityId"
-> (Text -> f Text) -> ScheduleActivity -> f ScheduleActivity
fieldOf Proxy# "activityId"
_
    = ((Text -> f Text) -> ScheduleActivity -> f ScheduleActivity)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Text)
-> (ScheduleActivity -> Text -> ScheduleActivity)
-> Lens ScheduleActivity ScheduleActivity Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Text
_ScheduleActivity'activityId
           (\ ScheduleActivity
x__ Text
y__ -> ScheduleActivity
x__ {_ScheduleActivity'activityId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleActivity "activityType" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityType"
-> (Text -> f Text) -> ScheduleActivity -> f ScheduleActivity
fieldOf Proxy# "activityType"
_
    = ((Text -> f Text) -> ScheduleActivity -> f ScheduleActivity)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Text)
-> (ScheduleActivity -> Text -> ScheduleActivity)
-> Lens ScheduleActivity ScheduleActivity Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Text
_ScheduleActivity'activityType
           (\ ScheduleActivity
x__ Text
y__ -> ScheduleActivity
x__ {_ScheduleActivity'activityType = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleActivity "taskQueue" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (Text -> f Text) -> ScheduleActivity -> f ScheduleActivity
fieldOf Proxy# "taskQueue"
_
    = ((Text -> f Text) -> ScheduleActivity -> f ScheduleActivity)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Text)
-> (ScheduleActivity -> Text -> ScheduleActivity)
-> Lens ScheduleActivity ScheduleActivity Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Text
_ScheduleActivity'taskQueue
           (\ ScheduleActivity
x__ Text
y__ -> ScheduleActivity
x__ {_ScheduleActivity'taskQueue = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleActivity "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))
-> ScheduleActivity
-> f ScheduleActivity
fieldOf Proxy# "headers"
_
    = ((Map Text Payload -> f (Map Text Payload))
 -> ScheduleActivity -> f ScheduleActivity)
-> ((Map Text Payload -> f (Map Text Payload))
    -> Map Text Payload -> f (Map Text Payload))
-> (Map Text Payload -> f (Map Text Payload))
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Map Text Payload)
-> (ScheduleActivity -> Map Text Payload -> ScheduleActivity)
-> Lens
     ScheduleActivity
     ScheduleActivity
     (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
           ScheduleActivity -> Map Text Payload
_ScheduleActivity'headers
           (\ ScheduleActivity
x__ Map Text Payload
y__ -> ScheduleActivity
x__ {_ScheduleActivity'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 ScheduleActivity "arguments" [Proto.Temporal.Api.Common.V1.Message.Payload] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "arguments"
-> ([Payload] -> f [Payload])
-> ScheduleActivity
-> f ScheduleActivity
fieldOf Proxy# "arguments"
_
    = ((Vector Payload -> f (Vector Payload))
 -> ScheduleActivity -> f ScheduleActivity)
-> (([Payload] -> f [Payload])
    -> Vector Payload -> f (Vector Payload))
-> ([Payload] -> f [Payload])
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Vector Payload)
-> (ScheduleActivity -> Vector Payload -> ScheduleActivity)
-> Lens
     ScheduleActivity ScheduleActivity (Vector Payload) (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Vector Payload
_ScheduleActivity'arguments
           (\ ScheduleActivity
x__ Vector Payload
y__ -> ScheduleActivity
x__ {_ScheduleActivity'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 ScheduleActivity "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))
-> ScheduleActivity
-> f ScheduleActivity
fieldOf Proxy# "vec'arguments"
_
    = ((Vector Payload -> f (Vector Payload))
 -> ScheduleActivity -> f ScheduleActivity)
-> ((Vector Payload -> f (Vector Payload))
    -> Vector Payload -> f (Vector Payload))
-> (Vector Payload -> f (Vector Payload))
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Vector Payload)
-> (ScheduleActivity -> Vector Payload -> ScheduleActivity)
-> Lens
     ScheduleActivity ScheduleActivity (Vector Payload) (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Vector Payload
_ScheduleActivity'arguments
           (\ ScheduleActivity
x__ Vector Payload
y__ -> ScheduleActivity
x__ {_ScheduleActivity'arguments = y__}))
        (Vector Payload -> f (Vector Payload))
-> Vector Payload -> f (Vector Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleActivity "scheduleToCloseTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleToCloseTimeout"
-> (Duration -> f Duration)
-> ScheduleActivity
-> f ScheduleActivity
fieldOf Proxy# "scheduleToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleActivity -> f ScheduleActivity)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Maybe Duration)
-> (ScheduleActivity -> Maybe Duration -> ScheduleActivity)
-> Lens
     ScheduleActivity ScheduleActivity (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Maybe Duration
_ScheduleActivity'scheduleToCloseTimeout
           (\ ScheduleActivity
x__ Maybe Duration
y__
              -> ScheduleActivity
x__ {_ScheduleActivity'scheduleToCloseTimeout = y__}))
        (Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ScheduleActivity "maybe'scheduleToCloseTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduleToCloseTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleActivity
-> f ScheduleActivity
fieldOf Proxy# "maybe'scheduleToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleActivity -> f ScheduleActivity)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Maybe Duration)
-> (ScheduleActivity -> Maybe Duration -> ScheduleActivity)
-> Lens
     ScheduleActivity ScheduleActivity (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Maybe Duration
_ScheduleActivity'scheduleToCloseTimeout
           (\ ScheduleActivity
x__ Maybe Duration
y__
              -> ScheduleActivity
x__ {_ScheduleActivity'scheduleToCloseTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleActivity "scheduleToStartTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleToStartTimeout"
-> (Duration -> f Duration)
-> ScheduleActivity
-> f ScheduleActivity
fieldOf Proxy# "scheduleToStartTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleActivity -> f ScheduleActivity)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Maybe Duration)
-> (ScheduleActivity -> Maybe Duration -> ScheduleActivity)
-> Lens
     ScheduleActivity ScheduleActivity (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Maybe Duration
_ScheduleActivity'scheduleToStartTimeout
           (\ ScheduleActivity
x__ Maybe Duration
y__
              -> ScheduleActivity
x__ {_ScheduleActivity'scheduleToStartTimeout = y__}))
        (Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ScheduleActivity "maybe'scheduleToStartTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduleToStartTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleActivity
-> f ScheduleActivity
fieldOf Proxy# "maybe'scheduleToStartTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleActivity -> f ScheduleActivity)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Maybe Duration)
-> (ScheduleActivity -> Maybe Duration -> ScheduleActivity)
-> Lens
     ScheduleActivity ScheduleActivity (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Maybe Duration
_ScheduleActivity'scheduleToStartTimeout
           (\ ScheduleActivity
x__ Maybe Duration
y__
              -> ScheduleActivity
x__ {_ScheduleActivity'scheduleToStartTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleActivity "startToCloseTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startToCloseTimeout"
-> (Duration -> f Duration)
-> ScheduleActivity
-> f ScheduleActivity
fieldOf Proxy# "startToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleActivity -> f ScheduleActivity)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Maybe Duration)
-> (ScheduleActivity -> Maybe Duration -> ScheduleActivity)
-> Lens
     ScheduleActivity ScheduleActivity (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Maybe Duration
_ScheduleActivity'startToCloseTimeout
           (\ ScheduleActivity
x__ Maybe Duration
y__ -> ScheduleActivity
x__ {_ScheduleActivity'startToCloseTimeout = y__}))
        (Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ScheduleActivity "maybe'startToCloseTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startToCloseTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleActivity
-> f ScheduleActivity
fieldOf Proxy# "maybe'startToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleActivity -> f ScheduleActivity)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Maybe Duration)
-> (ScheduleActivity -> Maybe Duration -> ScheduleActivity)
-> Lens
     ScheduleActivity ScheduleActivity (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Maybe Duration
_ScheduleActivity'startToCloseTimeout
           (\ ScheduleActivity
x__ Maybe Duration
y__ -> ScheduleActivity
x__ {_ScheduleActivity'startToCloseTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleActivity "heartbeatTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "heartbeatTimeout"
-> (Duration -> f Duration)
-> ScheduleActivity
-> f ScheduleActivity
fieldOf Proxy# "heartbeatTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleActivity -> f ScheduleActivity)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Maybe Duration)
-> (ScheduleActivity -> Maybe Duration -> ScheduleActivity)
-> Lens
     ScheduleActivity ScheduleActivity (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Maybe Duration
_ScheduleActivity'heartbeatTimeout
           (\ ScheduleActivity
x__ Maybe Duration
y__ -> ScheduleActivity
x__ {_ScheduleActivity'heartbeatTimeout = y__}))
        (Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ScheduleActivity "maybe'heartbeatTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'heartbeatTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleActivity
-> f ScheduleActivity
fieldOf Proxy# "maybe'heartbeatTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleActivity -> f ScheduleActivity)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Maybe Duration)
-> (ScheduleActivity -> Maybe Duration -> ScheduleActivity)
-> Lens
     ScheduleActivity ScheduleActivity (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Maybe Duration
_ScheduleActivity'heartbeatTimeout
           (\ ScheduleActivity
x__ Maybe Duration
y__ -> ScheduleActivity
x__ {_ScheduleActivity'heartbeatTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleActivity "retryPolicy" Proto.Temporal.Api.Common.V1.Message.RetryPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryPolicy"
-> (RetryPolicy -> f RetryPolicy)
-> ScheduleActivity
-> f ScheduleActivity
fieldOf Proxy# "retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> ScheduleActivity -> f ScheduleActivity)
-> ((RetryPolicy -> f RetryPolicy)
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (RetryPolicy -> f RetryPolicy)
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Maybe RetryPolicy)
-> (ScheduleActivity -> Maybe RetryPolicy -> ScheduleActivity)
-> Lens
     ScheduleActivity
     ScheduleActivity
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Maybe RetryPolicy
_ScheduleActivity'retryPolicy
           (\ ScheduleActivity
x__ Maybe RetryPolicy
y__ -> ScheduleActivity
x__ {_ScheduleActivity'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 ScheduleActivity "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))
-> ScheduleActivity
-> f ScheduleActivity
fieldOf Proxy# "maybe'retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> ScheduleActivity -> f ScheduleActivity)
-> ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Maybe RetryPolicy)
-> (ScheduleActivity -> Maybe RetryPolicy -> ScheduleActivity)
-> Lens
     ScheduleActivity
     ScheduleActivity
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Maybe RetryPolicy
_ScheduleActivity'retryPolicy
           (\ ScheduleActivity
x__ Maybe RetryPolicy
y__ -> ScheduleActivity
x__ {_ScheduleActivity'retryPolicy = y__}))
        (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> Maybe RetryPolicy -> f (Maybe RetryPolicy)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleActivity "cancellationType" ActivityCancellationType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cancellationType"
-> (ActivityCancellationType -> f ActivityCancellationType)
-> ScheduleActivity
-> f ScheduleActivity
fieldOf Proxy# "cancellationType"
_
    = ((ActivityCancellationType -> f ActivityCancellationType)
 -> ScheduleActivity -> f ScheduleActivity)
-> ((ActivityCancellationType -> f ActivityCancellationType)
    -> ActivityCancellationType -> f ActivityCancellationType)
-> (ActivityCancellationType -> f ActivityCancellationType)
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> ActivityCancellationType)
-> (ScheduleActivity
    -> ActivityCancellationType -> ScheduleActivity)
-> Lens
     ScheduleActivity
     ScheduleActivity
     ActivityCancellationType
     ActivityCancellationType
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> ActivityCancellationType
_ScheduleActivity'cancellationType
           (\ ScheduleActivity
x__ ActivityCancellationType
y__ -> ScheduleActivity
x__ {_ScheduleActivity'cancellationType = y__}))
        (ActivityCancellationType -> f ActivityCancellationType)
-> ActivityCancellationType -> f ActivityCancellationType
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleActivity "doNotEagerlyExecute" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "doNotEagerlyExecute"
-> (Bool -> f Bool) -> ScheduleActivity -> f ScheduleActivity
fieldOf Proxy# "doNotEagerlyExecute"
_
    = ((Bool -> f Bool) -> ScheduleActivity -> f ScheduleActivity)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> Bool)
-> (ScheduleActivity -> Bool -> ScheduleActivity)
-> Lens ScheduleActivity ScheduleActivity Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> Bool
_ScheduleActivity'doNotEagerlyExecute
           (\ ScheduleActivity
x__ Bool
y__ -> ScheduleActivity
x__ {_ScheduleActivity'doNotEagerlyExecute = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleActivity "versioningIntent" Proto.Temporal.Sdk.Core.Common.Common.VersioningIntent where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "versioningIntent"
-> (VersioningIntent -> f VersioningIntent)
-> ScheduleActivity
-> f ScheduleActivity
fieldOf Proxy# "versioningIntent"
_
    = ((VersioningIntent -> f VersioningIntent)
 -> ScheduleActivity -> f ScheduleActivity)
-> ((VersioningIntent -> f VersioningIntent)
    -> VersioningIntent -> f VersioningIntent)
-> (VersioningIntent -> f VersioningIntent)
-> ScheduleActivity
-> f ScheduleActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity -> VersioningIntent)
-> (ScheduleActivity -> VersioningIntent -> ScheduleActivity)
-> Lens
     ScheduleActivity ScheduleActivity VersioningIntent VersioningIntent
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity -> VersioningIntent
_ScheduleActivity'versioningIntent
           (\ ScheduleActivity
x__ VersioningIntent
y__ -> ScheduleActivity
x__ {_ScheduleActivity'versioningIntent = y__}))
        (VersioningIntent -> f VersioningIntent)
-> VersioningIntent -> f VersioningIntent
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ScheduleActivity where
  messageName :: Proxy ScheduleActivity -> Text
messageName Proxy ScheduleActivity
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_commands.ScheduleActivity"
  packedMessageDescriptor :: Proxy ScheduleActivity -> ByteString
packedMessageDescriptor Proxy ScheduleActivity
_
    = ByteString
"\n\
      \\DLEScheduleActivity\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2\US\n\
      \\vactivity_id\CAN\STX \SOH(\tR\n\
      \activityId\DC2#\n\
      \\ractivity_type\CAN\ETX \SOH(\tR\factivityType\DC2\GS\n\
      \\n\
      \task_queue\CAN\ENQ \SOH(\tR\ttaskQueue\DC2R\n\
      \\aheaders\CAN\ACK \ETX(\v28.coresdk.workflow_commands.ScheduleActivity.HeadersEntryR\aheaders\DC2=\n\
      \\targuments\CAN\a \ETX(\v2\US.temporal.api.common.v1.PayloadR\targuments\DC2T\n\
      \\EMschedule_to_close_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToCloseTimeout\DC2T\n\
      \\EMschedule_to_start_timeout\CAN\t \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToStartTimeout\DC2N\n\
      \\SYNstart_to_close_timeout\CAN\n\
      \ \SOH(\v2\EM.google.protobuf.DurationR\DC3startToCloseTimeout\DC2F\n\
      \\DC1heartbeat_timeout\CAN\v \SOH(\v2\EM.google.protobuf.DurationR\DLEheartbeatTimeout\DC2F\n\
      \\fretry_policy\CAN\f \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2`\n\
      \\DC1cancellation_type\CAN\r \SOH(\SO23.coresdk.workflow_commands.ActivityCancellationTypeR\DLEcancellationType\DC23\n\
      \\SYNdo_not_eagerly_execute\CAN\SO \SOH(\bR\DC3doNotEagerlyExecute\DC2M\n\
      \\DC1versioning_intent\CAN\SI \SOH(\SO2 .coresdk.common.VersioningIntentR\DLEversioningIntent\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 ScheduleActivity -> ByteString
packedFileDescriptor Proxy ScheduleActivity
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ScheduleActivity)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor ScheduleActivity
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor ScheduleActivity Word32
-> FieldDescriptor ScheduleActivity
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 ScheduleActivity ScheduleActivity Word32 Word32
-> FieldAccessor ScheduleActivity 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 ScheduleActivity
        activityId__field_descriptor :: FieldDescriptor ScheduleActivity
activityId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ScheduleActivity Text
-> FieldDescriptor ScheduleActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens ScheduleActivity ScheduleActivity Text Text
-> FieldAccessor ScheduleActivity Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"activityId")) ::
              Data.ProtoLens.FieldDescriptor ScheduleActivity
        activityType__field_descriptor :: FieldDescriptor ScheduleActivity
activityType__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ScheduleActivity Text
-> FieldDescriptor ScheduleActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_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 ScheduleActivity ScheduleActivity Text Text
-> FieldAccessor ScheduleActivity 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 @"activityType")) ::
              Data.ProtoLens.FieldDescriptor ScheduleActivity
        taskQueue__field_descriptor :: FieldDescriptor ScheduleActivity
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ScheduleActivity Text
-> FieldDescriptor ScheduleActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_queue"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens ScheduleActivity ScheduleActivity Text Text
-> FieldAccessor ScheduleActivity Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskQueue")) ::
              Data.ProtoLens.FieldDescriptor ScheduleActivity
        headers__field_descriptor :: FieldDescriptor ScheduleActivity
headers__field_descriptor
          = String
-> FieldTypeDescriptor ScheduleActivity'HeadersEntry
-> FieldAccessor ScheduleActivity ScheduleActivity'HeadersEntry
-> FieldDescriptor ScheduleActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"headers"
              (MessageOrGroup -> FieldTypeDescriptor ScheduleActivity'HeadersEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ScheduleActivity'HeadersEntry)
              (Lens' ScheduleActivity'HeadersEntry Text
-> Lens' ScheduleActivity'HeadersEntry Payload
-> Lens
     ScheduleActivity
     ScheduleActivity
     (Map Text Payload)
     (Map Text Payload)
-> FieldAccessor ScheduleActivity ScheduleActivity'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 ScheduleActivity
        arguments__field_descriptor :: FieldDescriptor ScheduleActivity
arguments__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor ScheduleActivity Payload
-> FieldDescriptor ScheduleActivity
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' ScheduleActivity [Payload]
-> FieldAccessor ScheduleActivity 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 ScheduleActivity
        scheduleToCloseTimeout__field_descriptor :: FieldDescriptor ScheduleActivity
scheduleToCloseTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor ScheduleActivity Duration
-> FieldDescriptor ScheduleActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule_to_close_timeout"
              (MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
              (Lens
  ScheduleActivity ScheduleActivity (Maybe Duration) (Maybe Duration)
-> FieldAccessor ScheduleActivity Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduleToCloseTimeout")) ::
              Data.ProtoLens.FieldDescriptor ScheduleActivity
        scheduleToStartTimeout__field_descriptor :: FieldDescriptor ScheduleActivity
scheduleToStartTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor ScheduleActivity Duration
-> FieldDescriptor ScheduleActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule_to_start_timeout"
              (MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
              (Lens
  ScheduleActivity ScheduleActivity (Maybe Duration) (Maybe Duration)
-> FieldAccessor ScheduleActivity Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduleToStartTimeout")) ::
              Data.ProtoLens.FieldDescriptor ScheduleActivity
        startToCloseTimeout__field_descriptor :: FieldDescriptor ScheduleActivity
startToCloseTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor ScheduleActivity Duration
-> FieldDescriptor ScheduleActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_to_close_timeout"
              (MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
              (Lens
  ScheduleActivity ScheduleActivity (Maybe Duration) (Maybe Duration)
-> FieldAccessor ScheduleActivity Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startToCloseTimeout")) ::
              Data.ProtoLens.FieldDescriptor ScheduleActivity
        heartbeatTimeout__field_descriptor :: FieldDescriptor ScheduleActivity
heartbeatTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor ScheduleActivity Duration
-> FieldDescriptor ScheduleActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"heartbeat_timeout"
              (MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
              (Lens
  ScheduleActivity ScheduleActivity (Maybe Duration) (Maybe Duration)
-> FieldAccessor ScheduleActivity Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'heartbeatTimeout")) ::
              Data.ProtoLens.FieldDescriptor ScheduleActivity
        retryPolicy__field_descriptor :: FieldDescriptor ScheduleActivity
retryPolicy__field_descriptor
          = String
-> FieldTypeDescriptor RetryPolicy
-> FieldAccessor ScheduleActivity RetryPolicy
-> FieldDescriptor ScheduleActivity
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
  ScheduleActivity
  ScheduleActivity
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> FieldAccessor ScheduleActivity 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 ScheduleActivity
        cancellationType__field_descriptor :: FieldDescriptor ScheduleActivity
cancellationType__field_descriptor
          = String
-> FieldTypeDescriptor ActivityCancellationType
-> FieldAccessor ScheduleActivity ActivityCancellationType
-> FieldDescriptor ScheduleActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cancellation_type"
              (ScalarField ActivityCancellationType
-> FieldTypeDescriptor ActivityCancellationType
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ActivityCancellationType
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor ActivityCancellationType)
              (WireDefault ActivityCancellationType
-> Lens
     ScheduleActivity
     ScheduleActivity
     ActivityCancellationType
     ActivityCancellationType
-> FieldAccessor ScheduleActivity ActivityCancellationType
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ActivityCancellationType
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cancellationType")) ::
              Data.ProtoLens.FieldDescriptor ScheduleActivity
        doNotEagerlyExecute__field_descriptor :: FieldDescriptor ScheduleActivity
doNotEagerlyExecute__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ScheduleActivity Bool
-> FieldDescriptor ScheduleActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"do_not_eagerly_execute"
              (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 ScheduleActivity ScheduleActivity Bool Bool
-> FieldAccessor ScheduleActivity 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 @"doNotEagerlyExecute")) ::
              Data.ProtoLens.FieldDescriptor ScheduleActivity
        versioningIntent__field_descriptor :: FieldDescriptor ScheduleActivity
versioningIntent__field_descriptor
          = String
-> FieldTypeDescriptor VersioningIntent
-> FieldAccessor ScheduleActivity VersioningIntent
-> FieldDescriptor ScheduleActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"versioning_intent"
              (ScalarField VersioningIntent
-> FieldTypeDescriptor VersioningIntent
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField VersioningIntent
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Sdk.Core.Common.Common.VersioningIntent)
              (WireDefault VersioningIntent
-> Lens
     ScheduleActivity ScheduleActivity VersioningIntent VersioningIntent
-> FieldAccessor ScheduleActivity VersioningIntent
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault VersioningIntent
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"versioningIntent")) ::
              Data.ProtoLens.FieldDescriptor ScheduleActivity
      in
        [(Tag, FieldDescriptor ScheduleActivity)]
-> Map Tag (FieldDescriptor ScheduleActivity)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ScheduleActivity
seq__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ScheduleActivity
activityId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ScheduleActivity
activityType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ScheduleActivity
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ScheduleActivity
headers__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor ScheduleActivity
arguments__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor ScheduleActivity
scheduleToCloseTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor ScheduleActivity
scheduleToStartTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor ScheduleActivity
startToCloseTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor ScheduleActivity
heartbeatTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor ScheduleActivity
retryPolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor ScheduleActivity
cancellationType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
14, FieldDescriptor ScheduleActivity
doNotEagerlyExecute__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
15, FieldDescriptor ScheduleActivity
versioningIntent__field_descriptor)]
  unknownFields :: Lens' ScheduleActivity FieldSet
unknownFields
    = (ScheduleActivity -> FieldSet)
-> (ScheduleActivity -> FieldSet -> ScheduleActivity)
-> Lens' ScheduleActivity FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ScheduleActivity -> FieldSet
_ScheduleActivity'_unknownFields
        (\ ScheduleActivity
x__ FieldSet
y__ -> ScheduleActivity
x__ {_ScheduleActivity'_unknownFields = y__})
  defMessage :: ScheduleActivity
defMessage
    = ScheduleActivity'_constructor
        {_ScheduleActivity'seq :: Word32
_ScheduleActivity'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScheduleActivity'activityId :: Text
_ScheduleActivity'activityId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScheduleActivity'activityType :: Text
_ScheduleActivity'activityType = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScheduleActivity'taskQueue :: Text
_ScheduleActivity'taskQueue = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScheduleActivity'headers :: Map Text Payload
_ScheduleActivity'headers = Map Text Payload
forall k a. Map k a
Data.Map.empty,
         _ScheduleActivity'arguments :: Vector Payload
_ScheduleActivity'arguments = Vector Payload
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ScheduleActivity'scheduleToCloseTimeout :: Maybe Duration
_ScheduleActivity'scheduleToCloseTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _ScheduleActivity'scheduleToStartTimeout :: Maybe Duration
_ScheduleActivity'scheduleToStartTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _ScheduleActivity'startToCloseTimeout :: Maybe Duration
_ScheduleActivity'startToCloseTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _ScheduleActivity'heartbeatTimeout :: Maybe Duration
_ScheduleActivity'heartbeatTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _ScheduleActivity'retryPolicy :: Maybe RetryPolicy
_ScheduleActivity'retryPolicy = Maybe RetryPolicy
forall a. Maybe a
Prelude.Nothing,
         _ScheduleActivity'cancellationType :: ActivityCancellationType
_ScheduleActivity'cancellationType = ActivityCancellationType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScheduleActivity'doNotEagerlyExecute :: Bool
_ScheduleActivity'doNotEagerlyExecute = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScheduleActivity'versioningIntent :: VersioningIntent
_ScheduleActivity'versioningIntent = VersioningIntent
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScheduleActivity'_unknownFields :: FieldSet
_ScheduleActivity'_unknownFields = []}
  parseMessage :: Parser ScheduleActivity
parseMessage
    = let
        loop ::
          ScheduleActivity
          -> 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 ScheduleActivity
        loop :: ScheduleActivity
-> Growing Vector RealWorld Payload -> Parser ScheduleActivity
loop ScheduleActivity
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
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)
                                  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
"activity_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"activityId") y x)
                                  mutable'arguments
                        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
"activity_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"activityType") y x)
                                  mutable'arguments
                        Word64
42
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"task_queue"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskQueue") y x)
                                  mutable'arguments
                        Word64
50
                          -> do !(entry :: ScheduleActivity'HeadersEntry) <- Parser ScheduleActivity'HeadersEntry
-> String -> Parser ScheduleActivity'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
  ScheduleActivity'HeadersEntry
  ScheduleActivity'HeadersEntry
  Text
  Text
-> ScheduleActivity'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") ScheduleActivity'HeadersEntry
entry
                                   value
                                     = FoldLike
  Payload
  ScheduleActivity'HeadersEntry
  ScheduleActivity'HeadersEntry
  Payload
  Payload
-> ScheduleActivity'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") ScheduleActivity'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
58
                          -> 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
66
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"schedule_to_close_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduleToCloseTimeout") 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
"schedule_to_start_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduleToStartTimeout") 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
"start_to_close_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startToCloseTimeout") y x)
                                  mutable'arguments
                        Word64
90
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"heartbeat_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"heartbeatTimeout") y x)
                                  mutable'arguments
                        Word64
98
                          -> do y <- Parser RetryPolicy -> String -> Parser RetryPolicy
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"retry_policy"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"retryPolicy") y x)
                                  mutable'arguments
                        Word64
104
                          -> do y <- Parser ActivityCancellationType
-> String -> Parser ActivityCancellationType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> ActivityCancellationType)
-> Parser Int -> Parser ActivityCancellationType
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> ActivityCancellationType
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
"cancellation_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cancellationType") y x)
                                  mutable'arguments
                        Word64
112
                          -> 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
"do_not_eagerly_execute"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"doNotEagerlyExecute") y x)
                                  mutable'arguments
                        Word64
120
                          -> do y <- Parser VersioningIntent -> String -> Parser VersioningIntent
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> VersioningIntent) -> Parser Int -> Parser VersioningIntent
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> VersioningIntent
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
"versioning_intent"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"versioningIntent") 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 ScheduleActivity -> String -> Parser ScheduleActivity
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
"ScheduleActivity"
  buildMessage :: ScheduleActivity -> Builder
buildMessage
    = \ ScheduleActivity
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike Word32 ScheduleActivity ScheduleActivity Word32 Word32
-> ScheduleActivity -> 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") ScheduleActivity
_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.<>)
                (let
                   _v :: Text
_v
                     = FoldLike Text ScheduleActivity ScheduleActivity Text Text
-> ScheduleActivity -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"activityId") ScheduleActivity
_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 ScheduleActivity ScheduleActivity Text Text
-> ScheduleActivity -> 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 @"activityType") ScheduleActivity
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Text
_v = FoldLike Text ScheduleActivity ScheduleActivity Text Text
-> ScheduleActivity -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskQueue") ScheduleActivity
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         ([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
50)
                                       ((ByteString -> Builder)
-> (ScheduleActivity'HeadersEntry -> ByteString)
-> ScheduleActivity'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))
                                          ScheduleActivity'HeadersEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                          (Setter
  ScheduleActivity'HeadersEntry
  ScheduleActivity'HeadersEntry
  Text
  Text
-> Text
-> ScheduleActivity'HeadersEntry
-> ScheduleActivity'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
  ScheduleActivity'HeadersEntry
  ScheduleActivity'HeadersEntry
  Payload
  Payload
-> Payload
-> ScheduleActivity'HeadersEntry
-> ScheduleActivity'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)
                                                (ScheduleActivity'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                   ScheduleActivity'HeadersEntry)))))
                               (Map Text Payload -> [(Text, Payload)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                  (FoldLike
  (Map Text Payload)
  ScheduleActivity
  ScheduleActivity
  (Map Text Payload)
  (Map Text Payload)
-> ScheduleActivity -> 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") ScheduleActivity
_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
58)
                                       ((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)
  ScheduleActivity
  ScheduleActivity
  (Vector Payload)
  (Vector Payload)
-> ScheduleActivity -> 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") ScheduleActivity
_x))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (case
                                    FoldLike
  (Maybe Duration)
  ScheduleActivity
  ScheduleActivity
  (Maybe Duration)
  (Maybe Duration)
-> ScheduleActivity -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                      (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduleToCloseTimeout")
                                      ScheduleActivity
_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)
  ScheduleActivity
  ScheduleActivity
  (Maybe Duration)
  (Maybe Duration)
-> ScheduleActivity -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                            @"maybe'scheduleToStartTimeout")
                                         ScheduleActivity
_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)
  ScheduleActivity
  ScheduleActivity
  (Maybe Duration)
  (Maybe Duration)
-> ScheduleActivity -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                               @"maybe'startToCloseTimeout")
                                            ScheduleActivity
_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.<>)
                                        (case
                                             FoldLike
  (Maybe Duration)
  ScheduleActivity
  ScheduleActivity
  (Maybe Duration)
  (Maybe Duration)
-> ScheduleActivity -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                  @"maybe'heartbeatTimeout")
                                               ScheduleActivity
_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
90)
                                                  ((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 RetryPolicy)
  ScheduleActivity
  ScheduleActivity
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> ScheduleActivity -> 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")
                                                  ScheduleActivity
_x
                                            of
                                              Maybe RetryPolicy
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                              (Prelude.Just RetryPolicy
_v)
                                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
98)
                                                     ((ByteString -> Builder)
-> (RetryPolicy -> ByteString) -> RetryPolicy -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                        (\ ByteString
bs
                                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                   ByteString
bs))
                                                        RetryPolicy -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage RetryPolicy
_v))
                                           (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (let
                                                 _v :: ActivityCancellationType
_v
                                                   = FoldLike
  ActivityCancellationType
  ScheduleActivity
  ScheduleActivity
  ActivityCancellationType
  ActivityCancellationType
-> ScheduleActivity -> ActivityCancellationType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                          @"cancellationType")
                                                       ScheduleActivity
_x
                                               in
                                                 if ActivityCancellationType -> ActivityCancellationType -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ActivityCancellationType
_v ActivityCancellationType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                     Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                 else
                                                     Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
104)
                                                       ((Int -> Builder)
-> (ActivityCancellationType -> Int)
-> ActivityCancellationType
-> 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)
                                                          ActivityCancellationType -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum ActivityCancellationType
_v))
                                              (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (let
                                                    _v :: Bool
_v
                                                      = FoldLike Bool ScheduleActivity ScheduleActivity Bool Bool
-> ScheduleActivity -> 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
                                                             @"doNotEagerlyExecute")
                                                          ScheduleActivity
_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
112)
                                                          ((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 :: VersioningIntent
_v
                                                         = FoldLike
  VersioningIntent
  ScheduleActivity
  ScheduleActivity
  VersioningIntent
  VersioningIntent
-> ScheduleActivity -> VersioningIntent
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                             (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                @"versioningIntent")
                                                             ScheduleActivity
_x
                                                     in
                                                       if VersioningIntent -> VersioningIntent -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
                                                            VersioningIntent
_v VersioningIntent
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                           Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                       else
                                                           Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                Word64
120)
                                                             ((Int -> Builder)
-> (VersioningIntent -> Int) -> VersioningIntent -> 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)
                                                                VersioningIntent -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum VersioningIntent
_v))
                                                    (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                                       (FoldLike
  FieldSet ScheduleActivity ScheduleActivity FieldSet FieldSet
-> ScheduleActivity -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                          FoldLike
  FieldSet ScheduleActivity ScheduleActivity FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ScheduleActivity FieldSet
Data.ProtoLens.unknownFields
                                                          ScheduleActivity
_x)))))))))))))))
instance Control.DeepSeq.NFData ScheduleActivity where
  rnf :: ScheduleActivity -> ()
rnf
    = \ ScheduleActivity
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ScheduleActivity -> FieldSet
_ScheduleActivity'_unknownFields ScheduleActivity
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ScheduleActivity -> Word32
_ScheduleActivity'seq ScheduleActivity
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ScheduleActivity -> Text
_ScheduleActivity'activityId ScheduleActivity
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ScheduleActivity -> Text
_ScheduleActivity'activityType ScheduleActivity
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ScheduleActivity -> Text
_ScheduleActivity'taskQueue ScheduleActivity
x__)
                         (Map Text Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ScheduleActivity -> Map Text Payload
_ScheduleActivity'headers ScheduleActivity
x__)
                            (Vector Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ScheduleActivity -> Vector Payload
_ScheduleActivity'arguments ScheduleActivity
x__)
                               (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (ScheduleActivity -> Maybe Duration
_ScheduleActivity'scheduleToCloseTimeout ScheduleActivity
x__)
                                  (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (ScheduleActivity -> Maybe Duration
_ScheduleActivity'scheduleToStartTimeout ScheduleActivity
x__)
                                     (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (ScheduleActivity -> Maybe Duration
_ScheduleActivity'startToCloseTimeout ScheduleActivity
x__)
                                        (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (ScheduleActivity -> Maybe Duration
_ScheduleActivity'heartbeatTimeout ScheduleActivity
x__)
                                           (Maybe RetryPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (ScheduleActivity -> Maybe RetryPolicy
_ScheduleActivity'retryPolicy ScheduleActivity
x__)
                                              (ActivityCancellationType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (ScheduleActivity -> ActivityCancellationType
_ScheduleActivity'cancellationType ScheduleActivity
x__)
                                                 (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (ScheduleActivity -> Bool
_ScheduleActivity'doNotEagerlyExecute ScheduleActivity
x__)
                                                    (VersioningIntent -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                       (ScheduleActivity -> VersioningIntent
_ScheduleActivity'versioningIntent ScheduleActivity
x__)
                                                       ()))))))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.key' @:: Lens' ScheduleActivity'HeadersEntry Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.value' @:: Lens' ScheduleActivity'HeadersEntry Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'value' @:: Lens' ScheduleActivity'HeadersEntry (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data ScheduleActivity'HeadersEntry
  = ScheduleActivity'HeadersEntry'_constructor {ScheduleActivity'HeadersEntry -> Text
_ScheduleActivity'HeadersEntry'key :: !Data.Text.Text,
                                                ScheduleActivity'HeadersEntry -> Maybe Payload
_ScheduleActivity'HeadersEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                                ScheduleActivity'HeadersEntry -> FieldSet
_ScheduleActivity'HeadersEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Bool
(ScheduleActivity'HeadersEntry
 -> ScheduleActivity'HeadersEntry -> Bool)
-> (ScheduleActivity'HeadersEntry
    -> ScheduleActivity'HeadersEntry -> Bool)
-> Eq ScheduleActivity'HeadersEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Bool
== :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Bool
$c/= :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Bool
/= :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Bool
Prelude.Eq, Eq ScheduleActivity'HeadersEntry
Eq ScheduleActivity'HeadersEntry =>
(ScheduleActivity'HeadersEntry
 -> ScheduleActivity'HeadersEntry -> Ordering)
-> (ScheduleActivity'HeadersEntry
    -> ScheduleActivity'HeadersEntry -> Bool)
-> (ScheduleActivity'HeadersEntry
    -> ScheduleActivity'HeadersEntry -> Bool)
-> (ScheduleActivity'HeadersEntry
    -> ScheduleActivity'HeadersEntry -> Bool)
-> (ScheduleActivity'HeadersEntry
    -> ScheduleActivity'HeadersEntry -> Bool)
-> (ScheduleActivity'HeadersEntry
    -> ScheduleActivity'HeadersEntry -> ScheduleActivity'HeadersEntry)
-> (ScheduleActivity'HeadersEntry
    -> ScheduleActivity'HeadersEntry -> ScheduleActivity'HeadersEntry)
-> Ord ScheduleActivity'HeadersEntry
ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Bool
ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Ordering
ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> ScheduleActivity'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 :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Ordering
compare :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Ordering
$c< :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Bool
< :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Bool
$c<= :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Bool
<= :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Bool
$c> :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Bool
> :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Bool
$c>= :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Bool
>= :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> Bool
$cmax :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> ScheduleActivity'HeadersEntry
max :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> ScheduleActivity'HeadersEntry
$cmin :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> ScheduleActivity'HeadersEntry
min :: ScheduleActivity'HeadersEntry
-> ScheduleActivity'HeadersEntry -> ScheduleActivity'HeadersEntry
Prelude.Ord)
instance Prelude.Show ScheduleActivity'HeadersEntry where
  showsPrec :: Int -> ScheduleActivity'HeadersEntry -> ShowS
showsPrec Int
_ ScheduleActivity'HeadersEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ScheduleActivity'HeadersEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ScheduleActivity'HeadersEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ScheduleActivity'HeadersEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> ScheduleActivity'HeadersEntry
-> f ScheduleActivity'HeadersEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> ScheduleActivity'HeadersEntry
 -> f ScheduleActivity'HeadersEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ScheduleActivity'HeadersEntry
-> f ScheduleActivity'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity'HeadersEntry -> Text)
-> (ScheduleActivity'HeadersEntry
    -> Text -> ScheduleActivity'HeadersEntry)
-> Lens' ScheduleActivity'HeadersEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity'HeadersEntry -> Text
_ScheduleActivity'HeadersEntry'key
           (\ ScheduleActivity'HeadersEntry
x__ Text
y__ -> ScheduleActivity'HeadersEntry
x__ {_ScheduleActivity'HeadersEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleActivity'HeadersEntry "value" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Payload -> f Payload)
-> ScheduleActivity'HeadersEntry
-> f ScheduleActivity'HeadersEntry
fieldOf Proxy# "value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> ScheduleActivity'HeadersEntry
 -> f ScheduleActivity'HeadersEntry)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> ScheduleActivity'HeadersEntry
-> f ScheduleActivity'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity'HeadersEntry -> Maybe Payload)
-> (ScheduleActivity'HeadersEntry
    -> Maybe Payload -> ScheduleActivity'HeadersEntry)
-> Lens
     ScheduleActivity'HeadersEntry
     ScheduleActivity'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity'HeadersEntry -> Maybe Payload
_ScheduleActivity'HeadersEntry'value
           (\ ScheduleActivity'HeadersEntry
x__ Maybe Payload
y__ -> ScheduleActivity'HeadersEntry
x__ {_ScheduleActivity'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 ScheduleActivity'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))
-> ScheduleActivity'HeadersEntry
-> f ScheduleActivity'HeadersEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> ScheduleActivity'HeadersEntry
 -> f ScheduleActivity'HeadersEntry)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> ScheduleActivity'HeadersEntry
-> f ScheduleActivity'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleActivity'HeadersEntry -> Maybe Payload)
-> (ScheduleActivity'HeadersEntry
    -> Maybe Payload -> ScheduleActivity'HeadersEntry)
-> Lens
     ScheduleActivity'HeadersEntry
     ScheduleActivity'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleActivity'HeadersEntry -> Maybe Payload
_ScheduleActivity'HeadersEntry'value
           (\ ScheduleActivity'HeadersEntry
x__ Maybe Payload
y__ -> ScheduleActivity'HeadersEntry
x__ {_ScheduleActivity'HeadersEntry'value = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ScheduleActivity'HeadersEntry where
  messageName :: Proxy ScheduleActivity'HeadersEntry -> Text
messageName Proxy ScheduleActivity'HeadersEntry
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.ScheduleActivity.HeadersEntry"
  packedMessageDescriptor :: Proxy ScheduleActivity'HeadersEntry -> ByteString
packedMessageDescriptor Proxy ScheduleActivity'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 ScheduleActivity'HeadersEntry -> ByteString
packedFileDescriptor Proxy ScheduleActivity'HeadersEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ScheduleActivity'HeadersEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor ScheduleActivity'HeadersEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ScheduleActivity'HeadersEntry Text
-> FieldDescriptor ScheduleActivity'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' ScheduleActivity'HeadersEntry Text
-> FieldAccessor ScheduleActivity'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 ScheduleActivity'HeadersEntry
        value__field_descriptor :: FieldDescriptor ScheduleActivity'HeadersEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor ScheduleActivity'HeadersEntry Payload
-> FieldDescriptor ScheduleActivity'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
  ScheduleActivity'HeadersEntry
  ScheduleActivity'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor ScheduleActivity'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 ScheduleActivity'HeadersEntry
      in
        [(Tag, FieldDescriptor ScheduleActivity'HeadersEntry)]
-> Map Tag (FieldDescriptor ScheduleActivity'HeadersEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ScheduleActivity'HeadersEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ScheduleActivity'HeadersEntry
value__field_descriptor)]
  unknownFields :: Lens' ScheduleActivity'HeadersEntry FieldSet
unknownFields
    = (ScheduleActivity'HeadersEntry -> FieldSet)
-> (ScheduleActivity'HeadersEntry
    -> FieldSet -> ScheduleActivity'HeadersEntry)
-> Lens' ScheduleActivity'HeadersEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ScheduleActivity'HeadersEntry -> FieldSet
_ScheduleActivity'HeadersEntry'_unknownFields
        (\ ScheduleActivity'HeadersEntry
x__ FieldSet
y__
           -> ScheduleActivity'HeadersEntry
x__ {_ScheduleActivity'HeadersEntry'_unknownFields = y__})
  defMessage :: ScheduleActivity'HeadersEntry
defMessage
    = ScheduleActivity'HeadersEntry'_constructor
        {_ScheduleActivity'HeadersEntry'key :: Text
_ScheduleActivity'HeadersEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScheduleActivity'HeadersEntry'value :: Maybe Payload
_ScheduleActivity'HeadersEntry'value = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _ScheduleActivity'HeadersEntry'_unknownFields :: FieldSet
_ScheduleActivity'HeadersEntry'_unknownFields = []}
  parseMessage :: Parser ScheduleActivity'HeadersEntry
parseMessage
    = let
        loop ::
          ScheduleActivity'HeadersEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser ScheduleActivity'HeadersEntry
        loop :: ScheduleActivity'HeadersEntry
-> Parser ScheduleActivity'HeadersEntry
loop ScheduleActivity'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 ScheduleActivity'HeadersEntry
-> String -> Parser ScheduleActivity'HeadersEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ScheduleActivity'HeadersEntry
-> Parser ScheduleActivity'HeadersEntry
loop ScheduleActivity'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"HeadersEntry"
  buildMessage :: ScheduleActivity'HeadersEntry -> Builder
buildMessage
    = \ ScheduleActivity'HeadersEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  ScheduleActivity'HeadersEntry
  ScheduleActivity'HeadersEntry
  Text
  Text
-> ScheduleActivity'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") ScheduleActivity'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)
  ScheduleActivity'HeadersEntry
  ScheduleActivity'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> ScheduleActivity'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") ScheduleActivity'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
  ScheduleActivity'HeadersEntry
  ScheduleActivity'HeadersEntry
  FieldSet
  FieldSet
-> ScheduleActivity'HeadersEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ScheduleActivity'HeadersEntry
  ScheduleActivity'HeadersEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ScheduleActivity'HeadersEntry FieldSet
Data.ProtoLens.unknownFields ScheduleActivity'HeadersEntry
_x)))
instance Control.DeepSeq.NFData ScheduleActivity'HeadersEntry where
  rnf :: ScheduleActivity'HeadersEntry -> ()
rnf
    = \ ScheduleActivity'HeadersEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ScheduleActivity'HeadersEntry -> FieldSet
_ScheduleActivity'HeadersEntry'_unknownFields ScheduleActivity'HeadersEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ScheduleActivity'HeadersEntry -> Text
_ScheduleActivity'HeadersEntry'key ScheduleActivity'HeadersEntry
x__)
                (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ScheduleActivity'HeadersEntry -> Maybe Payload
_ScheduleActivity'HeadersEntry'value ScheduleActivity'HeadersEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.seq' @:: Lens' ScheduleLocalActivity Data.Word.Word32@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.activityId' @:: Lens' ScheduleLocalActivity Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.activityType' @:: Lens' ScheduleLocalActivity Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.attempt' @:: Lens' ScheduleLocalActivity Data.Word.Word32@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.originalScheduleTime' @:: Lens' ScheduleLocalActivity Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'originalScheduleTime' @:: Lens' ScheduleLocalActivity (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.headers' @:: Lens' ScheduleLocalActivity (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.arguments' @:: Lens' ScheduleLocalActivity [Proto.Temporal.Api.Common.V1.Message.Payload]@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.vec'arguments' @:: Lens' ScheduleLocalActivity (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.scheduleToCloseTimeout' @:: Lens' ScheduleLocalActivity Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'scheduleToCloseTimeout' @:: Lens' ScheduleLocalActivity (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.scheduleToStartTimeout' @:: Lens' ScheduleLocalActivity Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'scheduleToStartTimeout' @:: Lens' ScheduleLocalActivity (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.startToCloseTimeout' @:: Lens' ScheduleLocalActivity Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'startToCloseTimeout' @:: Lens' ScheduleLocalActivity (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.retryPolicy' @:: Lens' ScheduleLocalActivity Proto.Temporal.Api.Common.V1.Message.RetryPolicy@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'retryPolicy' @:: Lens' ScheduleLocalActivity (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.localRetryThreshold' @:: Lens' ScheduleLocalActivity Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'localRetryThreshold' @:: Lens' ScheduleLocalActivity (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.cancellationType' @:: Lens' ScheduleLocalActivity ActivityCancellationType@ -}
data ScheduleLocalActivity
  = ScheduleLocalActivity'_constructor {ScheduleLocalActivity -> Word32
_ScheduleLocalActivity'seq :: !Data.Word.Word32,
                                        ScheduleLocalActivity -> Text
_ScheduleLocalActivity'activityId :: !Data.Text.Text,
                                        ScheduleLocalActivity -> Text
_ScheduleLocalActivity'activityType :: !Data.Text.Text,
                                        ScheduleLocalActivity -> Word32
_ScheduleLocalActivity'attempt :: !Data.Word.Word32,
                                        ScheduleLocalActivity -> Maybe Timestamp
_ScheduleLocalActivity'originalScheduleTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                        ScheduleLocalActivity -> Map Text Payload
_ScheduleLocalActivity'headers :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload),
                                        ScheduleLocalActivity -> Vector Payload
_ScheduleLocalActivity'arguments :: !(Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload),
                                        ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'scheduleToCloseTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                        ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'scheduleToStartTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                        ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'startToCloseTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                        ScheduleLocalActivity -> Maybe RetryPolicy
_ScheduleLocalActivity'retryPolicy :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy),
                                        ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'localRetryThreshold :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                        ScheduleLocalActivity -> ActivityCancellationType
_ScheduleLocalActivity'cancellationType :: !ActivityCancellationType,
                                        ScheduleLocalActivity -> FieldSet
_ScheduleLocalActivity'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ScheduleLocalActivity -> ScheduleLocalActivity -> Bool
(ScheduleLocalActivity -> ScheduleLocalActivity -> Bool)
-> (ScheduleLocalActivity -> ScheduleLocalActivity -> Bool)
-> Eq ScheduleLocalActivity
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ScheduleLocalActivity -> ScheduleLocalActivity -> Bool
== :: ScheduleLocalActivity -> ScheduleLocalActivity -> Bool
$c/= :: ScheduleLocalActivity -> ScheduleLocalActivity -> Bool
/= :: ScheduleLocalActivity -> ScheduleLocalActivity -> Bool
Prelude.Eq, Eq ScheduleLocalActivity
Eq ScheduleLocalActivity =>
(ScheduleLocalActivity -> ScheduleLocalActivity -> Ordering)
-> (ScheduleLocalActivity -> ScheduleLocalActivity -> Bool)
-> (ScheduleLocalActivity -> ScheduleLocalActivity -> Bool)
-> (ScheduleLocalActivity -> ScheduleLocalActivity -> Bool)
-> (ScheduleLocalActivity -> ScheduleLocalActivity -> Bool)
-> (ScheduleLocalActivity
    -> ScheduleLocalActivity -> ScheduleLocalActivity)
-> (ScheduleLocalActivity
    -> ScheduleLocalActivity -> ScheduleLocalActivity)
-> Ord ScheduleLocalActivity
ScheduleLocalActivity -> ScheduleLocalActivity -> Bool
ScheduleLocalActivity -> ScheduleLocalActivity -> Ordering
ScheduleLocalActivity
-> ScheduleLocalActivity -> ScheduleLocalActivity
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 :: ScheduleLocalActivity -> ScheduleLocalActivity -> Ordering
compare :: ScheduleLocalActivity -> ScheduleLocalActivity -> Ordering
$c< :: ScheduleLocalActivity -> ScheduleLocalActivity -> Bool
< :: ScheduleLocalActivity -> ScheduleLocalActivity -> Bool
$c<= :: ScheduleLocalActivity -> ScheduleLocalActivity -> Bool
<= :: ScheduleLocalActivity -> ScheduleLocalActivity -> Bool
$c> :: ScheduleLocalActivity -> ScheduleLocalActivity -> Bool
> :: ScheduleLocalActivity -> ScheduleLocalActivity -> Bool
$c>= :: ScheduleLocalActivity -> ScheduleLocalActivity -> Bool
>= :: ScheduleLocalActivity -> ScheduleLocalActivity -> Bool
$cmax :: ScheduleLocalActivity
-> ScheduleLocalActivity -> ScheduleLocalActivity
max :: ScheduleLocalActivity
-> ScheduleLocalActivity -> ScheduleLocalActivity
$cmin :: ScheduleLocalActivity
-> ScheduleLocalActivity -> ScheduleLocalActivity
min :: ScheduleLocalActivity
-> ScheduleLocalActivity -> ScheduleLocalActivity
Prelude.Ord)
instance Prelude.Show ScheduleLocalActivity where
  showsPrec :: Int -> ScheduleLocalActivity -> ShowS
showsPrec Int
_ ScheduleLocalActivity
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ScheduleLocalActivity -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ScheduleLocalActivity
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq"
-> (Word32 -> f Word32)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32)
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Word32)
-> (ScheduleLocalActivity -> Word32 -> ScheduleLocalActivity)
-> Lens ScheduleLocalActivity ScheduleLocalActivity Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Word32
_ScheduleLocalActivity'seq
           (\ ScheduleLocalActivity
x__ Word32
y__ -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity "activityId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityId"
-> (Text -> f Text)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "activityId"
_
    = ((Text -> f Text)
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Text)
-> (ScheduleLocalActivity -> Text -> ScheduleLocalActivity)
-> Lens ScheduleLocalActivity ScheduleLocalActivity Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Text
_ScheduleLocalActivity'activityId
           (\ ScheduleLocalActivity
x__ Text
y__ -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'activityId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity "activityType" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityType"
-> (Text -> f Text)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "activityType"
_
    = ((Text -> f Text)
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Text)
-> (ScheduleLocalActivity -> Text -> ScheduleLocalActivity)
-> Lens ScheduleLocalActivity ScheduleLocalActivity Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Text
_ScheduleLocalActivity'activityType
           (\ ScheduleLocalActivity
x__ Text
y__ -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'activityType = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity "attempt" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attempt"
-> (Word32 -> f Word32)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "attempt"
_
    = ((Word32 -> f Word32)
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Word32)
-> (ScheduleLocalActivity -> Word32 -> ScheduleLocalActivity)
-> Lens ScheduleLocalActivity ScheduleLocalActivity Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Word32
_ScheduleLocalActivity'attempt
           (\ ScheduleLocalActivity
x__ Word32
y__ -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'attempt = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity "originalScheduleTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "originalScheduleTime"
-> (Timestamp -> f Timestamp)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "originalScheduleTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Maybe Timestamp)
-> (ScheduleLocalActivity
    -> Maybe Timestamp -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Maybe Timestamp
_ScheduleLocalActivity'originalScheduleTime
           (\ ScheduleLocalActivity
x__ Maybe Timestamp
y__
              -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'originalScheduleTime = 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 ScheduleLocalActivity "maybe'originalScheduleTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'originalScheduleTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "maybe'originalScheduleTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Maybe Timestamp)
-> (ScheduleLocalActivity
    -> Maybe Timestamp -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Maybe Timestamp
_ScheduleLocalActivity'originalScheduleTime
           (\ ScheduleLocalActivity
x__ Maybe Timestamp
y__
              -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'originalScheduleTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity "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))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "headers"
_
    = ((Map Text Payload -> f (Map Text Payload))
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Map Text Payload -> f (Map Text Payload))
    -> Map Text Payload -> f (Map Text Payload))
-> (Map Text Payload -> f (Map Text Payload))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Map Text Payload)
-> (ScheduleLocalActivity
    -> Map Text Payload -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (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
           ScheduleLocalActivity -> Map Text Payload
_ScheduleLocalActivity'headers
           (\ ScheduleLocalActivity
x__ Map Text Payload
y__ -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'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 ScheduleLocalActivity "arguments" [Proto.Temporal.Api.Common.V1.Message.Payload] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "arguments"
-> ([Payload] -> f [Payload])
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "arguments"
_
    = ((Vector Payload -> f (Vector Payload))
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> (([Payload] -> f [Payload])
    -> Vector Payload -> f (Vector Payload))
-> ([Payload] -> f [Payload])
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Vector Payload)
-> (ScheduleLocalActivity
    -> Vector Payload -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (Vector Payload)
     (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Vector Payload
_ScheduleLocalActivity'arguments
           (\ ScheduleLocalActivity
x__ Vector Payload
y__ -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'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 ScheduleLocalActivity "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))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "vec'arguments"
_
    = ((Vector Payload -> f (Vector Payload))
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Vector Payload -> f (Vector Payload))
    -> Vector Payload -> f (Vector Payload))
-> (Vector Payload -> f (Vector Payload))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Vector Payload)
-> (ScheduleLocalActivity
    -> Vector Payload -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (Vector Payload)
     (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Vector Payload
_ScheduleLocalActivity'arguments
           (\ ScheduleLocalActivity
x__ Vector Payload
y__ -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'arguments = y__}))
        (Vector Payload -> f (Vector Payload))
-> Vector Payload -> f (Vector Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity "scheduleToCloseTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleToCloseTimeout"
-> (Duration -> f Duration)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "scheduleToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Maybe Duration)
-> (ScheduleLocalActivity
    -> Maybe Duration -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'scheduleToCloseTimeout
           (\ ScheduleLocalActivity
x__ Maybe Duration
y__
              -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'scheduleToCloseTimeout = y__}))
        (Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity "maybe'scheduleToCloseTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduleToCloseTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "maybe'scheduleToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Maybe Duration)
-> (ScheduleLocalActivity
    -> Maybe Duration -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'scheduleToCloseTimeout
           (\ ScheduleLocalActivity
x__ Maybe Duration
y__
              -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'scheduleToCloseTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity "scheduleToStartTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleToStartTimeout"
-> (Duration -> f Duration)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "scheduleToStartTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Maybe Duration)
-> (ScheduleLocalActivity
    -> Maybe Duration -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'scheduleToStartTimeout
           (\ ScheduleLocalActivity
x__ Maybe Duration
y__
              -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'scheduleToStartTimeout = y__}))
        (Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity "maybe'scheduleToStartTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduleToStartTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "maybe'scheduleToStartTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Maybe Duration)
-> (ScheduleLocalActivity
    -> Maybe Duration -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'scheduleToStartTimeout
           (\ ScheduleLocalActivity
x__ Maybe Duration
y__
              -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'scheduleToStartTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity "startToCloseTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startToCloseTimeout"
-> (Duration -> f Duration)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "startToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Maybe Duration)
-> (ScheduleLocalActivity
    -> Maybe Duration -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'startToCloseTimeout
           (\ ScheduleLocalActivity
x__ Maybe Duration
y__
              -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'startToCloseTimeout = y__}))
        (Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity "maybe'startToCloseTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startToCloseTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "maybe'startToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Maybe Duration)
-> (ScheduleLocalActivity
    -> Maybe Duration -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'startToCloseTimeout
           (\ ScheduleLocalActivity
x__ Maybe Duration
y__
              -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'startToCloseTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity "retryPolicy" Proto.Temporal.Api.Common.V1.Message.RetryPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryPolicy"
-> (RetryPolicy -> f RetryPolicy)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((RetryPolicy -> f RetryPolicy)
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (RetryPolicy -> f RetryPolicy)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Maybe RetryPolicy)
-> (ScheduleLocalActivity
    -> Maybe RetryPolicy -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Maybe RetryPolicy
_ScheduleLocalActivity'retryPolicy
           (\ ScheduleLocalActivity
x__ Maybe RetryPolicy
y__ -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'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 ScheduleLocalActivity "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))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "maybe'retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Maybe RetryPolicy)
-> (ScheduleLocalActivity
    -> Maybe RetryPolicy -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Maybe RetryPolicy
_ScheduleLocalActivity'retryPolicy
           (\ ScheduleLocalActivity
x__ Maybe RetryPolicy
y__ -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'retryPolicy = y__}))
        (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> Maybe RetryPolicy -> f (Maybe RetryPolicy)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity "localRetryThreshold" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "localRetryThreshold"
-> (Duration -> f Duration)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "localRetryThreshold"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Maybe Duration)
-> (ScheduleLocalActivity
    -> Maybe Duration -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'localRetryThreshold
           (\ ScheduleLocalActivity
x__ Maybe Duration
y__
              -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'localRetryThreshold = 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 ScheduleLocalActivity "maybe'localRetryThreshold" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'localRetryThreshold"
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "maybe'localRetryThreshold"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> Maybe Duration)
-> (ScheduleLocalActivity
    -> Maybe Duration -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'localRetryThreshold
           (\ ScheduleLocalActivity
x__ Maybe Duration
y__
              -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'localRetryThreshold = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity "cancellationType" ActivityCancellationType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cancellationType"
-> (ActivityCancellationType -> f ActivityCancellationType)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
fieldOf Proxy# "cancellationType"
_
    = ((ActivityCancellationType -> f ActivityCancellationType)
 -> ScheduleLocalActivity -> f ScheduleLocalActivity)
-> ((ActivityCancellationType -> f ActivityCancellationType)
    -> ActivityCancellationType -> f ActivityCancellationType)
-> (ActivityCancellationType -> f ActivityCancellationType)
-> ScheduleLocalActivity
-> f ScheduleLocalActivity
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity -> ActivityCancellationType)
-> (ScheduleLocalActivity
    -> ActivityCancellationType -> ScheduleLocalActivity)
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     ActivityCancellationType
     ActivityCancellationType
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity -> ActivityCancellationType
_ScheduleLocalActivity'cancellationType
           (\ ScheduleLocalActivity
x__ ActivityCancellationType
y__ -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'cancellationType = y__}))
        (ActivityCancellationType -> f ActivityCancellationType)
-> ActivityCancellationType -> f ActivityCancellationType
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ScheduleLocalActivity where
  messageName :: Proxy ScheduleLocalActivity -> Text
messageName Proxy ScheduleLocalActivity
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_commands.ScheduleLocalActivity"
  packedMessageDescriptor :: Proxy ScheduleLocalActivity -> ByteString
packedMessageDescriptor Proxy ScheduleLocalActivity
_
    = ByteString
"\n\
      \\NAKScheduleLocalActivity\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2\US\n\
      \\vactivity_id\CAN\STX \SOH(\tR\n\
      \activityId\DC2#\n\
      \\ractivity_type\CAN\ETX \SOH(\tR\factivityType\DC2\CAN\n\
      \\aattempt\CAN\EOT \SOH(\rR\aattempt\DC2P\n\
      \\SYNoriginal_schedule_time\CAN\ENQ \SOH(\v2\SUB.google.protobuf.TimestampR\DC4originalScheduleTime\DC2W\n\
      \\aheaders\CAN\ACK \ETX(\v2=.coresdk.workflow_commands.ScheduleLocalActivity.HeadersEntryR\aheaders\DC2=\n\
      \\targuments\CAN\a \ETX(\v2\US.temporal.api.common.v1.PayloadR\targuments\DC2T\n\
      \\EMschedule_to_close_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToCloseTimeout\DC2T\n\
      \\EMschedule_to_start_timeout\CAN\t \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToStartTimeout\DC2N\n\
      \\SYNstart_to_close_timeout\CAN\n\
      \ \SOH(\v2\EM.google.protobuf.DurationR\DC3startToCloseTimeout\DC2F\n\
      \\fretry_policy\CAN\v \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2M\n\
      \\NAKlocal_retry_threshold\CAN\f \SOH(\v2\EM.google.protobuf.DurationR\DC3localRetryThreshold\DC2`\n\
      \\DC1cancellation_type\CAN\r \SOH(\SO23.coresdk.workflow_commands.ActivityCancellationTypeR\DLEcancellationType\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 ScheduleLocalActivity -> ByteString
packedFileDescriptor Proxy ScheduleLocalActivity
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ScheduleLocalActivity)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor ScheduleLocalActivity
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor ScheduleLocalActivity Word32
-> FieldDescriptor ScheduleLocalActivity
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 ScheduleLocalActivity ScheduleLocalActivity Word32 Word32
-> FieldAccessor ScheduleLocalActivity 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 ScheduleLocalActivity
        activityId__field_descriptor :: FieldDescriptor ScheduleLocalActivity
activityId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ScheduleLocalActivity Text
-> FieldDescriptor ScheduleLocalActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens ScheduleLocalActivity ScheduleLocalActivity Text Text
-> FieldAccessor ScheduleLocalActivity Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"activityId")) ::
              Data.ProtoLens.FieldDescriptor ScheduleLocalActivity
        activityType__field_descriptor :: FieldDescriptor ScheduleLocalActivity
activityType__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ScheduleLocalActivity Text
-> FieldDescriptor ScheduleLocalActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_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 ScheduleLocalActivity ScheduleLocalActivity Text Text
-> FieldAccessor ScheduleLocalActivity 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 @"activityType")) ::
              Data.ProtoLens.FieldDescriptor ScheduleLocalActivity
        attempt__field_descriptor :: FieldDescriptor ScheduleLocalActivity
attempt__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor ScheduleLocalActivity Word32
-> FieldDescriptor ScheduleLocalActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"attempt"
              (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 ScheduleLocalActivity ScheduleLocalActivity Word32 Word32
-> FieldAccessor ScheduleLocalActivity 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 @"attempt")) ::
              Data.ProtoLens.FieldDescriptor ScheduleLocalActivity
        originalScheduleTime__field_descriptor :: FieldDescriptor ScheduleLocalActivity
originalScheduleTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor ScheduleLocalActivity Timestamp
-> FieldDescriptor ScheduleLocalActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"original_schedule_time"
              (MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
              (Lens
  ScheduleLocalActivity
  ScheduleLocalActivity
  (Maybe Timestamp)
  (Maybe Timestamp)
-> FieldAccessor ScheduleLocalActivity 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'originalScheduleTime")) ::
              Data.ProtoLens.FieldDescriptor ScheduleLocalActivity
        headers__field_descriptor :: FieldDescriptor ScheduleLocalActivity
headers__field_descriptor
          = String
-> FieldTypeDescriptor ScheduleLocalActivity'HeadersEntry
-> FieldAccessor
     ScheduleLocalActivity ScheduleLocalActivity'HeadersEntry
-> FieldDescriptor ScheduleLocalActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"headers"
              (MessageOrGroup
-> FieldTypeDescriptor ScheduleLocalActivity'HeadersEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ScheduleLocalActivity'HeadersEntry)
              (Lens' ScheduleLocalActivity'HeadersEntry Text
-> Lens' ScheduleLocalActivity'HeadersEntry Payload
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     (Map Text Payload)
     (Map Text Payload)
-> FieldAccessor
     ScheduleLocalActivity ScheduleLocalActivity'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 ScheduleLocalActivity
        arguments__field_descriptor :: FieldDescriptor ScheduleLocalActivity
arguments__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor ScheduleLocalActivity Payload
-> FieldDescriptor ScheduleLocalActivity
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' ScheduleLocalActivity [Payload]
-> FieldAccessor ScheduleLocalActivity 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 ScheduleLocalActivity
        scheduleToCloseTimeout__field_descriptor :: FieldDescriptor ScheduleLocalActivity
scheduleToCloseTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor ScheduleLocalActivity Duration
-> FieldDescriptor ScheduleLocalActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule_to_close_timeout"
              (MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
              (Lens
  ScheduleLocalActivity
  ScheduleLocalActivity
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor ScheduleLocalActivity Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduleToCloseTimeout")) ::
              Data.ProtoLens.FieldDescriptor ScheduleLocalActivity
        scheduleToStartTimeout__field_descriptor :: FieldDescriptor ScheduleLocalActivity
scheduleToStartTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor ScheduleLocalActivity Duration
-> FieldDescriptor ScheduleLocalActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule_to_start_timeout"
              (MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
              (Lens
  ScheduleLocalActivity
  ScheduleLocalActivity
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor ScheduleLocalActivity Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduleToStartTimeout")) ::
              Data.ProtoLens.FieldDescriptor ScheduleLocalActivity
        startToCloseTimeout__field_descriptor :: FieldDescriptor ScheduleLocalActivity
startToCloseTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor ScheduleLocalActivity Duration
-> FieldDescriptor ScheduleLocalActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_to_close_timeout"
              (MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
              (Lens
  ScheduleLocalActivity
  ScheduleLocalActivity
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor ScheduleLocalActivity Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startToCloseTimeout")) ::
              Data.ProtoLens.FieldDescriptor ScheduleLocalActivity
        retryPolicy__field_descriptor :: FieldDescriptor ScheduleLocalActivity
retryPolicy__field_descriptor
          = String
-> FieldTypeDescriptor RetryPolicy
-> FieldAccessor ScheduleLocalActivity RetryPolicy
-> FieldDescriptor ScheduleLocalActivity
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
  ScheduleLocalActivity
  ScheduleLocalActivity
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> FieldAccessor ScheduleLocalActivity 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 ScheduleLocalActivity
        localRetryThreshold__field_descriptor :: FieldDescriptor ScheduleLocalActivity
localRetryThreshold__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor ScheduleLocalActivity Duration
-> FieldDescriptor ScheduleLocalActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"local_retry_threshold"
              (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
  ScheduleLocalActivity
  ScheduleLocalActivity
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor ScheduleLocalActivity 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'localRetryThreshold")) ::
              Data.ProtoLens.FieldDescriptor ScheduleLocalActivity
        cancellationType__field_descriptor :: FieldDescriptor ScheduleLocalActivity
cancellationType__field_descriptor
          = String
-> FieldTypeDescriptor ActivityCancellationType
-> FieldAccessor ScheduleLocalActivity ActivityCancellationType
-> FieldDescriptor ScheduleLocalActivity
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cancellation_type"
              (ScalarField ActivityCancellationType
-> FieldTypeDescriptor ActivityCancellationType
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ActivityCancellationType
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor ActivityCancellationType)
              (WireDefault ActivityCancellationType
-> Lens
     ScheduleLocalActivity
     ScheduleLocalActivity
     ActivityCancellationType
     ActivityCancellationType
-> FieldAccessor ScheduleLocalActivity ActivityCancellationType
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ActivityCancellationType
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cancellationType")) ::
              Data.ProtoLens.FieldDescriptor ScheduleLocalActivity
      in
        [(Tag, FieldDescriptor ScheduleLocalActivity)]
-> Map Tag (FieldDescriptor ScheduleLocalActivity)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ScheduleLocalActivity
seq__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ScheduleLocalActivity
activityId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ScheduleLocalActivity
activityType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ScheduleLocalActivity
attempt__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ScheduleLocalActivity
originalScheduleTime__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ScheduleLocalActivity
headers__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor ScheduleLocalActivity
arguments__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor ScheduleLocalActivity
scheduleToCloseTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor ScheduleLocalActivity
scheduleToStartTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor ScheduleLocalActivity
startToCloseTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor ScheduleLocalActivity
retryPolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor ScheduleLocalActivity
localRetryThreshold__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor ScheduleLocalActivity
cancellationType__field_descriptor)]
  unknownFields :: Lens' ScheduleLocalActivity FieldSet
unknownFields
    = (ScheduleLocalActivity -> FieldSet)
-> (ScheduleLocalActivity -> FieldSet -> ScheduleLocalActivity)
-> Lens' ScheduleLocalActivity FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ScheduleLocalActivity -> FieldSet
_ScheduleLocalActivity'_unknownFields
        (\ ScheduleLocalActivity
x__ FieldSet
y__ -> ScheduleLocalActivity
x__ {_ScheduleLocalActivity'_unknownFields = y__})
  defMessage :: ScheduleLocalActivity
defMessage
    = ScheduleLocalActivity'_constructor
        {_ScheduleLocalActivity'seq :: Word32
_ScheduleLocalActivity'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScheduleLocalActivity'activityId :: Text
_ScheduleLocalActivity'activityId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScheduleLocalActivity'activityType :: Text
_ScheduleLocalActivity'activityType = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScheduleLocalActivity'attempt :: Word32
_ScheduleLocalActivity'attempt = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScheduleLocalActivity'originalScheduleTime :: Maybe Timestamp
_ScheduleLocalActivity'originalScheduleTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _ScheduleLocalActivity'headers :: Map Text Payload
_ScheduleLocalActivity'headers = Map Text Payload
forall k a. Map k a
Data.Map.empty,
         _ScheduleLocalActivity'arguments :: Vector Payload
_ScheduleLocalActivity'arguments = Vector Payload
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ScheduleLocalActivity'scheduleToCloseTimeout :: Maybe Duration
_ScheduleLocalActivity'scheduleToCloseTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _ScheduleLocalActivity'scheduleToStartTimeout :: Maybe Duration
_ScheduleLocalActivity'scheduleToStartTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _ScheduleLocalActivity'startToCloseTimeout :: Maybe Duration
_ScheduleLocalActivity'startToCloseTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _ScheduleLocalActivity'retryPolicy :: Maybe RetryPolicy
_ScheduleLocalActivity'retryPolicy = Maybe RetryPolicy
forall a. Maybe a
Prelude.Nothing,
         _ScheduleLocalActivity'localRetryThreshold :: Maybe Duration
_ScheduleLocalActivity'localRetryThreshold = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _ScheduleLocalActivity'cancellationType :: ActivityCancellationType
_ScheduleLocalActivity'cancellationType = ActivityCancellationType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScheduleLocalActivity'_unknownFields :: FieldSet
_ScheduleLocalActivity'_unknownFields = []}
  parseMessage :: Parser ScheduleLocalActivity
parseMessage
    = let
        loop ::
          ScheduleLocalActivity
          -> 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 ScheduleLocalActivity
        loop :: ScheduleLocalActivity
-> Growing Vector RealWorld Payload -> Parser ScheduleLocalActivity
loop ScheduleLocalActivity
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
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)
                                  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
"activity_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"activityId") y x)
                                  mutable'arguments
                        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
"activity_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"activityType") y x)
                                  mutable'arguments
                        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
"attempt"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"attempt") y x)
                                  mutable'arguments
                        Word64
42
                          -> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"original_schedule_time"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"originalScheduleTime") y x)
                                  mutable'arguments
                        Word64
50
                          -> do !(entry :: ScheduleLocalActivity'HeadersEntry) <- Parser ScheduleLocalActivity'HeadersEntry
-> String -> Parser ScheduleLocalActivity'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
  ScheduleLocalActivity'HeadersEntry
  ScheduleLocalActivity'HeadersEntry
  Text
  Text
-> ScheduleLocalActivity'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") ScheduleLocalActivity'HeadersEntry
entry
                                   value
                                     = FoldLike
  Payload
  ScheduleLocalActivity'HeadersEntry
  ScheduleLocalActivity'HeadersEntry
  Payload
  Payload
-> ScheduleLocalActivity'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") ScheduleLocalActivity'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
58
                          -> 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
66
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"schedule_to_close_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduleToCloseTimeout") 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
"schedule_to_start_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduleToStartTimeout") 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
"start_to_close_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startToCloseTimeout") y x)
                                  mutable'arguments
                        Word64
90
                          -> 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
98
                          -> 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
"local_retry_threshold"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"localRetryThreshold") y x)
                                  mutable'arguments
                        Word64
104
                          -> do y <- Parser ActivityCancellationType
-> String -> Parser ActivityCancellationType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> ActivityCancellationType)
-> Parser Int -> Parser ActivityCancellationType
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> ActivityCancellationType
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
"cancellation_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cancellationType") 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 ScheduleLocalActivity
-> String -> Parser ScheduleLocalActivity
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
"ScheduleLocalActivity"
  buildMessage :: ScheduleLocalActivity -> Builder
buildMessage
    = \ ScheduleLocalActivity
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike
  Word32 ScheduleLocalActivity ScheduleLocalActivity Word32 Word32
-> ScheduleLocalActivity -> 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") ScheduleLocalActivity
_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.<>)
                (let
                   _v :: Text
_v
                     = FoldLike Text ScheduleLocalActivity ScheduleLocalActivity Text Text
-> ScheduleLocalActivity -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"activityId") ScheduleLocalActivity
_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 ScheduleLocalActivity ScheduleLocalActivity Text Text
-> ScheduleLocalActivity -> 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 @"activityType") ScheduleLocalActivity
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Word32
_v = FoldLike
  Word32 ScheduleLocalActivity ScheduleLocalActivity Word32 Word32
-> ScheduleLocalActivity -> 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 @"attempt") ScheduleLocalActivity
_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.<>)
                         (case
                              FoldLike
  (Maybe Timestamp)
  ScheduleLocalActivity
  ScheduleLocalActivity
  (Maybe Timestamp)
  (Maybe Timestamp)
-> ScheduleLocalActivity -> 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'originalScheduleTime") ScheduleLocalActivity
_x
                          of
                            Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just Timestamp
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            ([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
50)
                                          ((ByteString -> Builder)
-> (ScheduleLocalActivity'HeadersEntry -> ByteString)
-> ScheduleLocalActivity'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))
                                             ScheduleLocalActivity'HeadersEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                             (Setter
  ScheduleLocalActivity'HeadersEntry
  ScheduleLocalActivity'HeadersEntry
  Text
  Text
-> Text
-> ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'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
  ScheduleLocalActivity'HeadersEntry
  ScheduleLocalActivity'HeadersEntry
  Payload
  Payload
-> Payload
-> ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'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)
                                                   (ScheduleLocalActivity'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                      ScheduleLocalActivity'HeadersEntry)))))
                                  (Map Text Payload -> [(Text, Payload)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                     (FoldLike
  (Map Text Payload)
  ScheduleLocalActivity
  ScheduleLocalActivity
  (Map Text Payload)
  (Map Text Payload)
-> ScheduleLocalActivity -> 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") ScheduleLocalActivity
_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
58)
                                          ((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)
  ScheduleLocalActivity
  ScheduleLocalActivity
  (Vector Payload)
  (Vector Payload)
-> ScheduleLocalActivity -> 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") ScheduleLocalActivity
_x))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (case
                                       FoldLike
  (Maybe Duration)
  ScheduleLocalActivity
  ScheduleLocalActivity
  (Maybe Duration)
  (Maybe Duration)
-> ScheduleLocalActivity -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                            @"maybe'scheduleToCloseTimeout")
                                         ScheduleLocalActivity
_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)
  ScheduleLocalActivity
  ScheduleLocalActivity
  (Maybe Duration)
  (Maybe Duration)
-> ScheduleLocalActivity -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                               @"maybe'scheduleToStartTimeout")
                                            ScheduleLocalActivity
_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)
  ScheduleLocalActivity
  ScheduleLocalActivity
  (Maybe Duration)
  (Maybe Duration)
-> ScheduleLocalActivity -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                  @"maybe'startToCloseTimeout")
                                               ScheduleLocalActivity
_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.<>)
                                           (case
                                                FoldLike
  (Maybe RetryPolicy)
  ScheduleLocalActivity
  ScheduleLocalActivity
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> ScheduleLocalActivity -> 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")
                                                  ScheduleLocalActivity
_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
90)
                                                     ((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.<>)
                                              (case
                                                   FoldLike
  (Maybe Duration)
  ScheduleLocalActivity
  ScheduleLocalActivity
  (Maybe Duration)
  (Maybe Duration)
-> ScheduleLocalActivity -> 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'localRetryThreshold")
                                                     ScheduleLocalActivity
_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
98)
                                                        ((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 :: ActivityCancellationType
_v
                                                      = FoldLike
  ActivityCancellationType
  ScheduleLocalActivity
  ScheduleLocalActivity
  ActivityCancellationType
  ActivityCancellationType
-> ScheduleLocalActivity -> ActivityCancellationType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                          (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                             @"cancellationType")
                                                          ScheduleLocalActivity
_x
                                                  in
                                                    if ActivityCancellationType -> ActivityCancellationType -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
                                                         ActivityCancellationType
_v ActivityCancellationType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                        Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                    else
                                                        Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                             Word64
104)
                                                          ((Int -> Builder)
-> (ActivityCancellationType -> Int)
-> ActivityCancellationType
-> 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)
                                                             ActivityCancellationType -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum ActivityCancellationType
_v))
                                                 (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                                    (FoldLike
  FieldSet
  ScheduleLocalActivity
  ScheduleLocalActivity
  FieldSet
  FieldSet
-> ScheduleLocalActivity -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                       FoldLike
  FieldSet
  ScheduleLocalActivity
  ScheduleLocalActivity
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ScheduleLocalActivity FieldSet
Data.ProtoLens.unknownFields ScheduleLocalActivity
_x))))))))))))))
instance Control.DeepSeq.NFData ScheduleLocalActivity where
  rnf :: ScheduleLocalActivity -> ()
rnf
    = \ ScheduleLocalActivity
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ScheduleLocalActivity -> FieldSet
_ScheduleLocalActivity'_unknownFields ScheduleLocalActivity
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ScheduleLocalActivity -> Word32
_ScheduleLocalActivity'seq ScheduleLocalActivity
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ScheduleLocalActivity -> Text
_ScheduleLocalActivity'activityId ScheduleLocalActivity
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ScheduleLocalActivity -> Text
_ScheduleLocalActivity'activityType ScheduleLocalActivity
x__)
                      (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ScheduleLocalActivity -> Word32
_ScheduleLocalActivity'attempt ScheduleLocalActivity
x__)
                         (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ScheduleLocalActivity -> Maybe Timestamp
_ScheduleLocalActivity'originalScheduleTime ScheduleLocalActivity
x__)
                            (Map Text Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ScheduleLocalActivity -> Map Text Payload
_ScheduleLocalActivity'headers ScheduleLocalActivity
x__)
                               (Vector Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (ScheduleLocalActivity -> Vector Payload
_ScheduleLocalActivity'arguments ScheduleLocalActivity
x__)
                                  (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'scheduleToCloseTimeout ScheduleLocalActivity
x__)
                                     (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'scheduleToStartTimeout ScheduleLocalActivity
x__)
                                        (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'startToCloseTimeout ScheduleLocalActivity
x__)
                                           (Maybe RetryPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (ScheduleLocalActivity -> Maybe RetryPolicy
_ScheduleLocalActivity'retryPolicy ScheduleLocalActivity
x__)
                                              (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (ScheduleLocalActivity -> Maybe Duration
_ScheduleLocalActivity'localRetryThreshold ScheduleLocalActivity
x__)
                                                 (ActivityCancellationType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (ScheduleLocalActivity -> ActivityCancellationType
_ScheduleLocalActivity'cancellationType ScheduleLocalActivity
x__)
                                                    ())))))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.key' @:: Lens' ScheduleLocalActivity'HeadersEntry Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.value' @:: Lens' ScheduleLocalActivity'HeadersEntry Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'value' @:: Lens' ScheduleLocalActivity'HeadersEntry (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data ScheduleLocalActivity'HeadersEntry
  = ScheduleLocalActivity'HeadersEntry'_constructor {ScheduleLocalActivity'HeadersEntry -> Text
_ScheduleLocalActivity'HeadersEntry'key :: !Data.Text.Text,
                                                     ScheduleLocalActivity'HeadersEntry -> Maybe Payload
_ScheduleLocalActivity'HeadersEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                                     ScheduleLocalActivity'HeadersEntry -> FieldSet
_ScheduleLocalActivity'HeadersEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Bool
(ScheduleLocalActivity'HeadersEntry
 -> ScheduleLocalActivity'HeadersEntry -> Bool)
-> (ScheduleLocalActivity'HeadersEntry
    -> ScheduleLocalActivity'HeadersEntry -> Bool)
-> Eq ScheduleLocalActivity'HeadersEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Bool
== :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Bool
$c/= :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Bool
/= :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Bool
Prelude.Eq, Eq ScheduleLocalActivity'HeadersEntry
Eq ScheduleLocalActivity'HeadersEntry =>
(ScheduleLocalActivity'HeadersEntry
 -> ScheduleLocalActivity'HeadersEntry -> Ordering)
-> (ScheduleLocalActivity'HeadersEntry
    -> ScheduleLocalActivity'HeadersEntry -> Bool)
-> (ScheduleLocalActivity'HeadersEntry
    -> ScheduleLocalActivity'HeadersEntry -> Bool)
-> (ScheduleLocalActivity'HeadersEntry
    -> ScheduleLocalActivity'HeadersEntry -> Bool)
-> (ScheduleLocalActivity'HeadersEntry
    -> ScheduleLocalActivity'HeadersEntry -> Bool)
-> (ScheduleLocalActivity'HeadersEntry
    -> ScheduleLocalActivity'HeadersEntry
    -> ScheduleLocalActivity'HeadersEntry)
-> (ScheduleLocalActivity'HeadersEntry
    -> ScheduleLocalActivity'HeadersEntry
    -> ScheduleLocalActivity'HeadersEntry)
-> Ord ScheduleLocalActivity'HeadersEntry
ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Bool
ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Ordering
ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'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 :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Ordering
compare :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Ordering
$c< :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Bool
< :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Bool
$c<= :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Bool
<= :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Bool
$c> :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Bool
> :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Bool
$c>= :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Bool
>= :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry -> Bool
$cmax :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry
max :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry
$cmin :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry
min :: ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry
-> ScheduleLocalActivity'HeadersEntry
Prelude.Ord)
instance Prelude.Show ScheduleLocalActivity'HeadersEntry where
  showsPrec :: Int -> ScheduleLocalActivity'HeadersEntry -> ShowS
showsPrec Int
_ ScheduleLocalActivity'HeadersEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ScheduleLocalActivity'HeadersEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ScheduleLocalActivity'HeadersEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity'HeadersEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> ScheduleLocalActivity'HeadersEntry
-> f ScheduleLocalActivity'HeadersEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> ScheduleLocalActivity'HeadersEntry
 -> f ScheduleLocalActivity'HeadersEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ScheduleLocalActivity'HeadersEntry
-> f ScheduleLocalActivity'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity'HeadersEntry -> Text)
-> (ScheduleLocalActivity'HeadersEntry
    -> Text -> ScheduleLocalActivity'HeadersEntry)
-> Lens' ScheduleLocalActivity'HeadersEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity'HeadersEntry -> Text
_ScheduleLocalActivity'HeadersEntry'key
           (\ ScheduleLocalActivity'HeadersEntry
x__ Text
y__ -> ScheduleLocalActivity'HeadersEntry
x__ {_ScheduleLocalActivity'HeadersEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScheduleLocalActivity'HeadersEntry "value" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Payload -> f Payload)
-> ScheduleLocalActivity'HeadersEntry
-> f ScheduleLocalActivity'HeadersEntry
fieldOf Proxy# "value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> ScheduleLocalActivity'HeadersEntry
 -> f ScheduleLocalActivity'HeadersEntry)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> ScheduleLocalActivity'HeadersEntry
-> f ScheduleLocalActivity'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity'HeadersEntry -> Maybe Payload)
-> (ScheduleLocalActivity'HeadersEntry
    -> Maybe Payload -> ScheduleLocalActivity'HeadersEntry)
-> Lens
     ScheduleLocalActivity'HeadersEntry
     ScheduleLocalActivity'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity'HeadersEntry -> Maybe Payload
_ScheduleLocalActivity'HeadersEntry'value
           (\ ScheduleLocalActivity'HeadersEntry
x__ Maybe Payload
y__
              -> ScheduleLocalActivity'HeadersEntry
x__ {_ScheduleLocalActivity'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 ScheduleLocalActivity'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))
-> ScheduleLocalActivity'HeadersEntry
-> f ScheduleLocalActivity'HeadersEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> ScheduleLocalActivity'HeadersEntry
 -> f ScheduleLocalActivity'HeadersEntry)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> ScheduleLocalActivity'HeadersEntry
-> f ScheduleLocalActivity'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScheduleLocalActivity'HeadersEntry -> Maybe Payload)
-> (ScheduleLocalActivity'HeadersEntry
    -> Maybe Payload -> ScheduleLocalActivity'HeadersEntry)
-> Lens
     ScheduleLocalActivity'HeadersEntry
     ScheduleLocalActivity'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScheduleLocalActivity'HeadersEntry -> Maybe Payload
_ScheduleLocalActivity'HeadersEntry'value
           (\ ScheduleLocalActivity'HeadersEntry
x__ Maybe Payload
y__
              -> ScheduleLocalActivity'HeadersEntry
x__ {_ScheduleLocalActivity'HeadersEntry'value = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ScheduleLocalActivity'HeadersEntry where
  messageName :: Proxy ScheduleLocalActivity'HeadersEntry -> Text
messageName Proxy ScheduleLocalActivity'HeadersEntry
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.ScheduleLocalActivity.HeadersEntry"
  packedMessageDescriptor :: Proxy ScheduleLocalActivity'HeadersEntry -> ByteString
packedMessageDescriptor Proxy ScheduleLocalActivity'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 ScheduleLocalActivity'HeadersEntry -> ByteString
packedFileDescriptor Proxy ScheduleLocalActivity'HeadersEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ScheduleLocalActivity'HeadersEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor ScheduleLocalActivity'HeadersEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ScheduleLocalActivity'HeadersEntry Text
-> FieldDescriptor ScheduleLocalActivity'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' ScheduleLocalActivity'HeadersEntry Text
-> FieldAccessor ScheduleLocalActivity'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 ScheduleLocalActivity'HeadersEntry
        value__field_descriptor :: FieldDescriptor ScheduleLocalActivity'HeadersEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor ScheduleLocalActivity'HeadersEntry Payload
-> FieldDescriptor ScheduleLocalActivity'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
  ScheduleLocalActivity'HeadersEntry
  ScheduleLocalActivity'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor ScheduleLocalActivity'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 ScheduleLocalActivity'HeadersEntry
      in
        [(Tag, FieldDescriptor ScheduleLocalActivity'HeadersEntry)]
-> Map Tag (FieldDescriptor ScheduleLocalActivity'HeadersEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ScheduleLocalActivity'HeadersEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ScheduleLocalActivity'HeadersEntry
value__field_descriptor)]
  unknownFields :: Lens' ScheduleLocalActivity'HeadersEntry FieldSet
unknownFields
    = (ScheduleLocalActivity'HeadersEntry -> FieldSet)
-> (ScheduleLocalActivity'HeadersEntry
    -> FieldSet -> ScheduleLocalActivity'HeadersEntry)
-> Lens' ScheduleLocalActivity'HeadersEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ScheduleLocalActivity'HeadersEntry -> FieldSet
_ScheduleLocalActivity'HeadersEntry'_unknownFields
        (\ ScheduleLocalActivity'HeadersEntry
x__ FieldSet
y__
           -> ScheduleLocalActivity'HeadersEntry
x__ {_ScheduleLocalActivity'HeadersEntry'_unknownFields = y__})
  defMessage :: ScheduleLocalActivity'HeadersEntry
defMessage
    = ScheduleLocalActivity'HeadersEntry'_constructor
        {_ScheduleLocalActivity'HeadersEntry'key :: Text
_ScheduleLocalActivity'HeadersEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScheduleLocalActivity'HeadersEntry'value :: Maybe Payload
_ScheduleLocalActivity'HeadersEntry'value = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _ScheduleLocalActivity'HeadersEntry'_unknownFields :: FieldSet
_ScheduleLocalActivity'HeadersEntry'_unknownFields = []}
  parseMessage :: Parser ScheduleLocalActivity'HeadersEntry
parseMessage
    = let
        loop ::
          ScheduleLocalActivity'HeadersEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser ScheduleLocalActivity'HeadersEntry
        loop :: ScheduleLocalActivity'HeadersEntry
-> Parser ScheduleLocalActivity'HeadersEntry
loop ScheduleLocalActivity'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 ScheduleLocalActivity'HeadersEntry
-> String -> Parser ScheduleLocalActivity'HeadersEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ScheduleLocalActivity'HeadersEntry
-> Parser ScheduleLocalActivity'HeadersEntry
loop ScheduleLocalActivity'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"HeadersEntry"
  buildMessage :: ScheduleLocalActivity'HeadersEntry -> Builder
buildMessage
    = \ ScheduleLocalActivity'HeadersEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  ScheduleLocalActivity'HeadersEntry
  ScheduleLocalActivity'HeadersEntry
  Text
  Text
-> ScheduleLocalActivity'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") ScheduleLocalActivity'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)
  ScheduleLocalActivity'HeadersEntry
  ScheduleLocalActivity'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> ScheduleLocalActivity'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") ScheduleLocalActivity'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
  ScheduleLocalActivity'HeadersEntry
  ScheduleLocalActivity'HeadersEntry
  FieldSet
  FieldSet
-> ScheduleLocalActivity'HeadersEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ScheduleLocalActivity'HeadersEntry
  ScheduleLocalActivity'HeadersEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ScheduleLocalActivity'HeadersEntry FieldSet
Data.ProtoLens.unknownFields ScheduleLocalActivity'HeadersEntry
_x)))
instance Control.DeepSeq.NFData ScheduleLocalActivity'HeadersEntry where
  rnf :: ScheduleLocalActivity'HeadersEntry -> ()
rnf
    = \ ScheduleLocalActivity'HeadersEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ScheduleLocalActivity'HeadersEntry -> FieldSet
_ScheduleLocalActivity'HeadersEntry'_unknownFields ScheduleLocalActivity'HeadersEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ScheduleLocalActivity'HeadersEntry -> Text
_ScheduleLocalActivity'HeadersEntry'key ScheduleLocalActivity'HeadersEntry
x__)
                (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ScheduleLocalActivity'HeadersEntry -> Maybe Payload
_ScheduleLocalActivity'HeadersEntry'value ScheduleLocalActivity'HeadersEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.patchId' @:: Lens' SetPatchMarker Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.deprecated' @:: Lens' SetPatchMarker Prelude.Bool@ -}
data SetPatchMarker
  = SetPatchMarker'_constructor {SetPatchMarker -> Text
_SetPatchMarker'patchId :: !Data.Text.Text,
                                 SetPatchMarker -> Bool
_SetPatchMarker'deprecated :: !Prelude.Bool,
                                 SetPatchMarker -> FieldSet
_SetPatchMarker'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SetPatchMarker -> SetPatchMarker -> Bool
(SetPatchMarker -> SetPatchMarker -> Bool)
-> (SetPatchMarker -> SetPatchMarker -> Bool) -> Eq SetPatchMarker
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SetPatchMarker -> SetPatchMarker -> Bool
== :: SetPatchMarker -> SetPatchMarker -> Bool
$c/= :: SetPatchMarker -> SetPatchMarker -> Bool
/= :: SetPatchMarker -> SetPatchMarker -> Bool
Prelude.Eq, Eq SetPatchMarker
Eq SetPatchMarker =>
(SetPatchMarker -> SetPatchMarker -> Ordering)
-> (SetPatchMarker -> SetPatchMarker -> Bool)
-> (SetPatchMarker -> SetPatchMarker -> Bool)
-> (SetPatchMarker -> SetPatchMarker -> Bool)
-> (SetPatchMarker -> SetPatchMarker -> Bool)
-> (SetPatchMarker -> SetPatchMarker -> SetPatchMarker)
-> (SetPatchMarker -> SetPatchMarker -> SetPatchMarker)
-> Ord SetPatchMarker
SetPatchMarker -> SetPatchMarker -> Bool
SetPatchMarker -> SetPatchMarker -> Ordering
SetPatchMarker -> SetPatchMarker -> SetPatchMarker
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 :: SetPatchMarker -> SetPatchMarker -> Ordering
compare :: SetPatchMarker -> SetPatchMarker -> Ordering
$c< :: SetPatchMarker -> SetPatchMarker -> Bool
< :: SetPatchMarker -> SetPatchMarker -> Bool
$c<= :: SetPatchMarker -> SetPatchMarker -> Bool
<= :: SetPatchMarker -> SetPatchMarker -> Bool
$c> :: SetPatchMarker -> SetPatchMarker -> Bool
> :: SetPatchMarker -> SetPatchMarker -> Bool
$c>= :: SetPatchMarker -> SetPatchMarker -> Bool
>= :: SetPatchMarker -> SetPatchMarker -> Bool
$cmax :: SetPatchMarker -> SetPatchMarker -> SetPatchMarker
max :: SetPatchMarker -> SetPatchMarker -> SetPatchMarker
$cmin :: SetPatchMarker -> SetPatchMarker -> SetPatchMarker
min :: SetPatchMarker -> SetPatchMarker -> SetPatchMarker
Prelude.Ord)
instance Prelude.Show SetPatchMarker where
  showsPrec :: Int -> SetPatchMarker -> ShowS
showsPrec Int
_ SetPatchMarker
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (SetPatchMarker -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SetPatchMarker
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField SetPatchMarker "patchId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "patchId"
-> (Text -> f Text) -> SetPatchMarker -> f SetPatchMarker
fieldOf Proxy# "patchId"
_
    = ((Text -> f Text) -> SetPatchMarker -> f SetPatchMarker)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SetPatchMarker
-> f SetPatchMarker
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SetPatchMarker -> Text)
-> (SetPatchMarker -> Text -> SetPatchMarker)
-> Lens SetPatchMarker SetPatchMarker Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SetPatchMarker -> Text
_SetPatchMarker'patchId
           (\ SetPatchMarker
x__ Text
y__ -> SetPatchMarker
x__ {_SetPatchMarker'patchId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SetPatchMarker "deprecated" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "deprecated"
-> (Bool -> f Bool) -> SetPatchMarker -> f SetPatchMarker
fieldOf Proxy# "deprecated"
_
    = ((Bool -> f Bool) -> SetPatchMarker -> f SetPatchMarker)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> SetPatchMarker
-> f SetPatchMarker
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SetPatchMarker -> Bool)
-> (SetPatchMarker -> Bool -> SetPatchMarker)
-> Lens SetPatchMarker SetPatchMarker Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SetPatchMarker -> Bool
_SetPatchMarker'deprecated
           (\ SetPatchMarker
x__ Bool
y__ -> SetPatchMarker
x__ {_SetPatchMarker'deprecated = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SetPatchMarker where
  messageName :: Proxy SetPatchMarker -> Text
messageName Proxy SetPatchMarker
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_commands.SetPatchMarker"
  packedMessageDescriptor :: Proxy SetPatchMarker -> ByteString
packedMessageDescriptor Proxy SetPatchMarker
_
    = ByteString
"\n\
      \\SOSetPatchMarker\DC2\EM\n\
      \\bpatch_id\CAN\SOH \SOH(\tR\apatchId\DC2\RS\n\
      \\n\
      \deprecated\CAN\STX \SOH(\bR\n\
      \deprecated"
  packedFileDescriptor :: Proxy SetPatchMarker -> ByteString
packedFileDescriptor Proxy SetPatchMarker
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor SetPatchMarker)
fieldsByTag
    = let
        patchId__field_descriptor :: FieldDescriptor SetPatchMarker
patchId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SetPatchMarker Text
-> FieldDescriptor SetPatchMarker
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 SetPatchMarker SetPatchMarker Text Text
-> FieldAccessor SetPatchMarker 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 SetPatchMarker
        deprecated__field_descriptor :: FieldDescriptor SetPatchMarker
deprecated__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor SetPatchMarker Bool
-> FieldDescriptor SetPatchMarker
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"deprecated"
              (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 SetPatchMarker SetPatchMarker Bool Bool
-> FieldAccessor SetPatchMarker 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 @"deprecated")) ::
              Data.ProtoLens.FieldDescriptor SetPatchMarker
      in
        [(Tag, FieldDescriptor SetPatchMarker)]
-> Map Tag (FieldDescriptor SetPatchMarker)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor SetPatchMarker
patchId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor SetPatchMarker
deprecated__field_descriptor)]
  unknownFields :: Lens' SetPatchMarker FieldSet
unknownFields
    = (SetPatchMarker -> FieldSet)
-> (SetPatchMarker -> FieldSet -> SetPatchMarker)
-> Lens' SetPatchMarker FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SetPatchMarker -> FieldSet
_SetPatchMarker'_unknownFields
        (\ SetPatchMarker
x__ FieldSet
y__ -> SetPatchMarker
x__ {_SetPatchMarker'_unknownFields = y__})
  defMessage :: SetPatchMarker
defMessage
    = SetPatchMarker'_constructor
        {_SetPatchMarker'patchId :: Text
_SetPatchMarker'patchId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SetPatchMarker'deprecated :: Bool
_SetPatchMarker'deprecated = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SetPatchMarker'_unknownFields :: FieldSet
_SetPatchMarker'_unknownFields = []}
  parseMessage :: Parser SetPatchMarker
parseMessage
    = let
        loop ::
          SetPatchMarker
          -> Data.ProtoLens.Encoding.Bytes.Parser SetPatchMarker
        loop :: SetPatchMarker -> Parser SetPatchMarker
loop SetPatchMarker
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
16
                          -> 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
"deprecated"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"deprecated") 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 SetPatchMarker -> String -> Parser SetPatchMarker
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do SetPatchMarker -> Parser SetPatchMarker
loop SetPatchMarker
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"SetPatchMarker"
  buildMessage :: SetPatchMarker -> Builder
buildMessage
    = \ SetPatchMarker
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike Text SetPatchMarker SetPatchMarker Text Text
-> SetPatchMarker -> 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") SetPatchMarker
_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 :: Bool
_v
                     = FoldLike Bool SetPatchMarker SetPatchMarker Bool Bool
-> SetPatchMarker -> 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 @"deprecated") SetPatchMarker
_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
16)
                         ((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 SetPatchMarker SetPatchMarker FieldSet FieldSet
-> SetPatchMarker -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet SetPatchMarker SetPatchMarker FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SetPatchMarker FieldSet
Data.ProtoLens.unknownFields SetPatchMarker
_x)))
instance Control.DeepSeq.NFData SetPatchMarker where
  rnf :: SetPatchMarker -> ()
rnf
    = \ SetPatchMarker
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SetPatchMarker -> FieldSet
_SetPatchMarker'_unknownFields SetPatchMarker
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SetPatchMarker -> Text
_SetPatchMarker'patchId SetPatchMarker
x__)
                (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (SetPatchMarker -> Bool
_SetPatchMarker'deprecated SetPatchMarker
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.seq' @:: Lens' SignalExternalWorkflowExecution Data.Word.Word32@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.signalName' @:: Lens' SignalExternalWorkflowExecution Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.args' @:: Lens' SignalExternalWorkflowExecution [Proto.Temporal.Api.Common.V1.Message.Payload]@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.vec'args' @:: Lens' SignalExternalWorkflowExecution (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.headers' @:: Lens' SignalExternalWorkflowExecution (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'target' @:: Lens' SignalExternalWorkflowExecution (Prelude.Maybe SignalExternalWorkflowExecution'Target)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'workflowExecution' @:: Lens' SignalExternalWorkflowExecution (Prelude.Maybe Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.workflowExecution' @:: Lens' SignalExternalWorkflowExecution Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'childWorkflowId' @:: Lens' SignalExternalWorkflowExecution (Prelude.Maybe Data.Text.Text)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.childWorkflowId' @:: Lens' SignalExternalWorkflowExecution Data.Text.Text@ -}
data SignalExternalWorkflowExecution
  = SignalExternalWorkflowExecution'_constructor {SignalExternalWorkflowExecution -> Word32
_SignalExternalWorkflowExecution'seq :: !Data.Word.Word32,
                                                  SignalExternalWorkflowExecution -> Text
_SignalExternalWorkflowExecution'signalName :: !Data.Text.Text,
                                                  SignalExternalWorkflowExecution -> Vector Payload
_SignalExternalWorkflowExecution'args :: !(Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload),
                                                  SignalExternalWorkflowExecution -> Map Text Payload
_SignalExternalWorkflowExecution'headers :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload),
                                                  SignalExternalWorkflowExecution
-> Maybe SignalExternalWorkflowExecution'Target
_SignalExternalWorkflowExecution'target :: !(Prelude.Maybe SignalExternalWorkflowExecution'Target),
                                                  SignalExternalWorkflowExecution -> FieldSet
_SignalExternalWorkflowExecution'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Bool
(SignalExternalWorkflowExecution
 -> SignalExternalWorkflowExecution -> Bool)
-> (SignalExternalWorkflowExecution
    -> SignalExternalWorkflowExecution -> Bool)
-> Eq SignalExternalWorkflowExecution
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Bool
== :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Bool
$c/= :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Bool
/= :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Bool
Prelude.Eq, Eq SignalExternalWorkflowExecution
Eq SignalExternalWorkflowExecution =>
(SignalExternalWorkflowExecution
 -> SignalExternalWorkflowExecution -> Ordering)
-> (SignalExternalWorkflowExecution
    -> SignalExternalWorkflowExecution -> Bool)
-> (SignalExternalWorkflowExecution
    -> SignalExternalWorkflowExecution -> Bool)
-> (SignalExternalWorkflowExecution
    -> SignalExternalWorkflowExecution -> Bool)
-> (SignalExternalWorkflowExecution
    -> SignalExternalWorkflowExecution -> Bool)
-> (SignalExternalWorkflowExecution
    -> SignalExternalWorkflowExecution
    -> SignalExternalWorkflowExecution)
-> (SignalExternalWorkflowExecution
    -> SignalExternalWorkflowExecution
    -> SignalExternalWorkflowExecution)
-> Ord SignalExternalWorkflowExecution
SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Bool
SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Ordering
SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution
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 :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Ordering
compare :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Ordering
$c< :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Bool
< :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Bool
$c<= :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Bool
<= :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Bool
$c> :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Bool
> :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Bool
$c>= :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Bool
>= :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution -> Bool
$cmax :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution
max :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution
$cmin :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution
min :: SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution
-> SignalExternalWorkflowExecution
Prelude.Ord)
instance Prelude.Show SignalExternalWorkflowExecution where
  showsPrec :: Int -> SignalExternalWorkflowExecution -> ShowS
showsPrec Int
_ SignalExternalWorkflowExecution
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (SignalExternalWorkflowExecution -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SignalExternalWorkflowExecution
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data SignalExternalWorkflowExecution'Target
  = SignalExternalWorkflowExecution'WorkflowExecution !Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution |
    SignalExternalWorkflowExecution'ChildWorkflowId !Data.Text.Text
  deriving stock (Int -> SignalExternalWorkflowExecution'Target -> ShowS
[SignalExternalWorkflowExecution'Target] -> ShowS
SignalExternalWorkflowExecution'Target -> String
(Int -> SignalExternalWorkflowExecution'Target -> ShowS)
-> (SignalExternalWorkflowExecution'Target -> String)
-> ([SignalExternalWorkflowExecution'Target] -> ShowS)
-> Show SignalExternalWorkflowExecution'Target
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SignalExternalWorkflowExecution'Target -> ShowS
showsPrec :: Int -> SignalExternalWorkflowExecution'Target -> ShowS
$cshow :: SignalExternalWorkflowExecution'Target -> String
show :: SignalExternalWorkflowExecution'Target -> String
$cshowList :: [SignalExternalWorkflowExecution'Target] -> ShowS
showList :: [SignalExternalWorkflowExecution'Target] -> ShowS
Prelude.Show, SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Bool
(SignalExternalWorkflowExecution'Target
 -> SignalExternalWorkflowExecution'Target -> Bool)
-> (SignalExternalWorkflowExecution'Target
    -> SignalExternalWorkflowExecution'Target -> Bool)
-> Eq SignalExternalWorkflowExecution'Target
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Bool
== :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Bool
$c/= :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Bool
/= :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Bool
Prelude.Eq, Eq SignalExternalWorkflowExecution'Target
Eq SignalExternalWorkflowExecution'Target =>
(SignalExternalWorkflowExecution'Target
 -> SignalExternalWorkflowExecution'Target -> Ordering)
-> (SignalExternalWorkflowExecution'Target
    -> SignalExternalWorkflowExecution'Target -> Bool)
-> (SignalExternalWorkflowExecution'Target
    -> SignalExternalWorkflowExecution'Target -> Bool)
-> (SignalExternalWorkflowExecution'Target
    -> SignalExternalWorkflowExecution'Target -> Bool)
-> (SignalExternalWorkflowExecution'Target
    -> SignalExternalWorkflowExecution'Target -> Bool)
-> (SignalExternalWorkflowExecution'Target
    -> SignalExternalWorkflowExecution'Target
    -> SignalExternalWorkflowExecution'Target)
-> (SignalExternalWorkflowExecution'Target
    -> SignalExternalWorkflowExecution'Target
    -> SignalExternalWorkflowExecution'Target)
-> Ord SignalExternalWorkflowExecution'Target
SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Bool
SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Ordering
SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target
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 :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Ordering
compare :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Ordering
$c< :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Bool
< :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Bool
$c<= :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Bool
<= :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Bool
$c> :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Bool
> :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Bool
$c>= :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Bool
>= :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target -> Bool
$cmax :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target
max :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target
$cmin :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target
min :: SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target
-> SignalExternalWorkflowExecution'Target
Prelude.Ord)
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecution "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq"
-> (Word32 -> f Word32)
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32)
 -> SignalExternalWorkflowExecution
 -> f SignalExternalWorkflowExecution)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecution -> Word32)
-> (SignalExternalWorkflowExecution
    -> Word32 -> SignalExternalWorkflowExecution)
-> Lens
     SignalExternalWorkflowExecution
     SignalExternalWorkflowExecution
     Word32
     Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecution -> Word32
_SignalExternalWorkflowExecution'seq
           (\ SignalExternalWorkflowExecution
x__ Word32
y__ -> SignalExternalWorkflowExecution
x__ {_SignalExternalWorkflowExecution'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecution "signalName" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "signalName"
-> (Text -> f Text)
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
fieldOf Proxy# "signalName"
_
    = ((Text -> f Text)
 -> SignalExternalWorkflowExecution
 -> f SignalExternalWorkflowExecution)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecution -> Text)
-> (SignalExternalWorkflowExecution
    -> Text -> SignalExternalWorkflowExecution)
-> Lens
     SignalExternalWorkflowExecution
     SignalExternalWorkflowExecution
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecution -> Text
_SignalExternalWorkflowExecution'signalName
           (\ SignalExternalWorkflowExecution
x__ Text
y__
              -> SignalExternalWorkflowExecution
x__ {_SignalExternalWorkflowExecution'signalName = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecution "args" [Proto.Temporal.Api.Common.V1.Message.Payload] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "args"
-> ([Payload] -> f [Payload])
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
fieldOf Proxy# "args"
_
    = ((Vector Payload -> f (Vector Payload))
 -> SignalExternalWorkflowExecution
 -> f SignalExternalWorkflowExecution)
-> (([Payload] -> f [Payload])
    -> Vector Payload -> f (Vector Payload))
-> ([Payload] -> f [Payload])
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecution -> Vector Payload)
-> (SignalExternalWorkflowExecution
    -> Vector Payload -> SignalExternalWorkflowExecution)
-> Lens
     SignalExternalWorkflowExecution
     SignalExternalWorkflowExecution
     (Vector Payload)
     (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecution -> Vector Payload
_SignalExternalWorkflowExecution'args
           (\ SignalExternalWorkflowExecution
x__ Vector Payload
y__ -> SignalExternalWorkflowExecution
x__ {_SignalExternalWorkflowExecution'args = 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 SignalExternalWorkflowExecution "vec'args" (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'args"
-> (Vector Payload -> f (Vector Payload))
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
fieldOf Proxy# "vec'args"
_
    = ((Vector Payload -> f (Vector Payload))
 -> SignalExternalWorkflowExecution
 -> f SignalExternalWorkflowExecution)
-> ((Vector Payload -> f (Vector Payload))
    -> Vector Payload -> f (Vector Payload))
-> (Vector Payload -> f (Vector Payload))
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecution -> Vector Payload)
-> (SignalExternalWorkflowExecution
    -> Vector Payload -> SignalExternalWorkflowExecution)
-> Lens
     SignalExternalWorkflowExecution
     SignalExternalWorkflowExecution
     (Vector Payload)
     (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecution -> Vector Payload
_SignalExternalWorkflowExecution'args
           (\ SignalExternalWorkflowExecution
x__ Vector Payload
y__ -> SignalExternalWorkflowExecution
x__ {_SignalExternalWorkflowExecution'args = y__}))
        (Vector Payload -> f (Vector Payload))
-> Vector Payload -> f (Vector Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecution "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))
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
fieldOf Proxy# "headers"
_
    = ((Map Text Payload -> f (Map Text Payload))
 -> SignalExternalWorkflowExecution
 -> f SignalExternalWorkflowExecution)
-> ((Map Text Payload -> f (Map Text Payload))
    -> Map Text Payload -> f (Map Text Payload))
-> (Map Text Payload -> f (Map Text Payload))
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecution -> Map Text Payload)
-> (SignalExternalWorkflowExecution
    -> Map Text Payload -> SignalExternalWorkflowExecution)
-> Lens
     SignalExternalWorkflowExecution
     SignalExternalWorkflowExecution
     (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
           SignalExternalWorkflowExecution -> Map Text Payload
_SignalExternalWorkflowExecution'headers
           (\ SignalExternalWorkflowExecution
x__ Map Text Payload
y__
              -> SignalExternalWorkflowExecution
x__ {_SignalExternalWorkflowExecution'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 SignalExternalWorkflowExecution "maybe'target" (Prelude.Maybe SignalExternalWorkflowExecution'Target) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'target"
-> (Maybe SignalExternalWorkflowExecution'Target
    -> f (Maybe SignalExternalWorkflowExecution'Target))
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
fieldOf Proxy# "maybe'target"
_
    = ((Maybe SignalExternalWorkflowExecution'Target
  -> f (Maybe SignalExternalWorkflowExecution'Target))
 -> SignalExternalWorkflowExecution
 -> f SignalExternalWorkflowExecution)
-> ((Maybe SignalExternalWorkflowExecution'Target
     -> f (Maybe SignalExternalWorkflowExecution'Target))
    -> Maybe SignalExternalWorkflowExecution'Target
    -> f (Maybe SignalExternalWorkflowExecution'Target))
-> (Maybe SignalExternalWorkflowExecution'Target
    -> f (Maybe SignalExternalWorkflowExecution'Target))
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecution
 -> Maybe SignalExternalWorkflowExecution'Target)
-> (SignalExternalWorkflowExecution
    -> Maybe SignalExternalWorkflowExecution'Target
    -> SignalExternalWorkflowExecution)
-> Lens
     SignalExternalWorkflowExecution
     SignalExternalWorkflowExecution
     (Maybe SignalExternalWorkflowExecution'Target)
     (Maybe SignalExternalWorkflowExecution'Target)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecution
-> Maybe SignalExternalWorkflowExecution'Target
_SignalExternalWorkflowExecution'target
           (\ SignalExternalWorkflowExecution
x__ Maybe SignalExternalWorkflowExecution'Target
y__ -> SignalExternalWorkflowExecution
x__ {_SignalExternalWorkflowExecution'target = y__}))
        (Maybe SignalExternalWorkflowExecution'Target
 -> f (Maybe SignalExternalWorkflowExecution'Target))
-> Maybe SignalExternalWorkflowExecution'Target
-> f (Maybe SignalExternalWorkflowExecution'Target)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecution "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe NamespacedWorkflowExecution
    -> f (Maybe NamespacedWorkflowExecution))
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe SignalExternalWorkflowExecution'Target
  -> f (Maybe SignalExternalWorkflowExecution'Target))
 -> SignalExternalWorkflowExecution
 -> f SignalExternalWorkflowExecution)
-> ((Maybe NamespacedWorkflowExecution
     -> f (Maybe NamespacedWorkflowExecution))
    -> Maybe SignalExternalWorkflowExecution'Target
    -> f (Maybe SignalExternalWorkflowExecution'Target))
-> (Maybe NamespacedWorkflowExecution
    -> f (Maybe NamespacedWorkflowExecution))
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecution
 -> Maybe SignalExternalWorkflowExecution'Target)
-> (SignalExternalWorkflowExecution
    -> Maybe SignalExternalWorkflowExecution'Target
    -> SignalExternalWorkflowExecution)
-> Lens
     SignalExternalWorkflowExecution
     SignalExternalWorkflowExecution
     (Maybe SignalExternalWorkflowExecution'Target)
     (Maybe SignalExternalWorkflowExecution'Target)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecution
-> Maybe SignalExternalWorkflowExecution'Target
_SignalExternalWorkflowExecution'target
           (\ SignalExternalWorkflowExecution
x__ Maybe SignalExternalWorkflowExecution'Target
y__ -> SignalExternalWorkflowExecution
x__ {_SignalExternalWorkflowExecution'target = y__}))
        ((Maybe SignalExternalWorkflowExecution'Target
 -> Maybe NamespacedWorkflowExecution)
-> (Maybe SignalExternalWorkflowExecution'Target
    -> Maybe NamespacedWorkflowExecution
    -> Maybe SignalExternalWorkflowExecution'Target)
-> Lens
     (Maybe SignalExternalWorkflowExecution'Target)
     (Maybe SignalExternalWorkflowExecution'Target)
     (Maybe NamespacedWorkflowExecution)
     (Maybe NamespacedWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe SignalExternalWorkflowExecution'Target
x__
              -> case Maybe SignalExternalWorkflowExecution'Target
x__ of
                   (Prelude.Just (SignalExternalWorkflowExecution'WorkflowExecution NamespacedWorkflowExecution
x__val))
                     -> NamespacedWorkflowExecution -> Maybe NamespacedWorkflowExecution
forall a. a -> Maybe a
Prelude.Just NamespacedWorkflowExecution
x__val
                   Maybe SignalExternalWorkflowExecution'Target
_otherwise -> Maybe NamespacedWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe SignalExternalWorkflowExecution'Target
_ Maybe NamespacedWorkflowExecution
y__
              -> (NamespacedWorkflowExecution
 -> SignalExternalWorkflowExecution'Target)
-> Maybe NamespacedWorkflowExecution
-> Maybe SignalExternalWorkflowExecution'Target
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   NamespacedWorkflowExecution
-> SignalExternalWorkflowExecution'Target
SignalExternalWorkflowExecution'WorkflowExecution Maybe NamespacedWorkflowExecution
y__))
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecution "workflowExecution" Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (NamespacedWorkflowExecution -> f NamespacedWorkflowExecution)
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe SignalExternalWorkflowExecution'Target
  -> f (Maybe SignalExternalWorkflowExecution'Target))
 -> SignalExternalWorkflowExecution
 -> f SignalExternalWorkflowExecution)
-> ((NamespacedWorkflowExecution -> f NamespacedWorkflowExecution)
    -> Maybe SignalExternalWorkflowExecution'Target
    -> f (Maybe SignalExternalWorkflowExecution'Target))
-> (NamespacedWorkflowExecution -> f NamespacedWorkflowExecution)
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecution
 -> Maybe SignalExternalWorkflowExecution'Target)
-> (SignalExternalWorkflowExecution
    -> Maybe SignalExternalWorkflowExecution'Target
    -> SignalExternalWorkflowExecution)
-> Lens
     SignalExternalWorkflowExecution
     SignalExternalWorkflowExecution
     (Maybe SignalExternalWorkflowExecution'Target)
     (Maybe SignalExternalWorkflowExecution'Target)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecution
-> Maybe SignalExternalWorkflowExecution'Target
_SignalExternalWorkflowExecution'target
           (\ SignalExternalWorkflowExecution
x__ Maybe SignalExternalWorkflowExecution'Target
y__ -> SignalExternalWorkflowExecution
x__ {_SignalExternalWorkflowExecution'target = y__}))
        (((Maybe NamespacedWorkflowExecution
  -> f (Maybe NamespacedWorkflowExecution))
 -> Maybe SignalExternalWorkflowExecution'Target
 -> f (Maybe SignalExternalWorkflowExecution'Target))
-> ((NamespacedWorkflowExecution -> f NamespacedWorkflowExecution)
    -> Maybe NamespacedWorkflowExecution
    -> f (Maybe NamespacedWorkflowExecution))
-> (NamespacedWorkflowExecution -> f NamespacedWorkflowExecution)
-> Maybe SignalExternalWorkflowExecution'Target
-> f (Maybe SignalExternalWorkflowExecution'Target)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe SignalExternalWorkflowExecution'Target
 -> Maybe NamespacedWorkflowExecution)
-> (Maybe SignalExternalWorkflowExecution'Target
    -> Maybe NamespacedWorkflowExecution
    -> Maybe SignalExternalWorkflowExecution'Target)
-> Lens
     (Maybe SignalExternalWorkflowExecution'Target)
     (Maybe SignalExternalWorkflowExecution'Target)
     (Maybe NamespacedWorkflowExecution)
     (Maybe NamespacedWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe SignalExternalWorkflowExecution'Target
x__
                 -> case Maybe SignalExternalWorkflowExecution'Target
x__ of
                      (Prelude.Just (SignalExternalWorkflowExecution'WorkflowExecution NamespacedWorkflowExecution
x__val))
                        -> NamespacedWorkflowExecution -> Maybe NamespacedWorkflowExecution
forall a. a -> Maybe a
Prelude.Just NamespacedWorkflowExecution
x__val
                      Maybe SignalExternalWorkflowExecution'Target
_otherwise -> Maybe NamespacedWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe SignalExternalWorkflowExecution'Target
_ Maybe NamespacedWorkflowExecution
y__
                 -> (NamespacedWorkflowExecution
 -> SignalExternalWorkflowExecution'Target)
-> Maybe NamespacedWorkflowExecution
-> Maybe SignalExternalWorkflowExecution'Target
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      NamespacedWorkflowExecution
-> SignalExternalWorkflowExecution'Target
SignalExternalWorkflowExecution'WorkflowExecution Maybe NamespacedWorkflowExecution
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 SignalExternalWorkflowExecution "maybe'childWorkflowId" (Prelude.Maybe Data.Text.Text) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'childWorkflowId"
-> (Maybe Text -> f (Maybe Text))
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
fieldOf Proxy# "maybe'childWorkflowId"
_
    = ((Maybe SignalExternalWorkflowExecution'Target
  -> f (Maybe SignalExternalWorkflowExecution'Target))
 -> SignalExternalWorkflowExecution
 -> f SignalExternalWorkflowExecution)
-> ((Maybe Text -> f (Maybe Text))
    -> Maybe SignalExternalWorkflowExecution'Target
    -> f (Maybe SignalExternalWorkflowExecution'Target))
-> (Maybe Text -> f (Maybe Text))
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecution
 -> Maybe SignalExternalWorkflowExecution'Target)
-> (SignalExternalWorkflowExecution
    -> Maybe SignalExternalWorkflowExecution'Target
    -> SignalExternalWorkflowExecution)
-> Lens
     SignalExternalWorkflowExecution
     SignalExternalWorkflowExecution
     (Maybe SignalExternalWorkflowExecution'Target)
     (Maybe SignalExternalWorkflowExecution'Target)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecution
-> Maybe SignalExternalWorkflowExecution'Target
_SignalExternalWorkflowExecution'target
           (\ SignalExternalWorkflowExecution
x__ Maybe SignalExternalWorkflowExecution'Target
y__ -> SignalExternalWorkflowExecution
x__ {_SignalExternalWorkflowExecution'target = y__}))
        ((Maybe SignalExternalWorkflowExecution'Target -> Maybe Text)
-> (Maybe SignalExternalWorkflowExecution'Target
    -> Maybe Text -> Maybe SignalExternalWorkflowExecution'Target)
-> Lens
     (Maybe SignalExternalWorkflowExecution'Target)
     (Maybe SignalExternalWorkflowExecution'Target)
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe SignalExternalWorkflowExecution'Target
x__
              -> case Maybe SignalExternalWorkflowExecution'Target
x__ of
                   (Prelude.Just (SignalExternalWorkflowExecution'ChildWorkflowId Text
x__val))
                     -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
x__val
                   Maybe SignalExternalWorkflowExecution'Target
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe SignalExternalWorkflowExecution'Target
_ Maybe Text
y__
              -> (Text -> SignalExternalWorkflowExecution'Target)
-> Maybe Text -> Maybe SignalExternalWorkflowExecution'Target
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   Text -> SignalExternalWorkflowExecution'Target
SignalExternalWorkflowExecution'ChildWorkflowId Maybe Text
y__))
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecution "childWorkflowId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "childWorkflowId"
-> (Text -> f Text)
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
fieldOf Proxy# "childWorkflowId"
_
    = ((Maybe SignalExternalWorkflowExecution'Target
  -> f (Maybe SignalExternalWorkflowExecution'Target))
 -> SignalExternalWorkflowExecution
 -> f SignalExternalWorkflowExecution)
-> ((Text -> f Text)
    -> Maybe SignalExternalWorkflowExecution'Target
    -> f (Maybe SignalExternalWorkflowExecution'Target))
-> (Text -> f Text)
-> SignalExternalWorkflowExecution
-> f SignalExternalWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecution
 -> Maybe SignalExternalWorkflowExecution'Target)
-> (SignalExternalWorkflowExecution
    -> Maybe SignalExternalWorkflowExecution'Target
    -> SignalExternalWorkflowExecution)
-> Lens
     SignalExternalWorkflowExecution
     SignalExternalWorkflowExecution
     (Maybe SignalExternalWorkflowExecution'Target)
     (Maybe SignalExternalWorkflowExecution'Target)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecution
-> Maybe SignalExternalWorkflowExecution'Target
_SignalExternalWorkflowExecution'target
           (\ SignalExternalWorkflowExecution
x__ Maybe SignalExternalWorkflowExecution'Target
y__ -> SignalExternalWorkflowExecution
x__ {_SignalExternalWorkflowExecution'target = y__}))
        (((Maybe Text -> f (Maybe Text))
 -> Maybe SignalExternalWorkflowExecution'Target
 -> f (Maybe SignalExternalWorkflowExecution'Target))
-> ((Text -> f Text) -> Maybe Text -> f (Maybe Text))
-> (Text -> f Text)
-> Maybe SignalExternalWorkflowExecution'Target
-> f (Maybe SignalExternalWorkflowExecution'Target)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe SignalExternalWorkflowExecution'Target -> Maybe Text)
-> (Maybe SignalExternalWorkflowExecution'Target
    -> Maybe Text -> Maybe SignalExternalWorkflowExecution'Target)
-> Lens
     (Maybe SignalExternalWorkflowExecution'Target)
     (Maybe SignalExternalWorkflowExecution'Target)
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe SignalExternalWorkflowExecution'Target
x__
                 -> case Maybe SignalExternalWorkflowExecution'Target
x__ of
                      (Prelude.Just (SignalExternalWorkflowExecution'ChildWorkflowId Text
x__val))
                        -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
x__val
                      Maybe SignalExternalWorkflowExecution'Target
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe SignalExternalWorkflowExecution'Target
_ Maybe Text
y__
                 -> (Text -> SignalExternalWorkflowExecution'Target)
-> Maybe Text -> Maybe SignalExternalWorkflowExecution'Target
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      Text -> SignalExternalWorkflowExecution'Target
SignalExternalWorkflowExecution'ChildWorkflowId Maybe Text
y__))
           (Text -> Lens' (Maybe Text) Text
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault))
instance Data.ProtoLens.Message SignalExternalWorkflowExecution where
  messageName :: Proxy SignalExternalWorkflowExecution -> Text
messageName Proxy SignalExternalWorkflowExecution
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.SignalExternalWorkflowExecution"
  packedMessageDescriptor :: Proxy SignalExternalWorkflowExecution -> ByteString
packedMessageDescriptor Proxy SignalExternalWorkflowExecution
_
    = ByteString
"\n\
      \\USSignalExternalWorkflowExecution\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2\\\n\
      \\DC2workflow_execution\CAN\STX \SOH(\v2+.coresdk.common.NamespacedWorkflowExecutionH\NULR\DC1workflowExecution\DC2,\n\
      \\DC1child_workflow_id\CAN\ETX \SOH(\tH\NULR\SIchildWorkflowId\DC2\US\n\
      \\vsignal_name\CAN\EOT \SOH(\tR\n\
      \signalName\DC23\n\
      \\EOTargs\CAN\ENQ \ETX(\v2\US.temporal.api.common.v1.PayloadR\EOTargs\DC2a\n\
      \\aheaders\CAN\ACK \ETX(\v2G.coresdk.workflow_commands.SignalExternalWorkflowExecution.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\SOHB\b\n\
      \\ACKtarget"
  packedFileDescriptor :: Proxy SignalExternalWorkflowExecution -> ByteString
packedFileDescriptor Proxy SignalExternalWorkflowExecution
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor SignalExternalWorkflowExecution)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor SignalExternalWorkflowExecution
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor SignalExternalWorkflowExecution Word32
-> FieldDescriptor SignalExternalWorkflowExecution
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
     SignalExternalWorkflowExecution
     SignalExternalWorkflowExecution
     Word32
     Word32
-> FieldAccessor SignalExternalWorkflowExecution 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 SignalExternalWorkflowExecution
        signalName__field_descriptor :: FieldDescriptor SignalExternalWorkflowExecution
signalName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalExternalWorkflowExecution Text
-> FieldDescriptor SignalExternalWorkflowExecution
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
     SignalExternalWorkflowExecution
     SignalExternalWorkflowExecution
     Text
     Text
-> FieldAccessor SignalExternalWorkflowExecution 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 SignalExternalWorkflowExecution
        args__field_descriptor :: FieldDescriptor SignalExternalWorkflowExecution
args__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor SignalExternalWorkflowExecution Payload
-> FieldDescriptor SignalExternalWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"args"
              (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' SignalExternalWorkflowExecution [Payload]
-> FieldAccessor SignalExternalWorkflowExecution 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 @"args")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecution
        headers__field_descriptor :: FieldDescriptor SignalExternalWorkflowExecution
headers__field_descriptor
          = String
-> FieldTypeDescriptor SignalExternalWorkflowExecution'HeadersEntry
-> FieldAccessor
     SignalExternalWorkflowExecution
     SignalExternalWorkflowExecution'HeadersEntry
-> FieldDescriptor SignalExternalWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"headers"
              (MessageOrGroup
-> FieldTypeDescriptor SignalExternalWorkflowExecution'HeadersEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor SignalExternalWorkflowExecution'HeadersEntry)
              (Lens' SignalExternalWorkflowExecution'HeadersEntry Text
-> Lens' SignalExternalWorkflowExecution'HeadersEntry Payload
-> Lens
     SignalExternalWorkflowExecution
     SignalExternalWorkflowExecution
     (Map Text Payload)
     (Map Text Payload)
-> FieldAccessor
     SignalExternalWorkflowExecution
     SignalExternalWorkflowExecution'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 SignalExternalWorkflowExecution
        workflowExecution__field_descriptor :: FieldDescriptor SignalExternalWorkflowExecution
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor NamespacedWorkflowExecution
-> FieldAccessor
     SignalExternalWorkflowExecution NamespacedWorkflowExecution
-> FieldDescriptor SignalExternalWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution"
              (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'
  SignalExternalWorkflowExecution (Maybe NamespacedWorkflowExecution)
-> FieldAccessor
     SignalExternalWorkflowExecution 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'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecution
        childWorkflowId__field_descriptor :: FieldDescriptor SignalExternalWorkflowExecution
childWorkflowId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalExternalWorkflowExecution Text
-> FieldDescriptor SignalExternalWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"child_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)
              (Lens' SignalExternalWorkflowExecution (Maybe Text)
-> FieldAccessor SignalExternalWorkflowExecution Text
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'childWorkflowId")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecution
      in
        [(Tag, FieldDescriptor SignalExternalWorkflowExecution)]
-> Map Tag (FieldDescriptor SignalExternalWorkflowExecution)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor SignalExternalWorkflowExecution
seq__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor SignalExternalWorkflowExecution
signalName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor SignalExternalWorkflowExecution
args__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor SignalExternalWorkflowExecution
headers__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor SignalExternalWorkflowExecution
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor SignalExternalWorkflowExecution
childWorkflowId__field_descriptor)]
  unknownFields :: Lens' SignalExternalWorkflowExecution FieldSet
unknownFields
    = (SignalExternalWorkflowExecution -> FieldSet)
-> (SignalExternalWorkflowExecution
    -> FieldSet -> SignalExternalWorkflowExecution)
-> Lens' SignalExternalWorkflowExecution FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SignalExternalWorkflowExecution -> FieldSet
_SignalExternalWorkflowExecution'_unknownFields
        (\ SignalExternalWorkflowExecution
x__ FieldSet
y__
           -> SignalExternalWorkflowExecution
x__ {_SignalExternalWorkflowExecution'_unknownFields = y__})
  defMessage :: SignalExternalWorkflowExecution
defMessage
    = SignalExternalWorkflowExecution'_constructor
        {_SignalExternalWorkflowExecution'seq :: Word32
_SignalExternalWorkflowExecution'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalExternalWorkflowExecution'signalName :: Text
_SignalExternalWorkflowExecution'signalName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalExternalWorkflowExecution'args :: Vector Payload
_SignalExternalWorkflowExecution'args = Vector Payload
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _SignalExternalWorkflowExecution'headers :: Map Text Payload
_SignalExternalWorkflowExecution'headers = Map Text Payload
forall k a. Map k a
Data.Map.empty,
         _SignalExternalWorkflowExecution'target :: Maybe SignalExternalWorkflowExecution'Target
_SignalExternalWorkflowExecution'target = Maybe SignalExternalWorkflowExecution'Target
forall a. Maybe a
Prelude.Nothing,
         _SignalExternalWorkflowExecution'_unknownFields :: FieldSet
_SignalExternalWorkflowExecution'_unknownFields = []}
  parseMessage :: Parser SignalExternalWorkflowExecution
parseMessage
    = let
        loop ::
          SignalExternalWorkflowExecution
          -> 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 SignalExternalWorkflowExecution
        loop :: SignalExternalWorkflowExecution
-> Growing Vector RealWorld Payload
-> Parser SignalExternalWorkflowExecution
loop SignalExternalWorkflowExecution
x Growing Vector RealWorld Payload
mutable'args
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'args <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.unsafeFreeze mutable'args)
                      (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'args") frozen'args 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)
                                  mutable'args
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"signal_name"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"signalName") y x)
                                  mutable'args
                        Word64
42
                          -> 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
"args"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'args y)
                                loop x v
                        Word64
50
                          -> do !(entry :: SignalExternalWorkflowExecution'HeadersEntry) <- Parser SignalExternalWorkflowExecution'HeadersEntry
-> String -> Parser SignalExternalWorkflowExecution'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
  SignalExternalWorkflowExecution'HeadersEntry
  SignalExternalWorkflowExecution'HeadersEntry
  Text
  Text
-> SignalExternalWorkflowExecution'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") SignalExternalWorkflowExecution'HeadersEntry
entry
                                   value
                                     = FoldLike
  Payload
  SignalExternalWorkflowExecution'HeadersEntry
  SignalExternalWorkflowExecution'HeadersEntry
  Payload
  Payload
-> SignalExternalWorkflowExecution'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") SignalExternalWorkflowExecution'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'args)
                        Word64
18
                          -> 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
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                                  mutable'args
                        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
"child_workflow_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"childWorkflowId") y x)
                                  mutable'args
                        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'args
      in
        Parser SignalExternalWorkflowExecution
-> String -> Parser SignalExternalWorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'args <- 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'args)
          String
"SignalExternalWorkflowExecution"
  buildMessage :: SignalExternalWorkflowExecution -> Builder
buildMessage
    = \ SignalExternalWorkflowExecution
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike
  Word32
  SignalExternalWorkflowExecution
  SignalExternalWorkflowExecution
  Word32
  Word32
-> SignalExternalWorkflowExecution -> 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") SignalExternalWorkflowExecution
_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.<>)
                (let
                   _v :: Text
_v
                     = FoldLike
  Text
  SignalExternalWorkflowExecution
  SignalExternalWorkflowExecution
  Text
  Text
-> SignalExternalWorkflowExecution -> 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") SignalExternalWorkflowExecution
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   ((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
42)
                              ((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)
  SignalExternalWorkflowExecution
  SignalExternalWorkflowExecution
  (Vector Payload)
  (Vector Payload)
-> SignalExternalWorkflowExecution -> 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'args") SignalExternalWorkflowExecution
_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
50)
                                    ((ByteString -> Builder)
-> (SignalExternalWorkflowExecution'HeadersEntry -> ByteString)
-> SignalExternalWorkflowExecution'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))
                                       SignalExternalWorkflowExecution'HeadersEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                       (Setter
  SignalExternalWorkflowExecution'HeadersEntry
  SignalExternalWorkflowExecution'HeadersEntry
  Text
  Text
-> Text
-> SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'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
  SignalExternalWorkflowExecution'HeadersEntry
  SignalExternalWorkflowExecution'HeadersEntry
  Payload
  Payload
-> Payload
-> SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'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)
                                             (SignalExternalWorkflowExecution'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                SignalExternalWorkflowExecution'HeadersEntry)))))
                            (Map Text Payload -> [(Text, Payload)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                               (FoldLike
  (Map Text Payload)
  SignalExternalWorkflowExecution
  SignalExternalWorkflowExecution
  (Map Text Payload)
  (Map Text Payload)
-> SignalExternalWorkflowExecution -> 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") SignalExternalWorkflowExecution
_x))))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe SignalExternalWorkflowExecution'Target)
  SignalExternalWorkflowExecution
  SignalExternalWorkflowExecution
  (Maybe SignalExternalWorkflowExecution'Target)
  (Maybe SignalExternalWorkflowExecution'Target)
-> SignalExternalWorkflowExecution
-> Maybe SignalExternalWorkflowExecution'Target
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'target") SignalExternalWorkflowExecution
_x
                          of
                            Maybe SignalExternalWorkflowExecution'Target
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just (SignalExternalWorkflowExecution'WorkflowExecution NamespacedWorkflowExecution
v))
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                                   ((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)
                            (Prelude.Just (SignalExternalWorkflowExecution'ChildWorkflowId Text
v))
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                                   ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
v))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  SignalExternalWorkflowExecution
  SignalExternalWorkflowExecution
  FieldSet
  FieldSet
-> SignalExternalWorkflowExecution -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  SignalExternalWorkflowExecution
  SignalExternalWorkflowExecution
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SignalExternalWorkflowExecution FieldSet
Data.ProtoLens.unknownFields SignalExternalWorkflowExecution
_x))))))
instance Control.DeepSeq.NFData SignalExternalWorkflowExecution where
  rnf :: SignalExternalWorkflowExecution -> ()
rnf
    = \ SignalExternalWorkflowExecution
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SignalExternalWorkflowExecution -> FieldSet
_SignalExternalWorkflowExecution'_unknownFields SignalExternalWorkflowExecution
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SignalExternalWorkflowExecution -> Word32
_SignalExternalWorkflowExecution'seq SignalExternalWorkflowExecution
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (SignalExternalWorkflowExecution -> Text
_SignalExternalWorkflowExecution'signalName SignalExternalWorkflowExecution
x__)
                   (Vector Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (SignalExternalWorkflowExecution -> Vector Payload
_SignalExternalWorkflowExecution'args SignalExternalWorkflowExecution
x__)
                      (Map Text Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (SignalExternalWorkflowExecution -> Map Text Payload
_SignalExternalWorkflowExecution'headers SignalExternalWorkflowExecution
x__)
                         (Maybe SignalExternalWorkflowExecution'Target -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (SignalExternalWorkflowExecution
-> Maybe SignalExternalWorkflowExecution'Target
_SignalExternalWorkflowExecution'target SignalExternalWorkflowExecution
x__) ())))))
instance Control.DeepSeq.NFData SignalExternalWorkflowExecution'Target where
  rnf :: SignalExternalWorkflowExecution'Target -> ()
rnf (SignalExternalWorkflowExecution'WorkflowExecution NamespacedWorkflowExecution
x__)
    = NamespacedWorkflowExecution -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf NamespacedWorkflowExecution
x__
  rnf (SignalExternalWorkflowExecution'ChildWorkflowId Text
x__)
    = Text -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Text
x__
_SignalExternalWorkflowExecution'WorkflowExecution ::
  Data.ProtoLens.Prism.Prism' SignalExternalWorkflowExecution'Target Proto.Temporal.Sdk.Core.Common.Common.NamespacedWorkflowExecution
_SignalExternalWorkflowExecution'WorkflowExecution :: Prism'
  SignalExternalWorkflowExecution'Target NamespacedWorkflowExecution
_SignalExternalWorkflowExecution'WorkflowExecution
  = (NamespacedWorkflowExecution
 -> SignalExternalWorkflowExecution'Target)
-> (SignalExternalWorkflowExecution'Target
    -> Maybe NamespacedWorkflowExecution)
-> Prism'
     SignalExternalWorkflowExecution'Target NamespacedWorkflowExecution
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      NamespacedWorkflowExecution
-> SignalExternalWorkflowExecution'Target
SignalExternalWorkflowExecution'WorkflowExecution
      (\ SignalExternalWorkflowExecution'Target
p__
         -> case SignalExternalWorkflowExecution'Target
p__ of
              (SignalExternalWorkflowExecution'WorkflowExecution NamespacedWorkflowExecution
p__val)
                -> NamespacedWorkflowExecution -> Maybe NamespacedWorkflowExecution
forall a. a -> Maybe a
Prelude.Just NamespacedWorkflowExecution
p__val
              SignalExternalWorkflowExecution'Target
_otherwise -> Maybe NamespacedWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
_SignalExternalWorkflowExecution'ChildWorkflowId ::
  Data.ProtoLens.Prism.Prism' SignalExternalWorkflowExecution'Target Data.Text.Text
_SignalExternalWorkflowExecution'ChildWorkflowId :: Prism' SignalExternalWorkflowExecution'Target Text
_SignalExternalWorkflowExecution'ChildWorkflowId
  = (Text -> SignalExternalWorkflowExecution'Target)
-> (SignalExternalWorkflowExecution'Target -> Maybe Text)
-> Prism' SignalExternalWorkflowExecution'Target Text
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Text -> SignalExternalWorkflowExecution'Target
SignalExternalWorkflowExecution'ChildWorkflowId
      (\ SignalExternalWorkflowExecution'Target
p__
         -> case SignalExternalWorkflowExecution'Target
p__ of
              (SignalExternalWorkflowExecution'ChildWorkflowId Text
p__val)
                -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
p__val
              SignalExternalWorkflowExecution'Target
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.key' @:: Lens' SignalExternalWorkflowExecution'HeadersEntry Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.value' @:: Lens' SignalExternalWorkflowExecution'HeadersEntry Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'value' @:: Lens' SignalExternalWorkflowExecution'HeadersEntry (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data SignalExternalWorkflowExecution'HeadersEntry
  = SignalExternalWorkflowExecution'HeadersEntry'_constructor {SignalExternalWorkflowExecution'HeadersEntry -> Text
_SignalExternalWorkflowExecution'HeadersEntry'key :: !Data.Text.Text,
                                                               SignalExternalWorkflowExecution'HeadersEntry -> Maybe Payload
_SignalExternalWorkflowExecution'HeadersEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                                               SignalExternalWorkflowExecution'HeadersEntry -> FieldSet
_SignalExternalWorkflowExecution'HeadersEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Bool
(SignalExternalWorkflowExecution'HeadersEntry
 -> SignalExternalWorkflowExecution'HeadersEntry -> Bool)
-> (SignalExternalWorkflowExecution'HeadersEntry
    -> SignalExternalWorkflowExecution'HeadersEntry -> Bool)
-> Eq SignalExternalWorkflowExecution'HeadersEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Bool
== :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Bool
$c/= :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Bool
/= :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Bool
Prelude.Eq, Eq SignalExternalWorkflowExecution'HeadersEntry
Eq SignalExternalWorkflowExecution'HeadersEntry =>
(SignalExternalWorkflowExecution'HeadersEntry
 -> SignalExternalWorkflowExecution'HeadersEntry -> Ordering)
-> (SignalExternalWorkflowExecution'HeadersEntry
    -> SignalExternalWorkflowExecution'HeadersEntry -> Bool)
-> (SignalExternalWorkflowExecution'HeadersEntry
    -> SignalExternalWorkflowExecution'HeadersEntry -> Bool)
-> (SignalExternalWorkflowExecution'HeadersEntry
    -> SignalExternalWorkflowExecution'HeadersEntry -> Bool)
-> (SignalExternalWorkflowExecution'HeadersEntry
    -> SignalExternalWorkflowExecution'HeadersEntry -> Bool)
-> (SignalExternalWorkflowExecution'HeadersEntry
    -> SignalExternalWorkflowExecution'HeadersEntry
    -> SignalExternalWorkflowExecution'HeadersEntry)
-> (SignalExternalWorkflowExecution'HeadersEntry
    -> SignalExternalWorkflowExecution'HeadersEntry
    -> SignalExternalWorkflowExecution'HeadersEntry)
-> Ord SignalExternalWorkflowExecution'HeadersEntry
SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Bool
SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Ordering
SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'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 :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Ordering
compare :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Ordering
$c< :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Bool
< :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Bool
$c<= :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Bool
<= :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Bool
$c> :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Bool
> :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Bool
$c>= :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Bool
>= :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry -> Bool
$cmax :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry
max :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry
$cmin :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry
min :: SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry
-> SignalExternalWorkflowExecution'HeadersEntry
Prelude.Ord)
instance Prelude.Show SignalExternalWorkflowExecution'HeadersEntry where
  showsPrec :: Int -> SignalExternalWorkflowExecution'HeadersEntry -> ShowS
showsPrec Int
_ SignalExternalWorkflowExecution'HeadersEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (SignalExternalWorkflowExecution'HeadersEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SignalExternalWorkflowExecution'HeadersEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecution'HeadersEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> SignalExternalWorkflowExecution'HeadersEntry
-> f SignalExternalWorkflowExecution'HeadersEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> SignalExternalWorkflowExecution'HeadersEntry
 -> f SignalExternalWorkflowExecution'HeadersEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalExternalWorkflowExecution'HeadersEntry
-> f SignalExternalWorkflowExecution'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecution'HeadersEntry -> Text)
-> (SignalExternalWorkflowExecution'HeadersEntry
    -> Text -> SignalExternalWorkflowExecution'HeadersEntry)
-> Lens' SignalExternalWorkflowExecution'HeadersEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecution'HeadersEntry -> Text
_SignalExternalWorkflowExecution'HeadersEntry'key
           (\ SignalExternalWorkflowExecution'HeadersEntry
x__ Text
y__
              -> SignalExternalWorkflowExecution'HeadersEntry
x__ {_SignalExternalWorkflowExecution'HeadersEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecution'HeadersEntry "value" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Payload -> f Payload)
-> SignalExternalWorkflowExecution'HeadersEntry
-> f SignalExternalWorkflowExecution'HeadersEntry
fieldOf Proxy# "value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> SignalExternalWorkflowExecution'HeadersEntry
 -> f SignalExternalWorkflowExecution'HeadersEntry)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> SignalExternalWorkflowExecution'HeadersEntry
-> f SignalExternalWorkflowExecution'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecution'HeadersEntry -> Maybe Payload)
-> (SignalExternalWorkflowExecution'HeadersEntry
    -> Maybe Payload -> SignalExternalWorkflowExecution'HeadersEntry)
-> Lens
     SignalExternalWorkflowExecution'HeadersEntry
     SignalExternalWorkflowExecution'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecution'HeadersEntry -> Maybe Payload
_SignalExternalWorkflowExecution'HeadersEntry'value
           (\ SignalExternalWorkflowExecution'HeadersEntry
x__ Maybe Payload
y__
              -> SignalExternalWorkflowExecution'HeadersEntry
x__
                   {_SignalExternalWorkflowExecution'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 SignalExternalWorkflowExecution'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))
-> SignalExternalWorkflowExecution'HeadersEntry
-> f SignalExternalWorkflowExecution'HeadersEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> SignalExternalWorkflowExecution'HeadersEntry
 -> f SignalExternalWorkflowExecution'HeadersEntry)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> SignalExternalWorkflowExecution'HeadersEntry
-> f SignalExternalWorkflowExecution'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecution'HeadersEntry -> Maybe Payload)
-> (SignalExternalWorkflowExecution'HeadersEntry
    -> Maybe Payload -> SignalExternalWorkflowExecution'HeadersEntry)
-> Lens
     SignalExternalWorkflowExecution'HeadersEntry
     SignalExternalWorkflowExecution'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecution'HeadersEntry -> Maybe Payload
_SignalExternalWorkflowExecution'HeadersEntry'value
           (\ SignalExternalWorkflowExecution'HeadersEntry
x__ Maybe Payload
y__
              -> SignalExternalWorkflowExecution'HeadersEntry
x__
                   {_SignalExternalWorkflowExecution'HeadersEntry'value = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SignalExternalWorkflowExecution'HeadersEntry where
  messageName :: Proxy SignalExternalWorkflowExecution'HeadersEntry -> Text
messageName Proxy SignalExternalWorkflowExecution'HeadersEntry
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.SignalExternalWorkflowExecution.HeadersEntry"
  packedMessageDescriptor :: Proxy SignalExternalWorkflowExecution'HeadersEntry -> ByteString
packedMessageDescriptor Proxy SignalExternalWorkflowExecution'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 SignalExternalWorkflowExecution'HeadersEntry -> ByteString
packedFileDescriptor Proxy SignalExternalWorkflowExecution'HeadersEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor SignalExternalWorkflowExecution'HeadersEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor SignalExternalWorkflowExecution'HeadersEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalExternalWorkflowExecution'HeadersEntry Text
-> FieldDescriptor SignalExternalWorkflowExecution'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' SignalExternalWorkflowExecution'HeadersEntry Text
-> FieldAccessor SignalExternalWorkflowExecution'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 SignalExternalWorkflowExecution'HeadersEntry
        value__field_descriptor :: FieldDescriptor SignalExternalWorkflowExecution'HeadersEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor
     SignalExternalWorkflowExecution'HeadersEntry Payload
-> FieldDescriptor SignalExternalWorkflowExecution'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
  SignalExternalWorkflowExecution'HeadersEntry
  SignalExternalWorkflowExecution'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor
     SignalExternalWorkflowExecution'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 SignalExternalWorkflowExecution'HeadersEntry
      in
        [(Tag,
  FieldDescriptor SignalExternalWorkflowExecution'HeadersEntry)]
-> Map
     Tag (FieldDescriptor SignalExternalWorkflowExecution'HeadersEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor SignalExternalWorkflowExecution'HeadersEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor SignalExternalWorkflowExecution'HeadersEntry
value__field_descriptor)]
  unknownFields :: Lens' SignalExternalWorkflowExecution'HeadersEntry FieldSet
unknownFields
    = (SignalExternalWorkflowExecution'HeadersEntry -> FieldSet)
-> (SignalExternalWorkflowExecution'HeadersEntry
    -> FieldSet -> SignalExternalWorkflowExecution'HeadersEntry)
-> Lens' SignalExternalWorkflowExecution'HeadersEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SignalExternalWorkflowExecution'HeadersEntry -> FieldSet
_SignalExternalWorkflowExecution'HeadersEntry'_unknownFields
        (\ SignalExternalWorkflowExecution'HeadersEntry
x__ FieldSet
y__
           -> SignalExternalWorkflowExecution'HeadersEntry
x__
                {_SignalExternalWorkflowExecution'HeadersEntry'_unknownFields = y__})
  defMessage :: SignalExternalWorkflowExecution'HeadersEntry
defMessage
    = SignalExternalWorkflowExecution'HeadersEntry'_constructor
        {_SignalExternalWorkflowExecution'HeadersEntry'key :: Text
_SignalExternalWorkflowExecution'HeadersEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalExternalWorkflowExecution'HeadersEntry'value :: Maybe Payload
_SignalExternalWorkflowExecution'HeadersEntry'value = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _SignalExternalWorkflowExecution'HeadersEntry'_unknownFields :: FieldSet
_SignalExternalWorkflowExecution'HeadersEntry'_unknownFields = []}
  parseMessage :: Parser SignalExternalWorkflowExecution'HeadersEntry
parseMessage
    = let
        loop ::
          SignalExternalWorkflowExecution'HeadersEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser SignalExternalWorkflowExecution'HeadersEntry
        loop :: SignalExternalWorkflowExecution'HeadersEntry
-> Parser SignalExternalWorkflowExecution'HeadersEntry
loop SignalExternalWorkflowExecution'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 SignalExternalWorkflowExecution'HeadersEntry
-> String -> Parser SignalExternalWorkflowExecution'HeadersEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do SignalExternalWorkflowExecution'HeadersEntry
-> Parser SignalExternalWorkflowExecution'HeadersEntry
loop SignalExternalWorkflowExecution'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"HeadersEntry"
  buildMessage :: SignalExternalWorkflowExecution'HeadersEntry -> Builder
buildMessage
    = \ SignalExternalWorkflowExecution'HeadersEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  SignalExternalWorkflowExecution'HeadersEntry
  SignalExternalWorkflowExecution'HeadersEntry
  Text
  Text
-> SignalExternalWorkflowExecution'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") SignalExternalWorkflowExecution'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)
  SignalExternalWorkflowExecution'HeadersEntry
  SignalExternalWorkflowExecution'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> SignalExternalWorkflowExecution'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") SignalExternalWorkflowExecution'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
  SignalExternalWorkflowExecution'HeadersEntry
  SignalExternalWorkflowExecution'HeadersEntry
  FieldSet
  FieldSet
-> SignalExternalWorkflowExecution'HeadersEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  SignalExternalWorkflowExecution'HeadersEntry
  SignalExternalWorkflowExecution'HeadersEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SignalExternalWorkflowExecution'HeadersEntry FieldSet
Data.ProtoLens.unknownFields SignalExternalWorkflowExecution'HeadersEntry
_x)))
instance Control.DeepSeq.NFData SignalExternalWorkflowExecution'HeadersEntry where
  rnf :: SignalExternalWorkflowExecution'HeadersEntry -> ()
rnf
    = \ SignalExternalWorkflowExecution'HeadersEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SignalExternalWorkflowExecution'HeadersEntry -> FieldSet
_SignalExternalWorkflowExecution'HeadersEntry'_unknownFields SignalExternalWorkflowExecution'HeadersEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SignalExternalWorkflowExecution'HeadersEntry -> Text
_SignalExternalWorkflowExecution'HeadersEntry'key SignalExternalWorkflowExecution'HeadersEntry
x__)
                (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (SignalExternalWorkflowExecution'HeadersEntry -> Maybe Payload
_SignalExternalWorkflowExecution'HeadersEntry'value SignalExternalWorkflowExecution'HeadersEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.seq' @:: Lens' StartChildWorkflowExecution Data.Word.Word32@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.namespace' @:: Lens' StartChildWorkflowExecution Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.workflowId' @:: Lens' StartChildWorkflowExecution Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.workflowType' @:: Lens' StartChildWorkflowExecution Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.taskQueue' @:: Lens' StartChildWorkflowExecution Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.input' @:: Lens' StartChildWorkflowExecution [Proto.Temporal.Api.Common.V1.Message.Payload]@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.vec'input' @:: Lens' StartChildWorkflowExecution (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.workflowExecutionTimeout' @:: Lens' StartChildWorkflowExecution Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'workflowExecutionTimeout' @:: Lens' StartChildWorkflowExecution (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.workflowRunTimeout' @:: Lens' StartChildWorkflowExecution Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'workflowRunTimeout' @:: Lens' StartChildWorkflowExecution (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.workflowTaskTimeout' @:: Lens' StartChildWorkflowExecution Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'workflowTaskTimeout' @:: Lens' StartChildWorkflowExecution (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.parentClosePolicy' @:: Lens' StartChildWorkflowExecution Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.ParentClosePolicy@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.workflowIdReusePolicy' @:: Lens' StartChildWorkflowExecution Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.retryPolicy' @:: Lens' StartChildWorkflowExecution Proto.Temporal.Api.Common.V1.Message.RetryPolicy@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'retryPolicy' @:: Lens' StartChildWorkflowExecution (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.cronSchedule' @:: Lens' StartChildWorkflowExecution Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.headers' @:: Lens' StartChildWorkflowExecution (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.memo' @:: Lens' StartChildWorkflowExecution (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.searchAttributes' @:: Lens' StartChildWorkflowExecution (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.cancellationType' @:: Lens' StartChildWorkflowExecution Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.ChildWorkflowCancellationType@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.versioningIntent' @:: Lens' StartChildWorkflowExecution Proto.Temporal.Sdk.Core.Common.Common.VersioningIntent@ -}
data StartChildWorkflowExecution
  = StartChildWorkflowExecution'_constructor {StartChildWorkflowExecution -> Word32
_StartChildWorkflowExecution'seq :: !Data.Word.Word32,
                                              StartChildWorkflowExecution -> Text
_StartChildWorkflowExecution'namespace :: !Data.Text.Text,
                                              StartChildWorkflowExecution -> Text
_StartChildWorkflowExecution'workflowId :: !Data.Text.Text,
                                              StartChildWorkflowExecution -> Text
_StartChildWorkflowExecution'workflowType :: !Data.Text.Text,
                                              StartChildWorkflowExecution -> Text
_StartChildWorkflowExecution'taskQueue :: !Data.Text.Text,
                                              StartChildWorkflowExecution -> Vector Payload
_StartChildWorkflowExecution'input :: !(Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload),
                                              StartChildWorkflowExecution -> Maybe Duration
_StartChildWorkflowExecution'workflowExecutionTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                              StartChildWorkflowExecution -> Maybe Duration
_StartChildWorkflowExecution'workflowRunTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                              StartChildWorkflowExecution -> Maybe Duration
_StartChildWorkflowExecution'workflowTaskTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                              StartChildWorkflowExecution -> ParentClosePolicy
_StartChildWorkflowExecution'parentClosePolicy :: !Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.ParentClosePolicy,
                                              StartChildWorkflowExecution -> WorkflowIdReusePolicy
_StartChildWorkflowExecution'workflowIdReusePolicy :: !Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy,
                                              StartChildWorkflowExecution -> Maybe RetryPolicy
_StartChildWorkflowExecution'retryPolicy :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy),
                                              StartChildWorkflowExecution -> Text
_StartChildWorkflowExecution'cronSchedule :: !Data.Text.Text,
                                              StartChildWorkflowExecution -> Map Text Payload
_StartChildWorkflowExecution'headers :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload),
                                              StartChildWorkflowExecution -> Map Text Payload
_StartChildWorkflowExecution'memo :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload),
                                              StartChildWorkflowExecution -> Map Text Payload
_StartChildWorkflowExecution'searchAttributes :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload),
                                              StartChildWorkflowExecution -> ChildWorkflowCancellationType
_StartChildWorkflowExecution'cancellationType :: !Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.ChildWorkflowCancellationType,
                                              StartChildWorkflowExecution -> VersioningIntent
_StartChildWorkflowExecution'versioningIntent :: !Proto.Temporal.Sdk.Core.Common.Common.VersioningIntent,
                                              StartChildWorkflowExecution -> FieldSet
_StartChildWorkflowExecution'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (StartChildWorkflowExecution -> StartChildWorkflowExecution -> Bool
(StartChildWorkflowExecution
 -> StartChildWorkflowExecution -> Bool)
-> (StartChildWorkflowExecution
    -> StartChildWorkflowExecution -> Bool)
-> Eq StartChildWorkflowExecution
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StartChildWorkflowExecution -> StartChildWorkflowExecution -> Bool
== :: StartChildWorkflowExecution -> StartChildWorkflowExecution -> Bool
$c/= :: StartChildWorkflowExecution -> StartChildWorkflowExecution -> Bool
/= :: StartChildWorkflowExecution -> StartChildWorkflowExecution -> Bool
Prelude.Eq, Eq StartChildWorkflowExecution
Eq StartChildWorkflowExecution =>
(StartChildWorkflowExecution
 -> StartChildWorkflowExecution -> Ordering)
-> (StartChildWorkflowExecution
    -> StartChildWorkflowExecution -> Bool)
-> (StartChildWorkflowExecution
    -> StartChildWorkflowExecution -> Bool)
-> (StartChildWorkflowExecution
    -> StartChildWorkflowExecution -> Bool)
-> (StartChildWorkflowExecution
    -> StartChildWorkflowExecution -> Bool)
-> (StartChildWorkflowExecution
    -> StartChildWorkflowExecution -> StartChildWorkflowExecution)
-> (StartChildWorkflowExecution
    -> StartChildWorkflowExecution -> StartChildWorkflowExecution)
-> Ord StartChildWorkflowExecution
StartChildWorkflowExecution -> StartChildWorkflowExecution -> Bool
StartChildWorkflowExecution
-> StartChildWorkflowExecution -> Ordering
StartChildWorkflowExecution
-> StartChildWorkflowExecution -> StartChildWorkflowExecution
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 :: StartChildWorkflowExecution
-> StartChildWorkflowExecution -> Ordering
compare :: StartChildWorkflowExecution
-> StartChildWorkflowExecution -> Ordering
$c< :: StartChildWorkflowExecution -> StartChildWorkflowExecution -> Bool
< :: StartChildWorkflowExecution -> StartChildWorkflowExecution -> Bool
$c<= :: StartChildWorkflowExecution -> StartChildWorkflowExecution -> Bool
<= :: StartChildWorkflowExecution -> StartChildWorkflowExecution -> Bool
$c> :: StartChildWorkflowExecution -> StartChildWorkflowExecution -> Bool
> :: StartChildWorkflowExecution -> StartChildWorkflowExecution -> Bool
$c>= :: StartChildWorkflowExecution -> StartChildWorkflowExecution -> Bool
>= :: StartChildWorkflowExecution -> StartChildWorkflowExecution -> Bool
$cmax :: StartChildWorkflowExecution
-> StartChildWorkflowExecution -> StartChildWorkflowExecution
max :: StartChildWorkflowExecution
-> StartChildWorkflowExecution -> StartChildWorkflowExecution
$cmin :: StartChildWorkflowExecution
-> StartChildWorkflowExecution -> StartChildWorkflowExecution
min :: StartChildWorkflowExecution
-> StartChildWorkflowExecution -> StartChildWorkflowExecution
Prelude.Ord)
instance Prelude.Show StartChildWorkflowExecution where
  showsPrec :: Int -> StartChildWorkflowExecution -> ShowS
showsPrec Int
_ StartChildWorkflowExecution
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (StartChildWorkflowExecution -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort StartChildWorkflowExecution
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq"
-> (Word32 -> f Word32)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32)
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Word32)
-> (StartChildWorkflowExecution
    -> Word32 -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     Word32
     Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Word32
_StartChildWorkflowExecution'seq
           (\ StartChildWorkflowExecution
x__ Word32
y__ -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Text)
-> (StartChildWorkflowExecution
    -> Text -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution StartChildWorkflowExecution Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Text
_StartChildWorkflowExecution'namespace
           (\ StartChildWorkflowExecution
x__ Text
y__ -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution "workflowId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowId"
-> (Text -> f Text)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "workflowId"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Text)
-> (StartChildWorkflowExecution
    -> Text -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution StartChildWorkflowExecution Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Text
_StartChildWorkflowExecution'workflowId
           (\ StartChildWorkflowExecution
x__ Text
y__ -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'workflowId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution "workflowType" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (Text -> f Text)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "workflowType"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Text)
-> (StartChildWorkflowExecution
    -> Text -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution StartChildWorkflowExecution Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Text
_StartChildWorkflowExecution'workflowType
           (\ StartChildWorkflowExecution
x__ Text
y__
              -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'workflowType = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution "taskQueue" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (Text -> f Text)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "taskQueue"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Text)
-> (StartChildWorkflowExecution
    -> Text -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution StartChildWorkflowExecution Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Text
_StartChildWorkflowExecution'taskQueue
           (\ StartChildWorkflowExecution
x__ Text
y__ -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'taskQueue = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution "input" [Proto.Temporal.Api.Common.V1.Message.Payload] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "input"
-> ([Payload] -> f [Payload])
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "input"
_
    = ((Vector Payload -> f (Vector Payload))
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> (([Payload] -> f [Payload])
    -> Vector Payload -> f (Vector Payload))
-> ([Payload] -> f [Payload])
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Vector Payload)
-> (StartChildWorkflowExecution
    -> Vector Payload -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (Vector Payload)
     (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Vector Payload
_StartChildWorkflowExecution'input
           (\ StartChildWorkflowExecution
x__ Vector Payload
y__ -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'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 StartChildWorkflowExecution "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))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "vec'input"
_
    = ((Vector Payload -> f (Vector Payload))
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Vector Payload -> f (Vector Payload))
    -> Vector Payload -> f (Vector Payload))
-> (Vector Payload -> f (Vector Payload))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Vector Payload)
-> (StartChildWorkflowExecution
    -> Vector Payload -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (Vector Payload)
     (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Vector Payload
_StartChildWorkflowExecution'input
           (\ StartChildWorkflowExecution
x__ Vector Payload
y__ -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'input = y__}))
        (Vector Payload -> f (Vector Payload))
-> Vector Payload -> f (Vector Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution "workflowExecutionTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionTimeout"
-> (Duration -> f Duration)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "workflowExecutionTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Maybe Duration)
-> (StartChildWorkflowExecution
    -> Maybe Duration -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Maybe Duration
_StartChildWorkflowExecution'workflowExecutionTimeout
           (\ StartChildWorkflowExecution
x__ Maybe Duration
y__
              -> StartChildWorkflowExecution
x__
                   {_StartChildWorkflowExecution'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 StartChildWorkflowExecution "maybe'workflowExecutionTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "maybe'workflowExecutionTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Maybe Duration)
-> (StartChildWorkflowExecution
    -> Maybe Duration -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Maybe Duration
_StartChildWorkflowExecution'workflowExecutionTimeout
           (\ StartChildWorkflowExecution
x__ Maybe Duration
y__
              -> StartChildWorkflowExecution
x__
                   {_StartChildWorkflowExecution'workflowExecutionTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution "workflowRunTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowRunTimeout"
-> (Duration -> f Duration)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Maybe Duration)
-> (StartChildWorkflowExecution
    -> Maybe Duration -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Maybe Duration
_StartChildWorkflowExecution'workflowRunTimeout
           (\ StartChildWorkflowExecution
x__ Maybe Duration
y__
              -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'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 StartChildWorkflowExecution "maybe'workflowRunTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowRunTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "maybe'workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Maybe Duration)
-> (StartChildWorkflowExecution
    -> Maybe Duration -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Maybe Duration
_StartChildWorkflowExecution'workflowRunTimeout
           (\ StartChildWorkflowExecution
x__ Maybe Duration
y__
              -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'workflowRunTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution "workflowTaskTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskTimeout"
-> (Duration -> f Duration)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Maybe Duration)
-> (StartChildWorkflowExecution
    -> Maybe Duration -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Maybe Duration
_StartChildWorkflowExecution'workflowTaskTimeout
           (\ StartChildWorkflowExecution
x__ Maybe Duration
y__
              -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'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 StartChildWorkflowExecution "maybe'workflowTaskTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowTaskTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "maybe'workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Maybe Duration)
-> (StartChildWorkflowExecution
    -> Maybe Duration -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Maybe Duration
_StartChildWorkflowExecution'workflowTaskTimeout
           (\ StartChildWorkflowExecution
x__ Maybe Duration
y__
              -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'workflowTaskTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution "parentClosePolicy" Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.ParentClosePolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "parentClosePolicy"
-> (ParentClosePolicy -> f ParentClosePolicy)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "parentClosePolicy"
_
    = ((ParentClosePolicy -> f ParentClosePolicy)
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((ParentClosePolicy -> f ParentClosePolicy)
    -> ParentClosePolicy -> f ParentClosePolicy)
-> (ParentClosePolicy -> f ParentClosePolicy)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> ParentClosePolicy)
-> (StartChildWorkflowExecution
    -> ParentClosePolicy -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     ParentClosePolicy
     ParentClosePolicy
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> ParentClosePolicy
_StartChildWorkflowExecution'parentClosePolicy
           (\ StartChildWorkflowExecution
x__ ParentClosePolicy
y__
              -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'parentClosePolicy = y__}))
        (ParentClosePolicy -> f ParentClosePolicy)
-> ParentClosePolicy -> f ParentClosePolicy
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution "workflowIdReusePolicy" Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowIdReusePolicy"
-> (WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "workflowIdReusePolicy"
_
    = ((WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
    -> WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> (WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> WorkflowIdReusePolicy)
-> (StartChildWorkflowExecution
    -> WorkflowIdReusePolicy -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     WorkflowIdReusePolicy
     WorkflowIdReusePolicy
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> WorkflowIdReusePolicy
_StartChildWorkflowExecution'workflowIdReusePolicy
           (\ StartChildWorkflowExecution
x__ WorkflowIdReusePolicy
y__
              -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'workflowIdReusePolicy = y__}))
        (WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> WorkflowIdReusePolicy -> f WorkflowIdReusePolicy
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution "retryPolicy" Proto.Temporal.Api.Common.V1.Message.RetryPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryPolicy"
-> (RetryPolicy -> f RetryPolicy)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((RetryPolicy -> f RetryPolicy)
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (RetryPolicy -> f RetryPolicy)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Maybe RetryPolicy)
-> (StartChildWorkflowExecution
    -> Maybe RetryPolicy -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Maybe RetryPolicy
_StartChildWorkflowExecution'retryPolicy
           (\ StartChildWorkflowExecution
x__ Maybe RetryPolicy
y__
              -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'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 StartChildWorkflowExecution "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))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "maybe'retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Maybe RetryPolicy)
-> (StartChildWorkflowExecution
    -> Maybe RetryPolicy -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Maybe RetryPolicy
_StartChildWorkflowExecution'retryPolicy
           (\ StartChildWorkflowExecution
x__ Maybe RetryPolicy
y__
              -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'retryPolicy = y__}))
        (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> Maybe RetryPolicy -> f (Maybe RetryPolicy)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution "cronSchedule" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cronSchedule"
-> (Text -> f Text)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "cronSchedule"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Text)
-> (StartChildWorkflowExecution
    -> Text -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution StartChildWorkflowExecution Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> Text
_StartChildWorkflowExecution'cronSchedule
           (\ StartChildWorkflowExecution
x__ Text
y__
              -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'cronSchedule = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution "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))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "headers"
_
    = ((Map Text Payload -> f (Map Text Payload))
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Map Text Payload -> f (Map Text Payload))
    -> Map Text Payload -> f (Map Text Payload))
-> (Map Text Payload -> f (Map Text Payload))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Map Text Payload)
-> (StartChildWorkflowExecution
    -> Map Text Payload -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (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
           StartChildWorkflowExecution -> Map Text Payload
_StartChildWorkflowExecution'headers
           (\ StartChildWorkflowExecution
x__ Map Text Payload
y__ -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'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 StartChildWorkflowExecution "memo" (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "memo"
-> (Map Text Payload -> f (Map Text Payload))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "memo"
_
    = ((Map Text Payload -> f (Map Text Payload))
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Map Text Payload -> f (Map Text Payload))
    -> Map Text Payload -> f (Map Text Payload))
-> (Map Text Payload -> f (Map Text Payload))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Map Text Payload)
-> (StartChildWorkflowExecution
    -> Map Text Payload -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (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
           StartChildWorkflowExecution -> Map Text Payload
_StartChildWorkflowExecution'memo
           (\ StartChildWorkflowExecution
x__ Map Text Payload
y__ -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'memo = 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 StartChildWorkflowExecution "searchAttributes" (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "searchAttributes"
-> (Map Text Payload -> f (Map Text Payload))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "searchAttributes"
_
    = ((Map Text Payload -> f (Map Text Payload))
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((Map Text Payload -> f (Map Text Payload))
    -> Map Text Payload -> f (Map Text Payload))
-> (Map Text Payload -> f (Map Text Payload))
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> Map Text Payload)
-> (StartChildWorkflowExecution
    -> Map Text Payload -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (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
           StartChildWorkflowExecution -> Map Text Payload
_StartChildWorkflowExecution'searchAttributes
           (\ StartChildWorkflowExecution
x__ Map Text Payload
y__
              -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'searchAttributes = 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 StartChildWorkflowExecution "cancellationType" Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.ChildWorkflowCancellationType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cancellationType"
-> (ChildWorkflowCancellationType
    -> f ChildWorkflowCancellationType)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "cancellationType"
_
    = ((ChildWorkflowCancellationType -> f ChildWorkflowCancellationType)
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((ChildWorkflowCancellationType
     -> f ChildWorkflowCancellationType)
    -> ChildWorkflowCancellationType
    -> f ChildWorkflowCancellationType)
-> (ChildWorkflowCancellationType
    -> f ChildWorkflowCancellationType)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> ChildWorkflowCancellationType)
-> (StartChildWorkflowExecution
    -> ChildWorkflowCancellationType -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     ChildWorkflowCancellationType
     ChildWorkflowCancellationType
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> ChildWorkflowCancellationType
_StartChildWorkflowExecution'cancellationType
           (\ StartChildWorkflowExecution
x__ ChildWorkflowCancellationType
y__
              -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'cancellationType = y__}))
        (ChildWorkflowCancellationType -> f ChildWorkflowCancellationType)
-> ChildWorkflowCancellationType -> f ChildWorkflowCancellationType
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution "versioningIntent" Proto.Temporal.Sdk.Core.Common.Common.VersioningIntent where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "versioningIntent"
-> (VersioningIntent -> f VersioningIntent)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
fieldOf Proxy# "versioningIntent"
_
    = ((VersioningIntent -> f VersioningIntent)
 -> StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> ((VersioningIntent -> f VersioningIntent)
    -> VersioningIntent -> f VersioningIntent)
-> (VersioningIntent -> f VersioningIntent)
-> StartChildWorkflowExecution
-> f StartChildWorkflowExecution
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution -> VersioningIntent)
-> (StartChildWorkflowExecution
    -> VersioningIntent -> StartChildWorkflowExecution)
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     VersioningIntent
     VersioningIntent
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution -> VersioningIntent
_StartChildWorkflowExecution'versioningIntent
           (\ StartChildWorkflowExecution
x__ VersioningIntent
y__
              -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'versioningIntent = y__}))
        (VersioningIntent -> f VersioningIntent)
-> VersioningIntent -> f VersioningIntent
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message StartChildWorkflowExecution where
  messageName :: Proxy StartChildWorkflowExecution -> Text
messageName Proxy StartChildWorkflowExecution
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.StartChildWorkflowExecution"
  packedMessageDescriptor :: Proxy StartChildWorkflowExecution -> ByteString
packedMessageDescriptor Proxy StartChildWorkflowExecution
_
    = ByteString
"\n\
      \\ESCStartChildWorkflowExecution\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2\FS\n\
      \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2\US\n\
      \\vworkflow_id\CAN\ETX \SOH(\tR\n\
      \workflowId\DC2#\n\
      \\rworkflow_type\CAN\EOT \SOH(\tR\fworkflowType\DC2\GS\n\
      \\n\
      \task_queue\CAN\ENQ \SOH(\tR\ttaskQueue\DC25\n\
      \\ENQinput\CAN\ACK \ETX(\v2\US.temporal.api.common.v1.PayloadR\ENQinput\DC2W\n\
      \\SUBworkflow_execution_timeout\CAN\a \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
      \\DC4workflow_run_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
      \\NAKworkflow_task_timeout\CAN\t \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2Y\n\
      \\DC3parent_close_policy\CAN\n\
      \ \SOH(\SO2).coresdk.child_workflow.ParentClosePolicyR\DC1parentClosePolicy\DC2e\n\
      \\CANworkflow_id_reuse_policy\CAN\f \SOH(\SO2,.temporal.api.enums.v1.WorkflowIdReusePolicyR\NAKworkflowIdReusePolicy\DC2F\n\
      \\fretry_policy\CAN\r \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2#\n\
      \\rcron_schedule\CAN\SO \SOH(\tR\fcronSchedule\DC2]\n\
      \\aheaders\CAN\SI \ETX(\v2C.coresdk.workflow_commands.StartChildWorkflowExecution.HeadersEntryR\aheaders\DC2T\n\
      \\EOTmemo\CAN\DLE \ETX(\v2@.coresdk.workflow_commands.StartChildWorkflowExecution.MemoEntryR\EOTmemo\DC2y\n\
      \\DC1search_attributes\CAN\DC1 \ETX(\v2L.coresdk.workflow_commands.StartChildWorkflowExecution.SearchAttributesEntryR\DLEsearchAttributes\DC2b\n\
      \\DC1cancellation_type\CAN\DC2 \SOH(\SO25.coresdk.child_workflow.ChildWorkflowCancellationTypeR\DLEcancellationType\DC2M\n\
      \\DC1versioning_intent\CAN\DC3 \SOH(\SO2 .coresdk.common.VersioningIntentR\DLEversioningIntent\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\SUBX\n\
      \\tMemoEntry\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\SUBd\n\
      \\NAKSearchAttributesEntry\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 StartChildWorkflowExecution -> ByteString
packedFileDescriptor Proxy StartChildWorkflowExecution
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor StartChildWorkflowExecution)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor StartChildWorkflowExecution Word32
-> FieldDescriptor StartChildWorkflowExecution
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
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     Word32
     Word32
-> FieldAccessor StartChildWorkflowExecution 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 StartChildWorkflowExecution
        namespace__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartChildWorkflowExecution Text
-> FieldDescriptor StartChildWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     StartChildWorkflowExecution StartChildWorkflowExecution Text Text
-> FieldAccessor StartChildWorkflowExecution Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"namespace")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecution
        workflowId__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
workflowId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartChildWorkflowExecution Text
-> FieldDescriptor StartChildWorkflowExecution
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
     StartChildWorkflowExecution StartChildWorkflowExecution Text Text
-> FieldAccessor StartChildWorkflowExecution 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 StartChildWorkflowExecution
        workflowType__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartChildWorkflowExecution Text
-> FieldDescriptor StartChildWorkflowExecution
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
     StartChildWorkflowExecution StartChildWorkflowExecution Text Text
-> FieldAccessor StartChildWorkflowExecution 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 StartChildWorkflowExecution
        taskQueue__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartChildWorkflowExecution Text
-> FieldDescriptor StartChildWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_queue"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     StartChildWorkflowExecution StartChildWorkflowExecution Text Text
-> FieldAccessor StartChildWorkflowExecution Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskQueue")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecution
        input__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
input__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor StartChildWorkflowExecution Payload
-> FieldDescriptor StartChildWorkflowExecution
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' StartChildWorkflowExecution [Payload]
-> FieldAccessor StartChildWorkflowExecution 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 StartChildWorkflowExecution
        workflowExecutionTimeout__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
workflowExecutionTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor StartChildWorkflowExecution Duration
-> FieldDescriptor StartChildWorkflowExecution
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
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor StartChildWorkflowExecution 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 StartChildWorkflowExecution
        workflowRunTimeout__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
workflowRunTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor StartChildWorkflowExecution Duration
-> FieldDescriptor StartChildWorkflowExecution
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
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor StartChildWorkflowExecution 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 StartChildWorkflowExecution
        workflowTaskTimeout__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
workflowTaskTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor StartChildWorkflowExecution Duration
-> FieldDescriptor StartChildWorkflowExecution
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
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor StartChildWorkflowExecution 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 StartChildWorkflowExecution
        parentClosePolicy__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
parentClosePolicy__field_descriptor
          = String
-> FieldTypeDescriptor ParentClosePolicy
-> FieldAccessor StartChildWorkflowExecution ParentClosePolicy
-> FieldDescriptor StartChildWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"parent_close_policy"
              (ScalarField ParentClosePolicy
-> FieldTypeDescriptor ParentClosePolicy
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ParentClosePolicy
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.ParentClosePolicy)
              (WireDefault ParentClosePolicy
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     ParentClosePolicy
     ParentClosePolicy
-> FieldAccessor StartChildWorkflowExecution ParentClosePolicy
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ParentClosePolicy
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"parentClosePolicy")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecution
        workflowIdReusePolicy__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
workflowIdReusePolicy__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowIdReusePolicy
-> FieldAccessor StartChildWorkflowExecution WorkflowIdReusePolicy
-> FieldDescriptor StartChildWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_id_reuse_policy"
              (ScalarField WorkflowIdReusePolicy
-> FieldTypeDescriptor WorkflowIdReusePolicy
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField WorkflowIdReusePolicy
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy)
              (WireDefault WorkflowIdReusePolicy
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     WorkflowIdReusePolicy
     WorkflowIdReusePolicy
-> FieldAccessor StartChildWorkflowExecution WorkflowIdReusePolicy
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault WorkflowIdReusePolicy
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"workflowIdReusePolicy")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecution
        retryPolicy__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
retryPolicy__field_descriptor
          = String
-> FieldTypeDescriptor RetryPolicy
-> FieldAccessor StartChildWorkflowExecution RetryPolicy
-> FieldDescriptor StartChildWorkflowExecution
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
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> FieldAccessor StartChildWorkflowExecution 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 StartChildWorkflowExecution
        cronSchedule__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
cronSchedule__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartChildWorkflowExecution Text
-> FieldDescriptor StartChildWorkflowExecution
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
     StartChildWorkflowExecution StartChildWorkflowExecution Text Text
-> FieldAccessor StartChildWorkflowExecution 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 StartChildWorkflowExecution
        headers__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
headers__field_descriptor
          = String
-> FieldTypeDescriptor StartChildWorkflowExecution'HeadersEntry
-> FieldAccessor
     StartChildWorkflowExecution
     StartChildWorkflowExecution'HeadersEntry
-> FieldDescriptor StartChildWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"headers"
              (MessageOrGroup
-> FieldTypeDescriptor StartChildWorkflowExecution'HeadersEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor StartChildWorkflowExecution'HeadersEntry)
              (Lens' StartChildWorkflowExecution'HeadersEntry Text
-> Lens' StartChildWorkflowExecution'HeadersEntry Payload
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (Map Text Payload)
     (Map Text Payload)
-> FieldAccessor
     StartChildWorkflowExecution
     StartChildWorkflowExecution'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 StartChildWorkflowExecution
        memo__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
memo__field_descriptor
          = String
-> FieldTypeDescriptor StartChildWorkflowExecution'MemoEntry
-> FieldAccessor
     StartChildWorkflowExecution StartChildWorkflowExecution'MemoEntry
-> FieldDescriptor StartChildWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"memo"
              (MessageOrGroup
-> FieldTypeDescriptor StartChildWorkflowExecution'MemoEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor StartChildWorkflowExecution'MemoEntry)
              (Lens' StartChildWorkflowExecution'MemoEntry Text
-> Lens' StartChildWorkflowExecution'MemoEntry Payload
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (Map Text Payload)
     (Map Text Payload)
-> FieldAccessor
     StartChildWorkflowExecution StartChildWorkflowExecution'MemoEntry
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 @"memo")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecution
        searchAttributes__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
searchAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     StartChildWorkflowExecution'SearchAttributesEntry
-> FieldAccessor
     StartChildWorkflowExecution
     StartChildWorkflowExecution'SearchAttributesEntry
-> FieldDescriptor StartChildWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"search_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     StartChildWorkflowExecution'SearchAttributesEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor StartChildWorkflowExecution'SearchAttributesEntry)
              (Lens' StartChildWorkflowExecution'SearchAttributesEntry Text
-> Lens' StartChildWorkflowExecution'SearchAttributesEntry Payload
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     (Map Text Payload)
     (Map Text Payload)
-> FieldAccessor
     StartChildWorkflowExecution
     StartChildWorkflowExecution'SearchAttributesEntry
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 @"searchAttributes")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecution
        cancellationType__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
cancellationType__field_descriptor
          = String
-> FieldTypeDescriptor ChildWorkflowCancellationType
-> FieldAccessor
     StartChildWorkflowExecution ChildWorkflowCancellationType
-> FieldDescriptor StartChildWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cancellation_type"
              (ScalarField ChildWorkflowCancellationType
-> FieldTypeDescriptor ChildWorkflowCancellationType
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ChildWorkflowCancellationType
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Sdk.Core.ChildWorkflow.ChildWorkflow.ChildWorkflowCancellationType)
              (WireDefault ChildWorkflowCancellationType
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     ChildWorkflowCancellationType
     ChildWorkflowCancellationType
-> FieldAccessor
     StartChildWorkflowExecution ChildWorkflowCancellationType
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ChildWorkflowCancellationType
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cancellationType")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecution
        versioningIntent__field_descriptor :: FieldDescriptor StartChildWorkflowExecution
versioningIntent__field_descriptor
          = String
-> FieldTypeDescriptor VersioningIntent
-> FieldAccessor StartChildWorkflowExecution VersioningIntent
-> FieldDescriptor StartChildWorkflowExecution
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"versioning_intent"
              (ScalarField VersioningIntent
-> FieldTypeDescriptor VersioningIntent
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField VersioningIntent
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Sdk.Core.Common.Common.VersioningIntent)
              (WireDefault VersioningIntent
-> Lens
     StartChildWorkflowExecution
     StartChildWorkflowExecution
     VersioningIntent
     VersioningIntent
-> FieldAccessor StartChildWorkflowExecution VersioningIntent
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault VersioningIntent
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"versioningIntent")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecution
      in
        [(Tag, FieldDescriptor StartChildWorkflowExecution)]
-> Map Tag (FieldDescriptor StartChildWorkflowExecution)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor StartChildWorkflowExecution
seq__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor StartChildWorkflowExecution
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor StartChildWorkflowExecution
workflowId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor StartChildWorkflowExecution
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor StartChildWorkflowExecution
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor StartChildWorkflowExecution
input__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor StartChildWorkflowExecution
workflowExecutionTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor StartChildWorkflowExecution
workflowRunTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor StartChildWorkflowExecution
workflowTaskTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor StartChildWorkflowExecution
parentClosePolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor StartChildWorkflowExecution
workflowIdReusePolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor StartChildWorkflowExecution
retryPolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
14, FieldDescriptor StartChildWorkflowExecution
cronSchedule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
15, FieldDescriptor StartChildWorkflowExecution
headers__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
16, FieldDescriptor StartChildWorkflowExecution
memo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
17, FieldDescriptor StartChildWorkflowExecution
searchAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
18, FieldDescriptor StartChildWorkflowExecution
cancellationType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
19, FieldDescriptor StartChildWorkflowExecution
versioningIntent__field_descriptor)]
  unknownFields :: Lens' StartChildWorkflowExecution FieldSet
unknownFields
    = (StartChildWorkflowExecution -> FieldSet)
-> (StartChildWorkflowExecution
    -> FieldSet -> StartChildWorkflowExecution)
-> Lens' StartChildWorkflowExecution FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        StartChildWorkflowExecution -> FieldSet
_StartChildWorkflowExecution'_unknownFields
        (\ StartChildWorkflowExecution
x__ FieldSet
y__
           -> StartChildWorkflowExecution
x__ {_StartChildWorkflowExecution'_unknownFields = y__})
  defMessage :: StartChildWorkflowExecution
defMessage
    = StartChildWorkflowExecution'_constructor
        {_StartChildWorkflowExecution'seq :: Word32
_StartChildWorkflowExecution'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecution'namespace :: Text
_StartChildWorkflowExecution'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecution'workflowId :: Text
_StartChildWorkflowExecution'workflowId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecution'workflowType :: Text
_StartChildWorkflowExecution'workflowType = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecution'taskQueue :: Text
_StartChildWorkflowExecution'taskQueue = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecution'input :: Vector Payload
_StartChildWorkflowExecution'input = Vector Payload
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _StartChildWorkflowExecution'workflowExecutionTimeout :: Maybe Duration
_StartChildWorkflowExecution'workflowExecutionTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecution'workflowRunTimeout :: Maybe Duration
_StartChildWorkflowExecution'workflowRunTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecution'workflowTaskTimeout :: Maybe Duration
_StartChildWorkflowExecution'workflowTaskTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecution'parentClosePolicy :: ParentClosePolicy
_StartChildWorkflowExecution'parentClosePolicy = ParentClosePolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecution'workflowIdReusePolicy :: WorkflowIdReusePolicy
_StartChildWorkflowExecution'workflowIdReusePolicy = WorkflowIdReusePolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecution'retryPolicy :: Maybe RetryPolicy
_StartChildWorkflowExecution'retryPolicy = Maybe RetryPolicy
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecution'cronSchedule :: Text
_StartChildWorkflowExecution'cronSchedule = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecution'headers :: Map Text Payload
_StartChildWorkflowExecution'headers = Map Text Payload
forall k a. Map k a
Data.Map.empty,
         _StartChildWorkflowExecution'memo :: Map Text Payload
_StartChildWorkflowExecution'memo = Map Text Payload
forall k a. Map k a
Data.Map.empty,
         _StartChildWorkflowExecution'searchAttributes :: Map Text Payload
_StartChildWorkflowExecution'searchAttributes = Map Text Payload
forall k a. Map k a
Data.Map.empty,
         _StartChildWorkflowExecution'cancellationType :: ChildWorkflowCancellationType
_StartChildWorkflowExecution'cancellationType = ChildWorkflowCancellationType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecution'versioningIntent :: VersioningIntent
_StartChildWorkflowExecution'versioningIntent = VersioningIntent
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecution'_unknownFields :: FieldSet
_StartChildWorkflowExecution'_unknownFields = []}
  parseMessage :: Parser StartChildWorkflowExecution
parseMessage
    = let
        loop ::
          StartChildWorkflowExecution
          -> 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 StartChildWorkflowExecution
        loop :: StartChildWorkflowExecution
-> Growing Vector RealWorld Payload
-> Parser StartChildWorkflowExecution
loop StartChildWorkflowExecution
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
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)
                                  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
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") 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
"workflow_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"workflowId") y x)
                                  mutable'input
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"workflow_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowType") y x)
                                  mutable'input
                        Word64
42
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"task_queue"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskQueue") y x)
                                  mutable'input
                        Word64
50
                          -> 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
58
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_execution_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecutionTimeout") y x)
                                  mutable'input
                        Word64
66
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_run_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowRunTimeout") y x)
                                  mutable'input
                        Word64
74
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_task_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskTimeout") y x)
                                  mutable'input
                        Word64
80
                          -> do y <- Parser ParentClosePolicy -> String -> Parser ParentClosePolicy
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> ParentClosePolicy)
-> Parser Int -> Parser ParentClosePolicy
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> ParentClosePolicy
forall a. Enum a => Int -> a
Prelude.toEnum
                                          ((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                             Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                             Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
                                       String
"parent_close_policy"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"parentClosePolicy") y x)
                                  mutable'input
                        Word64
96
                          -> do y <- Parser WorkflowIdReusePolicy
-> String -> Parser WorkflowIdReusePolicy
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> WorkflowIdReusePolicy)
-> Parser Int -> Parser WorkflowIdReusePolicy
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> WorkflowIdReusePolicy
forall a. Enum a => Int -> a
Prelude.toEnum
                                          ((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                             Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                             Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
                                       String
"workflow_id_reuse_policy"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowIdReusePolicy") y x)
                                  mutable'input
                        Word64
106
                          -> do y <- Parser RetryPolicy -> String -> Parser RetryPolicy
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"retry_policy"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"retryPolicy") y x)
                                  mutable'input
                        Word64
114
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"cron_schedule"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cronSchedule") y x)
                                  mutable'input
                        Word64
122
                          -> do !(entry :: StartChildWorkflowExecution'HeadersEntry) <- Parser StartChildWorkflowExecution'HeadersEntry
-> String -> Parser StartChildWorkflowExecution'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
  StartChildWorkflowExecution'HeadersEntry
  StartChildWorkflowExecution'HeadersEntry
  Text
  Text
-> StartChildWorkflowExecution'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") StartChildWorkflowExecution'HeadersEntry
entry
                                   value
                                     = FoldLike
  Payload
  StartChildWorkflowExecution'HeadersEntry
  StartChildWorkflowExecution'HeadersEntry
  Payload
  Payload
-> StartChildWorkflowExecution'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") StartChildWorkflowExecution'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
130
                          -> do !(entry :: StartChildWorkflowExecution'MemoEntry) <- Parser StartChildWorkflowExecution'MemoEntry
-> String -> Parser StartChildWorkflowExecution'MemoEntry
forall a. Parser a -> String -> Parser a
(Data.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"
                                (let
                                   key = FoldLike
  Text
  StartChildWorkflowExecution'MemoEntry
  StartChildWorkflowExecution'MemoEntry
  Text
  Text
-> StartChildWorkflowExecution'MemoEntry -> 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") StartChildWorkflowExecution'MemoEntry
entry
                                   value
                                     = FoldLike
  Payload
  StartChildWorkflowExecution'MemoEntry
  StartChildWorkflowExecution'MemoEntry
  Payload
  Payload
-> StartChildWorkflowExecution'MemoEntry -> 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") StartChildWorkflowExecution'MemoEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"memo")
                                        (\ !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
138
                          -> do !(entry :: StartChildWorkflowExecution'SearchAttributesEntry) <- Parser StartChildWorkflowExecution'SearchAttributesEntry
-> String
-> Parser StartChildWorkflowExecution'SearchAttributesEntry
forall a. Parser a -> String -> Parser a
(Data.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"
                                (let
                                   key = FoldLike
  Text
  StartChildWorkflowExecution'SearchAttributesEntry
  StartChildWorkflowExecution'SearchAttributesEntry
  Text
  Text
-> StartChildWorkflowExecution'SearchAttributesEntry -> 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") StartChildWorkflowExecution'SearchAttributesEntry
entry
                                   value
                                     = FoldLike
  Payload
  StartChildWorkflowExecution'SearchAttributesEntry
  StartChildWorkflowExecution'SearchAttributesEntry
  Payload
  Payload
-> StartChildWorkflowExecution'SearchAttributesEntry -> 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") StartChildWorkflowExecution'SearchAttributesEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"searchAttributes")
                                        (\ !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
144
                          -> do y <- Parser ChildWorkflowCancellationType
-> String -> Parser ChildWorkflowCancellationType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> ChildWorkflowCancellationType)
-> Parser Int -> Parser ChildWorkflowCancellationType
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> ChildWorkflowCancellationType
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
"cancellation_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cancellationType") y x)
                                  mutable'input
                        Word64
152
                          -> do y <- Parser VersioningIntent -> String -> Parser VersioningIntent
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> VersioningIntent) -> Parser Int -> Parser VersioningIntent
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> VersioningIntent
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
"versioning_intent"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"versioningIntent") 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 StartChildWorkflowExecution
-> String -> Parser StartChildWorkflowExecution
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
"StartChildWorkflowExecution"
  buildMessage :: StartChildWorkflowExecution -> Builder
buildMessage
    = \ StartChildWorkflowExecution
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike
  Word32
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  Word32
  Word32
-> StartChildWorkflowExecution -> 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") StartChildWorkflowExecution
_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.<>)
                (let
                   _v :: Text
_v = FoldLike
  Text
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  Text
  Text
-> StartChildWorkflowExecution -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"namespace") StartChildWorkflowExecution
_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
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  Text
  Text
-> StartChildWorkflowExecution -> 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") StartChildWorkflowExecution
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Text
_v
                           = FoldLike
  Text
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  Text
  Text
-> StartChildWorkflowExecution -> 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") StartChildWorkflowExecution
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Text
_v = FoldLike
  Text
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  Text
  Text
-> StartChildWorkflowExecution -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskQueue") StartChildWorkflowExecution
_x
                          in
                            if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                  ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     (\ ByteString
bs
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                     Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            ((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
50)
                                       ((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)
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  (Vector Payload)
  (Vector Payload)
-> StartChildWorkflowExecution -> 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") StartChildWorkflowExecution
_x))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (case
                                    FoldLike
  (Maybe Duration)
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  (Maybe Duration)
  (Maybe Duration)
-> StartChildWorkflowExecution -> 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")
                                      StartChildWorkflowExecution
_x
                                of
                                  Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  (Prelude.Just Duration
_v)
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                         ((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                            (\ ByteString
bs
                                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                          (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                            Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (case
                                       FoldLike
  (Maybe Duration)
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  (Maybe Duration)
  (Maybe Duration)
-> StartChildWorkflowExecution -> 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") StartChildWorkflowExecution
_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)
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  (Maybe Duration)
  (Maybe Duration)
-> StartChildWorkflowExecution -> 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")
                                            StartChildWorkflowExecution
_x
                                      of
                                        Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                        (Prelude.Just Duration
_v)
                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
                                               ((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                  (\ ByteString
bs
                                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                             ByteString
bs))
                                                  Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
                                     (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (let
                                           _v :: ParentClosePolicy
_v
                                             = FoldLike
  ParentClosePolicy
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  ParentClosePolicy
  ParentClosePolicy
-> StartChildWorkflowExecution -> ParentClosePolicy
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"parentClosePolicy")
                                                 StartChildWorkflowExecution
_x
                                         in
                                           if ParentClosePolicy -> ParentClosePolicy -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ParentClosePolicy
_v ParentClosePolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                               Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                           else
                                               Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
80)
                                                 ((Int -> Builder)
-> (ParentClosePolicy -> Int) -> ParentClosePolicy -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                    ((Word64 -> Builder) -> (Int -> Word64) -> Int -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                       Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                       Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
                                                    ParentClosePolicy -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum ParentClosePolicy
_v))
                                        (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (let
                                              _v :: WorkflowIdReusePolicy
_v
                                                = FoldLike
  WorkflowIdReusePolicy
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  WorkflowIdReusePolicy
  WorkflowIdReusePolicy
-> StartChildWorkflowExecution -> WorkflowIdReusePolicy
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                    (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                       @"workflowIdReusePolicy")
                                                    StartChildWorkflowExecution
_x
                                            in
                                              if WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) WorkflowIdReusePolicy
_v WorkflowIdReusePolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                  Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                              else
                                                  Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
96)
                                                    ((Int -> Builder)
-> (WorkflowIdReusePolicy -> Int)
-> WorkflowIdReusePolicy
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                       ((Word64 -> Builder) -> (Int -> Word64) -> Int -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                          Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                          Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
                                                       WorkflowIdReusePolicy -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum WorkflowIdReusePolicy
_v))
                                           (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (case
                                                   FoldLike
  (Maybe RetryPolicy)
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> StartChildWorkflowExecution -> 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")
                                                     StartChildWorkflowExecution
_x
                                               of
                                                 Maybe RetryPolicy
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                 (Prelude.Just RetryPolicy
_v)
                                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                           Word64
106)
                                                        ((ByteString -> Builder)
-> (RetryPolicy -> ByteString) -> RetryPolicy -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                           (\ ByteString
bs
                                                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                         (ByteString -> Int
Data.ByteString.length
                                                                            ByteString
bs)))
                                                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                      ByteString
bs))
                                                           RetryPolicy -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage RetryPolicy
_v))
                                              (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (let
                                                    _v :: Text
_v
                                                      = FoldLike
  Text
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  Text
  Text
-> StartChildWorkflowExecution -> 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")
                                                          StartChildWorkflowExecution
_x
                                                  in
                                                    if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
                                                         Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                        Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                    else
                                                        Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                             Word64
114)
                                                          ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                             (\ ByteString
bs
                                                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                           (ByteString -> Int
Data.ByteString.length
                                                                              ByteString
bs)))
                                                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                        ByteString
bs))
                                                             Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                                                 (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    ([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
122)
                                                                  ((ByteString -> Builder)
-> (StartChildWorkflowExecution'HeadersEntry -> ByteString)
-> StartChildWorkflowExecution'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))
                                                                     StartChildWorkflowExecution'HeadersEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                     (Setter
  StartChildWorkflowExecution'HeadersEntry
  StartChildWorkflowExecution'HeadersEntry
  Text
  Text
-> Text
-> StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'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
  StartChildWorkflowExecution'HeadersEntry
  StartChildWorkflowExecution'HeadersEntry
  Payload
  Payload
-> Payload
-> StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'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)
                                                                           (StartChildWorkflowExecution'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                                              StartChildWorkflowExecution'HeadersEntry)))))
                                                          (Map Text Payload -> [(Text, Payload)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                                             (FoldLike
  (Map Text Payload)
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  (Map Text Payload)
  (Map Text Payload)
-> StartChildWorkflowExecution -> 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")
                                                                StartChildWorkflowExecution
_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
130)
                                                                     ((ByteString -> Builder)
-> (StartChildWorkflowExecution'MemoEntry -> ByteString)
-> StartChildWorkflowExecution'MemoEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                        (\ ByteString
bs
                                                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                      (ByteString -> Int
Data.ByteString.length
                                                                                         ByteString
bs)))
                                                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                   ByteString
bs))
                                                                        StartChildWorkflowExecution'MemoEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                        (Setter
  StartChildWorkflowExecution'MemoEntry
  StartChildWorkflowExecution'MemoEntry
  Text
  Text
-> Text
-> StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry
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
  StartChildWorkflowExecution'MemoEntry
  StartChildWorkflowExecution'MemoEntry
  Payload
  Payload
-> Payload
-> StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry
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)
                                                                              (StartChildWorkflowExecution'MemoEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                                                 StartChildWorkflowExecution'MemoEntry)))))
                                                             (Map Text Payload -> [(Text, Payload)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                                                (FoldLike
  (Map Text Payload)
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  (Map Text Payload)
  (Map Text Payload)
-> StartChildWorkflowExecution -> 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
                                                                      @"memo")
                                                                   StartChildWorkflowExecution
_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
138)
                                                                        ((ByteString -> Builder)
-> (StartChildWorkflowExecution'SearchAttributesEntry
    -> ByteString)
-> StartChildWorkflowExecution'SearchAttributesEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                           (\ ByteString
bs
                                                                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                         (ByteString -> Int
Data.ByteString.length
                                                                                            ByteString
bs)))
                                                                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                      ByteString
bs))
                                                                           StartChildWorkflowExecution'SearchAttributesEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                           (Setter
  StartChildWorkflowExecution'SearchAttributesEntry
  StartChildWorkflowExecution'SearchAttributesEntry
  Text
  Text
-> Text
-> StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry
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
  StartChildWorkflowExecution'SearchAttributesEntry
  StartChildWorkflowExecution'SearchAttributesEntry
  Payload
  Payload
-> Payload
-> StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry
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)
                                                                                 (StartChildWorkflowExecution'SearchAttributesEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                                                    StartChildWorkflowExecution'SearchAttributesEntry)))))
                                                                (Map Text Payload -> [(Text, Payload)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                                                   (FoldLike
  (Map Text Payload)
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  (Map Text Payload)
  (Map Text Payload)
-> StartChildWorkflowExecution -> 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
                                                                         @"searchAttributes")
                                                                      StartChildWorkflowExecution
_x))))
                                                          (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                             (let
                                                                _v :: ChildWorkflowCancellationType
_v
                                                                  = FoldLike
  ChildWorkflowCancellationType
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  ChildWorkflowCancellationType
  ChildWorkflowCancellationType
-> StartChildWorkflowExecution -> ChildWorkflowCancellationType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                      (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                         @"cancellationType")
                                                                      StartChildWorkflowExecution
_x
                                                              in
                                                                if ChildWorkflowCancellationType
-> ChildWorkflowCancellationType -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
                                                                     ChildWorkflowCancellationType
_v
                                                                     ChildWorkflowCancellationType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                                else
                                                                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                         Word64
144)
                                                                      ((Int -> Builder)
-> (ChildWorkflowCancellationType -> Int)
-> ChildWorkflowCancellationType
-> 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)
                                                                         ChildWorkflowCancellationType -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum ChildWorkflowCancellationType
_v))
                                                             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                (let
                                                                   _v :: VersioningIntent
_v
                                                                     = FoldLike
  VersioningIntent
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  VersioningIntent
  VersioningIntent
-> StartChildWorkflowExecution -> VersioningIntent
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                            @"versioningIntent")
                                                                         StartChildWorkflowExecution
_x
                                                                 in
                                                                   if VersioningIntent -> VersioningIntent -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
                                                                        VersioningIntent
_v
                                                                        VersioningIntent
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                                   else
                                                                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                            Word64
152)
                                                                         ((Int -> Builder)
-> (VersioningIntent -> Int) -> VersioningIntent -> 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)
                                                                            VersioningIntent -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum VersioningIntent
_v))
                                                                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                                                   (FoldLike
  FieldSet
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  FieldSet
  FieldSet
-> StartChildWorkflowExecution -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                      FoldLike
  FieldSet
  StartChildWorkflowExecution
  StartChildWorkflowExecution
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' StartChildWorkflowExecution FieldSet
Data.ProtoLens.unknownFields
                                                                      StartChildWorkflowExecution
_x)))))))))))))))))))
instance Control.DeepSeq.NFData StartChildWorkflowExecution where
  rnf :: StartChildWorkflowExecution -> ()
rnf
    = \ StartChildWorkflowExecution
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (StartChildWorkflowExecution -> FieldSet
_StartChildWorkflowExecution'_unknownFields StartChildWorkflowExecution
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (StartChildWorkflowExecution -> Word32
_StartChildWorkflowExecution'seq StartChildWorkflowExecution
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (StartChildWorkflowExecution -> Text
_StartChildWorkflowExecution'namespace StartChildWorkflowExecution
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (StartChildWorkflowExecution -> Text
_StartChildWorkflowExecution'workflowId StartChildWorkflowExecution
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (StartChildWorkflowExecution -> Text
_StartChildWorkflowExecution'workflowType StartChildWorkflowExecution
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (StartChildWorkflowExecution -> Text
_StartChildWorkflowExecution'taskQueue StartChildWorkflowExecution
x__)
                            (Vector Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (StartChildWorkflowExecution -> Vector Payload
_StartChildWorkflowExecution'input StartChildWorkflowExecution
x__)
                               (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (StartChildWorkflowExecution -> Maybe Duration
_StartChildWorkflowExecution'workflowExecutionTimeout StartChildWorkflowExecution
x__)
                                  (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (StartChildWorkflowExecution -> Maybe Duration
_StartChildWorkflowExecution'workflowRunTimeout StartChildWorkflowExecution
x__)
                                     (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (StartChildWorkflowExecution -> Maybe Duration
_StartChildWorkflowExecution'workflowTaskTimeout StartChildWorkflowExecution
x__)
                                        (ParentClosePolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (StartChildWorkflowExecution -> ParentClosePolicy
_StartChildWorkflowExecution'parentClosePolicy StartChildWorkflowExecution
x__)
                                           (WorkflowIdReusePolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (StartChildWorkflowExecution -> WorkflowIdReusePolicy
_StartChildWorkflowExecution'workflowIdReusePolicy
                                                 StartChildWorkflowExecution
x__)
                                              (Maybe RetryPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (StartChildWorkflowExecution -> Maybe RetryPolicy
_StartChildWorkflowExecution'retryPolicy StartChildWorkflowExecution
x__)
                                                 (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (StartChildWorkflowExecution -> Text
_StartChildWorkflowExecution'cronSchedule StartChildWorkflowExecution
x__)
                                                    (Map Text Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                       (StartChildWorkflowExecution -> Map Text Payload
_StartChildWorkflowExecution'headers StartChildWorkflowExecution
x__)
                                                       (Map Text Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                          (StartChildWorkflowExecution -> Map Text Payload
_StartChildWorkflowExecution'memo StartChildWorkflowExecution
x__)
                                                          (Map Text Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                             (StartChildWorkflowExecution -> Map Text Payload
_StartChildWorkflowExecution'searchAttributes
                                                                StartChildWorkflowExecution
x__)
                                                             (ChildWorkflowCancellationType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                (StartChildWorkflowExecution -> ChildWorkflowCancellationType
_StartChildWorkflowExecution'cancellationType
                                                                   StartChildWorkflowExecution
x__)
                                                                (VersioningIntent -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                   (StartChildWorkflowExecution -> VersioningIntent
_StartChildWorkflowExecution'versioningIntent
                                                                      StartChildWorkflowExecution
x__)
                                                                   ()))))))))))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.key' @:: Lens' StartChildWorkflowExecution'HeadersEntry Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.value' @:: Lens' StartChildWorkflowExecution'HeadersEntry Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'value' @:: Lens' StartChildWorkflowExecution'HeadersEntry (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data StartChildWorkflowExecution'HeadersEntry
  = StartChildWorkflowExecution'HeadersEntry'_constructor {StartChildWorkflowExecution'HeadersEntry -> Text
_StartChildWorkflowExecution'HeadersEntry'key :: !Data.Text.Text,
                                                           StartChildWorkflowExecution'HeadersEntry -> Maybe Payload
_StartChildWorkflowExecution'HeadersEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                                           StartChildWorkflowExecution'HeadersEntry -> FieldSet
_StartChildWorkflowExecution'HeadersEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Bool
(StartChildWorkflowExecution'HeadersEntry
 -> StartChildWorkflowExecution'HeadersEntry -> Bool)
-> (StartChildWorkflowExecution'HeadersEntry
    -> StartChildWorkflowExecution'HeadersEntry -> Bool)
-> Eq StartChildWorkflowExecution'HeadersEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Bool
== :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Bool
$c/= :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Bool
/= :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Bool
Prelude.Eq, Eq StartChildWorkflowExecution'HeadersEntry
Eq StartChildWorkflowExecution'HeadersEntry =>
(StartChildWorkflowExecution'HeadersEntry
 -> StartChildWorkflowExecution'HeadersEntry -> Ordering)
-> (StartChildWorkflowExecution'HeadersEntry
    -> StartChildWorkflowExecution'HeadersEntry -> Bool)
-> (StartChildWorkflowExecution'HeadersEntry
    -> StartChildWorkflowExecution'HeadersEntry -> Bool)
-> (StartChildWorkflowExecution'HeadersEntry
    -> StartChildWorkflowExecution'HeadersEntry -> Bool)
-> (StartChildWorkflowExecution'HeadersEntry
    -> StartChildWorkflowExecution'HeadersEntry -> Bool)
-> (StartChildWorkflowExecution'HeadersEntry
    -> StartChildWorkflowExecution'HeadersEntry
    -> StartChildWorkflowExecution'HeadersEntry)
-> (StartChildWorkflowExecution'HeadersEntry
    -> StartChildWorkflowExecution'HeadersEntry
    -> StartChildWorkflowExecution'HeadersEntry)
-> Ord StartChildWorkflowExecution'HeadersEntry
StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Bool
StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Ordering
StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'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 :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Ordering
compare :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Ordering
$c< :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Bool
< :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Bool
$c<= :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Bool
<= :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Bool
$c> :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Bool
> :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Bool
$c>= :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Bool
>= :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry -> Bool
$cmax :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry
max :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry
$cmin :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry
min :: StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry
-> StartChildWorkflowExecution'HeadersEntry
Prelude.Ord)
instance Prelude.Show StartChildWorkflowExecution'HeadersEntry where
  showsPrec :: Int -> StartChildWorkflowExecution'HeadersEntry -> ShowS
showsPrec Int
_ StartChildWorkflowExecution'HeadersEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (StartChildWorkflowExecution'HeadersEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort StartChildWorkflowExecution'HeadersEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution'HeadersEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> StartChildWorkflowExecution'HeadersEntry
-> f StartChildWorkflowExecution'HeadersEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecution'HeadersEntry
 -> f StartChildWorkflowExecution'HeadersEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecution'HeadersEntry
-> f StartChildWorkflowExecution'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution'HeadersEntry -> Text)
-> (StartChildWorkflowExecution'HeadersEntry
    -> Text -> StartChildWorkflowExecution'HeadersEntry)
-> Lens' StartChildWorkflowExecution'HeadersEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution'HeadersEntry -> Text
_StartChildWorkflowExecution'HeadersEntry'key
           (\ StartChildWorkflowExecution'HeadersEntry
x__ Text
y__
              -> StartChildWorkflowExecution'HeadersEntry
x__ {_StartChildWorkflowExecution'HeadersEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution'HeadersEntry "value" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Payload -> f Payload)
-> StartChildWorkflowExecution'HeadersEntry
-> f StartChildWorkflowExecution'HeadersEntry
fieldOf Proxy# "value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> StartChildWorkflowExecution'HeadersEntry
 -> f StartChildWorkflowExecution'HeadersEntry)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> StartChildWorkflowExecution'HeadersEntry
-> f StartChildWorkflowExecution'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution'HeadersEntry -> Maybe Payload)
-> (StartChildWorkflowExecution'HeadersEntry
    -> Maybe Payload -> StartChildWorkflowExecution'HeadersEntry)
-> Lens
     StartChildWorkflowExecution'HeadersEntry
     StartChildWorkflowExecution'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution'HeadersEntry -> Maybe Payload
_StartChildWorkflowExecution'HeadersEntry'value
           (\ StartChildWorkflowExecution'HeadersEntry
x__ Maybe Payload
y__
              -> StartChildWorkflowExecution'HeadersEntry
x__ {_StartChildWorkflowExecution'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 StartChildWorkflowExecution'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))
-> StartChildWorkflowExecution'HeadersEntry
-> f StartChildWorkflowExecution'HeadersEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> StartChildWorkflowExecution'HeadersEntry
 -> f StartChildWorkflowExecution'HeadersEntry)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> StartChildWorkflowExecution'HeadersEntry
-> f StartChildWorkflowExecution'HeadersEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution'HeadersEntry -> Maybe Payload)
-> (StartChildWorkflowExecution'HeadersEntry
    -> Maybe Payload -> StartChildWorkflowExecution'HeadersEntry)
-> Lens
     StartChildWorkflowExecution'HeadersEntry
     StartChildWorkflowExecution'HeadersEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution'HeadersEntry -> Maybe Payload
_StartChildWorkflowExecution'HeadersEntry'value
           (\ StartChildWorkflowExecution'HeadersEntry
x__ Maybe Payload
y__
              -> StartChildWorkflowExecution'HeadersEntry
x__ {_StartChildWorkflowExecution'HeadersEntry'value = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message StartChildWorkflowExecution'HeadersEntry where
  messageName :: Proxy StartChildWorkflowExecution'HeadersEntry -> Text
messageName Proxy StartChildWorkflowExecution'HeadersEntry
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.StartChildWorkflowExecution.HeadersEntry"
  packedMessageDescriptor :: Proxy StartChildWorkflowExecution'HeadersEntry -> ByteString
packedMessageDescriptor Proxy StartChildWorkflowExecution'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 StartChildWorkflowExecution'HeadersEntry -> ByteString
packedFileDescriptor Proxy StartChildWorkflowExecution'HeadersEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor StartChildWorkflowExecution'HeadersEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor StartChildWorkflowExecution'HeadersEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartChildWorkflowExecution'HeadersEntry Text
-> FieldDescriptor StartChildWorkflowExecution'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' StartChildWorkflowExecution'HeadersEntry Text
-> FieldAccessor StartChildWorkflowExecution'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 StartChildWorkflowExecution'HeadersEntry
        value__field_descriptor :: FieldDescriptor StartChildWorkflowExecution'HeadersEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor StartChildWorkflowExecution'HeadersEntry Payload
-> FieldDescriptor StartChildWorkflowExecution'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
  StartChildWorkflowExecution'HeadersEntry
  StartChildWorkflowExecution'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor StartChildWorkflowExecution'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 StartChildWorkflowExecution'HeadersEntry
      in
        [(Tag, FieldDescriptor StartChildWorkflowExecution'HeadersEntry)]
-> Map
     Tag (FieldDescriptor StartChildWorkflowExecution'HeadersEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor StartChildWorkflowExecution'HeadersEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor StartChildWorkflowExecution'HeadersEntry
value__field_descriptor)]
  unknownFields :: Lens' StartChildWorkflowExecution'HeadersEntry FieldSet
unknownFields
    = (StartChildWorkflowExecution'HeadersEntry -> FieldSet)
-> (StartChildWorkflowExecution'HeadersEntry
    -> FieldSet -> StartChildWorkflowExecution'HeadersEntry)
-> Lens' StartChildWorkflowExecution'HeadersEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        StartChildWorkflowExecution'HeadersEntry -> FieldSet
_StartChildWorkflowExecution'HeadersEntry'_unknownFields
        (\ StartChildWorkflowExecution'HeadersEntry
x__ FieldSet
y__
           -> StartChildWorkflowExecution'HeadersEntry
x__
                {_StartChildWorkflowExecution'HeadersEntry'_unknownFields = y__})
  defMessage :: StartChildWorkflowExecution'HeadersEntry
defMessage
    = StartChildWorkflowExecution'HeadersEntry'_constructor
        {_StartChildWorkflowExecution'HeadersEntry'key :: Text
_StartChildWorkflowExecution'HeadersEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecution'HeadersEntry'value :: Maybe Payload
_StartChildWorkflowExecution'HeadersEntry'value = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecution'HeadersEntry'_unknownFields :: FieldSet
_StartChildWorkflowExecution'HeadersEntry'_unknownFields = []}
  parseMessage :: Parser StartChildWorkflowExecution'HeadersEntry
parseMessage
    = let
        loop ::
          StartChildWorkflowExecution'HeadersEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser StartChildWorkflowExecution'HeadersEntry
        loop :: StartChildWorkflowExecution'HeadersEntry
-> Parser StartChildWorkflowExecution'HeadersEntry
loop StartChildWorkflowExecution'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 StartChildWorkflowExecution'HeadersEntry
-> String -> Parser StartChildWorkflowExecution'HeadersEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do StartChildWorkflowExecution'HeadersEntry
-> Parser StartChildWorkflowExecution'HeadersEntry
loop StartChildWorkflowExecution'HeadersEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"HeadersEntry"
  buildMessage :: StartChildWorkflowExecution'HeadersEntry -> Builder
buildMessage
    = \ StartChildWorkflowExecution'HeadersEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  StartChildWorkflowExecution'HeadersEntry
  StartChildWorkflowExecution'HeadersEntry
  Text
  Text
-> StartChildWorkflowExecution'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") StartChildWorkflowExecution'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)
  StartChildWorkflowExecution'HeadersEntry
  StartChildWorkflowExecution'HeadersEntry
  (Maybe Payload)
  (Maybe Payload)
-> StartChildWorkflowExecution'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") StartChildWorkflowExecution'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
  StartChildWorkflowExecution'HeadersEntry
  StartChildWorkflowExecution'HeadersEntry
  FieldSet
  FieldSet
-> StartChildWorkflowExecution'HeadersEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  StartChildWorkflowExecution'HeadersEntry
  StartChildWorkflowExecution'HeadersEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' StartChildWorkflowExecution'HeadersEntry FieldSet
Data.ProtoLens.unknownFields StartChildWorkflowExecution'HeadersEntry
_x)))
instance Control.DeepSeq.NFData StartChildWorkflowExecution'HeadersEntry where
  rnf :: StartChildWorkflowExecution'HeadersEntry -> ()
rnf
    = \ StartChildWorkflowExecution'HeadersEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (StartChildWorkflowExecution'HeadersEntry -> FieldSet
_StartChildWorkflowExecution'HeadersEntry'_unknownFields StartChildWorkflowExecution'HeadersEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (StartChildWorkflowExecution'HeadersEntry -> Text
_StartChildWorkflowExecution'HeadersEntry'key StartChildWorkflowExecution'HeadersEntry
x__)
                (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (StartChildWorkflowExecution'HeadersEntry -> Maybe Payload
_StartChildWorkflowExecution'HeadersEntry'value StartChildWorkflowExecution'HeadersEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.key' @:: Lens' StartChildWorkflowExecution'MemoEntry Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.value' @:: Lens' StartChildWorkflowExecution'MemoEntry Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'value' @:: Lens' StartChildWorkflowExecution'MemoEntry (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data StartChildWorkflowExecution'MemoEntry
  = StartChildWorkflowExecution'MemoEntry'_constructor {StartChildWorkflowExecution'MemoEntry -> Text
_StartChildWorkflowExecution'MemoEntry'key :: !Data.Text.Text,
                                                        StartChildWorkflowExecution'MemoEntry -> Maybe Payload
_StartChildWorkflowExecution'MemoEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                                        StartChildWorkflowExecution'MemoEntry -> FieldSet
_StartChildWorkflowExecution'MemoEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Bool
(StartChildWorkflowExecution'MemoEntry
 -> StartChildWorkflowExecution'MemoEntry -> Bool)
-> (StartChildWorkflowExecution'MemoEntry
    -> StartChildWorkflowExecution'MemoEntry -> Bool)
-> Eq StartChildWorkflowExecution'MemoEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Bool
== :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Bool
$c/= :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Bool
/= :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Bool
Prelude.Eq, Eq StartChildWorkflowExecution'MemoEntry
Eq StartChildWorkflowExecution'MemoEntry =>
(StartChildWorkflowExecution'MemoEntry
 -> StartChildWorkflowExecution'MemoEntry -> Ordering)
-> (StartChildWorkflowExecution'MemoEntry
    -> StartChildWorkflowExecution'MemoEntry -> Bool)
-> (StartChildWorkflowExecution'MemoEntry
    -> StartChildWorkflowExecution'MemoEntry -> Bool)
-> (StartChildWorkflowExecution'MemoEntry
    -> StartChildWorkflowExecution'MemoEntry -> Bool)
-> (StartChildWorkflowExecution'MemoEntry
    -> StartChildWorkflowExecution'MemoEntry -> Bool)
-> (StartChildWorkflowExecution'MemoEntry
    -> StartChildWorkflowExecution'MemoEntry
    -> StartChildWorkflowExecution'MemoEntry)
-> (StartChildWorkflowExecution'MemoEntry
    -> StartChildWorkflowExecution'MemoEntry
    -> StartChildWorkflowExecution'MemoEntry)
-> Ord StartChildWorkflowExecution'MemoEntry
StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Bool
StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Ordering
StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry
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 :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Ordering
compare :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Ordering
$c< :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Bool
< :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Bool
$c<= :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Bool
<= :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Bool
$c> :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Bool
> :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Bool
$c>= :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Bool
>= :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry -> Bool
$cmax :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry
max :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry
$cmin :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry
min :: StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry
-> StartChildWorkflowExecution'MemoEntry
Prelude.Ord)
instance Prelude.Show StartChildWorkflowExecution'MemoEntry where
  showsPrec :: Int -> StartChildWorkflowExecution'MemoEntry -> ShowS
showsPrec Int
_ StartChildWorkflowExecution'MemoEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (StartChildWorkflowExecution'MemoEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort StartChildWorkflowExecution'MemoEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution'MemoEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> StartChildWorkflowExecution'MemoEntry
-> f StartChildWorkflowExecution'MemoEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecution'MemoEntry
 -> f StartChildWorkflowExecution'MemoEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecution'MemoEntry
-> f StartChildWorkflowExecution'MemoEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution'MemoEntry -> Text)
-> (StartChildWorkflowExecution'MemoEntry
    -> Text -> StartChildWorkflowExecution'MemoEntry)
-> Lens' StartChildWorkflowExecution'MemoEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution'MemoEntry -> Text
_StartChildWorkflowExecution'MemoEntry'key
           (\ StartChildWorkflowExecution'MemoEntry
x__ Text
y__
              -> StartChildWorkflowExecution'MemoEntry
x__ {_StartChildWorkflowExecution'MemoEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution'MemoEntry "value" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Payload -> f Payload)
-> StartChildWorkflowExecution'MemoEntry
-> f StartChildWorkflowExecution'MemoEntry
fieldOf Proxy# "value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> StartChildWorkflowExecution'MemoEntry
 -> f StartChildWorkflowExecution'MemoEntry)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> StartChildWorkflowExecution'MemoEntry
-> f StartChildWorkflowExecution'MemoEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution'MemoEntry -> Maybe Payload)
-> (StartChildWorkflowExecution'MemoEntry
    -> Maybe Payload -> StartChildWorkflowExecution'MemoEntry)
-> Lens
     StartChildWorkflowExecution'MemoEntry
     StartChildWorkflowExecution'MemoEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution'MemoEntry -> Maybe Payload
_StartChildWorkflowExecution'MemoEntry'value
           (\ StartChildWorkflowExecution'MemoEntry
x__ Maybe Payload
y__
              -> StartChildWorkflowExecution'MemoEntry
x__ {_StartChildWorkflowExecution'MemoEntry'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 StartChildWorkflowExecution'MemoEntry "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))
-> StartChildWorkflowExecution'MemoEntry
-> f StartChildWorkflowExecution'MemoEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> StartChildWorkflowExecution'MemoEntry
 -> f StartChildWorkflowExecution'MemoEntry)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> StartChildWorkflowExecution'MemoEntry
-> f StartChildWorkflowExecution'MemoEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution'MemoEntry -> Maybe Payload)
-> (StartChildWorkflowExecution'MemoEntry
    -> Maybe Payload -> StartChildWorkflowExecution'MemoEntry)
-> Lens
     StartChildWorkflowExecution'MemoEntry
     StartChildWorkflowExecution'MemoEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution'MemoEntry -> Maybe Payload
_StartChildWorkflowExecution'MemoEntry'value
           (\ StartChildWorkflowExecution'MemoEntry
x__ Maybe Payload
y__
              -> StartChildWorkflowExecution'MemoEntry
x__ {_StartChildWorkflowExecution'MemoEntry'value = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message StartChildWorkflowExecution'MemoEntry where
  messageName :: Proxy StartChildWorkflowExecution'MemoEntry -> Text
messageName Proxy StartChildWorkflowExecution'MemoEntry
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.StartChildWorkflowExecution.MemoEntry"
  packedMessageDescriptor :: Proxy StartChildWorkflowExecution'MemoEntry -> ByteString
packedMessageDescriptor Proxy StartChildWorkflowExecution'MemoEntry
_
    = ByteString
"\n\
      \\tMemoEntry\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 StartChildWorkflowExecution'MemoEntry -> ByteString
packedFileDescriptor Proxy StartChildWorkflowExecution'MemoEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor StartChildWorkflowExecution'MemoEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor StartChildWorkflowExecution'MemoEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartChildWorkflowExecution'MemoEntry Text
-> FieldDescriptor StartChildWorkflowExecution'MemoEntry
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' StartChildWorkflowExecution'MemoEntry Text
-> FieldAccessor StartChildWorkflowExecution'MemoEntry 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 StartChildWorkflowExecution'MemoEntry
        value__field_descriptor :: FieldDescriptor StartChildWorkflowExecution'MemoEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor StartChildWorkflowExecution'MemoEntry Payload
-> FieldDescriptor StartChildWorkflowExecution'MemoEntry
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
  StartChildWorkflowExecution'MemoEntry
  StartChildWorkflowExecution'MemoEntry
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor StartChildWorkflowExecution'MemoEntry 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 StartChildWorkflowExecution'MemoEntry
      in
        [(Tag, FieldDescriptor StartChildWorkflowExecution'MemoEntry)]
-> Map Tag (FieldDescriptor StartChildWorkflowExecution'MemoEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor StartChildWorkflowExecution'MemoEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor StartChildWorkflowExecution'MemoEntry
value__field_descriptor)]
  unknownFields :: Lens' StartChildWorkflowExecution'MemoEntry FieldSet
unknownFields
    = (StartChildWorkflowExecution'MemoEntry -> FieldSet)
-> (StartChildWorkflowExecution'MemoEntry
    -> FieldSet -> StartChildWorkflowExecution'MemoEntry)
-> Lens' StartChildWorkflowExecution'MemoEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        StartChildWorkflowExecution'MemoEntry -> FieldSet
_StartChildWorkflowExecution'MemoEntry'_unknownFields
        (\ StartChildWorkflowExecution'MemoEntry
x__ FieldSet
y__
           -> StartChildWorkflowExecution'MemoEntry
x__
                {_StartChildWorkflowExecution'MemoEntry'_unknownFields = y__})
  defMessage :: StartChildWorkflowExecution'MemoEntry
defMessage
    = StartChildWorkflowExecution'MemoEntry'_constructor
        {_StartChildWorkflowExecution'MemoEntry'key :: Text
_StartChildWorkflowExecution'MemoEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecution'MemoEntry'value :: Maybe Payload
_StartChildWorkflowExecution'MemoEntry'value = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecution'MemoEntry'_unknownFields :: FieldSet
_StartChildWorkflowExecution'MemoEntry'_unknownFields = []}
  parseMessage :: Parser StartChildWorkflowExecution'MemoEntry
parseMessage
    = let
        loop ::
          StartChildWorkflowExecution'MemoEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser StartChildWorkflowExecution'MemoEntry
        loop :: StartChildWorkflowExecution'MemoEntry
-> Parser StartChildWorkflowExecution'MemoEntry
loop StartChildWorkflowExecution'MemoEntry
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 StartChildWorkflowExecution'MemoEntry
-> String -> Parser StartChildWorkflowExecution'MemoEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do StartChildWorkflowExecution'MemoEntry
-> Parser StartChildWorkflowExecution'MemoEntry
loop StartChildWorkflowExecution'MemoEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"MemoEntry"
  buildMessage :: StartChildWorkflowExecution'MemoEntry -> Builder
buildMessage
    = \ StartChildWorkflowExecution'MemoEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  StartChildWorkflowExecution'MemoEntry
  StartChildWorkflowExecution'MemoEntry
  Text
  Text
-> StartChildWorkflowExecution'MemoEntry -> 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") StartChildWorkflowExecution'MemoEntry
_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)
  StartChildWorkflowExecution'MemoEntry
  StartChildWorkflowExecution'MemoEntry
  (Maybe Payload)
  (Maybe Payload)
-> StartChildWorkflowExecution'MemoEntry -> 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") StartChildWorkflowExecution'MemoEntry
_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
  StartChildWorkflowExecution'MemoEntry
  StartChildWorkflowExecution'MemoEntry
  FieldSet
  FieldSet
-> StartChildWorkflowExecution'MemoEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  StartChildWorkflowExecution'MemoEntry
  StartChildWorkflowExecution'MemoEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' StartChildWorkflowExecution'MemoEntry FieldSet
Data.ProtoLens.unknownFields StartChildWorkflowExecution'MemoEntry
_x)))
instance Control.DeepSeq.NFData StartChildWorkflowExecution'MemoEntry where
  rnf :: StartChildWorkflowExecution'MemoEntry -> ()
rnf
    = \ StartChildWorkflowExecution'MemoEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (StartChildWorkflowExecution'MemoEntry -> FieldSet
_StartChildWorkflowExecution'MemoEntry'_unknownFields StartChildWorkflowExecution'MemoEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (StartChildWorkflowExecution'MemoEntry -> Text
_StartChildWorkflowExecution'MemoEntry'key StartChildWorkflowExecution'MemoEntry
x__)
                (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (StartChildWorkflowExecution'MemoEntry -> Maybe Payload
_StartChildWorkflowExecution'MemoEntry'value StartChildWorkflowExecution'MemoEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.key' @:: Lens' StartChildWorkflowExecution'SearchAttributesEntry Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.value' @:: Lens' StartChildWorkflowExecution'SearchAttributesEntry Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'value' @:: Lens' StartChildWorkflowExecution'SearchAttributesEntry (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data StartChildWorkflowExecution'SearchAttributesEntry
  = StartChildWorkflowExecution'SearchAttributesEntry'_constructor {StartChildWorkflowExecution'SearchAttributesEntry -> Text
_StartChildWorkflowExecution'SearchAttributesEntry'key :: !Data.Text.Text,
                                                                    StartChildWorkflowExecution'SearchAttributesEntry -> Maybe Payload
_StartChildWorkflowExecution'SearchAttributesEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                                                    StartChildWorkflowExecution'SearchAttributesEntry -> FieldSet
_StartChildWorkflowExecution'SearchAttributesEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Bool
(StartChildWorkflowExecution'SearchAttributesEntry
 -> StartChildWorkflowExecution'SearchAttributesEntry -> Bool)
-> (StartChildWorkflowExecution'SearchAttributesEntry
    -> StartChildWorkflowExecution'SearchAttributesEntry -> Bool)
-> Eq StartChildWorkflowExecution'SearchAttributesEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Bool
== :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Bool
$c/= :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Bool
/= :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Bool
Prelude.Eq, Eq StartChildWorkflowExecution'SearchAttributesEntry
Eq StartChildWorkflowExecution'SearchAttributesEntry =>
(StartChildWorkflowExecution'SearchAttributesEntry
 -> StartChildWorkflowExecution'SearchAttributesEntry -> Ordering)
-> (StartChildWorkflowExecution'SearchAttributesEntry
    -> StartChildWorkflowExecution'SearchAttributesEntry -> Bool)
-> (StartChildWorkflowExecution'SearchAttributesEntry
    -> StartChildWorkflowExecution'SearchAttributesEntry -> Bool)
-> (StartChildWorkflowExecution'SearchAttributesEntry
    -> StartChildWorkflowExecution'SearchAttributesEntry -> Bool)
-> (StartChildWorkflowExecution'SearchAttributesEntry
    -> StartChildWorkflowExecution'SearchAttributesEntry -> Bool)
-> (StartChildWorkflowExecution'SearchAttributesEntry
    -> StartChildWorkflowExecution'SearchAttributesEntry
    -> StartChildWorkflowExecution'SearchAttributesEntry)
-> (StartChildWorkflowExecution'SearchAttributesEntry
    -> StartChildWorkflowExecution'SearchAttributesEntry
    -> StartChildWorkflowExecution'SearchAttributesEntry)
-> Ord StartChildWorkflowExecution'SearchAttributesEntry
StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Bool
StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Ordering
StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry
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 :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Ordering
compare :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Ordering
$c< :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Bool
< :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Bool
$c<= :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Bool
<= :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Bool
$c> :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Bool
> :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Bool
$c>= :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Bool
>= :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry -> Bool
$cmax :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry
max :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry
$cmin :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry
min :: StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry
-> StartChildWorkflowExecution'SearchAttributesEntry
Prelude.Ord)
instance Prelude.Show StartChildWorkflowExecution'SearchAttributesEntry where
  showsPrec :: Int -> StartChildWorkflowExecution'SearchAttributesEntry -> ShowS
showsPrec Int
_ StartChildWorkflowExecution'SearchAttributesEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (StartChildWorkflowExecution'SearchAttributesEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort StartChildWorkflowExecution'SearchAttributesEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution'SearchAttributesEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> StartChildWorkflowExecution'SearchAttributesEntry
-> f StartChildWorkflowExecution'SearchAttributesEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecution'SearchAttributesEntry
 -> f StartChildWorkflowExecution'SearchAttributesEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecution'SearchAttributesEntry
-> f StartChildWorkflowExecution'SearchAttributesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution'SearchAttributesEntry -> Text)
-> (StartChildWorkflowExecution'SearchAttributesEntry
    -> Text -> StartChildWorkflowExecution'SearchAttributesEntry)
-> Lens' StartChildWorkflowExecution'SearchAttributesEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution'SearchAttributesEntry -> Text
_StartChildWorkflowExecution'SearchAttributesEntry'key
           (\ StartChildWorkflowExecution'SearchAttributesEntry
x__ Text
y__
              -> StartChildWorkflowExecution'SearchAttributesEntry
x__
                   {_StartChildWorkflowExecution'SearchAttributesEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecution'SearchAttributesEntry "value" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Payload -> f Payload)
-> StartChildWorkflowExecution'SearchAttributesEntry
-> f StartChildWorkflowExecution'SearchAttributesEntry
fieldOf Proxy# "value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> StartChildWorkflowExecution'SearchAttributesEntry
 -> f StartChildWorkflowExecution'SearchAttributesEntry)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> StartChildWorkflowExecution'SearchAttributesEntry
-> f StartChildWorkflowExecution'SearchAttributesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution'SearchAttributesEntry
 -> Maybe Payload)
-> (StartChildWorkflowExecution'SearchAttributesEntry
    -> Maybe Payload
    -> StartChildWorkflowExecution'SearchAttributesEntry)
-> Lens
     StartChildWorkflowExecution'SearchAttributesEntry
     StartChildWorkflowExecution'SearchAttributesEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution'SearchAttributesEntry -> Maybe Payload
_StartChildWorkflowExecution'SearchAttributesEntry'value
           (\ StartChildWorkflowExecution'SearchAttributesEntry
x__ Maybe Payload
y__
              -> StartChildWorkflowExecution'SearchAttributesEntry
x__
                   {_StartChildWorkflowExecution'SearchAttributesEntry'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 StartChildWorkflowExecution'SearchAttributesEntry "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))
-> StartChildWorkflowExecution'SearchAttributesEntry
-> f StartChildWorkflowExecution'SearchAttributesEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> StartChildWorkflowExecution'SearchAttributesEntry
 -> f StartChildWorkflowExecution'SearchAttributesEntry)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> StartChildWorkflowExecution'SearchAttributesEntry
-> f StartChildWorkflowExecution'SearchAttributesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecution'SearchAttributesEntry
 -> Maybe Payload)
-> (StartChildWorkflowExecution'SearchAttributesEntry
    -> Maybe Payload
    -> StartChildWorkflowExecution'SearchAttributesEntry)
-> Lens
     StartChildWorkflowExecution'SearchAttributesEntry
     StartChildWorkflowExecution'SearchAttributesEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecution'SearchAttributesEntry -> Maybe Payload
_StartChildWorkflowExecution'SearchAttributesEntry'value
           (\ StartChildWorkflowExecution'SearchAttributesEntry
x__ Maybe Payload
y__
              -> StartChildWorkflowExecution'SearchAttributesEntry
x__
                   {_StartChildWorkflowExecution'SearchAttributesEntry'value = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message StartChildWorkflowExecution'SearchAttributesEntry where
  messageName :: Proxy StartChildWorkflowExecution'SearchAttributesEntry -> Text
messageName Proxy StartChildWorkflowExecution'SearchAttributesEntry
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.StartChildWorkflowExecution.SearchAttributesEntry"
  packedMessageDescriptor :: Proxy StartChildWorkflowExecution'SearchAttributesEntry
-> ByteString
packedMessageDescriptor Proxy StartChildWorkflowExecution'SearchAttributesEntry
_
    = ByteString
"\n\
      \\NAKSearchAttributesEntry\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 StartChildWorkflowExecution'SearchAttributesEntry
-> ByteString
packedFileDescriptor Proxy StartChildWorkflowExecution'SearchAttributesEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor StartChildWorkflowExecution'SearchAttributesEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor StartChildWorkflowExecution'SearchAttributesEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     StartChildWorkflowExecution'SearchAttributesEntry Text
-> FieldDescriptor
     StartChildWorkflowExecution'SearchAttributesEntry
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' StartChildWorkflowExecution'SearchAttributesEntry Text
-> FieldAccessor
     StartChildWorkflowExecution'SearchAttributesEntry 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 StartChildWorkflowExecution'SearchAttributesEntry
        value__field_descriptor :: FieldDescriptor StartChildWorkflowExecution'SearchAttributesEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor
     StartChildWorkflowExecution'SearchAttributesEntry Payload
-> FieldDescriptor
     StartChildWorkflowExecution'SearchAttributesEntry
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
  StartChildWorkflowExecution'SearchAttributesEntry
  StartChildWorkflowExecution'SearchAttributesEntry
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor
     StartChildWorkflowExecution'SearchAttributesEntry 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 StartChildWorkflowExecution'SearchAttributesEntry
      in
        [(Tag,
  FieldDescriptor StartChildWorkflowExecution'SearchAttributesEntry)]
-> Map
     Tag
     (FieldDescriptor StartChildWorkflowExecution'SearchAttributesEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor StartChildWorkflowExecution'SearchAttributesEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor StartChildWorkflowExecution'SearchAttributesEntry
value__field_descriptor)]
  unknownFields :: Lens' StartChildWorkflowExecution'SearchAttributesEntry FieldSet
unknownFields
    = (StartChildWorkflowExecution'SearchAttributesEntry -> FieldSet)
-> (StartChildWorkflowExecution'SearchAttributesEntry
    -> FieldSet -> StartChildWorkflowExecution'SearchAttributesEntry)
-> Lens' StartChildWorkflowExecution'SearchAttributesEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        StartChildWorkflowExecution'SearchAttributesEntry -> FieldSet
_StartChildWorkflowExecution'SearchAttributesEntry'_unknownFields
        (\ StartChildWorkflowExecution'SearchAttributesEntry
x__ FieldSet
y__
           -> StartChildWorkflowExecution'SearchAttributesEntry
x__
                {_StartChildWorkflowExecution'SearchAttributesEntry'_unknownFields = y__})
  defMessage :: StartChildWorkflowExecution'SearchAttributesEntry
defMessage
    = StartChildWorkflowExecution'SearchAttributesEntry'_constructor
        {_StartChildWorkflowExecution'SearchAttributesEntry'key :: Text
_StartChildWorkflowExecution'SearchAttributesEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecution'SearchAttributesEntry'value :: Maybe Payload
_StartChildWorkflowExecution'SearchAttributesEntry'value = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecution'SearchAttributesEntry'_unknownFields :: FieldSet
_StartChildWorkflowExecution'SearchAttributesEntry'_unknownFields = []}
  parseMessage :: Parser StartChildWorkflowExecution'SearchAttributesEntry
parseMessage
    = let
        loop ::
          StartChildWorkflowExecution'SearchAttributesEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser StartChildWorkflowExecution'SearchAttributesEntry
        loop :: StartChildWorkflowExecution'SearchAttributesEntry
-> Parser StartChildWorkflowExecution'SearchAttributesEntry
loop StartChildWorkflowExecution'SearchAttributesEntry
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 StartChildWorkflowExecution'SearchAttributesEntry
-> String
-> Parser StartChildWorkflowExecution'SearchAttributesEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do StartChildWorkflowExecution'SearchAttributesEntry
-> Parser StartChildWorkflowExecution'SearchAttributesEntry
loop StartChildWorkflowExecution'SearchAttributesEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"SearchAttributesEntry"
  buildMessage :: StartChildWorkflowExecution'SearchAttributesEntry -> Builder
buildMessage
    = \ StartChildWorkflowExecution'SearchAttributesEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  StartChildWorkflowExecution'SearchAttributesEntry
  StartChildWorkflowExecution'SearchAttributesEntry
  Text
  Text
-> StartChildWorkflowExecution'SearchAttributesEntry -> 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") StartChildWorkflowExecution'SearchAttributesEntry
_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)
  StartChildWorkflowExecution'SearchAttributesEntry
  StartChildWorkflowExecution'SearchAttributesEntry
  (Maybe Payload)
  (Maybe Payload)
-> StartChildWorkflowExecution'SearchAttributesEntry
-> 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") StartChildWorkflowExecution'SearchAttributesEntry
_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
  StartChildWorkflowExecution'SearchAttributesEntry
  StartChildWorkflowExecution'SearchAttributesEntry
  FieldSet
  FieldSet
-> StartChildWorkflowExecution'SearchAttributesEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  StartChildWorkflowExecution'SearchAttributesEntry
  StartChildWorkflowExecution'SearchAttributesEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' StartChildWorkflowExecution'SearchAttributesEntry FieldSet
Data.ProtoLens.unknownFields StartChildWorkflowExecution'SearchAttributesEntry
_x)))
instance Control.DeepSeq.NFData StartChildWorkflowExecution'SearchAttributesEntry where
  rnf :: StartChildWorkflowExecution'SearchAttributesEntry -> ()
rnf
    = \ StartChildWorkflowExecution'SearchAttributesEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (StartChildWorkflowExecution'SearchAttributesEntry -> FieldSet
_StartChildWorkflowExecution'SearchAttributesEntry'_unknownFields
                StartChildWorkflowExecution'SearchAttributesEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (StartChildWorkflowExecution'SearchAttributesEntry -> Text
_StartChildWorkflowExecution'SearchAttributesEntry'key StartChildWorkflowExecution'SearchAttributesEntry
x__)
                (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (StartChildWorkflowExecution'SearchAttributesEntry -> Maybe Payload
_StartChildWorkflowExecution'SearchAttributesEntry'value StartChildWorkflowExecution'SearchAttributesEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.seq' @:: Lens' StartTimer Data.Word.Word32@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.startToFireTimeout' @:: Lens' StartTimer Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'startToFireTimeout' @:: Lens' StartTimer (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@ -}
data StartTimer
  = StartTimer'_constructor {StartTimer -> Word32
_StartTimer'seq :: !Data.Word.Word32,
                             StartTimer -> Maybe Duration
_StartTimer'startToFireTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                             StartTimer -> FieldSet
_StartTimer'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (StartTimer -> StartTimer -> Bool
(StartTimer -> StartTimer -> Bool)
-> (StartTimer -> StartTimer -> Bool) -> Eq StartTimer
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StartTimer -> StartTimer -> Bool
== :: StartTimer -> StartTimer -> Bool
$c/= :: StartTimer -> StartTimer -> Bool
/= :: StartTimer -> StartTimer -> Bool
Prelude.Eq, Eq StartTimer
Eq StartTimer =>
(StartTimer -> StartTimer -> Ordering)
-> (StartTimer -> StartTimer -> Bool)
-> (StartTimer -> StartTimer -> Bool)
-> (StartTimer -> StartTimer -> Bool)
-> (StartTimer -> StartTimer -> Bool)
-> (StartTimer -> StartTimer -> StartTimer)
-> (StartTimer -> StartTimer -> StartTimer)
-> Ord StartTimer
StartTimer -> StartTimer -> Bool
StartTimer -> StartTimer -> Ordering
StartTimer -> StartTimer -> StartTimer
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 :: StartTimer -> StartTimer -> Ordering
compare :: StartTimer -> StartTimer -> Ordering
$c< :: StartTimer -> StartTimer -> Bool
< :: StartTimer -> StartTimer -> Bool
$c<= :: StartTimer -> StartTimer -> Bool
<= :: StartTimer -> StartTimer -> Bool
$c> :: StartTimer -> StartTimer -> Bool
> :: StartTimer -> StartTimer -> Bool
$c>= :: StartTimer -> StartTimer -> Bool
>= :: StartTimer -> StartTimer -> Bool
$cmax :: StartTimer -> StartTimer -> StartTimer
max :: StartTimer -> StartTimer -> StartTimer
$cmin :: StartTimer -> StartTimer -> StartTimer
min :: StartTimer -> StartTimer -> StartTimer
Prelude.Ord)
instance Prelude.Show StartTimer where
  showsPrec :: Int -> StartTimer -> ShowS
showsPrec Int
_ StartTimer
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (StartTimer -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort StartTimer
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField StartTimer "seq" Data.Word.Word32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "seq" -> (Word32 -> f Word32) -> StartTimer -> f StartTimer
fieldOf Proxy# "seq"
_
    = ((Word32 -> f Word32) -> StartTimer -> f StartTimer)
-> ((Word32 -> f Word32) -> Word32 -> f Word32)
-> (Word32 -> f Word32)
-> StartTimer
-> f StartTimer
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartTimer -> Word32)
-> (StartTimer -> Word32 -> StartTimer)
-> Lens StartTimer StartTimer Word32 Word32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartTimer -> Word32
_StartTimer'seq (\ StartTimer
x__ Word32
y__ -> StartTimer
x__ {_StartTimer'seq = y__}))
        (Word32 -> f Word32) -> Word32 -> f Word32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartTimer "startToFireTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startToFireTimeout"
-> (Duration -> f Duration) -> StartTimer -> f StartTimer
fieldOf Proxy# "startToFireTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartTimer -> f StartTimer)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> StartTimer
-> f StartTimer
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartTimer -> Maybe Duration)
-> (StartTimer -> Maybe Duration -> StartTimer)
-> Lens StartTimer StartTimer (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartTimer -> Maybe Duration
_StartTimer'startToFireTimeout
           (\ StartTimer
x__ Maybe Duration
y__ -> StartTimer
x__ {_StartTimer'startToFireTimeout = y__}))
        (Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField StartTimer "maybe'startToFireTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startToFireTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> StartTimer
-> f StartTimer
fieldOf Proxy# "maybe'startToFireTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartTimer -> f StartTimer)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> StartTimer
-> f StartTimer
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartTimer -> Maybe Duration)
-> (StartTimer -> Maybe Duration -> StartTimer)
-> Lens StartTimer StartTimer (Maybe Duration) (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartTimer -> Maybe Duration
_StartTimer'startToFireTimeout
           (\ StartTimer
x__ Maybe Duration
y__ -> StartTimer
x__ {_StartTimer'startToFireTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message StartTimer where
  messageName :: Proxy StartTimer -> Text
messageName Proxy StartTimer
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_commands.StartTimer"
  packedMessageDescriptor :: Proxy StartTimer -> ByteString
packedMessageDescriptor Proxy StartTimer
_
    = ByteString
"\n\
      \\n\
      \StartTimer\DC2\DLE\n\
      \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2L\n\
      \\NAKstart_to_fire_timeout\CAN\STX \SOH(\v2\EM.google.protobuf.DurationR\DC2startToFireTimeout"
  packedFileDescriptor :: Proxy StartTimer -> ByteString
packedFileDescriptor Proxy StartTimer
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor StartTimer)
fieldsByTag
    = let
        seq__field_descriptor :: FieldDescriptor StartTimer
seq__field_descriptor
          = String
-> FieldTypeDescriptor Word32
-> FieldAccessor StartTimer Word32
-> FieldDescriptor StartTimer
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 StartTimer StartTimer Word32 Word32
-> FieldAccessor StartTimer 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 StartTimer
        startToFireTimeout__field_descriptor :: FieldDescriptor StartTimer
startToFireTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor StartTimer Duration
-> FieldDescriptor StartTimer
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_to_fire_timeout"
              (MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
              (Lens StartTimer StartTimer (Maybe Duration) (Maybe Duration)
-> FieldAccessor StartTimer Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startToFireTimeout")) ::
              Data.ProtoLens.FieldDescriptor StartTimer
      in
        [(Tag, FieldDescriptor StartTimer)]
-> Map Tag (FieldDescriptor StartTimer)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor StartTimer
seq__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor StartTimer
startToFireTimeout__field_descriptor)]
  unknownFields :: Lens' StartTimer FieldSet
unknownFields
    = (StartTimer -> FieldSet)
-> (StartTimer -> FieldSet -> StartTimer)
-> Lens' StartTimer FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        StartTimer -> FieldSet
_StartTimer'_unknownFields
        (\ StartTimer
x__ FieldSet
y__ -> StartTimer
x__ {_StartTimer'_unknownFields = y__})
  defMessage :: StartTimer
defMessage
    = StartTimer'_constructor
        {_StartTimer'seq :: Word32
_StartTimer'seq = Word32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartTimer'startToFireTimeout :: Maybe Duration
_StartTimer'startToFireTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _StartTimer'_unknownFields :: FieldSet
_StartTimer'_unknownFields = []}
  parseMessage :: Parser StartTimer
parseMessage
    = let
        loop ::
          StartTimer -> Data.ProtoLens.Encoding.Bytes.Parser StartTimer
        loop :: StartTimer -> Parser StartTimer
loop StartTimer
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 Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"start_to_fire_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startToFireTimeout") y x)
                        Word64
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 StartTimer -> String -> Parser StartTimer
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do StartTimer -> Parser StartTimer
loop StartTimer
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"StartTimer"
  buildMessage :: StartTimer -> Builder
buildMessage
    = \ StartTimer
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Word32
_v = FoldLike Word32 StartTimer StartTimer Word32 Word32
-> StartTimer -> 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") StartTimer
_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 Duration)
  StartTimer
  StartTimer
  (Maybe Duration)
  (Maybe Duration)
-> StartTimer -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startToFireTimeout") StartTimer
_x
                 of
                   Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just Duration
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike FieldSet StartTimer StartTimer FieldSet FieldSet
-> StartTimer -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet StartTimer StartTimer FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' StartTimer FieldSet
Data.ProtoLens.unknownFields StartTimer
_x)))
instance Control.DeepSeq.NFData StartTimer where
  rnf :: StartTimer -> ()
rnf
    = \ StartTimer
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (StartTimer -> FieldSet
_StartTimer'_unknownFields StartTimer
x__)
             (Word32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (StartTimer -> Word32
_StartTimer'seq StartTimer
x__)
                (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (StartTimer -> Maybe Duration
_StartTimer'startToFireTimeout StartTimer
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.protocolInstanceId' @:: Lens' UpdateResponse Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'response' @:: Lens' UpdateResponse (Prelude.Maybe UpdateResponse'Response)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'accepted' @:: Lens' UpdateResponse (Prelude.Maybe Proto.Google.Protobuf.Empty.Empty)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.accepted' @:: Lens' UpdateResponse Proto.Google.Protobuf.Empty.Empty@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'rejected' @:: Lens' UpdateResponse (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.rejected' @:: Lens' UpdateResponse Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'completed' @:: Lens' UpdateResponse (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.completed' @:: Lens' UpdateResponse Proto.Temporal.Api.Common.V1.Message.Payload@ -}
data UpdateResponse
  = UpdateResponse'_constructor {UpdateResponse -> Text
_UpdateResponse'protocolInstanceId :: !Data.Text.Text,
                                 UpdateResponse -> Maybe UpdateResponse'Response
_UpdateResponse'response :: !(Prelude.Maybe UpdateResponse'Response),
                                 UpdateResponse -> FieldSet
_UpdateResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateResponse -> UpdateResponse -> Bool
(UpdateResponse -> UpdateResponse -> Bool)
-> (UpdateResponse -> UpdateResponse -> Bool) -> Eq UpdateResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateResponse -> UpdateResponse -> Bool
== :: UpdateResponse -> UpdateResponse -> Bool
$c/= :: UpdateResponse -> UpdateResponse -> Bool
/= :: UpdateResponse -> UpdateResponse -> Bool
Prelude.Eq, Eq UpdateResponse
Eq UpdateResponse =>
(UpdateResponse -> UpdateResponse -> Ordering)
-> (UpdateResponse -> UpdateResponse -> Bool)
-> (UpdateResponse -> UpdateResponse -> Bool)
-> (UpdateResponse -> UpdateResponse -> Bool)
-> (UpdateResponse -> UpdateResponse -> Bool)
-> (UpdateResponse -> UpdateResponse -> UpdateResponse)
-> (UpdateResponse -> UpdateResponse -> UpdateResponse)
-> Ord UpdateResponse
UpdateResponse -> UpdateResponse -> Bool
UpdateResponse -> UpdateResponse -> Ordering
UpdateResponse -> UpdateResponse -> UpdateResponse
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 :: UpdateResponse -> UpdateResponse -> Ordering
compare :: UpdateResponse -> UpdateResponse -> Ordering
$c< :: UpdateResponse -> UpdateResponse -> Bool
< :: UpdateResponse -> UpdateResponse -> Bool
$c<= :: UpdateResponse -> UpdateResponse -> Bool
<= :: UpdateResponse -> UpdateResponse -> Bool
$c> :: UpdateResponse -> UpdateResponse -> Bool
> :: UpdateResponse -> UpdateResponse -> Bool
$c>= :: UpdateResponse -> UpdateResponse -> Bool
>= :: UpdateResponse -> UpdateResponse -> Bool
$cmax :: UpdateResponse -> UpdateResponse -> UpdateResponse
max :: UpdateResponse -> UpdateResponse -> UpdateResponse
$cmin :: UpdateResponse -> UpdateResponse -> UpdateResponse
min :: UpdateResponse -> UpdateResponse -> UpdateResponse
Prelude.Ord)
instance Prelude.Show UpdateResponse where
  showsPrec :: Int -> UpdateResponse -> ShowS
showsPrec Int
_ UpdateResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data UpdateResponse'Response
  = UpdateResponse'Accepted !Proto.Google.Protobuf.Empty.Empty |
    UpdateResponse'Rejected !Proto.Temporal.Api.Failure.V1.Message.Failure |
    UpdateResponse'Completed !Proto.Temporal.Api.Common.V1.Message.Payload
  deriving stock (Int -> UpdateResponse'Response -> ShowS
[UpdateResponse'Response] -> ShowS
UpdateResponse'Response -> String
(Int -> UpdateResponse'Response -> ShowS)
-> (UpdateResponse'Response -> String)
-> ([UpdateResponse'Response] -> ShowS)
-> Show UpdateResponse'Response
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> UpdateResponse'Response -> ShowS
showsPrec :: Int -> UpdateResponse'Response -> ShowS
$cshow :: UpdateResponse'Response -> String
show :: UpdateResponse'Response -> String
$cshowList :: [UpdateResponse'Response] -> ShowS
showList :: [UpdateResponse'Response] -> ShowS
Prelude.Show, UpdateResponse'Response -> UpdateResponse'Response -> Bool
(UpdateResponse'Response -> UpdateResponse'Response -> Bool)
-> (UpdateResponse'Response -> UpdateResponse'Response -> Bool)
-> Eq UpdateResponse'Response
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateResponse'Response -> UpdateResponse'Response -> Bool
== :: UpdateResponse'Response -> UpdateResponse'Response -> Bool
$c/= :: UpdateResponse'Response -> UpdateResponse'Response -> Bool
/= :: UpdateResponse'Response -> UpdateResponse'Response -> Bool
Prelude.Eq, Eq UpdateResponse'Response
Eq UpdateResponse'Response =>
(UpdateResponse'Response -> UpdateResponse'Response -> Ordering)
-> (UpdateResponse'Response -> UpdateResponse'Response -> Bool)
-> (UpdateResponse'Response -> UpdateResponse'Response -> Bool)
-> (UpdateResponse'Response -> UpdateResponse'Response -> Bool)
-> (UpdateResponse'Response -> UpdateResponse'Response -> Bool)
-> (UpdateResponse'Response
    -> UpdateResponse'Response -> UpdateResponse'Response)
-> (UpdateResponse'Response
    -> UpdateResponse'Response -> UpdateResponse'Response)
-> Ord UpdateResponse'Response
UpdateResponse'Response -> UpdateResponse'Response -> Bool
UpdateResponse'Response -> UpdateResponse'Response -> Ordering
UpdateResponse'Response
-> UpdateResponse'Response -> UpdateResponse'Response
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 :: UpdateResponse'Response -> UpdateResponse'Response -> Ordering
compare :: UpdateResponse'Response -> UpdateResponse'Response -> Ordering
$c< :: UpdateResponse'Response -> UpdateResponse'Response -> Bool
< :: UpdateResponse'Response -> UpdateResponse'Response -> Bool
$c<= :: UpdateResponse'Response -> UpdateResponse'Response -> Bool
<= :: UpdateResponse'Response -> UpdateResponse'Response -> Bool
$c> :: UpdateResponse'Response -> UpdateResponse'Response -> Bool
> :: UpdateResponse'Response -> UpdateResponse'Response -> Bool
$c>= :: UpdateResponse'Response -> UpdateResponse'Response -> Bool
>= :: UpdateResponse'Response -> UpdateResponse'Response -> Bool
$cmax :: UpdateResponse'Response
-> UpdateResponse'Response -> UpdateResponse'Response
max :: UpdateResponse'Response
-> UpdateResponse'Response -> UpdateResponse'Response
$cmin :: UpdateResponse'Response
-> UpdateResponse'Response -> UpdateResponse'Response
min :: UpdateResponse'Response
-> UpdateResponse'Response -> UpdateResponse'Response
Prelude.Ord)
instance Data.ProtoLens.Field.HasField UpdateResponse "protocolInstanceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "protocolInstanceId"
-> (Text -> f Text) -> UpdateResponse -> f UpdateResponse
fieldOf Proxy# "protocolInstanceId"
_
    = ((Text -> f Text) -> UpdateResponse -> f UpdateResponse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateResponse
-> f UpdateResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateResponse -> Text)
-> (UpdateResponse -> Text -> UpdateResponse)
-> Lens UpdateResponse UpdateResponse Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateResponse -> Text
_UpdateResponse'protocolInstanceId
           (\ UpdateResponse
x__ Text
y__ -> UpdateResponse
x__ {_UpdateResponse'protocolInstanceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateResponse "maybe'response" (Prelude.Maybe UpdateResponse'Response) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'response"
-> (Maybe UpdateResponse'Response
    -> f (Maybe UpdateResponse'Response))
-> UpdateResponse
-> f UpdateResponse
fieldOf Proxy# "maybe'response"
_
    = ((Maybe UpdateResponse'Response
  -> f (Maybe UpdateResponse'Response))
 -> UpdateResponse -> f UpdateResponse)
-> ((Maybe UpdateResponse'Response
     -> f (Maybe UpdateResponse'Response))
    -> Maybe UpdateResponse'Response
    -> f (Maybe UpdateResponse'Response))
-> (Maybe UpdateResponse'Response
    -> f (Maybe UpdateResponse'Response))
-> UpdateResponse
-> f UpdateResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateResponse -> Maybe UpdateResponse'Response)
-> (UpdateResponse
    -> Maybe UpdateResponse'Response -> UpdateResponse)
-> Lens
     UpdateResponse
     UpdateResponse
     (Maybe UpdateResponse'Response)
     (Maybe UpdateResponse'Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateResponse -> Maybe UpdateResponse'Response
_UpdateResponse'response
           (\ UpdateResponse
x__ Maybe UpdateResponse'Response
y__ -> UpdateResponse
x__ {_UpdateResponse'response = y__}))
        (Maybe UpdateResponse'Response
 -> f (Maybe UpdateResponse'Response))
-> Maybe UpdateResponse'Response
-> f (Maybe UpdateResponse'Response)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateResponse "maybe'accepted" (Prelude.Maybe Proto.Google.Protobuf.Empty.Empty) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'accepted"
-> (Maybe Empty -> f (Maybe Empty))
-> UpdateResponse
-> f UpdateResponse
fieldOf Proxy# "maybe'accepted"
_
    = ((Maybe UpdateResponse'Response
  -> f (Maybe UpdateResponse'Response))
 -> UpdateResponse -> f UpdateResponse)
-> ((Maybe Empty -> f (Maybe Empty))
    -> Maybe UpdateResponse'Response
    -> f (Maybe UpdateResponse'Response))
-> (Maybe Empty -> f (Maybe Empty))
-> UpdateResponse
-> f UpdateResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateResponse -> Maybe UpdateResponse'Response)
-> (UpdateResponse
    -> Maybe UpdateResponse'Response -> UpdateResponse)
-> Lens
     UpdateResponse
     UpdateResponse
     (Maybe UpdateResponse'Response)
     (Maybe UpdateResponse'Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateResponse -> Maybe UpdateResponse'Response
_UpdateResponse'response
           (\ UpdateResponse
x__ Maybe UpdateResponse'Response
y__ -> UpdateResponse
x__ {_UpdateResponse'response = y__}))
        ((Maybe UpdateResponse'Response -> Maybe Empty)
-> (Maybe UpdateResponse'Response
    -> Maybe Empty -> Maybe UpdateResponse'Response)
-> Lens
     (Maybe UpdateResponse'Response)
     (Maybe UpdateResponse'Response)
     (Maybe Empty)
     (Maybe Empty)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe UpdateResponse'Response
x__
              -> case Maybe UpdateResponse'Response
x__ of
                   (Prelude.Just (UpdateResponse'Accepted Empty
x__val))
                     -> Empty -> Maybe Empty
forall a. a -> Maybe a
Prelude.Just Empty
x__val
                   Maybe UpdateResponse'Response
_otherwise -> Maybe Empty
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe UpdateResponse'Response
_ Maybe Empty
y__ -> (Empty -> UpdateResponse'Response)
-> Maybe Empty -> Maybe UpdateResponse'Response
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Empty -> UpdateResponse'Response
UpdateResponse'Accepted Maybe Empty
y__))
instance Data.ProtoLens.Field.HasField UpdateResponse "accepted" Proto.Google.Protobuf.Empty.Empty where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "accepted"
-> (Empty -> f Empty) -> UpdateResponse -> f UpdateResponse
fieldOf Proxy# "accepted"
_
    = ((Maybe UpdateResponse'Response
  -> f (Maybe UpdateResponse'Response))
 -> UpdateResponse -> f UpdateResponse)
-> ((Empty -> f Empty)
    -> Maybe UpdateResponse'Response
    -> f (Maybe UpdateResponse'Response))
-> (Empty -> f Empty)
-> UpdateResponse
-> f UpdateResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateResponse -> Maybe UpdateResponse'Response)
-> (UpdateResponse
    -> Maybe UpdateResponse'Response -> UpdateResponse)
-> Lens
     UpdateResponse
     UpdateResponse
     (Maybe UpdateResponse'Response)
     (Maybe UpdateResponse'Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateResponse -> Maybe UpdateResponse'Response
_UpdateResponse'response
           (\ UpdateResponse
x__ Maybe UpdateResponse'Response
y__ -> UpdateResponse
x__ {_UpdateResponse'response = y__}))
        (((Maybe Empty -> f (Maybe Empty))
 -> Maybe UpdateResponse'Response
 -> f (Maybe UpdateResponse'Response))
-> ((Empty -> f Empty) -> Maybe Empty -> f (Maybe Empty))
-> (Empty -> f Empty)
-> Maybe UpdateResponse'Response
-> f (Maybe UpdateResponse'Response)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe UpdateResponse'Response -> Maybe Empty)
-> (Maybe UpdateResponse'Response
    -> Maybe Empty -> Maybe UpdateResponse'Response)
-> Lens
     (Maybe UpdateResponse'Response)
     (Maybe UpdateResponse'Response)
     (Maybe Empty)
     (Maybe Empty)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe UpdateResponse'Response
x__
                 -> case Maybe UpdateResponse'Response
x__ of
                      (Prelude.Just (UpdateResponse'Accepted Empty
x__val))
                        -> Empty -> Maybe Empty
forall a. a -> Maybe a
Prelude.Just Empty
x__val
                      Maybe UpdateResponse'Response
_otherwise -> Maybe Empty
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe UpdateResponse'Response
_ Maybe Empty
y__ -> (Empty -> UpdateResponse'Response)
-> Maybe Empty -> Maybe UpdateResponse'Response
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Empty -> UpdateResponse'Response
UpdateResponse'Accepted Maybe Empty
y__))
           (Empty -> Lens' (Maybe Empty) Empty
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Empty
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField UpdateResponse "maybe'rejected" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'rejected"
-> (Maybe Failure -> f (Maybe Failure))
-> UpdateResponse
-> f UpdateResponse
fieldOf Proxy# "maybe'rejected"
_
    = ((Maybe UpdateResponse'Response
  -> f (Maybe UpdateResponse'Response))
 -> UpdateResponse -> f UpdateResponse)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe UpdateResponse'Response
    -> f (Maybe UpdateResponse'Response))
-> (Maybe Failure -> f (Maybe Failure))
-> UpdateResponse
-> f UpdateResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateResponse -> Maybe UpdateResponse'Response)
-> (UpdateResponse
    -> Maybe UpdateResponse'Response -> UpdateResponse)
-> Lens
     UpdateResponse
     UpdateResponse
     (Maybe UpdateResponse'Response)
     (Maybe UpdateResponse'Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateResponse -> Maybe UpdateResponse'Response
_UpdateResponse'response
           (\ UpdateResponse
x__ Maybe UpdateResponse'Response
y__ -> UpdateResponse
x__ {_UpdateResponse'response = y__}))
        ((Maybe UpdateResponse'Response -> Maybe Failure)
-> (Maybe UpdateResponse'Response
    -> Maybe Failure -> Maybe UpdateResponse'Response)
-> Lens
     (Maybe UpdateResponse'Response)
     (Maybe UpdateResponse'Response)
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe UpdateResponse'Response
x__
              -> case Maybe UpdateResponse'Response
x__ of
                   (Prelude.Just (UpdateResponse'Rejected Failure
x__val))
                     -> Failure -> Maybe Failure
forall a. a -> Maybe a
Prelude.Just Failure
x__val
                   Maybe UpdateResponse'Response
_otherwise -> Maybe Failure
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe UpdateResponse'Response
_ Maybe Failure
y__ -> (Failure -> UpdateResponse'Response)
-> Maybe Failure -> Maybe UpdateResponse'Response
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Failure -> UpdateResponse'Response
UpdateResponse'Rejected Maybe Failure
y__))
instance Data.ProtoLens.Field.HasField UpdateResponse "rejected" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "rejected"
-> (Failure -> f Failure) -> UpdateResponse -> f UpdateResponse
fieldOf Proxy# "rejected"
_
    = ((Maybe UpdateResponse'Response
  -> f (Maybe UpdateResponse'Response))
 -> UpdateResponse -> f UpdateResponse)
-> ((Failure -> f Failure)
    -> Maybe UpdateResponse'Response
    -> f (Maybe UpdateResponse'Response))
-> (Failure -> f Failure)
-> UpdateResponse
-> f UpdateResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateResponse -> Maybe UpdateResponse'Response)
-> (UpdateResponse
    -> Maybe UpdateResponse'Response -> UpdateResponse)
-> Lens
     UpdateResponse
     UpdateResponse
     (Maybe UpdateResponse'Response)
     (Maybe UpdateResponse'Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateResponse -> Maybe UpdateResponse'Response
_UpdateResponse'response
           (\ UpdateResponse
x__ Maybe UpdateResponse'Response
y__ -> UpdateResponse
x__ {_UpdateResponse'response = y__}))
        (((Maybe Failure -> f (Maybe Failure))
 -> Maybe UpdateResponse'Response
 -> f (Maybe UpdateResponse'Response))
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> Maybe UpdateResponse'Response
-> f (Maybe UpdateResponse'Response)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe UpdateResponse'Response -> Maybe Failure)
-> (Maybe UpdateResponse'Response
    -> Maybe Failure -> Maybe UpdateResponse'Response)
-> Lens
     (Maybe UpdateResponse'Response)
     (Maybe UpdateResponse'Response)
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe UpdateResponse'Response
x__
                 -> case Maybe UpdateResponse'Response
x__ of
                      (Prelude.Just (UpdateResponse'Rejected Failure
x__val))
                        -> Failure -> Maybe Failure
forall a. a -> Maybe a
Prelude.Just Failure
x__val
                      Maybe UpdateResponse'Response
_otherwise -> Maybe Failure
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe UpdateResponse'Response
_ Maybe Failure
y__ -> (Failure -> UpdateResponse'Response)
-> Maybe Failure -> Maybe UpdateResponse'Response
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Failure -> UpdateResponse'Response
UpdateResponse'Rejected Maybe 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 UpdateResponse "maybe'completed" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'completed"
-> (Maybe Payload -> f (Maybe Payload))
-> UpdateResponse
-> f UpdateResponse
fieldOf Proxy# "maybe'completed"
_
    = ((Maybe UpdateResponse'Response
  -> f (Maybe UpdateResponse'Response))
 -> UpdateResponse -> f UpdateResponse)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe UpdateResponse'Response
    -> f (Maybe UpdateResponse'Response))
-> (Maybe Payload -> f (Maybe Payload))
-> UpdateResponse
-> f UpdateResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateResponse -> Maybe UpdateResponse'Response)
-> (UpdateResponse
    -> Maybe UpdateResponse'Response -> UpdateResponse)
-> Lens
     UpdateResponse
     UpdateResponse
     (Maybe UpdateResponse'Response)
     (Maybe UpdateResponse'Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateResponse -> Maybe UpdateResponse'Response
_UpdateResponse'response
           (\ UpdateResponse
x__ Maybe UpdateResponse'Response
y__ -> UpdateResponse
x__ {_UpdateResponse'response = y__}))
        ((Maybe UpdateResponse'Response -> Maybe Payload)
-> (Maybe UpdateResponse'Response
    -> Maybe Payload -> Maybe UpdateResponse'Response)
-> Lens
     (Maybe UpdateResponse'Response)
     (Maybe UpdateResponse'Response)
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe UpdateResponse'Response
x__
              -> case Maybe UpdateResponse'Response
x__ of
                   (Prelude.Just (UpdateResponse'Completed Payload
x__val))
                     -> Payload -> Maybe Payload
forall a. a -> Maybe a
Prelude.Just Payload
x__val
                   Maybe UpdateResponse'Response
_otherwise -> Maybe Payload
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe UpdateResponse'Response
_ Maybe Payload
y__ -> (Payload -> UpdateResponse'Response)
-> Maybe Payload -> Maybe UpdateResponse'Response
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Payload -> UpdateResponse'Response
UpdateResponse'Completed Maybe Payload
y__))
instance Data.ProtoLens.Field.HasField UpdateResponse "completed" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "completed"
-> (Payload -> f Payload) -> UpdateResponse -> f UpdateResponse
fieldOf Proxy# "completed"
_
    = ((Maybe UpdateResponse'Response
  -> f (Maybe UpdateResponse'Response))
 -> UpdateResponse -> f UpdateResponse)
-> ((Payload -> f Payload)
    -> Maybe UpdateResponse'Response
    -> f (Maybe UpdateResponse'Response))
-> (Payload -> f Payload)
-> UpdateResponse
-> f UpdateResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateResponse -> Maybe UpdateResponse'Response)
-> (UpdateResponse
    -> Maybe UpdateResponse'Response -> UpdateResponse)
-> Lens
     UpdateResponse
     UpdateResponse
     (Maybe UpdateResponse'Response)
     (Maybe UpdateResponse'Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateResponse -> Maybe UpdateResponse'Response
_UpdateResponse'response
           (\ UpdateResponse
x__ Maybe UpdateResponse'Response
y__ -> UpdateResponse
x__ {_UpdateResponse'response = y__}))
        (((Maybe Payload -> f (Maybe Payload))
 -> Maybe UpdateResponse'Response
 -> f (Maybe UpdateResponse'Response))
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> Maybe UpdateResponse'Response
-> f (Maybe UpdateResponse'Response)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe UpdateResponse'Response -> Maybe Payload)
-> (Maybe UpdateResponse'Response
    -> Maybe Payload -> Maybe UpdateResponse'Response)
-> Lens
     (Maybe UpdateResponse'Response)
     (Maybe UpdateResponse'Response)
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe UpdateResponse'Response
x__
                 -> case Maybe UpdateResponse'Response
x__ of
                      (Prelude.Just (UpdateResponse'Completed Payload
x__val))
                        -> Payload -> Maybe Payload
forall a. a -> Maybe a
Prelude.Just Payload
x__val
                      Maybe UpdateResponse'Response
_otherwise -> Maybe Payload
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe UpdateResponse'Response
_ Maybe Payload
y__ -> (Payload -> UpdateResponse'Response)
-> Maybe Payload -> Maybe UpdateResponse'Response
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Payload -> UpdateResponse'Response
UpdateResponse'Completed Maybe Payload
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.Message UpdateResponse where
  messageName :: Proxy UpdateResponse -> Text
messageName Proxy UpdateResponse
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_commands.UpdateResponse"
  packedMessageDescriptor :: Proxy UpdateResponse -> ByteString
packedMessageDescriptor Proxy UpdateResponse
_
    = ByteString
"\n\
      \\SOUpdateResponse\DC20\n\
      \\DC4protocol_instance_id\CAN\SOH \SOH(\tR\DC2protocolInstanceId\DC24\n\
      \\baccepted\CAN\STX \SOH(\v2\SYN.google.protobuf.EmptyH\NULR\baccepted\DC2>\n\
      \\brejected\CAN\ETX \SOH(\v2 .temporal.api.failure.v1.FailureH\NULR\brejected\DC2?\n\
      \\tcompleted\CAN\EOT \SOH(\v2\US.temporal.api.common.v1.PayloadH\NULR\tcompletedB\n\
      \\n\
      \\bresponse"
  packedFileDescriptor :: Proxy UpdateResponse -> ByteString
packedFileDescriptor Proxy UpdateResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor UpdateResponse)
fieldsByTag
    = let
        protocolInstanceId__field_descriptor :: FieldDescriptor UpdateResponse
protocolInstanceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateResponse Text
-> FieldDescriptor UpdateResponse
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 UpdateResponse UpdateResponse Text Text
-> FieldAccessor UpdateResponse 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 UpdateResponse
        accepted__field_descriptor :: FieldDescriptor UpdateResponse
accepted__field_descriptor
          = String
-> FieldTypeDescriptor Empty
-> FieldAccessor UpdateResponse Empty
-> FieldDescriptor UpdateResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"accepted"
              (MessageOrGroup -> FieldTypeDescriptor Empty
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Empty.Empty)
              (Lens' UpdateResponse (Maybe Empty)
-> FieldAccessor UpdateResponse Empty
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'accepted")) ::
              Data.ProtoLens.FieldDescriptor UpdateResponse
        rejected__field_descriptor :: FieldDescriptor UpdateResponse
rejected__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor UpdateResponse Failure
-> FieldDescriptor UpdateResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"rejected"
              (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' UpdateResponse (Maybe Failure)
-> FieldAccessor UpdateResponse 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'rejected")) ::
              Data.ProtoLens.FieldDescriptor UpdateResponse
        completed__field_descriptor :: FieldDescriptor UpdateResponse
completed__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor UpdateResponse Payload
-> FieldDescriptor UpdateResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"completed"
              (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' UpdateResponse (Maybe Payload)
-> FieldAccessor UpdateResponse 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'completed")) ::
              Data.ProtoLens.FieldDescriptor UpdateResponse
      in
        [(Tag, FieldDescriptor UpdateResponse)]
-> Map Tag (FieldDescriptor UpdateResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor UpdateResponse
protocolInstanceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor UpdateResponse
accepted__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor UpdateResponse
rejected__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor UpdateResponse
completed__field_descriptor)]
  unknownFields :: Lens' UpdateResponse FieldSet
unknownFields
    = (UpdateResponse -> FieldSet)
-> (UpdateResponse -> FieldSet -> UpdateResponse)
-> Lens' UpdateResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateResponse -> FieldSet
_UpdateResponse'_unknownFields
        (\ UpdateResponse
x__ FieldSet
y__ -> UpdateResponse
x__ {_UpdateResponse'_unknownFields = y__})
  defMessage :: UpdateResponse
defMessage
    = UpdateResponse'_constructor
        {_UpdateResponse'protocolInstanceId :: Text
_UpdateResponse'protocolInstanceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateResponse'response :: Maybe UpdateResponse'Response
_UpdateResponse'response = Maybe UpdateResponse'Response
forall a. Maybe a
Prelude.Nothing,
         _UpdateResponse'_unknownFields :: FieldSet
_UpdateResponse'_unknownFields = []}
  parseMessage :: Parser UpdateResponse
parseMessage
    = let
        loop ::
          UpdateResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateResponse
        loop :: UpdateResponse -> Parser UpdateResponse
loop UpdateResponse
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"protocol_instance_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"protocolInstanceId") y x)
                        Word64
18
                          -> do y <- Parser Empty -> String -> Parser Empty
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"accepted"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"accepted") y x)
                        Word64
26
                          -> 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
"rejected"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"rejected") y x)
                        Word64
34
                          -> do y <- Parser Payload -> String -> Parser Payload
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"completed"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"completed") 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 UpdateResponse -> String -> Parser UpdateResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateResponse -> Parser UpdateResponse
loop UpdateResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"UpdateResponse"
  buildMessage :: UpdateResponse -> Builder
buildMessage
    = \ UpdateResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike Text UpdateResponse UpdateResponse Text Text
-> UpdateResponse -> 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") UpdateResponse
_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 UpdateResponse'Response)
  UpdateResponse
  UpdateResponse
  (Maybe UpdateResponse'Response)
  (Maybe UpdateResponse'Response)
-> UpdateResponse -> Maybe UpdateResponse'Response
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'response") UpdateResponse
_x
                 of
                   Maybe UpdateResponse'Response
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just (UpdateResponse'Accepted Empty
v))
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (Empty -> ByteString) -> Empty -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             Empty -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Empty
v)
                   (Prelude.Just (UpdateResponse'Rejected Failure
v))
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                          ((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)
                   (Prelude.Just (UpdateResponse'Completed 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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike FieldSet UpdateResponse UpdateResponse FieldSet FieldSet
-> UpdateResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet UpdateResponse UpdateResponse FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpdateResponse FieldSet
Data.ProtoLens.unknownFields UpdateResponse
_x)))
instance Control.DeepSeq.NFData UpdateResponse where
  rnf :: UpdateResponse -> ()
rnf
    = \ UpdateResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateResponse -> FieldSet
_UpdateResponse'_unknownFields UpdateResponse
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateResponse -> Text
_UpdateResponse'protocolInstanceId UpdateResponse
x__)
                (Maybe UpdateResponse'Response -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (UpdateResponse -> Maybe UpdateResponse'Response
_UpdateResponse'response UpdateResponse
x__) ()))
instance Control.DeepSeq.NFData UpdateResponse'Response where
  rnf :: UpdateResponse'Response -> ()
rnf (UpdateResponse'Accepted Empty
x__) = Empty -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Empty
x__
  rnf (UpdateResponse'Rejected Failure
x__) = Failure -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Failure
x__
  rnf (UpdateResponse'Completed Payload
x__) = Payload -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Payload
x__
_UpdateResponse'Accepted ::
  Data.ProtoLens.Prism.Prism' UpdateResponse'Response Proto.Google.Protobuf.Empty.Empty
_UpdateResponse'Accepted :: Prism' UpdateResponse'Response Empty
_UpdateResponse'Accepted
  = (Empty -> UpdateResponse'Response)
-> (UpdateResponse'Response -> Maybe Empty)
-> Prism' UpdateResponse'Response Empty
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Empty -> UpdateResponse'Response
UpdateResponse'Accepted
      (\ UpdateResponse'Response
p__
         -> case UpdateResponse'Response
p__ of
              (UpdateResponse'Accepted Empty
p__val) -> Empty -> Maybe Empty
forall a. a -> Maybe a
Prelude.Just Empty
p__val
              UpdateResponse'Response
_otherwise -> Maybe Empty
forall a. Maybe a
Prelude.Nothing)
_UpdateResponse'Rejected ::
  Data.ProtoLens.Prism.Prism' UpdateResponse'Response Proto.Temporal.Api.Failure.V1.Message.Failure
_UpdateResponse'Rejected :: Prism' UpdateResponse'Response Failure
_UpdateResponse'Rejected
  = (Failure -> UpdateResponse'Response)
-> (UpdateResponse'Response -> Maybe Failure)
-> Prism' UpdateResponse'Response Failure
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Failure -> UpdateResponse'Response
UpdateResponse'Rejected
      (\ UpdateResponse'Response
p__
         -> case UpdateResponse'Response
p__ of
              (UpdateResponse'Rejected Failure
p__val) -> Failure -> Maybe Failure
forall a. a -> Maybe a
Prelude.Just Failure
p__val
              UpdateResponse'Response
_otherwise -> Maybe Failure
forall a. Maybe a
Prelude.Nothing)
_UpdateResponse'Completed ::
  Data.ProtoLens.Prism.Prism' UpdateResponse'Response Proto.Temporal.Api.Common.V1.Message.Payload
_UpdateResponse'Completed :: Prism' UpdateResponse'Response Payload
_UpdateResponse'Completed
  = (Payload -> UpdateResponse'Response)
-> (UpdateResponse'Response -> Maybe Payload)
-> Prism' UpdateResponse'Response Payload
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Payload -> UpdateResponse'Response
UpdateResponse'Completed
      (\ UpdateResponse'Response
p__
         -> case UpdateResponse'Response
p__ of
              (UpdateResponse'Completed Payload
p__val) -> Payload -> Maybe Payload
forall a. a -> Maybe a
Prelude.Just Payload
p__val
              UpdateResponse'Response
_otherwise -> Maybe Payload
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.searchAttributes' @:: Lens' UpsertWorkflowSearchAttributes (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data UpsertWorkflowSearchAttributes
  = UpsertWorkflowSearchAttributes'_constructor {UpsertWorkflowSearchAttributes -> Map Text Payload
_UpsertWorkflowSearchAttributes'searchAttributes :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload),
                                                 UpsertWorkflowSearchAttributes -> FieldSet
_UpsertWorkflowSearchAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Bool
(UpsertWorkflowSearchAttributes
 -> UpsertWorkflowSearchAttributes -> Bool)
-> (UpsertWorkflowSearchAttributes
    -> UpsertWorkflowSearchAttributes -> Bool)
-> Eq UpsertWorkflowSearchAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Bool
== :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Bool
$c/= :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Bool
/= :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Bool
Prelude.Eq, Eq UpsertWorkflowSearchAttributes
Eq UpsertWorkflowSearchAttributes =>
(UpsertWorkflowSearchAttributes
 -> UpsertWorkflowSearchAttributes -> Ordering)
-> (UpsertWorkflowSearchAttributes
    -> UpsertWorkflowSearchAttributes -> Bool)
-> (UpsertWorkflowSearchAttributes
    -> UpsertWorkflowSearchAttributes -> Bool)
-> (UpsertWorkflowSearchAttributes
    -> UpsertWorkflowSearchAttributes -> Bool)
-> (UpsertWorkflowSearchAttributes
    -> UpsertWorkflowSearchAttributes -> Bool)
-> (UpsertWorkflowSearchAttributes
    -> UpsertWorkflowSearchAttributes
    -> UpsertWorkflowSearchAttributes)
-> (UpsertWorkflowSearchAttributes
    -> UpsertWorkflowSearchAttributes
    -> UpsertWorkflowSearchAttributes)
-> Ord UpsertWorkflowSearchAttributes
UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Bool
UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Ordering
UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> UpsertWorkflowSearchAttributes
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 :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Ordering
compare :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Ordering
$c< :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Bool
< :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Bool
$c<= :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Bool
<= :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Bool
$c> :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Bool
> :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Bool
$c>= :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Bool
>= :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> Bool
$cmax :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> UpsertWorkflowSearchAttributes
max :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> UpsertWorkflowSearchAttributes
$cmin :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> UpsertWorkflowSearchAttributes
min :: UpsertWorkflowSearchAttributes
-> UpsertWorkflowSearchAttributes -> UpsertWorkflowSearchAttributes
Prelude.Ord)
instance Prelude.Show UpsertWorkflowSearchAttributes where
  showsPrec :: Int -> UpsertWorkflowSearchAttributes -> ShowS
showsPrec Int
_ UpsertWorkflowSearchAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpsertWorkflowSearchAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpsertWorkflowSearchAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpsertWorkflowSearchAttributes "searchAttributes" (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "searchAttributes"
-> (Map Text Payload -> f (Map Text Payload))
-> UpsertWorkflowSearchAttributes
-> f UpsertWorkflowSearchAttributes
fieldOf Proxy# "searchAttributes"
_
    = ((Map Text Payload -> f (Map Text Payload))
 -> UpsertWorkflowSearchAttributes
 -> f UpsertWorkflowSearchAttributes)
-> ((Map Text Payload -> f (Map Text Payload))
    -> Map Text Payload -> f (Map Text Payload))
-> (Map Text Payload -> f (Map Text Payload))
-> UpsertWorkflowSearchAttributes
-> f UpsertWorkflowSearchAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpsertWorkflowSearchAttributes -> Map Text Payload)
-> (UpsertWorkflowSearchAttributes
    -> Map Text Payload -> UpsertWorkflowSearchAttributes)
-> Lens
     UpsertWorkflowSearchAttributes
     UpsertWorkflowSearchAttributes
     (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
           UpsertWorkflowSearchAttributes -> Map Text Payload
_UpsertWorkflowSearchAttributes'searchAttributes
           (\ UpsertWorkflowSearchAttributes
x__ Map Text Payload
y__
              -> UpsertWorkflowSearchAttributes
x__ {_UpsertWorkflowSearchAttributes'searchAttributes = 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 UpsertWorkflowSearchAttributes where
  messageName :: Proxy UpsertWorkflowSearchAttributes -> Text
messageName Proxy UpsertWorkflowSearchAttributes
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.UpsertWorkflowSearchAttributes"
  packedMessageDescriptor :: Proxy UpsertWorkflowSearchAttributes -> ByteString
packedMessageDescriptor Proxy UpsertWorkflowSearchAttributes
_
    = ByteString
"\n\
      \\RSUpsertWorkflowSearchAttributes\DC2|\n\
      \\DC1search_attributes\CAN\SOH \ETX(\v2O.coresdk.workflow_commands.UpsertWorkflowSearchAttributes.SearchAttributesEntryR\DLEsearchAttributes\SUBd\n\
      \\NAKSearchAttributesEntry\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 UpsertWorkflowSearchAttributes -> ByteString
packedFileDescriptor Proxy UpsertWorkflowSearchAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor UpsertWorkflowSearchAttributes)
fieldsByTag
    = let
        searchAttributes__field_descriptor :: FieldDescriptor UpsertWorkflowSearchAttributes
searchAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> FieldAccessor
     UpsertWorkflowSearchAttributes
     UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> FieldDescriptor UpsertWorkflowSearchAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"search_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     UpsertWorkflowSearchAttributes'SearchAttributesEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpsertWorkflowSearchAttributes'SearchAttributesEntry)
              (Lens' UpsertWorkflowSearchAttributes'SearchAttributesEntry Text
-> Lens'
     UpsertWorkflowSearchAttributes'SearchAttributesEntry Payload
-> Lens
     UpsertWorkflowSearchAttributes
     UpsertWorkflowSearchAttributes
     (Map Text Payload)
     (Map Text Payload)
-> FieldAccessor
     UpsertWorkflowSearchAttributes
     UpsertWorkflowSearchAttributes'SearchAttributesEntry
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 @"searchAttributes")) ::
              Data.ProtoLens.FieldDescriptor UpsertWorkflowSearchAttributes
      in
        [(Tag, FieldDescriptor UpsertWorkflowSearchAttributes)]
-> Map Tag (FieldDescriptor UpsertWorkflowSearchAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor UpsertWorkflowSearchAttributes
searchAttributes__field_descriptor)]
  unknownFields :: Lens' UpsertWorkflowSearchAttributes FieldSet
unknownFields
    = (UpsertWorkflowSearchAttributes -> FieldSet)
-> (UpsertWorkflowSearchAttributes
    -> FieldSet -> UpsertWorkflowSearchAttributes)
-> Lens' UpsertWorkflowSearchAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpsertWorkflowSearchAttributes -> FieldSet
_UpsertWorkflowSearchAttributes'_unknownFields
        (\ UpsertWorkflowSearchAttributes
x__ FieldSet
y__
           -> UpsertWorkflowSearchAttributes
x__ {_UpsertWorkflowSearchAttributes'_unknownFields = y__})
  defMessage :: UpsertWorkflowSearchAttributes
defMessage
    = UpsertWorkflowSearchAttributes'_constructor
        {_UpsertWorkflowSearchAttributes'searchAttributes :: Map Text Payload
_UpsertWorkflowSearchAttributes'searchAttributes = Map Text Payload
forall k a. Map k a
Data.Map.empty,
         _UpsertWorkflowSearchAttributes'_unknownFields :: FieldSet
_UpsertWorkflowSearchAttributes'_unknownFields = []}
  parseMessage :: Parser UpsertWorkflowSearchAttributes
parseMessage
    = let
        loop ::
          UpsertWorkflowSearchAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser UpsertWorkflowSearchAttributes
        loop :: UpsertWorkflowSearchAttributes
-> Parser UpsertWorkflowSearchAttributes
loop UpsertWorkflowSearchAttributes
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 !(entry :: UpsertWorkflowSearchAttributes'SearchAttributesEntry) <- Parser UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> String
-> Parser UpsertWorkflowSearchAttributes'SearchAttributesEntry
forall a. Parser a -> String -> Parser a
(Data.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"
                                (let
                                   key = FoldLike
  Text
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  Text
  Text
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> 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") UpsertWorkflowSearchAttributes'SearchAttributesEntry
entry
                                   value
                                     = FoldLike
  Payload
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  Payload
  Payload
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> 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") UpsertWorkflowSearchAttributes'SearchAttributesEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"searchAttributes")
                                        (\ !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))
                        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 UpsertWorkflowSearchAttributes
-> String -> Parser UpsertWorkflowSearchAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpsertWorkflowSearchAttributes
-> Parser UpsertWorkflowSearchAttributes
loop UpsertWorkflowSearchAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"UpsertWorkflowSearchAttributes"
  buildMessage :: UpsertWorkflowSearchAttributes -> Builder
buildMessage
    = \ UpsertWorkflowSearchAttributes
_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
10)
                           ((ByteString -> Builder)
-> (UpsertWorkflowSearchAttributes'SearchAttributesEntry
    -> ByteString)
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ ByteString
bs
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                              UpsertWorkflowSearchAttributes'SearchAttributesEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                              (Setter
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  Text
  Text
-> Text
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
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
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  Payload
  Payload
-> Payload
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
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)
                                    (UpsertWorkflowSearchAttributes'SearchAttributesEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                       UpsertWorkflowSearchAttributes'SearchAttributesEntry)))))
                   (Map Text Payload -> [(Text, Payload)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                      (FoldLike
  (Map Text Payload)
  UpsertWorkflowSearchAttributes
  UpsertWorkflowSearchAttributes
  (Map Text Payload)
  (Map Text Payload)
-> UpsertWorkflowSearchAttributes -> 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 @"searchAttributes") UpsertWorkflowSearchAttributes
_x))))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  UpsertWorkflowSearchAttributes
  UpsertWorkflowSearchAttributes
  FieldSet
  FieldSet
-> UpsertWorkflowSearchAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpsertWorkflowSearchAttributes
  UpsertWorkflowSearchAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpsertWorkflowSearchAttributes FieldSet
Data.ProtoLens.unknownFields UpsertWorkflowSearchAttributes
_x))
instance Control.DeepSeq.NFData UpsertWorkflowSearchAttributes where
  rnf :: UpsertWorkflowSearchAttributes -> ()
rnf
    = \ UpsertWorkflowSearchAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpsertWorkflowSearchAttributes -> FieldSet
_UpsertWorkflowSearchAttributes'_unknownFields UpsertWorkflowSearchAttributes
x__)
             (Map Text Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpsertWorkflowSearchAttributes -> Map Text Payload
_UpsertWorkflowSearchAttributes'searchAttributes UpsertWorkflowSearchAttributes
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.key' @:: Lens' UpsertWorkflowSearchAttributes'SearchAttributesEntry Data.Text.Text@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.value' @:: Lens' UpsertWorkflowSearchAttributes'SearchAttributesEntry Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'value' @:: Lens' UpsertWorkflowSearchAttributes'SearchAttributesEntry (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data UpsertWorkflowSearchAttributes'SearchAttributesEntry
  = UpsertWorkflowSearchAttributes'SearchAttributesEntry'_constructor {UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Text
_UpsertWorkflowSearchAttributes'SearchAttributesEntry'key :: !Data.Text.Text,
                                                                       UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> Maybe Payload
_UpsertWorkflowSearchAttributes'SearchAttributesEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                                                       UpsertWorkflowSearchAttributes'SearchAttributesEntry -> FieldSet
_UpsertWorkflowSearchAttributes'SearchAttributesEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool
(UpsertWorkflowSearchAttributes'SearchAttributesEntry
 -> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool)
-> (UpsertWorkflowSearchAttributes'SearchAttributesEntry
    -> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool)
-> Eq UpsertWorkflowSearchAttributes'SearchAttributesEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool
== :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool
$c/= :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool
/= :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool
Prelude.Eq, Eq UpsertWorkflowSearchAttributes'SearchAttributesEntry
Eq UpsertWorkflowSearchAttributes'SearchAttributesEntry =>
(UpsertWorkflowSearchAttributes'SearchAttributesEntry
 -> UpsertWorkflowSearchAttributes'SearchAttributesEntry
 -> Ordering)
-> (UpsertWorkflowSearchAttributes'SearchAttributesEntry
    -> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool)
-> (UpsertWorkflowSearchAttributes'SearchAttributesEntry
    -> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool)
-> (UpsertWorkflowSearchAttributes'SearchAttributesEntry
    -> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool)
-> (UpsertWorkflowSearchAttributes'SearchAttributesEntry
    -> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool)
-> (UpsertWorkflowSearchAttributes'SearchAttributesEntry
    -> UpsertWorkflowSearchAttributes'SearchAttributesEntry
    -> UpsertWorkflowSearchAttributes'SearchAttributesEntry)
-> (UpsertWorkflowSearchAttributes'SearchAttributesEntry
    -> UpsertWorkflowSearchAttributes'SearchAttributesEntry
    -> UpsertWorkflowSearchAttributes'SearchAttributesEntry)
-> Ord UpsertWorkflowSearchAttributes'SearchAttributesEntry
UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool
UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Ordering
UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
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 :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Ordering
compare :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Ordering
$c< :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool
< :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool
$c<= :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool
<= :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool
$c> :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool
> :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool
$c>= :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool
>= :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Bool
$cmax :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
max :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
$cmin :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
min :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
Prelude.Ord)
instance Prelude.Show UpsertWorkflowSearchAttributes'SearchAttributesEntry where
  showsPrec :: Int
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> ShowS
showsPrec Int
_ UpsertWorkflowSearchAttributes'SearchAttributesEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpsertWorkflowSearchAttributes'SearchAttributesEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpsertWorkflowSearchAttributes'SearchAttributesEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpsertWorkflowSearchAttributes'SearchAttributesEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> f UpsertWorkflowSearchAttributes'SearchAttributesEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> UpsertWorkflowSearchAttributes'SearchAttributesEntry
 -> f UpsertWorkflowSearchAttributes'SearchAttributesEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> f UpsertWorkflowSearchAttributes'SearchAttributesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Text)
-> (UpsertWorkflowSearchAttributes'SearchAttributesEntry
    -> Text -> UpsertWorkflowSearchAttributes'SearchAttributesEntry)
-> Lens' UpsertWorkflowSearchAttributes'SearchAttributesEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Text
_UpsertWorkflowSearchAttributes'SearchAttributesEntry'key
           (\ UpsertWorkflowSearchAttributes'SearchAttributesEntry
x__ Text
y__
              -> UpsertWorkflowSearchAttributes'SearchAttributesEntry
x__
                   {_UpsertWorkflowSearchAttributes'SearchAttributesEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpsertWorkflowSearchAttributes'SearchAttributesEntry "value" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Payload -> f Payload)
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> f UpsertWorkflowSearchAttributes'SearchAttributesEntry
fieldOf Proxy# "value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> UpsertWorkflowSearchAttributes'SearchAttributesEntry
 -> f UpsertWorkflowSearchAttributes'SearchAttributesEntry)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> f UpsertWorkflowSearchAttributes'SearchAttributesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpsertWorkflowSearchAttributes'SearchAttributesEntry
 -> Maybe Payload)
-> (UpsertWorkflowSearchAttributes'SearchAttributesEntry
    -> Maybe Payload
    -> UpsertWorkflowSearchAttributes'SearchAttributesEntry)
-> Lens
     UpsertWorkflowSearchAttributes'SearchAttributesEntry
     UpsertWorkflowSearchAttributes'SearchAttributesEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> Maybe Payload
_UpsertWorkflowSearchAttributes'SearchAttributesEntry'value
           (\ UpsertWorkflowSearchAttributes'SearchAttributesEntry
x__ Maybe Payload
y__
              -> UpsertWorkflowSearchAttributes'SearchAttributesEntry
x__
                   {_UpsertWorkflowSearchAttributes'SearchAttributesEntry'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 UpsertWorkflowSearchAttributes'SearchAttributesEntry "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))
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> f UpsertWorkflowSearchAttributes'SearchAttributesEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> UpsertWorkflowSearchAttributes'SearchAttributesEntry
 -> f UpsertWorkflowSearchAttributes'SearchAttributesEntry)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> f UpsertWorkflowSearchAttributes'SearchAttributesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpsertWorkflowSearchAttributes'SearchAttributesEntry
 -> Maybe Payload)
-> (UpsertWorkflowSearchAttributes'SearchAttributesEntry
    -> Maybe Payload
    -> UpsertWorkflowSearchAttributes'SearchAttributesEntry)
-> Lens
     UpsertWorkflowSearchAttributes'SearchAttributesEntry
     UpsertWorkflowSearchAttributes'SearchAttributesEntry
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> Maybe Payload
_UpsertWorkflowSearchAttributes'SearchAttributesEntry'value
           (\ UpsertWorkflowSearchAttributes'SearchAttributesEntry
x__ Maybe Payload
y__
              -> UpsertWorkflowSearchAttributes'SearchAttributesEntry
x__
                   {_UpsertWorkflowSearchAttributes'SearchAttributesEntry'value = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpsertWorkflowSearchAttributes'SearchAttributesEntry where
  messageName :: Proxy UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Text
messageName Proxy UpsertWorkflowSearchAttributes'SearchAttributesEntry
_
    = String -> Text
Data.Text.pack
        String
"coresdk.workflow_commands.UpsertWorkflowSearchAttributes.SearchAttributesEntry"
  packedMessageDescriptor :: Proxy UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> ByteString
packedMessageDescriptor Proxy UpsertWorkflowSearchAttributes'SearchAttributesEntry
_
    = ByteString
"\n\
      \\NAKSearchAttributesEntry\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 UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> ByteString
packedFileDescriptor Proxy UpsertWorkflowSearchAttributes'SearchAttributesEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     UpsertWorkflowSearchAttributes'SearchAttributesEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     UpsertWorkflowSearchAttributes'SearchAttributesEntry Text
-> FieldDescriptor
     UpsertWorkflowSearchAttributes'SearchAttributesEntry
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' UpsertWorkflowSearchAttributes'SearchAttributesEntry Text
-> FieldAccessor
     UpsertWorkflowSearchAttributes'SearchAttributesEntry 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 UpsertWorkflowSearchAttributes'SearchAttributesEntry
        value__field_descriptor :: FieldDescriptor
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor
     UpsertWorkflowSearchAttributes'SearchAttributesEntry Payload
-> FieldDescriptor
     UpsertWorkflowSearchAttributes'SearchAttributesEntry
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
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor
     UpsertWorkflowSearchAttributes'SearchAttributesEntry 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 UpsertWorkflowSearchAttributes'SearchAttributesEntry
      in
        [(Tag,
  FieldDescriptor
    UpsertWorkflowSearchAttributes'SearchAttributesEntry)]
-> Map
     Tag
     (FieldDescriptor
        UpsertWorkflowSearchAttributes'SearchAttributesEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
value__field_descriptor)]
  unknownFields :: Lens' UpsertWorkflowSearchAttributes'SearchAttributesEntry FieldSet
unknownFields
    = (UpsertWorkflowSearchAttributes'SearchAttributesEntry -> FieldSet)
-> (UpsertWorkflowSearchAttributes'SearchAttributesEntry
    -> FieldSet
    -> UpsertWorkflowSearchAttributes'SearchAttributesEntry)
-> Lens'
     UpsertWorkflowSearchAttributes'SearchAttributesEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpsertWorkflowSearchAttributes'SearchAttributesEntry -> FieldSet
_UpsertWorkflowSearchAttributes'SearchAttributesEntry'_unknownFields
        (\ UpsertWorkflowSearchAttributes'SearchAttributesEntry
x__ FieldSet
y__
           -> UpsertWorkflowSearchAttributes'SearchAttributesEntry
x__
                {_UpsertWorkflowSearchAttributes'SearchAttributesEntry'_unknownFields = y__})
  defMessage :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
defMessage
    = UpsertWorkflowSearchAttributes'SearchAttributesEntry'_constructor
        {_UpsertWorkflowSearchAttributes'SearchAttributesEntry'key :: Text
_UpsertWorkflowSearchAttributes'SearchAttributesEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpsertWorkflowSearchAttributes'SearchAttributesEntry'value :: Maybe Payload
_UpsertWorkflowSearchAttributes'SearchAttributesEntry'value = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _UpsertWorkflowSearchAttributes'SearchAttributesEntry'_unknownFields :: FieldSet
_UpsertWorkflowSearchAttributes'SearchAttributesEntry'_unknownFields = []}
  parseMessage :: Parser UpsertWorkflowSearchAttributes'SearchAttributesEntry
parseMessage
    = let
        loop ::
          UpsertWorkflowSearchAttributes'SearchAttributesEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser UpsertWorkflowSearchAttributes'SearchAttributesEntry
        loop :: UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> Parser UpsertWorkflowSearchAttributes'SearchAttributesEntry
loop UpsertWorkflowSearchAttributes'SearchAttributesEntry
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 UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> String
-> Parser UpsertWorkflowSearchAttributes'SearchAttributesEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> Parser UpsertWorkflowSearchAttributes'SearchAttributesEntry
loop UpsertWorkflowSearchAttributes'SearchAttributesEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"SearchAttributesEntry"
  buildMessage :: UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Builder
buildMessage
    = \ UpsertWorkflowSearchAttributes'SearchAttributesEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  Text
  Text
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> 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") UpsertWorkflowSearchAttributes'SearchAttributesEntry
_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)
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  (Maybe Payload)
  (Maybe Payload)
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> 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") UpsertWorkflowSearchAttributes'SearchAttributesEntry
_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
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  FieldSet
  FieldSet
-> UpsertWorkflowSearchAttributes'SearchAttributesEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  UpsertWorkflowSearchAttributes'SearchAttributesEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpsertWorkflowSearchAttributes'SearchAttributesEntry FieldSet
Data.ProtoLens.unknownFields UpsertWorkflowSearchAttributes'SearchAttributesEntry
_x)))
instance Control.DeepSeq.NFData UpsertWorkflowSearchAttributes'SearchAttributesEntry where
  rnf :: UpsertWorkflowSearchAttributes'SearchAttributesEntry -> ()
rnf
    = \ UpsertWorkflowSearchAttributes'SearchAttributesEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpsertWorkflowSearchAttributes'SearchAttributesEntry -> FieldSet
_UpsertWorkflowSearchAttributes'SearchAttributesEntry'_unknownFields
                UpsertWorkflowSearchAttributes'SearchAttributesEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpsertWorkflowSearchAttributes'SearchAttributesEntry -> Text
_UpsertWorkflowSearchAttributes'SearchAttributesEntry'key UpsertWorkflowSearchAttributes'SearchAttributesEntry
x__)
                (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpsertWorkflowSearchAttributes'SearchAttributesEntry
-> Maybe Payload
_UpsertWorkflowSearchAttributes'SearchAttributesEntry'value UpsertWorkflowSearchAttributes'SearchAttributesEntry
x__)
                   ()))
{- | Fields :
     
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'variant' @:: Lens' WorkflowCommand (Prelude.Maybe WorkflowCommand'Variant)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'startTimer' @:: Lens' WorkflowCommand (Prelude.Maybe StartTimer)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.startTimer' @:: Lens' WorkflowCommand StartTimer@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'scheduleActivity' @:: Lens' WorkflowCommand (Prelude.Maybe ScheduleActivity)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.scheduleActivity' @:: Lens' WorkflowCommand ScheduleActivity@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'respondToQuery' @:: Lens' WorkflowCommand (Prelude.Maybe QueryResult)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.respondToQuery' @:: Lens' WorkflowCommand QueryResult@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'requestCancelActivity' @:: Lens' WorkflowCommand (Prelude.Maybe RequestCancelActivity)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.requestCancelActivity' @:: Lens' WorkflowCommand RequestCancelActivity@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'cancelTimer' @:: Lens' WorkflowCommand (Prelude.Maybe CancelTimer)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.cancelTimer' @:: Lens' WorkflowCommand CancelTimer@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'completeWorkflowExecution' @:: Lens' WorkflowCommand (Prelude.Maybe CompleteWorkflowExecution)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.completeWorkflowExecution' @:: Lens' WorkflowCommand CompleteWorkflowExecution@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'failWorkflowExecution' @:: Lens' WorkflowCommand (Prelude.Maybe FailWorkflowExecution)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.failWorkflowExecution' @:: Lens' WorkflowCommand FailWorkflowExecution@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'continueAsNewWorkflowExecution' @:: Lens' WorkflowCommand (Prelude.Maybe ContinueAsNewWorkflowExecution)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.continueAsNewWorkflowExecution' @:: Lens' WorkflowCommand ContinueAsNewWorkflowExecution@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'cancelWorkflowExecution' @:: Lens' WorkflowCommand (Prelude.Maybe CancelWorkflowExecution)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.cancelWorkflowExecution' @:: Lens' WorkflowCommand CancelWorkflowExecution@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'setPatchMarker' @:: Lens' WorkflowCommand (Prelude.Maybe SetPatchMarker)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.setPatchMarker' @:: Lens' WorkflowCommand SetPatchMarker@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'startChildWorkflowExecution' @:: Lens' WorkflowCommand (Prelude.Maybe StartChildWorkflowExecution)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.startChildWorkflowExecution' @:: Lens' WorkflowCommand StartChildWorkflowExecution@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'cancelChildWorkflowExecution' @:: Lens' WorkflowCommand (Prelude.Maybe CancelChildWorkflowExecution)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.cancelChildWorkflowExecution' @:: Lens' WorkflowCommand CancelChildWorkflowExecution@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'requestCancelExternalWorkflowExecution' @:: Lens' WorkflowCommand (Prelude.Maybe RequestCancelExternalWorkflowExecution)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.requestCancelExternalWorkflowExecution' @:: Lens' WorkflowCommand RequestCancelExternalWorkflowExecution@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'signalExternalWorkflowExecution' @:: Lens' WorkflowCommand (Prelude.Maybe SignalExternalWorkflowExecution)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.signalExternalWorkflowExecution' @:: Lens' WorkflowCommand SignalExternalWorkflowExecution@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'cancelSignalWorkflow' @:: Lens' WorkflowCommand (Prelude.Maybe CancelSignalWorkflow)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.cancelSignalWorkflow' @:: Lens' WorkflowCommand CancelSignalWorkflow@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'scheduleLocalActivity' @:: Lens' WorkflowCommand (Prelude.Maybe ScheduleLocalActivity)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.scheduleLocalActivity' @:: Lens' WorkflowCommand ScheduleLocalActivity@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'requestCancelLocalActivity' @:: Lens' WorkflowCommand (Prelude.Maybe RequestCancelLocalActivity)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.requestCancelLocalActivity' @:: Lens' WorkflowCommand RequestCancelLocalActivity@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'upsertWorkflowSearchAttributes' @:: Lens' WorkflowCommand (Prelude.Maybe UpsertWorkflowSearchAttributes)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.upsertWorkflowSearchAttributes' @:: Lens' WorkflowCommand UpsertWorkflowSearchAttributes@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'modifyWorkflowProperties' @:: Lens' WorkflowCommand (Prelude.Maybe ModifyWorkflowProperties)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.modifyWorkflowProperties' @:: Lens' WorkflowCommand ModifyWorkflowProperties@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.maybe'updateResponse' @:: Lens' WorkflowCommand (Prelude.Maybe UpdateResponse)@
         * 'Proto.Temporal.Sdk.Core.WorkflowCommands.WorkflowCommands_Fields.updateResponse' @:: Lens' WorkflowCommand UpdateResponse@ -}
data WorkflowCommand
  = WorkflowCommand'_constructor {WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant :: !(Prelude.Maybe WorkflowCommand'Variant),
                                  WorkflowCommand -> FieldSet
_WorkflowCommand'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowCommand -> WorkflowCommand -> Bool
(WorkflowCommand -> WorkflowCommand -> Bool)
-> (WorkflowCommand -> WorkflowCommand -> Bool)
-> Eq WorkflowCommand
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowCommand -> WorkflowCommand -> Bool
== :: WorkflowCommand -> WorkflowCommand -> Bool
$c/= :: WorkflowCommand -> WorkflowCommand -> Bool
/= :: WorkflowCommand -> WorkflowCommand -> Bool
Prelude.Eq, Eq WorkflowCommand
Eq WorkflowCommand =>
(WorkflowCommand -> WorkflowCommand -> Ordering)
-> (WorkflowCommand -> WorkflowCommand -> Bool)
-> (WorkflowCommand -> WorkflowCommand -> Bool)
-> (WorkflowCommand -> WorkflowCommand -> Bool)
-> (WorkflowCommand -> WorkflowCommand -> Bool)
-> (WorkflowCommand -> WorkflowCommand -> WorkflowCommand)
-> (WorkflowCommand -> WorkflowCommand -> WorkflowCommand)
-> Ord WorkflowCommand
WorkflowCommand -> WorkflowCommand -> Bool
WorkflowCommand -> WorkflowCommand -> Ordering
WorkflowCommand -> WorkflowCommand -> WorkflowCommand
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 :: WorkflowCommand -> WorkflowCommand -> Ordering
compare :: WorkflowCommand -> WorkflowCommand -> Ordering
$c< :: WorkflowCommand -> WorkflowCommand -> Bool
< :: WorkflowCommand -> WorkflowCommand -> Bool
$c<= :: WorkflowCommand -> WorkflowCommand -> Bool
<= :: WorkflowCommand -> WorkflowCommand -> Bool
$c> :: WorkflowCommand -> WorkflowCommand -> Bool
> :: WorkflowCommand -> WorkflowCommand -> Bool
$c>= :: WorkflowCommand -> WorkflowCommand -> Bool
>= :: WorkflowCommand -> WorkflowCommand -> Bool
$cmax :: WorkflowCommand -> WorkflowCommand -> WorkflowCommand
max :: WorkflowCommand -> WorkflowCommand -> WorkflowCommand
$cmin :: WorkflowCommand -> WorkflowCommand -> WorkflowCommand
min :: WorkflowCommand -> WorkflowCommand -> WorkflowCommand
Prelude.Ord)
instance Prelude.Show WorkflowCommand where
  showsPrec :: Int -> WorkflowCommand -> ShowS
showsPrec Int
_ WorkflowCommand
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowCommand -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowCommand
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data WorkflowCommand'Variant
  = WorkflowCommand'StartTimer !StartTimer |
    WorkflowCommand'ScheduleActivity !ScheduleActivity |
    WorkflowCommand'RespondToQuery !QueryResult |
    WorkflowCommand'RequestCancelActivity !RequestCancelActivity |
    WorkflowCommand'CancelTimer !CancelTimer |
    WorkflowCommand'CompleteWorkflowExecution !CompleteWorkflowExecution |
    WorkflowCommand'FailWorkflowExecution !FailWorkflowExecution |
    WorkflowCommand'ContinueAsNewWorkflowExecution !ContinueAsNewWorkflowExecution |
    WorkflowCommand'CancelWorkflowExecution !CancelWorkflowExecution |
    WorkflowCommand'SetPatchMarker !SetPatchMarker |
    WorkflowCommand'StartChildWorkflowExecution !StartChildWorkflowExecution |
    WorkflowCommand'CancelChildWorkflowExecution !CancelChildWorkflowExecution |
    WorkflowCommand'RequestCancelExternalWorkflowExecution !RequestCancelExternalWorkflowExecution |
    WorkflowCommand'SignalExternalWorkflowExecution !SignalExternalWorkflowExecution |
    WorkflowCommand'CancelSignalWorkflow !CancelSignalWorkflow |
    WorkflowCommand'ScheduleLocalActivity !ScheduleLocalActivity |
    WorkflowCommand'RequestCancelLocalActivity !RequestCancelLocalActivity |
    WorkflowCommand'UpsertWorkflowSearchAttributes !UpsertWorkflowSearchAttributes |
    WorkflowCommand'ModifyWorkflowProperties !ModifyWorkflowProperties |
    WorkflowCommand'UpdateResponse !UpdateResponse
  deriving stock (Int -> WorkflowCommand'Variant -> ShowS
[WorkflowCommand'Variant] -> ShowS
WorkflowCommand'Variant -> String
(Int -> WorkflowCommand'Variant -> ShowS)
-> (WorkflowCommand'Variant -> String)
-> ([WorkflowCommand'Variant] -> ShowS)
-> Show WorkflowCommand'Variant
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> WorkflowCommand'Variant -> ShowS
showsPrec :: Int -> WorkflowCommand'Variant -> ShowS
$cshow :: WorkflowCommand'Variant -> String
show :: WorkflowCommand'Variant -> String
$cshowList :: [WorkflowCommand'Variant] -> ShowS
showList :: [WorkflowCommand'Variant] -> ShowS
Prelude.Show, WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool
(WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool)
-> (WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool)
-> Eq WorkflowCommand'Variant
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool
== :: WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool
$c/= :: WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool
/= :: WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool
Prelude.Eq, Eq WorkflowCommand'Variant
Eq WorkflowCommand'Variant =>
(WorkflowCommand'Variant -> WorkflowCommand'Variant -> Ordering)
-> (WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool)
-> (WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool)
-> (WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool)
-> (WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool)
-> (WorkflowCommand'Variant
    -> WorkflowCommand'Variant -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant
    -> WorkflowCommand'Variant -> WorkflowCommand'Variant)
-> Ord WorkflowCommand'Variant
WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool
WorkflowCommand'Variant -> WorkflowCommand'Variant -> Ordering
WorkflowCommand'Variant
-> WorkflowCommand'Variant -> WorkflowCommand'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 :: WorkflowCommand'Variant -> WorkflowCommand'Variant -> Ordering
compare :: WorkflowCommand'Variant -> WorkflowCommand'Variant -> Ordering
$c< :: WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool
< :: WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool
$c<= :: WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool
<= :: WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool
$c> :: WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool
> :: WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool
$c>= :: WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool
>= :: WorkflowCommand'Variant -> WorkflowCommand'Variant -> Bool
$cmax :: WorkflowCommand'Variant
-> WorkflowCommand'Variant -> WorkflowCommand'Variant
max :: WorkflowCommand'Variant
-> WorkflowCommand'Variant -> WorkflowCommand'Variant
$cmin :: WorkflowCommand'Variant
-> WorkflowCommand'Variant -> WorkflowCommand'Variant
min :: WorkflowCommand'Variant
-> WorkflowCommand'Variant -> WorkflowCommand'Variant
Prelude.Ord)
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'variant" (Prelude.Maybe WorkflowCommand'Variant) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'variant"
-> (Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'variant"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe WorkflowCommand'Variant
     -> f (Maybe WorkflowCommand'Variant))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'startTimer" (Prelude.Maybe StartTimer) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startTimer"
-> (Maybe StartTimer -> f (Maybe StartTimer))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'startTimer"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe StartTimer -> f (Maybe StartTimer))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe StartTimer -> f (Maybe StartTimer))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant -> Maybe StartTimer)
-> (Maybe WorkflowCommand'Variant
    -> Maybe StartTimer -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe StartTimer)
     (Maybe StartTimer)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'StartTimer StartTimer
x__val))
                     -> StartTimer -> Maybe StartTimer
forall a. a -> Maybe a
Prelude.Just StartTimer
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe StartTimer
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe StartTimer
y__ -> (StartTimer -> WorkflowCommand'Variant)
-> Maybe StartTimer -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap StartTimer -> WorkflowCommand'Variant
WorkflowCommand'StartTimer Maybe StartTimer
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "startTimer" StartTimer where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startTimer"
-> (StartTimer -> f StartTimer)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "startTimer"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((StartTimer -> f StartTimer)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (StartTimer -> f StartTimer)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe StartTimer -> f (Maybe StartTimer))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((StartTimer -> f StartTimer)
    -> Maybe StartTimer -> f (Maybe StartTimer))
-> (StartTimer -> f StartTimer)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant -> Maybe StartTimer)
-> (Maybe WorkflowCommand'Variant
    -> Maybe StartTimer -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe StartTimer)
     (Maybe StartTimer)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'StartTimer StartTimer
x__val))
                        -> StartTimer -> Maybe StartTimer
forall a. a -> Maybe a
Prelude.Just StartTimer
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe StartTimer
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe StartTimer
y__ -> (StartTimer -> WorkflowCommand'Variant)
-> Maybe StartTimer -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap StartTimer -> WorkflowCommand'Variant
WorkflowCommand'StartTimer Maybe StartTimer
y__))
           (StartTimer -> Lens' (Maybe StartTimer) StartTimer
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens StartTimer
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'scheduleActivity" (Prelude.Maybe ScheduleActivity) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduleActivity"
-> (Maybe ScheduleActivity -> f (Maybe ScheduleActivity))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'scheduleActivity"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe ScheduleActivity -> f (Maybe ScheduleActivity))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe ScheduleActivity -> f (Maybe ScheduleActivity))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant -> Maybe ScheduleActivity)
-> (Maybe WorkflowCommand'Variant
    -> Maybe ScheduleActivity -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe ScheduleActivity)
     (Maybe ScheduleActivity)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'ScheduleActivity ScheduleActivity
x__val))
                     -> ScheduleActivity -> Maybe ScheduleActivity
forall a. a -> Maybe a
Prelude.Just ScheduleActivity
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe ScheduleActivity
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe ScheduleActivity
y__ -> (ScheduleActivity -> WorkflowCommand'Variant)
-> Maybe ScheduleActivity -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ScheduleActivity -> WorkflowCommand'Variant
WorkflowCommand'ScheduleActivity Maybe ScheduleActivity
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "scheduleActivity" ScheduleActivity where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleActivity"
-> (ScheduleActivity -> f ScheduleActivity)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "scheduleActivity"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((ScheduleActivity -> f ScheduleActivity)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (ScheduleActivity -> f ScheduleActivity)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe ScheduleActivity -> f (Maybe ScheduleActivity))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((ScheduleActivity -> f ScheduleActivity)
    -> Maybe ScheduleActivity -> f (Maybe ScheduleActivity))
-> (ScheduleActivity -> f ScheduleActivity)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant -> Maybe ScheduleActivity)
-> (Maybe WorkflowCommand'Variant
    -> Maybe ScheduleActivity -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe ScheduleActivity)
     (Maybe ScheduleActivity)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'ScheduleActivity ScheduleActivity
x__val))
                        -> ScheduleActivity -> Maybe ScheduleActivity
forall a. a -> Maybe a
Prelude.Just ScheduleActivity
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe ScheduleActivity
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe ScheduleActivity
y__ -> (ScheduleActivity -> WorkflowCommand'Variant)
-> Maybe ScheduleActivity -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ScheduleActivity -> WorkflowCommand'Variant
WorkflowCommand'ScheduleActivity Maybe ScheduleActivity
y__))
           (ScheduleActivity -> Lens' (Maybe ScheduleActivity) ScheduleActivity
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ScheduleActivity
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'respondToQuery" (Prelude.Maybe QueryResult) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'respondToQuery"
-> (Maybe QueryResult -> f (Maybe QueryResult))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'respondToQuery"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe QueryResult -> f (Maybe QueryResult))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe QueryResult -> f (Maybe QueryResult))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant -> Maybe QueryResult)
-> (Maybe WorkflowCommand'Variant
    -> Maybe QueryResult -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe QueryResult)
     (Maybe QueryResult)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'RespondToQuery QueryResult
x__val))
                     -> QueryResult -> Maybe QueryResult
forall a. a -> Maybe a
Prelude.Just QueryResult
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe QueryResult
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe QueryResult
y__ -> (QueryResult -> WorkflowCommand'Variant)
-> Maybe QueryResult -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap QueryResult -> WorkflowCommand'Variant
WorkflowCommand'RespondToQuery Maybe QueryResult
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "respondToQuery" QueryResult where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "respondToQuery"
-> (QueryResult -> f QueryResult)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "respondToQuery"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((QueryResult -> f QueryResult)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (QueryResult -> f QueryResult)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe QueryResult -> f (Maybe QueryResult))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((QueryResult -> f QueryResult)
    -> Maybe QueryResult -> f (Maybe QueryResult))
-> (QueryResult -> f QueryResult)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant -> Maybe QueryResult)
-> (Maybe WorkflowCommand'Variant
    -> Maybe QueryResult -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe QueryResult)
     (Maybe QueryResult)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'RespondToQuery QueryResult
x__val))
                        -> QueryResult -> Maybe QueryResult
forall a. a -> Maybe a
Prelude.Just QueryResult
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe QueryResult
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe QueryResult
y__ -> (QueryResult -> WorkflowCommand'Variant)
-> Maybe QueryResult -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap QueryResult -> WorkflowCommand'Variant
WorkflowCommand'RespondToQuery Maybe QueryResult
y__))
           (QueryResult -> Lens' (Maybe QueryResult) QueryResult
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens QueryResult
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'requestCancelActivity" (Prelude.Maybe RequestCancelActivity) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'requestCancelActivity"
-> (Maybe RequestCancelActivity -> f (Maybe RequestCancelActivity))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'requestCancelActivity"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe RequestCancelActivity
     -> f (Maybe RequestCancelActivity))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe RequestCancelActivity -> f (Maybe RequestCancelActivity))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant -> Maybe RequestCancelActivity)
-> (Maybe WorkflowCommand'Variant
    -> Maybe RequestCancelActivity -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe RequestCancelActivity)
     (Maybe RequestCancelActivity)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'RequestCancelActivity RequestCancelActivity
x__val))
                     -> RequestCancelActivity -> Maybe RequestCancelActivity
forall a. a -> Maybe a
Prelude.Just RequestCancelActivity
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe RequestCancelActivity
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe RequestCancelActivity
y__
              -> (RequestCancelActivity -> WorkflowCommand'Variant)
-> Maybe RequestCancelActivity -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap RequestCancelActivity -> WorkflowCommand'Variant
WorkflowCommand'RequestCancelActivity Maybe RequestCancelActivity
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "requestCancelActivity" RequestCancelActivity where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestCancelActivity"
-> (RequestCancelActivity -> f RequestCancelActivity)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "requestCancelActivity"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((RequestCancelActivity -> f RequestCancelActivity)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (RequestCancelActivity -> f RequestCancelActivity)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe RequestCancelActivity -> f (Maybe RequestCancelActivity))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((RequestCancelActivity -> f RequestCancelActivity)
    -> Maybe RequestCancelActivity -> f (Maybe RequestCancelActivity))
-> (RequestCancelActivity -> f RequestCancelActivity)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant -> Maybe RequestCancelActivity)
-> (Maybe WorkflowCommand'Variant
    -> Maybe RequestCancelActivity -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe RequestCancelActivity)
     (Maybe RequestCancelActivity)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'RequestCancelActivity RequestCancelActivity
x__val))
                        -> RequestCancelActivity -> Maybe RequestCancelActivity
forall a. a -> Maybe a
Prelude.Just RequestCancelActivity
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe RequestCancelActivity
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe RequestCancelActivity
y__
                 -> (RequestCancelActivity -> WorkflowCommand'Variant)
-> Maybe RequestCancelActivity -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap RequestCancelActivity -> WorkflowCommand'Variant
WorkflowCommand'RequestCancelActivity Maybe RequestCancelActivity
y__))
           (RequestCancelActivity
-> Lens' (Maybe RequestCancelActivity) RequestCancelActivity
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens RequestCancelActivity
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'cancelTimer" (Prelude.Maybe CancelTimer) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'cancelTimer"
-> (Maybe CancelTimer -> f (Maybe CancelTimer))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'cancelTimer"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe CancelTimer -> f (Maybe CancelTimer))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe CancelTimer -> f (Maybe CancelTimer))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant -> Maybe CancelTimer)
-> (Maybe WorkflowCommand'Variant
    -> Maybe CancelTimer -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe CancelTimer)
     (Maybe CancelTimer)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'CancelTimer CancelTimer
x__val))
                     -> CancelTimer -> Maybe CancelTimer
forall a. a -> Maybe a
Prelude.Just CancelTimer
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe CancelTimer
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe CancelTimer
y__ -> (CancelTimer -> WorkflowCommand'Variant)
-> Maybe CancelTimer -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CancelTimer -> WorkflowCommand'Variant
WorkflowCommand'CancelTimer Maybe CancelTimer
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "cancelTimer" CancelTimer where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cancelTimer"
-> (CancelTimer -> f CancelTimer)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "cancelTimer"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((CancelTimer -> f CancelTimer)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (CancelTimer -> f CancelTimer)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe CancelTimer -> f (Maybe CancelTimer))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((CancelTimer -> f CancelTimer)
    -> Maybe CancelTimer -> f (Maybe CancelTimer))
-> (CancelTimer -> f CancelTimer)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant -> Maybe CancelTimer)
-> (Maybe WorkflowCommand'Variant
    -> Maybe CancelTimer -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe CancelTimer)
     (Maybe CancelTimer)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'CancelTimer CancelTimer
x__val))
                        -> CancelTimer -> Maybe CancelTimer
forall a. a -> Maybe a
Prelude.Just CancelTimer
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe CancelTimer
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe CancelTimer
y__ -> (CancelTimer -> WorkflowCommand'Variant)
-> Maybe CancelTimer -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CancelTimer -> WorkflowCommand'Variant
WorkflowCommand'CancelTimer Maybe CancelTimer
y__))
           (CancelTimer -> Lens' (Maybe CancelTimer) CancelTimer
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CancelTimer
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'completeWorkflowExecution" (Prelude.Maybe CompleteWorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'completeWorkflowExecution"
-> (Maybe CompleteWorkflowExecution
    -> f (Maybe CompleteWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'completeWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe CompleteWorkflowExecution
     -> f (Maybe CompleteWorkflowExecution))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe CompleteWorkflowExecution
    -> f (Maybe CompleteWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant -> Maybe CompleteWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe CompleteWorkflowExecution
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe CompleteWorkflowExecution)
     (Maybe CompleteWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'CompleteWorkflowExecution CompleteWorkflowExecution
x__val))
                     -> CompleteWorkflowExecution -> Maybe CompleteWorkflowExecution
forall a. a -> Maybe a
Prelude.Just CompleteWorkflowExecution
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe CompleteWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe CompleteWorkflowExecution
y__
              -> (CompleteWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe CompleteWorkflowExecution -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CompleteWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'CompleteWorkflowExecution Maybe CompleteWorkflowExecution
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "completeWorkflowExecution" CompleteWorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "completeWorkflowExecution"
-> (CompleteWorkflowExecution -> f CompleteWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "completeWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((CompleteWorkflowExecution -> f CompleteWorkflowExecution)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (CompleteWorkflowExecution -> f CompleteWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe CompleteWorkflowExecution
  -> f (Maybe CompleteWorkflowExecution))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((CompleteWorkflowExecution -> f CompleteWorkflowExecution)
    -> Maybe CompleteWorkflowExecution
    -> f (Maybe CompleteWorkflowExecution))
-> (CompleteWorkflowExecution -> f CompleteWorkflowExecution)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant -> Maybe CompleteWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe CompleteWorkflowExecution
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe CompleteWorkflowExecution)
     (Maybe CompleteWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'CompleteWorkflowExecution CompleteWorkflowExecution
x__val))
                        -> CompleteWorkflowExecution -> Maybe CompleteWorkflowExecution
forall a. a -> Maybe a
Prelude.Just CompleteWorkflowExecution
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe CompleteWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe CompleteWorkflowExecution
y__
                 -> (CompleteWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe CompleteWorkflowExecution -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CompleteWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'CompleteWorkflowExecution Maybe CompleteWorkflowExecution
y__))
           (CompleteWorkflowExecution
-> Lens'
     (Maybe CompleteWorkflowExecution) CompleteWorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CompleteWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'failWorkflowExecution" (Prelude.Maybe FailWorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'failWorkflowExecution"
-> (Maybe FailWorkflowExecution -> f (Maybe FailWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'failWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe FailWorkflowExecution
     -> f (Maybe FailWorkflowExecution))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe FailWorkflowExecution -> f (Maybe FailWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant -> Maybe FailWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe FailWorkflowExecution -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe FailWorkflowExecution)
     (Maybe FailWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'FailWorkflowExecution FailWorkflowExecution
x__val))
                     -> FailWorkflowExecution -> Maybe FailWorkflowExecution
forall a. a -> Maybe a
Prelude.Just FailWorkflowExecution
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe FailWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe FailWorkflowExecution
y__
              -> (FailWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe FailWorkflowExecution -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap FailWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'FailWorkflowExecution Maybe FailWorkflowExecution
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "failWorkflowExecution" FailWorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failWorkflowExecution"
-> (FailWorkflowExecution -> f FailWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "failWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((FailWorkflowExecution -> f FailWorkflowExecution)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (FailWorkflowExecution -> f FailWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe FailWorkflowExecution -> f (Maybe FailWorkflowExecution))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((FailWorkflowExecution -> f FailWorkflowExecution)
    -> Maybe FailWorkflowExecution -> f (Maybe FailWorkflowExecution))
-> (FailWorkflowExecution -> f FailWorkflowExecution)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant -> Maybe FailWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe FailWorkflowExecution -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe FailWorkflowExecution)
     (Maybe FailWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'FailWorkflowExecution FailWorkflowExecution
x__val))
                        -> FailWorkflowExecution -> Maybe FailWorkflowExecution
forall a. a -> Maybe a
Prelude.Just FailWorkflowExecution
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe FailWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe FailWorkflowExecution
y__
                 -> (FailWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe FailWorkflowExecution -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap FailWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'FailWorkflowExecution Maybe FailWorkflowExecution
y__))
           (FailWorkflowExecution
-> Lens' (Maybe FailWorkflowExecution) FailWorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens FailWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'continueAsNewWorkflowExecution" (Prelude.Maybe ContinueAsNewWorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'continueAsNewWorkflowExecution"
-> (Maybe ContinueAsNewWorkflowExecution
    -> f (Maybe ContinueAsNewWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'continueAsNewWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe ContinueAsNewWorkflowExecution
     -> f (Maybe ContinueAsNewWorkflowExecution))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe ContinueAsNewWorkflowExecution
    -> f (Maybe ContinueAsNewWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant
 -> Maybe ContinueAsNewWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe ContinueAsNewWorkflowExecution
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe ContinueAsNewWorkflowExecution)
     (Maybe ContinueAsNewWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'ContinueAsNewWorkflowExecution ContinueAsNewWorkflowExecution
x__val))
                     -> ContinueAsNewWorkflowExecution
-> Maybe ContinueAsNewWorkflowExecution
forall a. a -> Maybe a
Prelude.Just ContinueAsNewWorkflowExecution
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe ContinueAsNewWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe ContinueAsNewWorkflowExecution
y__
              -> (ContinueAsNewWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe ContinueAsNewWorkflowExecution
-> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ContinueAsNewWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'ContinueAsNewWorkflowExecution Maybe ContinueAsNewWorkflowExecution
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "continueAsNewWorkflowExecution" ContinueAsNewWorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "continueAsNewWorkflowExecution"
-> (ContinueAsNewWorkflowExecution
    -> f ContinueAsNewWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "continueAsNewWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((ContinueAsNewWorkflowExecution
     -> f ContinueAsNewWorkflowExecution)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (ContinueAsNewWorkflowExecution
    -> f ContinueAsNewWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe ContinueAsNewWorkflowExecution
  -> f (Maybe ContinueAsNewWorkflowExecution))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((ContinueAsNewWorkflowExecution
     -> f ContinueAsNewWorkflowExecution)
    -> Maybe ContinueAsNewWorkflowExecution
    -> f (Maybe ContinueAsNewWorkflowExecution))
-> (ContinueAsNewWorkflowExecution
    -> f ContinueAsNewWorkflowExecution)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant
 -> Maybe ContinueAsNewWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe ContinueAsNewWorkflowExecution
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe ContinueAsNewWorkflowExecution)
     (Maybe ContinueAsNewWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'ContinueAsNewWorkflowExecution ContinueAsNewWorkflowExecution
x__val))
                        -> ContinueAsNewWorkflowExecution
-> Maybe ContinueAsNewWorkflowExecution
forall a. a -> Maybe a
Prelude.Just ContinueAsNewWorkflowExecution
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe ContinueAsNewWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe ContinueAsNewWorkflowExecution
y__
                 -> (ContinueAsNewWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe ContinueAsNewWorkflowExecution
-> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ContinueAsNewWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'ContinueAsNewWorkflowExecution Maybe ContinueAsNewWorkflowExecution
y__))
           (ContinueAsNewWorkflowExecution
-> Lens'
     (Maybe ContinueAsNewWorkflowExecution)
     ContinueAsNewWorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ContinueAsNewWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'cancelWorkflowExecution" (Prelude.Maybe CancelWorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'cancelWorkflowExecution"
-> (Maybe CancelWorkflowExecution
    -> f (Maybe CancelWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'cancelWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe CancelWorkflowExecution
     -> f (Maybe CancelWorkflowExecution))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe CancelWorkflowExecution
    -> f (Maybe CancelWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant -> Maybe CancelWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe CancelWorkflowExecution -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe CancelWorkflowExecution)
     (Maybe CancelWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'CancelWorkflowExecution CancelWorkflowExecution
x__val))
                     -> CancelWorkflowExecution -> Maybe CancelWorkflowExecution
forall a. a -> Maybe a
Prelude.Just CancelWorkflowExecution
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe CancelWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe CancelWorkflowExecution
y__
              -> (CancelWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe CancelWorkflowExecution -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CancelWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'CancelWorkflowExecution Maybe CancelWorkflowExecution
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "cancelWorkflowExecution" CancelWorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cancelWorkflowExecution"
-> (CancelWorkflowExecution -> f CancelWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "cancelWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((CancelWorkflowExecution -> f CancelWorkflowExecution)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (CancelWorkflowExecution -> f CancelWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe CancelWorkflowExecution
  -> f (Maybe CancelWorkflowExecution))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((CancelWorkflowExecution -> f CancelWorkflowExecution)
    -> Maybe CancelWorkflowExecution
    -> f (Maybe CancelWorkflowExecution))
-> (CancelWorkflowExecution -> f CancelWorkflowExecution)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant -> Maybe CancelWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe CancelWorkflowExecution -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe CancelWorkflowExecution)
     (Maybe CancelWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'CancelWorkflowExecution CancelWorkflowExecution
x__val))
                        -> CancelWorkflowExecution -> Maybe CancelWorkflowExecution
forall a. a -> Maybe a
Prelude.Just CancelWorkflowExecution
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe CancelWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe CancelWorkflowExecution
y__
                 -> (CancelWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe CancelWorkflowExecution -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CancelWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'CancelWorkflowExecution Maybe CancelWorkflowExecution
y__))
           (CancelWorkflowExecution
-> Lens' (Maybe CancelWorkflowExecution) CancelWorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CancelWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'setPatchMarker" (Prelude.Maybe SetPatchMarker) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'setPatchMarker"
-> (Maybe SetPatchMarker -> f (Maybe SetPatchMarker))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'setPatchMarker"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe SetPatchMarker -> f (Maybe SetPatchMarker))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe SetPatchMarker -> f (Maybe SetPatchMarker))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant -> Maybe SetPatchMarker)
-> (Maybe WorkflowCommand'Variant
    -> Maybe SetPatchMarker -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe SetPatchMarker)
     (Maybe SetPatchMarker)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'SetPatchMarker SetPatchMarker
x__val))
                     -> SetPatchMarker -> Maybe SetPatchMarker
forall a. a -> Maybe a
Prelude.Just SetPatchMarker
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe SetPatchMarker
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe SetPatchMarker
y__ -> (SetPatchMarker -> WorkflowCommand'Variant)
-> Maybe SetPatchMarker -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap SetPatchMarker -> WorkflowCommand'Variant
WorkflowCommand'SetPatchMarker Maybe SetPatchMarker
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "setPatchMarker" SetPatchMarker where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "setPatchMarker"
-> (SetPatchMarker -> f SetPatchMarker)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "setPatchMarker"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((SetPatchMarker -> f SetPatchMarker)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (SetPatchMarker -> f SetPatchMarker)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe SetPatchMarker -> f (Maybe SetPatchMarker))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((SetPatchMarker -> f SetPatchMarker)
    -> Maybe SetPatchMarker -> f (Maybe SetPatchMarker))
-> (SetPatchMarker -> f SetPatchMarker)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant -> Maybe SetPatchMarker)
-> (Maybe WorkflowCommand'Variant
    -> Maybe SetPatchMarker -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe SetPatchMarker)
     (Maybe SetPatchMarker)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'SetPatchMarker SetPatchMarker
x__val))
                        -> SetPatchMarker -> Maybe SetPatchMarker
forall a. a -> Maybe a
Prelude.Just SetPatchMarker
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe SetPatchMarker
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe SetPatchMarker
y__ -> (SetPatchMarker -> WorkflowCommand'Variant)
-> Maybe SetPatchMarker -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap SetPatchMarker -> WorkflowCommand'Variant
WorkflowCommand'SetPatchMarker Maybe SetPatchMarker
y__))
           (SetPatchMarker -> Lens' (Maybe SetPatchMarker) SetPatchMarker
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SetPatchMarker
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'startChildWorkflowExecution" (Prelude.Maybe StartChildWorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startChildWorkflowExecution"
-> (Maybe StartChildWorkflowExecution
    -> f (Maybe StartChildWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'startChildWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe StartChildWorkflowExecution
     -> f (Maybe StartChildWorkflowExecution))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe StartChildWorkflowExecution
    -> f (Maybe StartChildWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant
 -> Maybe StartChildWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe StartChildWorkflowExecution
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe StartChildWorkflowExecution)
     (Maybe StartChildWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'StartChildWorkflowExecution StartChildWorkflowExecution
x__val))
                     -> StartChildWorkflowExecution -> Maybe StartChildWorkflowExecution
forall a. a -> Maybe a
Prelude.Just StartChildWorkflowExecution
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe StartChildWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe StartChildWorkflowExecution
y__
              -> (StartChildWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe StartChildWorkflowExecution
-> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap StartChildWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'StartChildWorkflowExecution Maybe StartChildWorkflowExecution
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "startChildWorkflowExecution" StartChildWorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startChildWorkflowExecution"
-> (StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "startChildWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((StartChildWorkflowExecution -> f StartChildWorkflowExecution)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe StartChildWorkflowExecution
  -> f (Maybe StartChildWorkflowExecution))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((StartChildWorkflowExecution -> f StartChildWorkflowExecution)
    -> Maybe StartChildWorkflowExecution
    -> f (Maybe StartChildWorkflowExecution))
-> (StartChildWorkflowExecution -> f StartChildWorkflowExecution)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant
 -> Maybe StartChildWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe StartChildWorkflowExecution
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe StartChildWorkflowExecution)
     (Maybe StartChildWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'StartChildWorkflowExecution StartChildWorkflowExecution
x__val))
                        -> StartChildWorkflowExecution -> Maybe StartChildWorkflowExecution
forall a. a -> Maybe a
Prelude.Just StartChildWorkflowExecution
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe StartChildWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe StartChildWorkflowExecution
y__
                 -> (StartChildWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe StartChildWorkflowExecution
-> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap StartChildWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'StartChildWorkflowExecution Maybe StartChildWorkflowExecution
y__))
           (StartChildWorkflowExecution
-> Lens'
     (Maybe StartChildWorkflowExecution) StartChildWorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens StartChildWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'cancelChildWorkflowExecution" (Prelude.Maybe CancelChildWorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'cancelChildWorkflowExecution"
-> (Maybe CancelChildWorkflowExecution
    -> f (Maybe CancelChildWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'cancelChildWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe CancelChildWorkflowExecution
     -> f (Maybe CancelChildWorkflowExecution))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe CancelChildWorkflowExecution
    -> f (Maybe CancelChildWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant
 -> Maybe CancelChildWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe CancelChildWorkflowExecution
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe CancelChildWorkflowExecution)
     (Maybe CancelChildWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'CancelChildWorkflowExecution CancelChildWorkflowExecution
x__val))
                     -> CancelChildWorkflowExecution -> Maybe CancelChildWorkflowExecution
forall a. a -> Maybe a
Prelude.Just CancelChildWorkflowExecution
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe CancelChildWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe CancelChildWorkflowExecution
y__
              -> (CancelChildWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe CancelChildWorkflowExecution
-> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CancelChildWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'CancelChildWorkflowExecution Maybe CancelChildWorkflowExecution
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "cancelChildWorkflowExecution" CancelChildWorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cancelChildWorkflowExecution"
-> (CancelChildWorkflowExecution -> f CancelChildWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "cancelChildWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((CancelChildWorkflowExecution
     -> f CancelChildWorkflowExecution)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (CancelChildWorkflowExecution -> f CancelChildWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe CancelChildWorkflowExecution
  -> f (Maybe CancelChildWorkflowExecution))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((CancelChildWorkflowExecution
     -> f CancelChildWorkflowExecution)
    -> Maybe CancelChildWorkflowExecution
    -> f (Maybe CancelChildWorkflowExecution))
-> (CancelChildWorkflowExecution -> f CancelChildWorkflowExecution)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant
 -> Maybe CancelChildWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe CancelChildWorkflowExecution
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe CancelChildWorkflowExecution)
     (Maybe CancelChildWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'CancelChildWorkflowExecution CancelChildWorkflowExecution
x__val))
                        -> CancelChildWorkflowExecution -> Maybe CancelChildWorkflowExecution
forall a. a -> Maybe a
Prelude.Just CancelChildWorkflowExecution
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe CancelChildWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe CancelChildWorkflowExecution
y__
                 -> (CancelChildWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe CancelChildWorkflowExecution
-> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CancelChildWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'CancelChildWorkflowExecution Maybe CancelChildWorkflowExecution
y__))
           (CancelChildWorkflowExecution
-> Lens'
     (Maybe CancelChildWorkflowExecution) CancelChildWorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CancelChildWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'requestCancelExternalWorkflowExecution" (Prelude.Maybe RequestCancelExternalWorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'requestCancelExternalWorkflowExecution"
-> (Maybe RequestCancelExternalWorkflowExecution
    -> f (Maybe RequestCancelExternalWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'requestCancelExternalWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe RequestCancelExternalWorkflowExecution
     -> f (Maybe RequestCancelExternalWorkflowExecution))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe RequestCancelExternalWorkflowExecution
    -> f (Maybe RequestCancelExternalWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant
 -> Maybe RequestCancelExternalWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe RequestCancelExternalWorkflowExecution
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe RequestCancelExternalWorkflowExecution)
     (Maybe RequestCancelExternalWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'RequestCancelExternalWorkflowExecution RequestCancelExternalWorkflowExecution
x__val))
                     -> RequestCancelExternalWorkflowExecution
-> Maybe RequestCancelExternalWorkflowExecution
forall a. a -> Maybe a
Prelude.Just RequestCancelExternalWorkflowExecution
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe RequestCancelExternalWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe RequestCancelExternalWorkflowExecution
y__
              -> (RequestCancelExternalWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe RequestCancelExternalWorkflowExecution
-> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   RequestCancelExternalWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'RequestCancelExternalWorkflowExecution Maybe RequestCancelExternalWorkflowExecution
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "requestCancelExternalWorkflowExecution" RequestCancelExternalWorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestCancelExternalWorkflowExecution"
-> (RequestCancelExternalWorkflowExecution
    -> f RequestCancelExternalWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "requestCancelExternalWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((RequestCancelExternalWorkflowExecution
     -> f RequestCancelExternalWorkflowExecution)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (RequestCancelExternalWorkflowExecution
    -> f RequestCancelExternalWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe RequestCancelExternalWorkflowExecution
  -> f (Maybe RequestCancelExternalWorkflowExecution))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((RequestCancelExternalWorkflowExecution
     -> f RequestCancelExternalWorkflowExecution)
    -> Maybe RequestCancelExternalWorkflowExecution
    -> f (Maybe RequestCancelExternalWorkflowExecution))
-> (RequestCancelExternalWorkflowExecution
    -> f RequestCancelExternalWorkflowExecution)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant
 -> Maybe RequestCancelExternalWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe RequestCancelExternalWorkflowExecution
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe RequestCancelExternalWorkflowExecution)
     (Maybe RequestCancelExternalWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'RequestCancelExternalWorkflowExecution RequestCancelExternalWorkflowExecution
x__val))
                        -> RequestCancelExternalWorkflowExecution
-> Maybe RequestCancelExternalWorkflowExecution
forall a. a -> Maybe a
Prelude.Just RequestCancelExternalWorkflowExecution
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe RequestCancelExternalWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe RequestCancelExternalWorkflowExecution
y__
                 -> (RequestCancelExternalWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe RequestCancelExternalWorkflowExecution
-> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      RequestCancelExternalWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'RequestCancelExternalWorkflowExecution Maybe RequestCancelExternalWorkflowExecution
y__))
           (RequestCancelExternalWorkflowExecution
-> Lens'
     (Maybe RequestCancelExternalWorkflowExecution)
     RequestCancelExternalWorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens RequestCancelExternalWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'signalExternalWorkflowExecution" (Prelude.Maybe SignalExternalWorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'signalExternalWorkflowExecution"
-> (Maybe SignalExternalWorkflowExecution
    -> f (Maybe SignalExternalWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'signalExternalWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe SignalExternalWorkflowExecution
     -> f (Maybe SignalExternalWorkflowExecution))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe SignalExternalWorkflowExecution
    -> f (Maybe SignalExternalWorkflowExecution))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant
 -> Maybe SignalExternalWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe SignalExternalWorkflowExecution
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe SignalExternalWorkflowExecution)
     (Maybe SignalExternalWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'SignalExternalWorkflowExecution SignalExternalWorkflowExecution
x__val))
                     -> SignalExternalWorkflowExecution
-> Maybe SignalExternalWorkflowExecution
forall a. a -> Maybe a
Prelude.Just SignalExternalWorkflowExecution
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe SignalExternalWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe SignalExternalWorkflowExecution
y__
              -> (SignalExternalWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe SignalExternalWorkflowExecution
-> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   SignalExternalWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'SignalExternalWorkflowExecution Maybe SignalExternalWorkflowExecution
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "signalExternalWorkflowExecution" SignalExternalWorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "signalExternalWorkflowExecution"
-> (SignalExternalWorkflowExecution
    -> f SignalExternalWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "signalExternalWorkflowExecution"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((SignalExternalWorkflowExecution
     -> f SignalExternalWorkflowExecution)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (SignalExternalWorkflowExecution
    -> f SignalExternalWorkflowExecution)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe SignalExternalWorkflowExecution
  -> f (Maybe SignalExternalWorkflowExecution))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((SignalExternalWorkflowExecution
     -> f SignalExternalWorkflowExecution)
    -> Maybe SignalExternalWorkflowExecution
    -> f (Maybe SignalExternalWorkflowExecution))
-> (SignalExternalWorkflowExecution
    -> f SignalExternalWorkflowExecution)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant
 -> Maybe SignalExternalWorkflowExecution)
-> (Maybe WorkflowCommand'Variant
    -> Maybe SignalExternalWorkflowExecution
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe SignalExternalWorkflowExecution)
     (Maybe SignalExternalWorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'SignalExternalWorkflowExecution SignalExternalWorkflowExecution
x__val))
                        -> SignalExternalWorkflowExecution
-> Maybe SignalExternalWorkflowExecution
forall a. a -> Maybe a
Prelude.Just SignalExternalWorkflowExecution
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe SignalExternalWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe SignalExternalWorkflowExecution
y__
                 -> (SignalExternalWorkflowExecution -> WorkflowCommand'Variant)
-> Maybe SignalExternalWorkflowExecution
-> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      SignalExternalWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'SignalExternalWorkflowExecution Maybe SignalExternalWorkflowExecution
y__))
           (SignalExternalWorkflowExecution
-> Lens'
     (Maybe SignalExternalWorkflowExecution)
     SignalExternalWorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SignalExternalWorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'cancelSignalWorkflow" (Prelude.Maybe CancelSignalWorkflow) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'cancelSignalWorkflow"
-> (Maybe CancelSignalWorkflow -> f (Maybe CancelSignalWorkflow))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'cancelSignalWorkflow"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe CancelSignalWorkflow -> f (Maybe CancelSignalWorkflow))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe CancelSignalWorkflow -> f (Maybe CancelSignalWorkflow))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant -> Maybe CancelSignalWorkflow)
-> (Maybe WorkflowCommand'Variant
    -> Maybe CancelSignalWorkflow -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe CancelSignalWorkflow)
     (Maybe CancelSignalWorkflow)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'CancelSignalWorkflow CancelSignalWorkflow
x__val))
                     -> CancelSignalWorkflow -> Maybe CancelSignalWorkflow
forall a. a -> Maybe a
Prelude.Just CancelSignalWorkflow
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe CancelSignalWorkflow
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe CancelSignalWorkflow
y__ -> (CancelSignalWorkflow -> WorkflowCommand'Variant)
-> Maybe CancelSignalWorkflow -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CancelSignalWorkflow -> WorkflowCommand'Variant
WorkflowCommand'CancelSignalWorkflow Maybe CancelSignalWorkflow
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "cancelSignalWorkflow" CancelSignalWorkflow where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cancelSignalWorkflow"
-> (CancelSignalWorkflow -> f CancelSignalWorkflow)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "cancelSignalWorkflow"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((CancelSignalWorkflow -> f CancelSignalWorkflow)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (CancelSignalWorkflow -> f CancelSignalWorkflow)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe CancelSignalWorkflow -> f (Maybe CancelSignalWorkflow))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((CancelSignalWorkflow -> f CancelSignalWorkflow)
    -> Maybe CancelSignalWorkflow -> f (Maybe CancelSignalWorkflow))
-> (CancelSignalWorkflow -> f CancelSignalWorkflow)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant -> Maybe CancelSignalWorkflow)
-> (Maybe WorkflowCommand'Variant
    -> Maybe CancelSignalWorkflow -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe CancelSignalWorkflow)
     (Maybe CancelSignalWorkflow)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'CancelSignalWorkflow CancelSignalWorkflow
x__val))
                        -> CancelSignalWorkflow -> Maybe CancelSignalWorkflow
forall a. a -> Maybe a
Prelude.Just CancelSignalWorkflow
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe CancelSignalWorkflow
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe CancelSignalWorkflow
y__ -> (CancelSignalWorkflow -> WorkflowCommand'Variant)
-> Maybe CancelSignalWorkflow -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CancelSignalWorkflow -> WorkflowCommand'Variant
WorkflowCommand'CancelSignalWorkflow Maybe CancelSignalWorkflow
y__))
           (CancelSignalWorkflow
-> Lens' (Maybe CancelSignalWorkflow) CancelSignalWorkflow
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CancelSignalWorkflow
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'scheduleLocalActivity" (Prelude.Maybe ScheduleLocalActivity) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduleLocalActivity"
-> (Maybe ScheduleLocalActivity -> f (Maybe ScheduleLocalActivity))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'scheduleLocalActivity"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe ScheduleLocalActivity
     -> f (Maybe ScheduleLocalActivity))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe ScheduleLocalActivity -> f (Maybe ScheduleLocalActivity))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant -> Maybe ScheduleLocalActivity)
-> (Maybe WorkflowCommand'Variant
    -> Maybe ScheduleLocalActivity -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe ScheduleLocalActivity)
     (Maybe ScheduleLocalActivity)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'ScheduleLocalActivity ScheduleLocalActivity
x__val))
                     -> ScheduleLocalActivity -> Maybe ScheduleLocalActivity
forall a. a -> Maybe a
Prelude.Just ScheduleLocalActivity
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe ScheduleLocalActivity
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe ScheduleLocalActivity
y__
              -> (ScheduleLocalActivity -> WorkflowCommand'Variant)
-> Maybe ScheduleLocalActivity -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ScheduleLocalActivity -> WorkflowCommand'Variant
WorkflowCommand'ScheduleLocalActivity Maybe ScheduleLocalActivity
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "scheduleLocalActivity" ScheduleLocalActivity where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleLocalActivity"
-> (ScheduleLocalActivity -> f ScheduleLocalActivity)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "scheduleLocalActivity"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((ScheduleLocalActivity -> f ScheduleLocalActivity)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (ScheduleLocalActivity -> f ScheduleLocalActivity)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe ScheduleLocalActivity -> f (Maybe ScheduleLocalActivity))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((ScheduleLocalActivity -> f ScheduleLocalActivity)
    -> Maybe ScheduleLocalActivity -> f (Maybe ScheduleLocalActivity))
-> (ScheduleLocalActivity -> f ScheduleLocalActivity)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant -> Maybe ScheduleLocalActivity)
-> (Maybe WorkflowCommand'Variant
    -> Maybe ScheduleLocalActivity -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe ScheduleLocalActivity)
     (Maybe ScheduleLocalActivity)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'ScheduleLocalActivity ScheduleLocalActivity
x__val))
                        -> ScheduleLocalActivity -> Maybe ScheduleLocalActivity
forall a. a -> Maybe a
Prelude.Just ScheduleLocalActivity
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe ScheduleLocalActivity
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe ScheduleLocalActivity
y__
                 -> (ScheduleLocalActivity -> WorkflowCommand'Variant)
-> Maybe ScheduleLocalActivity -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ScheduleLocalActivity -> WorkflowCommand'Variant
WorkflowCommand'ScheduleLocalActivity Maybe ScheduleLocalActivity
y__))
           (ScheduleLocalActivity
-> Lens' (Maybe ScheduleLocalActivity) ScheduleLocalActivity
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ScheduleLocalActivity
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'requestCancelLocalActivity" (Prelude.Maybe RequestCancelLocalActivity) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'requestCancelLocalActivity"
-> (Maybe RequestCancelLocalActivity
    -> f (Maybe RequestCancelLocalActivity))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'requestCancelLocalActivity"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe RequestCancelLocalActivity
     -> f (Maybe RequestCancelLocalActivity))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe RequestCancelLocalActivity
    -> f (Maybe RequestCancelLocalActivity))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant -> Maybe RequestCancelLocalActivity)
-> (Maybe WorkflowCommand'Variant
    -> Maybe RequestCancelLocalActivity
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe RequestCancelLocalActivity)
     (Maybe RequestCancelLocalActivity)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'RequestCancelLocalActivity RequestCancelLocalActivity
x__val))
                     -> RequestCancelLocalActivity -> Maybe RequestCancelLocalActivity
forall a. a -> Maybe a
Prelude.Just RequestCancelLocalActivity
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe RequestCancelLocalActivity
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe RequestCancelLocalActivity
y__
              -> (RequestCancelLocalActivity -> WorkflowCommand'Variant)
-> Maybe RequestCancelLocalActivity
-> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap RequestCancelLocalActivity -> WorkflowCommand'Variant
WorkflowCommand'RequestCancelLocalActivity Maybe RequestCancelLocalActivity
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "requestCancelLocalActivity" RequestCancelLocalActivity where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestCancelLocalActivity"
-> (RequestCancelLocalActivity -> f RequestCancelLocalActivity)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "requestCancelLocalActivity"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((RequestCancelLocalActivity -> f RequestCancelLocalActivity)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (RequestCancelLocalActivity -> f RequestCancelLocalActivity)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe RequestCancelLocalActivity
  -> f (Maybe RequestCancelLocalActivity))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((RequestCancelLocalActivity -> f RequestCancelLocalActivity)
    -> Maybe RequestCancelLocalActivity
    -> f (Maybe RequestCancelLocalActivity))
-> (RequestCancelLocalActivity -> f RequestCancelLocalActivity)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant -> Maybe RequestCancelLocalActivity)
-> (Maybe WorkflowCommand'Variant
    -> Maybe RequestCancelLocalActivity
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe RequestCancelLocalActivity)
     (Maybe RequestCancelLocalActivity)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'RequestCancelLocalActivity RequestCancelLocalActivity
x__val))
                        -> RequestCancelLocalActivity -> Maybe RequestCancelLocalActivity
forall a. a -> Maybe a
Prelude.Just RequestCancelLocalActivity
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe RequestCancelLocalActivity
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe RequestCancelLocalActivity
y__
                 -> (RequestCancelLocalActivity -> WorkflowCommand'Variant)
-> Maybe RequestCancelLocalActivity
-> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap RequestCancelLocalActivity -> WorkflowCommand'Variant
WorkflowCommand'RequestCancelLocalActivity Maybe RequestCancelLocalActivity
y__))
           (RequestCancelLocalActivity
-> Lens'
     (Maybe RequestCancelLocalActivity) RequestCancelLocalActivity
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens RequestCancelLocalActivity
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'upsertWorkflowSearchAttributes" (Prelude.Maybe UpsertWorkflowSearchAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'upsertWorkflowSearchAttributes"
-> (Maybe UpsertWorkflowSearchAttributes
    -> f (Maybe UpsertWorkflowSearchAttributes))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'upsertWorkflowSearchAttributes"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe UpsertWorkflowSearchAttributes
     -> f (Maybe UpsertWorkflowSearchAttributes))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe UpsertWorkflowSearchAttributes
    -> f (Maybe UpsertWorkflowSearchAttributes))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant
 -> Maybe UpsertWorkflowSearchAttributes)
-> (Maybe WorkflowCommand'Variant
    -> Maybe UpsertWorkflowSearchAttributes
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe UpsertWorkflowSearchAttributes)
     (Maybe UpsertWorkflowSearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'UpsertWorkflowSearchAttributes UpsertWorkflowSearchAttributes
x__val))
                     -> UpsertWorkflowSearchAttributes
-> Maybe UpsertWorkflowSearchAttributes
forall a. a -> Maybe a
Prelude.Just UpsertWorkflowSearchAttributes
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe UpsertWorkflowSearchAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe UpsertWorkflowSearchAttributes
y__
              -> (UpsertWorkflowSearchAttributes -> WorkflowCommand'Variant)
-> Maybe UpsertWorkflowSearchAttributes
-> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   UpsertWorkflowSearchAttributes -> WorkflowCommand'Variant
WorkflowCommand'UpsertWorkflowSearchAttributes Maybe UpsertWorkflowSearchAttributes
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "upsertWorkflowSearchAttributes" UpsertWorkflowSearchAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "upsertWorkflowSearchAttributes"
-> (UpsertWorkflowSearchAttributes
    -> f UpsertWorkflowSearchAttributes)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "upsertWorkflowSearchAttributes"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((UpsertWorkflowSearchAttributes
     -> f UpsertWorkflowSearchAttributes)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (UpsertWorkflowSearchAttributes
    -> f UpsertWorkflowSearchAttributes)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe UpsertWorkflowSearchAttributes
  -> f (Maybe UpsertWorkflowSearchAttributes))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((UpsertWorkflowSearchAttributes
     -> f UpsertWorkflowSearchAttributes)
    -> Maybe UpsertWorkflowSearchAttributes
    -> f (Maybe UpsertWorkflowSearchAttributes))
-> (UpsertWorkflowSearchAttributes
    -> f UpsertWorkflowSearchAttributes)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant
 -> Maybe UpsertWorkflowSearchAttributes)
-> (Maybe WorkflowCommand'Variant
    -> Maybe UpsertWorkflowSearchAttributes
    -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe UpsertWorkflowSearchAttributes)
     (Maybe UpsertWorkflowSearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'UpsertWorkflowSearchAttributes UpsertWorkflowSearchAttributes
x__val))
                        -> UpsertWorkflowSearchAttributes
-> Maybe UpsertWorkflowSearchAttributes
forall a. a -> Maybe a
Prelude.Just UpsertWorkflowSearchAttributes
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe UpsertWorkflowSearchAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe UpsertWorkflowSearchAttributes
y__
                 -> (UpsertWorkflowSearchAttributes -> WorkflowCommand'Variant)
-> Maybe UpsertWorkflowSearchAttributes
-> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      UpsertWorkflowSearchAttributes -> WorkflowCommand'Variant
WorkflowCommand'UpsertWorkflowSearchAttributes Maybe UpsertWorkflowSearchAttributes
y__))
           (UpsertWorkflowSearchAttributes
-> Lens'
     (Maybe UpsertWorkflowSearchAttributes)
     UpsertWorkflowSearchAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpsertWorkflowSearchAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'modifyWorkflowProperties" (Prelude.Maybe ModifyWorkflowProperties) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'modifyWorkflowProperties"
-> (Maybe ModifyWorkflowProperties
    -> f (Maybe ModifyWorkflowProperties))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'modifyWorkflowProperties"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe ModifyWorkflowProperties
     -> f (Maybe ModifyWorkflowProperties))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe ModifyWorkflowProperties
    -> f (Maybe ModifyWorkflowProperties))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant -> Maybe ModifyWorkflowProperties)
-> (Maybe WorkflowCommand'Variant
    -> Maybe ModifyWorkflowProperties -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe ModifyWorkflowProperties)
     (Maybe ModifyWorkflowProperties)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'ModifyWorkflowProperties ModifyWorkflowProperties
x__val))
                     -> ModifyWorkflowProperties -> Maybe ModifyWorkflowProperties
forall a. a -> Maybe a
Prelude.Just ModifyWorkflowProperties
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe ModifyWorkflowProperties
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe ModifyWorkflowProperties
y__
              -> (ModifyWorkflowProperties -> WorkflowCommand'Variant)
-> Maybe ModifyWorkflowProperties -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ModifyWorkflowProperties -> WorkflowCommand'Variant
WorkflowCommand'ModifyWorkflowProperties Maybe ModifyWorkflowProperties
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "modifyWorkflowProperties" ModifyWorkflowProperties where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "modifyWorkflowProperties"
-> (ModifyWorkflowProperties -> f ModifyWorkflowProperties)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "modifyWorkflowProperties"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((ModifyWorkflowProperties -> f ModifyWorkflowProperties)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (ModifyWorkflowProperties -> f ModifyWorkflowProperties)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe ModifyWorkflowProperties
  -> f (Maybe ModifyWorkflowProperties))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((ModifyWorkflowProperties -> f ModifyWorkflowProperties)
    -> Maybe ModifyWorkflowProperties
    -> f (Maybe ModifyWorkflowProperties))
-> (ModifyWorkflowProperties -> f ModifyWorkflowProperties)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant -> Maybe ModifyWorkflowProperties)
-> (Maybe WorkflowCommand'Variant
    -> Maybe ModifyWorkflowProperties -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe ModifyWorkflowProperties)
     (Maybe ModifyWorkflowProperties)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'ModifyWorkflowProperties ModifyWorkflowProperties
x__val))
                        -> ModifyWorkflowProperties -> Maybe ModifyWorkflowProperties
forall a. a -> Maybe a
Prelude.Just ModifyWorkflowProperties
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe ModifyWorkflowProperties
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe ModifyWorkflowProperties
y__
                 -> (ModifyWorkflowProperties -> WorkflowCommand'Variant)
-> Maybe ModifyWorkflowProperties -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap ModifyWorkflowProperties -> WorkflowCommand'Variant
WorkflowCommand'ModifyWorkflowProperties Maybe ModifyWorkflowProperties
y__))
           (ModifyWorkflowProperties
-> Lens' (Maybe ModifyWorkflowProperties) ModifyWorkflowProperties
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ModifyWorkflowProperties
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField WorkflowCommand "maybe'updateResponse" (Prelude.Maybe UpdateResponse) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'updateResponse"
-> (Maybe UpdateResponse -> f (Maybe UpdateResponse))
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "maybe'updateResponse"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((Maybe UpdateResponse -> f (Maybe UpdateResponse))
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (Maybe UpdateResponse -> f (Maybe UpdateResponse))
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        ((Maybe WorkflowCommand'Variant -> Maybe UpdateResponse)
-> (Maybe WorkflowCommand'Variant
    -> Maybe UpdateResponse -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe UpdateResponse)
     (Maybe UpdateResponse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe WorkflowCommand'Variant
x__
              -> case Maybe WorkflowCommand'Variant
x__ of
                   (Prelude.Just (WorkflowCommand'UpdateResponse UpdateResponse
x__val))
                     -> UpdateResponse -> Maybe UpdateResponse
forall a. a -> Maybe a
Prelude.Just UpdateResponse
x__val
                   Maybe WorkflowCommand'Variant
_otherwise -> Maybe UpdateResponse
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe WorkflowCommand'Variant
_ Maybe UpdateResponse
y__ -> (UpdateResponse -> WorkflowCommand'Variant)
-> Maybe UpdateResponse -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap UpdateResponse -> WorkflowCommand'Variant
WorkflowCommand'UpdateResponse Maybe UpdateResponse
y__))
instance Data.ProtoLens.Field.HasField WorkflowCommand "updateResponse" UpdateResponse where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "updateResponse"
-> (UpdateResponse -> f UpdateResponse)
-> WorkflowCommand
-> f WorkflowCommand
fieldOf Proxy# "updateResponse"
_
    = ((Maybe WorkflowCommand'Variant
  -> f (Maybe WorkflowCommand'Variant))
 -> WorkflowCommand -> f WorkflowCommand)
-> ((UpdateResponse -> f UpdateResponse)
    -> Maybe WorkflowCommand'Variant
    -> f (Maybe WorkflowCommand'Variant))
-> (UpdateResponse -> f UpdateResponse)
-> WorkflowCommand
-> f WorkflowCommand
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowCommand -> Maybe WorkflowCommand'Variant)
-> (WorkflowCommand
    -> Maybe WorkflowCommand'Variant -> WorkflowCommand)
-> Lens
     WorkflowCommand
     WorkflowCommand
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant
           (\ WorkflowCommand
x__ Maybe WorkflowCommand'Variant
y__ -> WorkflowCommand
x__ {_WorkflowCommand'variant = y__}))
        (((Maybe UpdateResponse -> f (Maybe UpdateResponse))
 -> Maybe WorkflowCommand'Variant
 -> f (Maybe WorkflowCommand'Variant))
-> ((UpdateResponse -> f UpdateResponse)
    -> Maybe UpdateResponse -> f (Maybe UpdateResponse))
-> (UpdateResponse -> f UpdateResponse)
-> Maybe WorkflowCommand'Variant
-> f (Maybe WorkflowCommand'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe WorkflowCommand'Variant -> Maybe UpdateResponse)
-> (Maybe WorkflowCommand'Variant
    -> Maybe UpdateResponse -> Maybe WorkflowCommand'Variant)
-> Lens
     (Maybe WorkflowCommand'Variant)
     (Maybe WorkflowCommand'Variant)
     (Maybe UpdateResponse)
     (Maybe UpdateResponse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe WorkflowCommand'Variant
x__
                 -> case Maybe WorkflowCommand'Variant
x__ of
                      (Prelude.Just (WorkflowCommand'UpdateResponse UpdateResponse
x__val))
                        -> UpdateResponse -> Maybe UpdateResponse
forall a. a -> Maybe a
Prelude.Just UpdateResponse
x__val
                      Maybe WorkflowCommand'Variant
_otherwise -> Maybe UpdateResponse
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe WorkflowCommand'Variant
_ Maybe UpdateResponse
y__ -> (UpdateResponse -> WorkflowCommand'Variant)
-> Maybe UpdateResponse -> Maybe WorkflowCommand'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap UpdateResponse -> WorkflowCommand'Variant
WorkflowCommand'UpdateResponse Maybe UpdateResponse
y__))
           (UpdateResponse -> Lens' (Maybe UpdateResponse) UpdateResponse
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message WorkflowCommand where
  messageName :: Proxy WorkflowCommand -> Text
messageName Proxy WorkflowCommand
_
    = String -> Text
Data.Text.pack String
"coresdk.workflow_commands.WorkflowCommand"
  packedMessageDescriptor :: Proxy WorkflowCommand -> ByteString
packedMessageDescriptor Proxy WorkflowCommand
_
    = ByteString
"\n\
      \\SIWorkflowCommand\DC2H\n\
      \\vstart_timer\CAN\SOH \SOH(\v2%.coresdk.workflow_commands.StartTimerH\NULR\n\
      \startTimer\DC2Z\n\
      \\DC1schedule_activity\CAN\STX \SOH(\v2+.coresdk.workflow_commands.ScheduleActivityH\NULR\DLEscheduleActivity\DC2R\n\
      \\DLErespond_to_query\CAN\ETX \SOH(\v2&.coresdk.workflow_commands.QueryResultH\NULR\SOrespondToQuery\DC2j\n\
      \\ETBrequest_cancel_activity\CAN\EOT \SOH(\v20.coresdk.workflow_commands.RequestCancelActivityH\NULR\NAKrequestCancelActivity\DC2K\n\
      \\fcancel_timer\CAN\ENQ \SOH(\v2&.coresdk.workflow_commands.CancelTimerH\NULR\vcancelTimer\DC2v\n\
      \\ESCcomplete_workflow_execution\CAN\ACK \SOH(\v24.coresdk.workflow_commands.CompleteWorkflowExecutionH\NULR\EMcompleteWorkflowExecution\DC2j\n\
      \\ETBfail_workflow_execution\CAN\a \SOH(\v20.coresdk.workflow_commands.FailWorkflowExecutionH\NULR\NAKfailWorkflowExecution\DC2\135\SOH\n\
      \\"continue_as_new_workflow_execution\CAN\b \SOH(\v29.coresdk.workflow_commands.ContinueAsNewWorkflowExecutionH\NULR\RScontinueAsNewWorkflowExecution\DC2p\n\
      \\EMcancel_workflow_execution\CAN\t \SOH(\v22.coresdk.workflow_commands.CancelWorkflowExecutionH\NULR\ETBcancelWorkflowExecution\DC2U\n\
      \\DLEset_patch_marker\CAN\n\
      \ \SOH(\v2).coresdk.workflow_commands.SetPatchMarkerH\NULR\SOsetPatchMarker\DC2}\n\
      \\RSstart_child_workflow_execution\CAN\v \SOH(\v26.coresdk.workflow_commands.StartChildWorkflowExecutionH\NULR\ESCstartChildWorkflowExecution\DC2\128\SOH\n\
      \\UScancel_child_workflow_execution\CAN\f \SOH(\v27.coresdk.workflow_commands.CancelChildWorkflowExecutionH\NULR\FScancelChildWorkflowExecution\DC2\159\SOH\n\
      \*request_cancel_external_workflow_execution\CAN\r \SOH(\v2A.coresdk.workflow_commands.RequestCancelExternalWorkflowExecutionH\NULR&requestCancelExternalWorkflowExecution\DC2\137\SOH\n\
      \\"signal_external_workflow_execution\CAN\SO \SOH(\v2:.coresdk.workflow_commands.SignalExternalWorkflowExecutionH\NULR\USsignalExternalWorkflowExecution\DC2g\n\
      \\SYNcancel_signal_workflow\CAN\SI \SOH(\v2/.coresdk.workflow_commands.CancelSignalWorkflowH\NULR\DC4cancelSignalWorkflow\DC2j\n\
      \\ETBschedule_local_activity\CAN\DLE \SOH(\v20.coresdk.workflow_commands.ScheduleLocalActivityH\NULR\NAKscheduleLocalActivity\DC2z\n\
      \\GSrequest_cancel_local_activity\CAN\DC1 \SOH(\v25.coresdk.workflow_commands.RequestCancelLocalActivityH\NULR\SUBrequestCancelLocalActivity\DC2\134\SOH\n\
      \!upsert_workflow_search_attributes\CAN\DC2 \SOH(\v29.coresdk.workflow_commands.UpsertWorkflowSearchAttributesH\NULR\RSupsertWorkflowSearchAttributes\DC2s\n\
      \\SUBmodify_workflow_properties\CAN\DC3 \SOH(\v23.coresdk.workflow_commands.ModifyWorkflowPropertiesH\NULR\CANmodifyWorkflowProperties\DC2T\n\
      \\SIupdate_response\CAN\DC4 \SOH(\v2).coresdk.workflow_commands.UpdateResponseH\NULR\SOupdateResponseB\t\n\
      \\avariant"
  packedFileDescriptor :: Proxy WorkflowCommand -> ByteString
packedFileDescriptor Proxy WorkflowCommand
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor WorkflowCommand)
fieldsByTag
    = let
        startTimer__field_descriptor :: FieldDescriptor WorkflowCommand
startTimer__field_descriptor
          = String
-> FieldTypeDescriptor StartTimer
-> FieldAccessor WorkflowCommand StartTimer
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_timer"
              (MessageOrGroup -> FieldTypeDescriptor StartTimer
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor StartTimer)
              (Lens' WorkflowCommand (Maybe StartTimer)
-> FieldAccessor WorkflowCommand StartTimer
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startTimer")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        scheduleActivity__field_descriptor :: FieldDescriptor WorkflowCommand
scheduleActivity__field_descriptor
          = String
-> FieldTypeDescriptor ScheduleActivity
-> FieldAccessor WorkflowCommand ScheduleActivity
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule_activity"
              (MessageOrGroup -> FieldTypeDescriptor ScheduleActivity
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ScheduleActivity)
              (Lens' WorkflowCommand (Maybe ScheduleActivity)
-> FieldAccessor WorkflowCommand ScheduleActivity
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduleActivity")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        respondToQuery__field_descriptor :: FieldDescriptor WorkflowCommand
respondToQuery__field_descriptor
          = String
-> FieldTypeDescriptor QueryResult
-> FieldAccessor WorkflowCommand QueryResult
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"respond_to_query"
              (MessageOrGroup -> FieldTypeDescriptor QueryResult
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor QueryResult)
              (Lens' WorkflowCommand (Maybe QueryResult)
-> FieldAccessor WorkflowCommand QueryResult
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'respondToQuery")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        requestCancelActivity__field_descriptor :: FieldDescriptor WorkflowCommand
requestCancelActivity__field_descriptor
          = String
-> FieldTypeDescriptor RequestCancelActivity
-> FieldAccessor WorkflowCommand RequestCancelActivity
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_cancel_activity"
              (MessageOrGroup -> FieldTypeDescriptor RequestCancelActivity
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor RequestCancelActivity)
              (Lens' WorkflowCommand (Maybe RequestCancelActivity)
-> FieldAccessor WorkflowCommand RequestCancelActivity
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'requestCancelActivity")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        cancelTimer__field_descriptor :: FieldDescriptor WorkflowCommand
cancelTimer__field_descriptor
          = String
-> FieldTypeDescriptor CancelTimer
-> FieldAccessor WorkflowCommand CancelTimer
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cancel_timer"
              (MessageOrGroup -> FieldTypeDescriptor CancelTimer
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor CancelTimer)
              (Lens' WorkflowCommand (Maybe CancelTimer)
-> FieldAccessor WorkflowCommand CancelTimer
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'cancelTimer")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        completeWorkflowExecution__field_descriptor :: FieldDescriptor WorkflowCommand
completeWorkflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor CompleteWorkflowExecution
-> FieldAccessor WorkflowCommand CompleteWorkflowExecution
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"complete_workflow_execution"
              (MessageOrGroup -> FieldTypeDescriptor CompleteWorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor CompleteWorkflowExecution)
              (Lens' WorkflowCommand (Maybe CompleteWorkflowExecution)
-> FieldAccessor WorkflowCommand CompleteWorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'completeWorkflowExecution")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        failWorkflowExecution__field_descriptor :: FieldDescriptor WorkflowCommand
failWorkflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor FailWorkflowExecution
-> FieldAccessor WorkflowCommand FailWorkflowExecution
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"fail_workflow_execution"
              (MessageOrGroup -> FieldTypeDescriptor FailWorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor FailWorkflowExecution)
              (Lens' WorkflowCommand (Maybe FailWorkflowExecution)
-> FieldAccessor WorkflowCommand FailWorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'failWorkflowExecution")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        continueAsNewWorkflowExecution__field_descriptor :: FieldDescriptor WorkflowCommand
continueAsNewWorkflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor ContinueAsNewWorkflowExecution
-> FieldAccessor WorkflowCommand ContinueAsNewWorkflowExecution
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"continue_as_new_workflow_execution"
              (MessageOrGroup
-> FieldTypeDescriptor ContinueAsNewWorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ContinueAsNewWorkflowExecution)
              (Lens' WorkflowCommand (Maybe ContinueAsNewWorkflowExecution)
-> FieldAccessor WorkflowCommand ContinueAsNewWorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                    @"maybe'continueAsNewWorkflowExecution")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        cancelWorkflowExecution__field_descriptor :: FieldDescriptor WorkflowCommand
cancelWorkflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor CancelWorkflowExecution
-> FieldAccessor WorkflowCommand CancelWorkflowExecution
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cancel_workflow_execution"
              (MessageOrGroup -> FieldTypeDescriptor CancelWorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor CancelWorkflowExecution)
              (Lens' WorkflowCommand (Maybe CancelWorkflowExecution)
-> FieldAccessor WorkflowCommand CancelWorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'cancelWorkflowExecution")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        setPatchMarker__field_descriptor :: FieldDescriptor WorkflowCommand
setPatchMarker__field_descriptor
          = String
-> FieldTypeDescriptor SetPatchMarker
-> FieldAccessor WorkflowCommand SetPatchMarker
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"set_patch_marker"
              (MessageOrGroup -> FieldTypeDescriptor SetPatchMarker
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor SetPatchMarker)
              (Lens' WorkflowCommand (Maybe SetPatchMarker)
-> FieldAccessor WorkflowCommand SetPatchMarker
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'setPatchMarker")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        startChildWorkflowExecution__field_descriptor :: FieldDescriptor WorkflowCommand
startChildWorkflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor StartChildWorkflowExecution
-> FieldAccessor WorkflowCommand StartChildWorkflowExecution
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_child_workflow_execution"
              (MessageOrGroup -> FieldTypeDescriptor StartChildWorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor StartChildWorkflowExecution)
              (Lens' WorkflowCommand (Maybe StartChildWorkflowExecution)
-> FieldAccessor WorkflowCommand StartChildWorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                    @"maybe'startChildWorkflowExecution")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        cancelChildWorkflowExecution__field_descriptor :: FieldDescriptor WorkflowCommand
cancelChildWorkflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor CancelChildWorkflowExecution
-> FieldAccessor WorkflowCommand CancelChildWorkflowExecution
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cancel_child_workflow_execution"
              (MessageOrGroup -> FieldTypeDescriptor CancelChildWorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor CancelChildWorkflowExecution)
              (Lens' WorkflowCommand (Maybe CancelChildWorkflowExecution)
-> FieldAccessor WorkflowCommand CancelChildWorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                    @"maybe'cancelChildWorkflowExecution")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        requestCancelExternalWorkflowExecution__field_descriptor :: FieldDescriptor WorkflowCommand
requestCancelExternalWorkflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor RequestCancelExternalWorkflowExecution
-> FieldAccessor
     WorkflowCommand RequestCancelExternalWorkflowExecution
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_cancel_external_workflow_execution"
              (MessageOrGroup
-> FieldTypeDescriptor RequestCancelExternalWorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor RequestCancelExternalWorkflowExecution)
              (Lens'
  WorkflowCommand (Maybe RequestCancelExternalWorkflowExecution)
-> FieldAccessor
     WorkflowCommand RequestCancelExternalWorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                    @"maybe'requestCancelExternalWorkflowExecution")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        signalExternalWorkflowExecution__field_descriptor :: FieldDescriptor WorkflowCommand
signalExternalWorkflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor SignalExternalWorkflowExecution
-> FieldAccessor WorkflowCommand SignalExternalWorkflowExecution
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"signal_external_workflow_execution"
              (MessageOrGroup
-> FieldTypeDescriptor SignalExternalWorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor SignalExternalWorkflowExecution)
              (Lens' WorkflowCommand (Maybe SignalExternalWorkflowExecution)
-> FieldAccessor WorkflowCommand SignalExternalWorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                    @"maybe'signalExternalWorkflowExecution")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        cancelSignalWorkflow__field_descriptor :: FieldDescriptor WorkflowCommand
cancelSignalWorkflow__field_descriptor
          = String
-> FieldTypeDescriptor CancelSignalWorkflow
-> FieldAccessor WorkflowCommand CancelSignalWorkflow
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cancel_signal_workflow"
              (MessageOrGroup -> FieldTypeDescriptor CancelSignalWorkflow
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor CancelSignalWorkflow)
              (Lens' WorkflowCommand (Maybe CancelSignalWorkflow)
-> FieldAccessor WorkflowCommand CancelSignalWorkflow
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'cancelSignalWorkflow")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        scheduleLocalActivity__field_descriptor :: FieldDescriptor WorkflowCommand
scheduleLocalActivity__field_descriptor
          = String
-> FieldTypeDescriptor ScheduleLocalActivity
-> FieldAccessor WorkflowCommand ScheduleLocalActivity
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule_local_activity"
              (MessageOrGroup -> FieldTypeDescriptor ScheduleLocalActivity
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ScheduleLocalActivity)
              (Lens' WorkflowCommand (Maybe ScheduleLocalActivity)
-> FieldAccessor WorkflowCommand ScheduleLocalActivity
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduleLocalActivity")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        requestCancelLocalActivity__field_descriptor :: FieldDescriptor WorkflowCommand
requestCancelLocalActivity__field_descriptor
          = String
-> FieldTypeDescriptor RequestCancelLocalActivity
-> FieldAccessor WorkflowCommand RequestCancelLocalActivity
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_cancel_local_activity"
              (MessageOrGroup -> FieldTypeDescriptor RequestCancelLocalActivity
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor RequestCancelLocalActivity)
              (Lens' WorkflowCommand (Maybe RequestCancelLocalActivity)
-> FieldAccessor WorkflowCommand RequestCancelLocalActivity
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                    @"maybe'requestCancelLocalActivity")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        upsertWorkflowSearchAttributes__field_descriptor :: FieldDescriptor WorkflowCommand
upsertWorkflowSearchAttributes__field_descriptor
          = String
-> FieldTypeDescriptor UpsertWorkflowSearchAttributes
-> FieldAccessor WorkflowCommand UpsertWorkflowSearchAttributes
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"upsert_workflow_search_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor UpsertWorkflowSearchAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpsertWorkflowSearchAttributes)
              (Lens' WorkflowCommand (Maybe UpsertWorkflowSearchAttributes)
-> FieldAccessor WorkflowCommand UpsertWorkflowSearchAttributes
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                    @"maybe'upsertWorkflowSearchAttributes")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        modifyWorkflowProperties__field_descriptor :: FieldDescriptor WorkflowCommand
modifyWorkflowProperties__field_descriptor
          = String
-> FieldTypeDescriptor ModifyWorkflowProperties
-> FieldAccessor WorkflowCommand ModifyWorkflowProperties
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"modify_workflow_properties"
              (MessageOrGroup -> FieldTypeDescriptor ModifyWorkflowProperties
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ModifyWorkflowProperties)
              (Lens' WorkflowCommand (Maybe ModifyWorkflowProperties)
-> FieldAccessor WorkflowCommand ModifyWorkflowProperties
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'modifyWorkflowProperties")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
        updateResponse__field_descriptor :: FieldDescriptor WorkflowCommand
updateResponse__field_descriptor
          = String
-> FieldTypeDescriptor UpdateResponse
-> FieldAccessor WorkflowCommand UpdateResponse
-> FieldDescriptor WorkflowCommand
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"update_response"
              (MessageOrGroup -> FieldTypeDescriptor UpdateResponse
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpdateResponse)
              (Lens' WorkflowCommand (Maybe UpdateResponse)
-> FieldAccessor WorkflowCommand UpdateResponse
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'updateResponse")) ::
              Data.ProtoLens.FieldDescriptor WorkflowCommand
      in
        [(Tag, FieldDescriptor WorkflowCommand)]
-> Map Tag (FieldDescriptor WorkflowCommand)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowCommand
startTimer__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowCommand
scheduleActivity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowCommand
respondToQuery__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor WorkflowCommand
requestCancelActivity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor WorkflowCommand
cancelTimer__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, 
            FieldDescriptor WorkflowCommand
completeWorkflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor WorkflowCommand
failWorkflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, 
            FieldDescriptor WorkflowCommand
continueAsNewWorkflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor WorkflowCommand
cancelWorkflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor WorkflowCommand
setPatchMarker__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, 
            FieldDescriptor WorkflowCommand
startChildWorkflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, 
            FieldDescriptor WorkflowCommand
cancelChildWorkflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, 
            FieldDescriptor WorkflowCommand
requestCancelExternalWorkflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
14, 
            FieldDescriptor WorkflowCommand
signalExternalWorkflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
15, FieldDescriptor WorkflowCommand
cancelSignalWorkflow__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
16, FieldDescriptor WorkflowCommand
scheduleLocalActivity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
17, 
            FieldDescriptor WorkflowCommand
requestCancelLocalActivity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
18, 
            FieldDescriptor WorkflowCommand
upsertWorkflowSearchAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
19, 
            FieldDescriptor WorkflowCommand
modifyWorkflowProperties__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
20, FieldDescriptor WorkflowCommand
updateResponse__field_descriptor)]
  unknownFields :: Lens' WorkflowCommand FieldSet
unknownFields
    = (WorkflowCommand -> FieldSet)
-> (WorkflowCommand -> FieldSet -> WorkflowCommand)
-> Lens' WorkflowCommand FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowCommand -> FieldSet
_WorkflowCommand'_unknownFields
        (\ WorkflowCommand
x__ FieldSet
y__ -> WorkflowCommand
x__ {_WorkflowCommand'_unknownFields = y__})
  defMessage :: WorkflowCommand
defMessage
    = WorkflowCommand'_constructor
        {_WorkflowCommand'variant :: Maybe WorkflowCommand'Variant
_WorkflowCommand'variant = Maybe WorkflowCommand'Variant
forall a. Maybe a
Prelude.Nothing,
         _WorkflowCommand'_unknownFields :: FieldSet
_WorkflowCommand'_unknownFields = []}
  parseMessage :: Parser WorkflowCommand
parseMessage
    = let
        loop ::
          WorkflowCommand
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowCommand
        loop :: WorkflowCommand -> Parser WorkflowCommand
loop WorkflowCommand
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 StartTimer -> String -> Parser StartTimer
forall a. Parser a -> String -> Parser a
(Data.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_timer"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"startTimer") y x)
                        Word64
18
                          -> do y <- Parser ScheduleActivity -> String -> Parser ScheduleActivity
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"schedule_activity"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduleActivity") y x)
                        Word64
26
                          -> do y <- Parser QueryResult -> String -> Parser QueryResult
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"respond_to_query"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"respondToQuery") y x)
                        Word64
34
                          -> do y <- Parser RequestCancelActivity
-> String -> Parser RequestCancelActivity
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"request_cancel_activity"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"requestCancelActivity") y x)
                        Word64
42
                          -> do y <- Parser CancelTimer -> String -> Parser CancelTimer
forall a. Parser a -> String -> Parser a
(Data.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_timer"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"cancelTimer") y x)
                        Word64
50
                          -> do y <- Parser CompleteWorkflowExecution
-> String -> Parser CompleteWorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"complete_workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"completeWorkflowExecution") y x)
                        Word64
58
                          -> do y <- Parser FailWorkflowExecution
-> String -> Parser FailWorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"fail_workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"failWorkflowExecution") y x)
                        Word64
66
                          -> do y <- Parser ContinueAsNewWorkflowExecution
-> String -> Parser ContinueAsNewWorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"continue_as_new_workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"continueAsNewWorkflowExecution")
                                     y x)
                        Word64
74
                          -> do y <- Parser CancelWorkflowExecution
-> String -> Parser CancelWorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.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_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cancelWorkflowExecution") y x)
                        Word64
82
                          -> do y <- Parser SetPatchMarker -> String -> Parser SetPatchMarker
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"set_patch_marker"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"setPatchMarker") y x)
                        Word64
90
                          -> do y <- Parser StartChildWorkflowExecution
-> String -> Parser StartChildWorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"start_child_workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startChildWorkflowExecution") y
                                     x)
                        Word64
98
                          -> do y <- Parser CancelChildWorkflowExecution
-> String -> Parser CancelChildWorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.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_child_workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cancelChildWorkflowExecution") y
                                     x)
                        Word64
106
                          -> do y <- Parser RequestCancelExternalWorkflowExecution
-> String -> Parser RequestCancelExternalWorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"request_cancel_external_workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"requestCancelExternalWorkflowExecution")
                                     y x)
                        Word64
114
                          -> do y <- Parser SignalExternalWorkflowExecution
-> String -> Parser SignalExternalWorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"signal_external_workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"signalExternalWorkflowExecution")
                                     y x)
                        Word64
122
                          -> do y <- Parser CancelSignalWorkflow
-> String -> Parser CancelSignalWorkflow
forall a. Parser a -> String -> Parser a
(Data.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_signal_workflow"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cancelSignalWorkflow") y x)
                        Word64
130
                          -> do y <- Parser ScheduleLocalActivity
-> String -> Parser ScheduleLocalActivity
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"schedule_local_activity"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduleLocalActivity") y x)
                        Word64
138
                          -> do y <- Parser RequestCancelLocalActivity
-> String -> Parser RequestCancelLocalActivity
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"request_cancel_local_activity"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"requestCancelLocalActivity") y x)
                        Word64
146
                          -> do y <- Parser UpsertWorkflowSearchAttributes
-> String -> Parser UpsertWorkflowSearchAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"upsert_workflow_search_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"upsertWorkflowSearchAttributes")
                                     y x)
                        Word64
154
                          -> do y <- Parser ModifyWorkflowProperties
-> String -> Parser ModifyWorkflowProperties
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"modify_workflow_properties"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"modifyWorkflowProperties") y x)
                        Word64
162
                          -> do y <- Parser UpdateResponse -> String -> Parser UpdateResponse
forall a. Parser a -> String -> Parser a
(Data.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_response"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"updateResponse") 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 WorkflowCommand -> String -> Parser WorkflowCommand
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowCommand -> Parser WorkflowCommand
loop WorkflowCommand
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"WorkflowCommand"
  buildMessage :: WorkflowCommand -> Builder
buildMessage
    = \ WorkflowCommand
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe WorkflowCommand'Variant)
  WorkflowCommand
  WorkflowCommand
  (Maybe WorkflowCommand'Variant)
  (Maybe WorkflowCommand'Variant)
-> WorkflowCommand -> Maybe WorkflowCommand'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") WorkflowCommand
_x
              of
                Maybe WorkflowCommand'Variant
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just (WorkflowCommand'StartTimer StartTimer
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (StartTimer -> ByteString) -> StartTimer -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          StartTimer -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage StartTimer
v)
                (Prelude.Just (WorkflowCommand'ScheduleActivity ScheduleActivity
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                       ((ByteString -> Builder)
-> (ScheduleActivity -> ByteString) -> ScheduleActivity -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          ScheduleActivity -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ScheduleActivity
v)
                (Prelude.Just (WorkflowCommand'RespondToQuery QueryResult
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                       ((ByteString -> Builder)
-> (QueryResult -> ByteString) -> QueryResult -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          QueryResult -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage QueryResult
v)
                (Prelude.Just (WorkflowCommand'RequestCancelActivity RequestCancelActivity
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                       ((ByteString -> Builder)
-> (RequestCancelActivity -> ByteString)
-> RequestCancelActivity
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          RequestCancelActivity -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage RequestCancelActivity
v)
                (Prelude.Just (WorkflowCommand'CancelTimer CancelTimer
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                       ((ByteString -> Builder)
-> (CancelTimer -> ByteString) -> CancelTimer -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          CancelTimer -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage CancelTimer
v)
                (Prelude.Just (WorkflowCommand'CompleteWorkflowExecution CompleteWorkflowExecution
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                       ((ByteString -> Builder)
-> (CompleteWorkflowExecution -> ByteString)
-> CompleteWorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          CompleteWorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage CompleteWorkflowExecution
v)
                (Prelude.Just (WorkflowCommand'FailWorkflowExecution FailWorkflowExecution
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                       ((ByteString -> Builder)
-> (FailWorkflowExecution -> ByteString)
-> FailWorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          FailWorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage FailWorkflowExecution
v)
                (Prelude.Just (WorkflowCommand'ContinueAsNewWorkflowExecution ContinueAsNewWorkflowExecution
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                       ((ByteString -> Builder)
-> (ContinueAsNewWorkflowExecution -> ByteString)
-> ContinueAsNewWorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          ContinueAsNewWorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ContinueAsNewWorkflowExecution
v)
                (Prelude.Just (WorkflowCommand'CancelWorkflowExecution CancelWorkflowExecution
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
                       ((ByteString -> Builder)
-> (CancelWorkflowExecution -> ByteString)
-> CancelWorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          CancelWorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage CancelWorkflowExecution
v)
                (Prelude.Just (WorkflowCommand'SetPatchMarker SetPatchMarker
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
                       ((ByteString -> Builder)
-> (SetPatchMarker -> ByteString) -> SetPatchMarker -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          SetPatchMarker -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage SetPatchMarker
v)
                (Prelude.Just (WorkflowCommand'StartChildWorkflowExecution StartChildWorkflowExecution
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
90)
                       ((ByteString -> Builder)
-> (StartChildWorkflowExecution -> ByteString)
-> StartChildWorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          StartChildWorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage StartChildWorkflowExecution
v)
                (Prelude.Just (WorkflowCommand'CancelChildWorkflowExecution CancelChildWorkflowExecution
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
98)
                       ((ByteString -> Builder)
-> (CancelChildWorkflowExecution -> ByteString)
-> CancelChildWorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          CancelChildWorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage CancelChildWorkflowExecution
v)
                (Prelude.Just (WorkflowCommand'RequestCancelExternalWorkflowExecution RequestCancelExternalWorkflowExecution
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
106)
                       ((ByteString -> Builder)
-> (RequestCancelExternalWorkflowExecution -> ByteString)
-> RequestCancelExternalWorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          RequestCancelExternalWorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage RequestCancelExternalWorkflowExecution
v)
                (Prelude.Just (WorkflowCommand'SignalExternalWorkflowExecution SignalExternalWorkflowExecution
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
114)
                       ((ByteString -> Builder)
-> (SignalExternalWorkflowExecution -> ByteString)
-> SignalExternalWorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          SignalExternalWorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage SignalExternalWorkflowExecution
v)
                (Prelude.Just (WorkflowCommand'CancelSignalWorkflow CancelSignalWorkflow
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
122)
                       ((ByteString -> Builder)
-> (CancelSignalWorkflow -> ByteString)
-> CancelSignalWorkflow
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          CancelSignalWorkflow -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage CancelSignalWorkflow
v)
                (Prelude.Just (WorkflowCommand'ScheduleLocalActivity ScheduleLocalActivity
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
130)
                       ((ByteString -> Builder)
-> (ScheduleLocalActivity -> ByteString)
-> ScheduleLocalActivity
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          ScheduleLocalActivity -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ScheduleLocalActivity
v)
                (Prelude.Just (WorkflowCommand'RequestCancelLocalActivity RequestCancelLocalActivity
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
138)
                       ((ByteString -> Builder)
-> (RequestCancelLocalActivity -> ByteString)
-> RequestCancelLocalActivity
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          RequestCancelLocalActivity -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage RequestCancelLocalActivity
v)
                (Prelude.Just (WorkflowCommand'UpsertWorkflowSearchAttributes UpsertWorkflowSearchAttributes
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
146)
                       ((ByteString -> Builder)
-> (UpsertWorkflowSearchAttributes -> ByteString)
-> UpsertWorkflowSearchAttributes
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          UpsertWorkflowSearchAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpsertWorkflowSearchAttributes
v)
                (Prelude.Just (WorkflowCommand'ModifyWorkflowProperties ModifyWorkflowProperties
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
154)
                       ((ByteString -> Builder)
-> (ModifyWorkflowProperties -> ByteString)
-> ModifyWorkflowProperties
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          ModifyWorkflowProperties -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ModifyWorkflowProperties
v)
                (Prelude.Just (WorkflowCommand'UpdateResponse UpdateResponse
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
162)
                       ((ByteString -> Builder)
-> (UpdateResponse -> ByteString) -> UpdateResponse -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          UpdateResponse -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateResponse
v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike FieldSet WorkflowCommand WorkflowCommand FieldSet FieldSet
-> WorkflowCommand -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet WorkflowCommand WorkflowCommand FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowCommand FieldSet
Data.ProtoLens.unknownFields WorkflowCommand
_x))
instance Control.DeepSeq.NFData WorkflowCommand where
  rnf :: WorkflowCommand -> ()
rnf
    = \ WorkflowCommand
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowCommand -> FieldSet
_WorkflowCommand'_unknownFields WorkflowCommand
x__)
             (Maybe WorkflowCommand'Variant -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (WorkflowCommand -> Maybe WorkflowCommand'Variant
_WorkflowCommand'variant WorkflowCommand
x__) ())
instance Control.DeepSeq.NFData WorkflowCommand'Variant where
  rnf :: WorkflowCommand'Variant -> ()
rnf (WorkflowCommand'StartTimer StartTimer
x__) = StartTimer -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf StartTimer
x__
  rnf (WorkflowCommand'ScheduleActivity ScheduleActivity
x__)
    = ScheduleActivity -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ScheduleActivity
x__
  rnf (WorkflowCommand'RespondToQuery QueryResult
x__) = QueryResult -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf QueryResult
x__
  rnf (WorkflowCommand'RequestCancelActivity RequestCancelActivity
x__)
    = RequestCancelActivity -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf RequestCancelActivity
x__
  rnf (WorkflowCommand'CancelTimer CancelTimer
x__) = CancelTimer -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf CancelTimer
x__
  rnf (WorkflowCommand'CompleteWorkflowExecution CompleteWorkflowExecution
x__)
    = CompleteWorkflowExecution -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf CompleteWorkflowExecution
x__
  rnf (WorkflowCommand'FailWorkflowExecution FailWorkflowExecution
x__)
    = FailWorkflowExecution -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf FailWorkflowExecution
x__
  rnf (WorkflowCommand'ContinueAsNewWorkflowExecution ContinueAsNewWorkflowExecution
x__)
    = ContinueAsNewWorkflowExecution -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ContinueAsNewWorkflowExecution
x__
  rnf (WorkflowCommand'CancelWorkflowExecution CancelWorkflowExecution
x__)
    = CancelWorkflowExecution -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf CancelWorkflowExecution
x__
  rnf (WorkflowCommand'SetPatchMarker SetPatchMarker
x__) = SetPatchMarker -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf SetPatchMarker
x__
  rnf (WorkflowCommand'StartChildWorkflowExecution StartChildWorkflowExecution
x__)
    = StartChildWorkflowExecution -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf StartChildWorkflowExecution
x__
  rnf (WorkflowCommand'CancelChildWorkflowExecution CancelChildWorkflowExecution
x__)
    = CancelChildWorkflowExecution -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf CancelChildWorkflowExecution
x__
  rnf (WorkflowCommand'RequestCancelExternalWorkflowExecution RequestCancelExternalWorkflowExecution
x__)
    = RequestCancelExternalWorkflowExecution -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf RequestCancelExternalWorkflowExecution
x__
  rnf (WorkflowCommand'SignalExternalWorkflowExecution SignalExternalWorkflowExecution
x__)
    = SignalExternalWorkflowExecution -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf SignalExternalWorkflowExecution
x__
  rnf (WorkflowCommand'CancelSignalWorkflow CancelSignalWorkflow
x__)
    = CancelSignalWorkflow -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf CancelSignalWorkflow
x__
  rnf (WorkflowCommand'ScheduleLocalActivity ScheduleLocalActivity
x__)
    = ScheduleLocalActivity -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ScheduleLocalActivity
x__
  rnf (WorkflowCommand'RequestCancelLocalActivity RequestCancelLocalActivity
x__)
    = RequestCancelLocalActivity -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf RequestCancelLocalActivity
x__
  rnf (WorkflowCommand'UpsertWorkflowSearchAttributes UpsertWorkflowSearchAttributes
x__)
    = UpsertWorkflowSearchAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf UpsertWorkflowSearchAttributes
x__
  rnf (WorkflowCommand'ModifyWorkflowProperties ModifyWorkflowProperties
x__)
    = ModifyWorkflowProperties -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ModifyWorkflowProperties
x__
  rnf (WorkflowCommand'UpdateResponse UpdateResponse
x__) = UpdateResponse -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf UpdateResponse
x__
_WorkflowCommand'StartTimer ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant StartTimer
_WorkflowCommand'StartTimer :: Prism' WorkflowCommand'Variant StartTimer
_WorkflowCommand'StartTimer
  = (StartTimer -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe StartTimer)
-> Prism' WorkflowCommand'Variant StartTimer
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      StartTimer -> WorkflowCommand'Variant
WorkflowCommand'StartTimer
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'StartTimer StartTimer
p__val) -> StartTimer -> Maybe StartTimer
forall a. a -> Maybe a
Prelude.Just StartTimer
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe StartTimer
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'ScheduleActivity ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant ScheduleActivity
_WorkflowCommand'ScheduleActivity :: Prism' WorkflowCommand'Variant ScheduleActivity
_WorkflowCommand'ScheduleActivity
  = (ScheduleActivity -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe ScheduleActivity)
-> Prism' WorkflowCommand'Variant ScheduleActivity
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ScheduleActivity -> WorkflowCommand'Variant
WorkflowCommand'ScheduleActivity
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'ScheduleActivity ScheduleActivity
p__val) -> ScheduleActivity -> Maybe ScheduleActivity
forall a. a -> Maybe a
Prelude.Just ScheduleActivity
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe ScheduleActivity
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'RespondToQuery ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant QueryResult
_WorkflowCommand'RespondToQuery :: Prism' WorkflowCommand'Variant QueryResult
_WorkflowCommand'RespondToQuery
  = (QueryResult -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe QueryResult)
-> Prism' WorkflowCommand'Variant QueryResult
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      QueryResult -> WorkflowCommand'Variant
WorkflowCommand'RespondToQuery
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'RespondToQuery QueryResult
p__val) -> QueryResult -> Maybe QueryResult
forall a. a -> Maybe a
Prelude.Just QueryResult
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe QueryResult
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'RequestCancelActivity ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant RequestCancelActivity
_WorkflowCommand'RequestCancelActivity :: Prism' WorkflowCommand'Variant RequestCancelActivity
_WorkflowCommand'RequestCancelActivity
  = (RequestCancelActivity -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe RequestCancelActivity)
-> Prism' WorkflowCommand'Variant RequestCancelActivity
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      RequestCancelActivity -> WorkflowCommand'Variant
WorkflowCommand'RequestCancelActivity
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'RequestCancelActivity RequestCancelActivity
p__val)
                -> RequestCancelActivity -> Maybe RequestCancelActivity
forall a. a -> Maybe a
Prelude.Just RequestCancelActivity
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe RequestCancelActivity
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'CancelTimer ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant CancelTimer
_WorkflowCommand'CancelTimer :: Prism' WorkflowCommand'Variant CancelTimer
_WorkflowCommand'CancelTimer
  = (CancelTimer -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe CancelTimer)
-> Prism' WorkflowCommand'Variant CancelTimer
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      CancelTimer -> WorkflowCommand'Variant
WorkflowCommand'CancelTimer
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'CancelTimer CancelTimer
p__val) -> CancelTimer -> Maybe CancelTimer
forall a. a -> Maybe a
Prelude.Just CancelTimer
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe CancelTimer
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'CompleteWorkflowExecution ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant CompleteWorkflowExecution
_WorkflowCommand'CompleteWorkflowExecution :: Prism' WorkflowCommand'Variant CompleteWorkflowExecution
_WorkflowCommand'CompleteWorkflowExecution
  = (CompleteWorkflowExecution -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe CompleteWorkflowExecution)
-> Prism' WorkflowCommand'Variant CompleteWorkflowExecution
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      CompleteWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'CompleteWorkflowExecution
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'CompleteWorkflowExecution CompleteWorkflowExecution
p__val)
                -> CompleteWorkflowExecution -> Maybe CompleteWorkflowExecution
forall a. a -> Maybe a
Prelude.Just CompleteWorkflowExecution
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe CompleteWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'FailWorkflowExecution ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant FailWorkflowExecution
_WorkflowCommand'FailWorkflowExecution :: Prism' WorkflowCommand'Variant FailWorkflowExecution
_WorkflowCommand'FailWorkflowExecution
  = (FailWorkflowExecution -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe FailWorkflowExecution)
-> Prism' WorkflowCommand'Variant FailWorkflowExecution
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      FailWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'FailWorkflowExecution
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'FailWorkflowExecution FailWorkflowExecution
p__val)
                -> FailWorkflowExecution -> Maybe FailWorkflowExecution
forall a. a -> Maybe a
Prelude.Just FailWorkflowExecution
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe FailWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'ContinueAsNewWorkflowExecution ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant ContinueAsNewWorkflowExecution
_WorkflowCommand'ContinueAsNewWorkflowExecution :: Prism' WorkflowCommand'Variant ContinueAsNewWorkflowExecution
_WorkflowCommand'ContinueAsNewWorkflowExecution
  = (ContinueAsNewWorkflowExecution -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant
    -> Maybe ContinueAsNewWorkflowExecution)
-> Prism' WorkflowCommand'Variant ContinueAsNewWorkflowExecution
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ContinueAsNewWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'ContinueAsNewWorkflowExecution
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'ContinueAsNewWorkflowExecution ContinueAsNewWorkflowExecution
p__val)
                -> ContinueAsNewWorkflowExecution
-> Maybe ContinueAsNewWorkflowExecution
forall a. a -> Maybe a
Prelude.Just ContinueAsNewWorkflowExecution
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe ContinueAsNewWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'CancelWorkflowExecution ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant CancelWorkflowExecution
_WorkflowCommand'CancelWorkflowExecution :: Prism' WorkflowCommand'Variant CancelWorkflowExecution
_WorkflowCommand'CancelWorkflowExecution
  = (CancelWorkflowExecution -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe CancelWorkflowExecution)
-> Prism' WorkflowCommand'Variant CancelWorkflowExecution
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      CancelWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'CancelWorkflowExecution
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'CancelWorkflowExecution CancelWorkflowExecution
p__val)
                -> CancelWorkflowExecution -> Maybe CancelWorkflowExecution
forall a. a -> Maybe a
Prelude.Just CancelWorkflowExecution
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe CancelWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'SetPatchMarker ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant SetPatchMarker
_WorkflowCommand'SetPatchMarker :: Prism' WorkflowCommand'Variant SetPatchMarker
_WorkflowCommand'SetPatchMarker
  = (SetPatchMarker -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe SetPatchMarker)
-> Prism' WorkflowCommand'Variant SetPatchMarker
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      SetPatchMarker -> WorkflowCommand'Variant
WorkflowCommand'SetPatchMarker
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'SetPatchMarker SetPatchMarker
p__val) -> SetPatchMarker -> Maybe SetPatchMarker
forall a. a -> Maybe a
Prelude.Just SetPatchMarker
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe SetPatchMarker
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'StartChildWorkflowExecution ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant StartChildWorkflowExecution
_WorkflowCommand'StartChildWorkflowExecution :: Prism' WorkflowCommand'Variant StartChildWorkflowExecution
_WorkflowCommand'StartChildWorkflowExecution
  = (StartChildWorkflowExecution -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe StartChildWorkflowExecution)
-> Prism' WorkflowCommand'Variant StartChildWorkflowExecution
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      StartChildWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'StartChildWorkflowExecution
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'StartChildWorkflowExecution StartChildWorkflowExecution
p__val)
                -> StartChildWorkflowExecution -> Maybe StartChildWorkflowExecution
forall a. a -> Maybe a
Prelude.Just StartChildWorkflowExecution
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe StartChildWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'CancelChildWorkflowExecution ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant CancelChildWorkflowExecution
_WorkflowCommand'CancelChildWorkflowExecution :: Prism' WorkflowCommand'Variant CancelChildWorkflowExecution
_WorkflowCommand'CancelChildWorkflowExecution
  = (CancelChildWorkflowExecution -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe CancelChildWorkflowExecution)
-> Prism' WorkflowCommand'Variant CancelChildWorkflowExecution
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      CancelChildWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'CancelChildWorkflowExecution
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'CancelChildWorkflowExecution CancelChildWorkflowExecution
p__val)
                -> CancelChildWorkflowExecution -> Maybe CancelChildWorkflowExecution
forall a. a -> Maybe a
Prelude.Just CancelChildWorkflowExecution
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe CancelChildWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'RequestCancelExternalWorkflowExecution ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant RequestCancelExternalWorkflowExecution
_WorkflowCommand'RequestCancelExternalWorkflowExecution :: Prism'
  WorkflowCommand'Variant RequestCancelExternalWorkflowExecution
_WorkflowCommand'RequestCancelExternalWorkflowExecution
  = (RequestCancelExternalWorkflowExecution -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant
    -> Maybe RequestCancelExternalWorkflowExecution)
-> Prism'
     WorkflowCommand'Variant RequestCancelExternalWorkflowExecution
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      RequestCancelExternalWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'RequestCancelExternalWorkflowExecution
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'RequestCancelExternalWorkflowExecution RequestCancelExternalWorkflowExecution
p__val)
                -> RequestCancelExternalWorkflowExecution
-> Maybe RequestCancelExternalWorkflowExecution
forall a. a -> Maybe a
Prelude.Just RequestCancelExternalWorkflowExecution
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe RequestCancelExternalWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'SignalExternalWorkflowExecution ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant SignalExternalWorkflowExecution
_WorkflowCommand'SignalExternalWorkflowExecution :: Prism' WorkflowCommand'Variant SignalExternalWorkflowExecution
_WorkflowCommand'SignalExternalWorkflowExecution
  = (SignalExternalWorkflowExecution -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant
    -> Maybe SignalExternalWorkflowExecution)
-> Prism' WorkflowCommand'Variant SignalExternalWorkflowExecution
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      SignalExternalWorkflowExecution -> WorkflowCommand'Variant
WorkflowCommand'SignalExternalWorkflowExecution
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'SignalExternalWorkflowExecution SignalExternalWorkflowExecution
p__val)
                -> SignalExternalWorkflowExecution
-> Maybe SignalExternalWorkflowExecution
forall a. a -> Maybe a
Prelude.Just SignalExternalWorkflowExecution
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe SignalExternalWorkflowExecution
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'CancelSignalWorkflow ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant CancelSignalWorkflow
_WorkflowCommand'CancelSignalWorkflow :: Prism' WorkflowCommand'Variant CancelSignalWorkflow
_WorkflowCommand'CancelSignalWorkflow
  = (CancelSignalWorkflow -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe CancelSignalWorkflow)
-> Prism' WorkflowCommand'Variant CancelSignalWorkflow
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      CancelSignalWorkflow -> WorkflowCommand'Variant
WorkflowCommand'CancelSignalWorkflow
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'CancelSignalWorkflow CancelSignalWorkflow
p__val)
                -> CancelSignalWorkflow -> Maybe CancelSignalWorkflow
forall a. a -> Maybe a
Prelude.Just CancelSignalWorkflow
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe CancelSignalWorkflow
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'ScheduleLocalActivity ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant ScheduleLocalActivity
_WorkflowCommand'ScheduleLocalActivity :: Prism' WorkflowCommand'Variant ScheduleLocalActivity
_WorkflowCommand'ScheduleLocalActivity
  = (ScheduleLocalActivity -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe ScheduleLocalActivity)
-> Prism' WorkflowCommand'Variant ScheduleLocalActivity
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ScheduleLocalActivity -> WorkflowCommand'Variant
WorkflowCommand'ScheduleLocalActivity
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'ScheduleLocalActivity ScheduleLocalActivity
p__val)
                -> ScheduleLocalActivity -> Maybe ScheduleLocalActivity
forall a. a -> Maybe a
Prelude.Just ScheduleLocalActivity
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe ScheduleLocalActivity
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'RequestCancelLocalActivity ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant RequestCancelLocalActivity
_WorkflowCommand'RequestCancelLocalActivity :: Prism' WorkflowCommand'Variant RequestCancelLocalActivity
_WorkflowCommand'RequestCancelLocalActivity
  = (RequestCancelLocalActivity -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe RequestCancelLocalActivity)
-> Prism' WorkflowCommand'Variant RequestCancelLocalActivity
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      RequestCancelLocalActivity -> WorkflowCommand'Variant
WorkflowCommand'RequestCancelLocalActivity
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'RequestCancelLocalActivity RequestCancelLocalActivity
p__val)
                -> RequestCancelLocalActivity -> Maybe RequestCancelLocalActivity
forall a. a -> Maybe a
Prelude.Just RequestCancelLocalActivity
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe RequestCancelLocalActivity
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'UpsertWorkflowSearchAttributes ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant UpsertWorkflowSearchAttributes
_WorkflowCommand'UpsertWorkflowSearchAttributes :: Prism' WorkflowCommand'Variant UpsertWorkflowSearchAttributes
_WorkflowCommand'UpsertWorkflowSearchAttributes
  = (UpsertWorkflowSearchAttributes -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant
    -> Maybe UpsertWorkflowSearchAttributes)
-> Prism' WorkflowCommand'Variant UpsertWorkflowSearchAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      UpsertWorkflowSearchAttributes -> WorkflowCommand'Variant
WorkflowCommand'UpsertWorkflowSearchAttributes
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'UpsertWorkflowSearchAttributes UpsertWorkflowSearchAttributes
p__val)
                -> UpsertWorkflowSearchAttributes
-> Maybe UpsertWorkflowSearchAttributes
forall a. a -> Maybe a
Prelude.Just UpsertWorkflowSearchAttributes
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe UpsertWorkflowSearchAttributes
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'ModifyWorkflowProperties ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant ModifyWorkflowProperties
_WorkflowCommand'ModifyWorkflowProperties :: Prism' WorkflowCommand'Variant ModifyWorkflowProperties
_WorkflowCommand'ModifyWorkflowProperties
  = (ModifyWorkflowProperties -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe ModifyWorkflowProperties)
-> Prism' WorkflowCommand'Variant ModifyWorkflowProperties
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ModifyWorkflowProperties -> WorkflowCommand'Variant
WorkflowCommand'ModifyWorkflowProperties
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'ModifyWorkflowProperties ModifyWorkflowProperties
p__val)
                -> ModifyWorkflowProperties -> Maybe ModifyWorkflowProperties
forall a. a -> Maybe a
Prelude.Just ModifyWorkflowProperties
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe ModifyWorkflowProperties
forall a. Maybe a
Prelude.Nothing)
_WorkflowCommand'UpdateResponse ::
  Data.ProtoLens.Prism.Prism' WorkflowCommand'Variant UpdateResponse
_WorkflowCommand'UpdateResponse :: Prism' WorkflowCommand'Variant UpdateResponse
_WorkflowCommand'UpdateResponse
  = (UpdateResponse -> WorkflowCommand'Variant)
-> (WorkflowCommand'Variant -> Maybe UpdateResponse)
-> Prism' WorkflowCommand'Variant UpdateResponse
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      UpdateResponse -> WorkflowCommand'Variant
WorkflowCommand'UpdateResponse
      (\ WorkflowCommand'Variant
p__
         -> case WorkflowCommand'Variant
p__ of
              (WorkflowCommand'UpdateResponse UpdateResponse
p__val) -> UpdateResponse -> Maybe UpdateResponse
forall a. a -> Maybe a
Prelude.Just UpdateResponse
p__val
              WorkflowCommand'Variant
_otherwise -> Maybe UpdateResponse
forall a. Maybe a
Prelude.Nothing)
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
  = ByteString
"\n\
    \;temporal/sdk/core/workflow_commands/workflow_commands.proto\DC2\EMcoresdk.workflow_commands\SUB\RSgoogle/protobuf/duration.proto\SUB\USgoogle/protobuf/timestamp.proto\SUB\ESCgoogle/protobuf/empty.proto\SUB$temporal/api/common/v1/message.proto\SUB$temporal/api/enums/v1/workflow.proto\SUB%temporal/api/failure/v1/message.proto\SUB5temporal/sdk/core/child_workflow/child_workflow.proto\SUB%temporal/sdk/core/common/common.proto\"\219\DC1\n\
    \\SIWorkflowCommand\DC2H\n\
    \\vstart_timer\CAN\SOH \SOH(\v2%.coresdk.workflow_commands.StartTimerH\NULR\n\
    \startTimer\DC2Z\n\
    \\DC1schedule_activity\CAN\STX \SOH(\v2+.coresdk.workflow_commands.ScheduleActivityH\NULR\DLEscheduleActivity\DC2R\n\
    \\DLErespond_to_query\CAN\ETX \SOH(\v2&.coresdk.workflow_commands.QueryResultH\NULR\SOrespondToQuery\DC2j\n\
    \\ETBrequest_cancel_activity\CAN\EOT \SOH(\v20.coresdk.workflow_commands.RequestCancelActivityH\NULR\NAKrequestCancelActivity\DC2K\n\
    \\fcancel_timer\CAN\ENQ \SOH(\v2&.coresdk.workflow_commands.CancelTimerH\NULR\vcancelTimer\DC2v\n\
    \\ESCcomplete_workflow_execution\CAN\ACK \SOH(\v24.coresdk.workflow_commands.CompleteWorkflowExecutionH\NULR\EMcompleteWorkflowExecution\DC2j\n\
    \\ETBfail_workflow_execution\CAN\a \SOH(\v20.coresdk.workflow_commands.FailWorkflowExecutionH\NULR\NAKfailWorkflowExecution\DC2\135\SOH\n\
    \\"continue_as_new_workflow_execution\CAN\b \SOH(\v29.coresdk.workflow_commands.ContinueAsNewWorkflowExecutionH\NULR\RScontinueAsNewWorkflowExecution\DC2p\n\
    \\EMcancel_workflow_execution\CAN\t \SOH(\v22.coresdk.workflow_commands.CancelWorkflowExecutionH\NULR\ETBcancelWorkflowExecution\DC2U\n\
    \\DLEset_patch_marker\CAN\n\
    \ \SOH(\v2).coresdk.workflow_commands.SetPatchMarkerH\NULR\SOsetPatchMarker\DC2}\n\
    \\RSstart_child_workflow_execution\CAN\v \SOH(\v26.coresdk.workflow_commands.StartChildWorkflowExecutionH\NULR\ESCstartChildWorkflowExecution\DC2\128\SOH\n\
    \\UScancel_child_workflow_execution\CAN\f \SOH(\v27.coresdk.workflow_commands.CancelChildWorkflowExecutionH\NULR\FScancelChildWorkflowExecution\DC2\159\SOH\n\
    \*request_cancel_external_workflow_execution\CAN\r \SOH(\v2A.coresdk.workflow_commands.RequestCancelExternalWorkflowExecutionH\NULR&requestCancelExternalWorkflowExecution\DC2\137\SOH\n\
    \\"signal_external_workflow_execution\CAN\SO \SOH(\v2:.coresdk.workflow_commands.SignalExternalWorkflowExecutionH\NULR\USsignalExternalWorkflowExecution\DC2g\n\
    \\SYNcancel_signal_workflow\CAN\SI \SOH(\v2/.coresdk.workflow_commands.CancelSignalWorkflowH\NULR\DC4cancelSignalWorkflow\DC2j\n\
    \\ETBschedule_local_activity\CAN\DLE \SOH(\v20.coresdk.workflow_commands.ScheduleLocalActivityH\NULR\NAKscheduleLocalActivity\DC2z\n\
    \\GSrequest_cancel_local_activity\CAN\DC1 \SOH(\v25.coresdk.workflow_commands.RequestCancelLocalActivityH\NULR\SUBrequestCancelLocalActivity\DC2\134\SOH\n\
    \!upsert_workflow_search_attributes\CAN\DC2 \SOH(\v29.coresdk.workflow_commands.UpsertWorkflowSearchAttributesH\NULR\RSupsertWorkflowSearchAttributes\DC2s\n\
    \\SUBmodify_workflow_properties\CAN\DC3 \SOH(\v23.coresdk.workflow_commands.ModifyWorkflowPropertiesH\NULR\CANmodifyWorkflowProperties\DC2T\n\
    \\SIupdate_response\CAN\DC4 \SOH(\v2).coresdk.workflow_commands.UpdateResponseH\NULR\SOupdateResponseB\t\n\
    \\avariant\"l\n\
    \\n\
    \StartTimer\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2L\n\
    \\NAKstart_to_fire_timeout\CAN\STX \SOH(\v2\EM.google.protobuf.DurationR\DC2startToFireTimeout\"\US\n\
    \\vCancelTimer\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\"\235\a\n\
    \\DLEScheduleActivity\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2\US\n\
    \\vactivity_id\CAN\STX \SOH(\tR\n\
    \activityId\DC2#\n\
    \\ractivity_type\CAN\ETX \SOH(\tR\factivityType\DC2\GS\n\
    \\n\
    \task_queue\CAN\ENQ \SOH(\tR\ttaskQueue\DC2R\n\
    \\aheaders\CAN\ACK \ETX(\v28.coresdk.workflow_commands.ScheduleActivity.HeadersEntryR\aheaders\DC2=\n\
    \\targuments\CAN\a \ETX(\v2\US.temporal.api.common.v1.PayloadR\targuments\DC2T\n\
    \\EMschedule_to_close_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToCloseTimeout\DC2T\n\
    \\EMschedule_to_start_timeout\CAN\t \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToStartTimeout\DC2N\n\
    \\SYNstart_to_close_timeout\CAN\n\
    \ \SOH(\v2\EM.google.protobuf.DurationR\DC3startToCloseTimeout\DC2F\n\
    \\DC1heartbeat_timeout\CAN\v \SOH(\v2\EM.google.protobuf.DurationR\DLEheartbeatTimeout\DC2F\n\
    \\fretry_policy\CAN\f \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2`\n\
    \\DC1cancellation_type\CAN\r \SOH(\SO23.coresdk.workflow_commands.ActivityCancellationTypeR\DLEcancellationType\DC23\n\
    \\SYNdo_not_eagerly_execute\CAN\SO \SOH(\bR\DC3doNotEagerlyExecute\DC2M\n\
    \\DC1versioning_intent\CAN\SI \SOH(\SO2 .coresdk.common.VersioningIntentR\DLEversioningIntent\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\"\197\a\n\
    \\NAKScheduleLocalActivity\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2\US\n\
    \\vactivity_id\CAN\STX \SOH(\tR\n\
    \activityId\DC2#\n\
    \\ractivity_type\CAN\ETX \SOH(\tR\factivityType\DC2\CAN\n\
    \\aattempt\CAN\EOT \SOH(\rR\aattempt\DC2P\n\
    \\SYNoriginal_schedule_time\CAN\ENQ \SOH(\v2\SUB.google.protobuf.TimestampR\DC4originalScheduleTime\DC2W\n\
    \\aheaders\CAN\ACK \ETX(\v2=.coresdk.workflow_commands.ScheduleLocalActivity.HeadersEntryR\aheaders\DC2=\n\
    \\targuments\CAN\a \ETX(\v2\US.temporal.api.common.v1.PayloadR\targuments\DC2T\n\
    \\EMschedule_to_close_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToCloseTimeout\DC2T\n\
    \\EMschedule_to_start_timeout\CAN\t \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToStartTimeout\DC2N\n\
    \\SYNstart_to_close_timeout\CAN\n\
    \ \SOH(\v2\EM.google.protobuf.DurationR\DC3startToCloseTimeout\DC2F\n\
    \\fretry_policy\CAN\v \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2M\n\
    \\NAKlocal_retry_threshold\CAN\f \SOH(\v2\EM.google.protobuf.DurationR\DC3localRetryThreshold\DC2`\n\
    \\DC1cancellation_type\CAN\r \SOH(\SO23.coresdk.workflow_commands.ActivityCancellationTypeR\DLEcancellationType\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\
    \\NAKRequestCancelActivity\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\".\n\
    \\SUBRequestCancelLocalActivity\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\"\184\SOH\n\
    \\vQueryResult\DC2\EM\n\
    \\bquery_id\CAN\SOH \SOH(\tR\aqueryId\DC2G\n\
    \\tsucceeded\CAN\STX \SOH(\v2'.coresdk.workflow_commands.QuerySuccessH\NULR\tsucceeded\DC2:\n\
    \\ACKfailed\CAN\ETX \SOH(\v2 .temporal.api.failure.v1.FailureH\NULR\ACKfailedB\t\n\
    \\avariant\"K\n\
    \\fQuerySuccess\DC2;\n\
    \\bresponse\CAN\SOH \SOH(\v2\US.temporal.api.common.v1.PayloadR\bresponse\"T\n\
    \\EMCompleteWorkflowExecution\DC27\n\
    \\ACKresult\CAN\SOH \SOH(\v2\US.temporal.api.common.v1.PayloadR\ACKresult\"S\n\
    \\NAKFailWorkflowExecution\DC2:\n\
    \\afailure\CAN\SOH \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\"\172\b\n\
    \\RSContinueAsNewWorkflowExecution\DC2#\n\
    \\rworkflow_type\CAN\SOH \SOH(\tR\fworkflowType\DC2\GS\n\
    \\n\
    \task_queue\CAN\STX \SOH(\tR\ttaskQueue\DC2=\n\
    \\targuments\CAN\ETX \ETX(\v2\US.temporal.api.common.v1.PayloadR\targuments\DC2K\n\
    \\DC4workflow_run_timeout\CAN\EOT \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
    \\NAKworkflow_task_timeout\CAN\ENQ \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2W\n\
    \\EOTmemo\CAN\ACK \ETX(\v2C.coresdk.workflow_commands.ContinueAsNewWorkflowExecution.MemoEntryR\EOTmemo\DC2`\n\
    \\aheaders\CAN\a \ETX(\v2F.coresdk.workflow_commands.ContinueAsNewWorkflowExecution.HeadersEntryR\aheaders\DC2|\n\
    \\DC1search_attributes\CAN\b \ETX(\v2O.coresdk.workflow_commands.ContinueAsNewWorkflowExecution.SearchAttributesEntryR\DLEsearchAttributes\DC2F\n\
    \\fretry_policy\CAN\t \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2M\n\
    \\DC1versioning_intent\CAN\n\
    \ \SOH(\SO2 .coresdk.common.VersioningIntentR\DLEversioningIntent\SUBX\n\
    \\tMemoEntry\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\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\SUBd\n\
    \\NAKSearchAttributesEntry\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\"\EM\n\
    \\ETBCancelWorkflowExecution\"K\n\
    \\SOSetPatchMarker\DC2\EM\n\
    \\bpatch_id\CAN\SOH \SOH(\tR\apatchId\DC2\RS\n\
    \\n\
    \deprecated\CAN\STX \SOH(\bR\n\
    \deprecated\"\141\f\n\
    \\ESCStartChildWorkflowExecution\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2\FS\n\
    \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2\US\n\
    \\vworkflow_id\CAN\ETX \SOH(\tR\n\
    \workflowId\DC2#\n\
    \\rworkflow_type\CAN\EOT \SOH(\tR\fworkflowType\DC2\GS\n\
    \\n\
    \task_queue\CAN\ENQ \SOH(\tR\ttaskQueue\DC25\n\
    \\ENQinput\CAN\ACK \ETX(\v2\US.temporal.api.common.v1.PayloadR\ENQinput\DC2W\n\
    \\SUBworkflow_execution_timeout\CAN\a \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
    \\DC4workflow_run_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
    \\NAKworkflow_task_timeout\CAN\t \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2Y\n\
    \\DC3parent_close_policy\CAN\n\
    \ \SOH(\SO2).coresdk.child_workflow.ParentClosePolicyR\DC1parentClosePolicy\DC2e\n\
    \\CANworkflow_id_reuse_policy\CAN\f \SOH(\SO2,.temporal.api.enums.v1.WorkflowIdReusePolicyR\NAKworkflowIdReusePolicy\DC2F\n\
    \\fretry_policy\CAN\r \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2#\n\
    \\rcron_schedule\CAN\SO \SOH(\tR\fcronSchedule\DC2]\n\
    \\aheaders\CAN\SI \ETX(\v2C.coresdk.workflow_commands.StartChildWorkflowExecution.HeadersEntryR\aheaders\DC2T\n\
    \\EOTmemo\CAN\DLE \ETX(\v2@.coresdk.workflow_commands.StartChildWorkflowExecution.MemoEntryR\EOTmemo\DC2y\n\
    \\DC1search_attributes\CAN\DC1 \ETX(\v2L.coresdk.workflow_commands.StartChildWorkflowExecution.SearchAttributesEntryR\DLEsearchAttributes\DC2b\n\
    \\DC1cancellation_type\CAN\DC2 \SOH(\SO25.coresdk.child_workflow.ChildWorkflowCancellationTypeR\DLEcancellationType\DC2M\n\
    \\DC1versioning_intent\CAN\DC3 \SOH(\SO2 .coresdk.common.VersioningIntentR\DLEversioningIntent\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\SUBX\n\
    \\tMemoEntry\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\SUBd\n\
    \\NAKSearchAttributesEntry\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\"L\n\
    \\FSCancelChildWorkflowExecution\DC2,\n\
    \\DC2child_workflow_seq\CAN\SOH \SOH(\rR\DLEchildWorkflowSeq\"\208\SOH\n\
    \&RequestCancelExternalWorkflowExecution\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2\\\n\
    \\DC2workflow_execution\CAN\STX \SOH(\v2+.coresdk.common.NamespacedWorkflowExecutionH\NULR\DC1workflowExecution\DC2,\n\
    \\DC1child_workflow_id\CAN\ETX \SOH(\tH\NULR\SIchildWorkflowIdB\b\n\
    \\ACKtarget\"\223\ETX\n\
    \\USSignalExternalWorkflowExecution\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\DC2\\\n\
    \\DC2workflow_execution\CAN\STX \SOH(\v2+.coresdk.common.NamespacedWorkflowExecutionH\NULR\DC1workflowExecution\DC2,\n\
    \\DC1child_workflow_id\CAN\ETX \SOH(\tH\NULR\SIchildWorkflowId\DC2\US\n\
    \\vsignal_name\CAN\EOT \SOH(\tR\n\
    \signalName\DC23\n\
    \\EOTargs\CAN\ENQ \ETX(\v2\US.temporal.api.common.v1.PayloadR\EOTargs\DC2a\n\
    \\aheaders\CAN\ACK \ETX(\v2G.coresdk.workflow_commands.SignalExternalWorkflowExecution.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\SOHB\b\n\
    \\ACKtarget\"(\n\
    \\DC4CancelSignalWorkflow\DC2\DLE\n\
    \\ETXseq\CAN\SOH \SOH(\rR\ETXseq\"\132\STX\n\
    \\RSUpsertWorkflowSearchAttributes\DC2|\n\
    \\DC1search_attributes\CAN\SOH \ETX(\v2O.coresdk.workflow_commands.UpsertWorkflowSearchAttributes.SearchAttributesEntryR\DLEsearchAttributes\SUBd\n\
    \\NAKSearchAttributesEntry\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\
    \\CANModifyWorkflowProperties\DC2A\n\
    \\rupserted_memo\CAN\SOH \SOH(\v2\FS.temporal.api.common.v1.MemoR\fupsertedMemo\"\133\STX\n\
    \\SOUpdateResponse\DC20\n\
    \\DC4protocol_instance_id\CAN\SOH \SOH(\tR\DC2protocolInstanceId\DC24\n\
    \\baccepted\CAN\STX \SOH(\v2\SYN.google.protobuf.EmptyH\NULR\baccepted\DC2>\n\
    \\brejected\CAN\ETX \SOH(\v2 .temporal.api.failure.v1.FailureH\NULR\brejected\DC2?\n\
    \\tcompleted\CAN\EOT \SOH(\v2\US.temporal.api.common.v1.PayloadH\NULR\tcompletedB\n\
    \\n\
    \\bresponse*X\n\
    \\CANActivityCancellationType\DC2\SO\n\
    \\n\
    \TRY_CANCEL\DLE\NUL\DC2\US\n\
    \\ESCWAIT_CANCELLATION_COMPLETED\DLE\SOH\DC2\v\n\
    \\aABANDON\DLE\STXB,\234\STX)Temporalio::Bridge::Api::WorkflowCommandsJ\182~\n\
    \\a\DC2\ENQ\NUL\NUL\209\STX\SOH\n\
    \\b\n\
    \\SOH\f\DC2\ETX\NUL\NUL\DC2\n\
    \\215\SOH\n\
    \\SOH\STX\DC2\ETX\a\NUL\"\SUB\204\SOH\n\
    \ Definitions for commands from a workflow in lang SDK to core. While a workflow processes a batch\n\
    \ of activation jobs, it accumulates these commands to be sent back to core to conclude that\n\
    \ activation.\n\
    \\n\
    \\b\n\
    \\SOH\b\DC2\ETX\b\NULB\n\
    \\t\n\
    \\STX\b-\DC2\ETX\b\NULB\n\
    \\t\n\
    \\STX\ETX\NUL\DC2\ETX\n\
    \\NUL(\n\
    \\t\n\
    \\STX\ETX\SOH\DC2\ETX\v\NUL)\n\
    \\t\n\
    \\STX\ETX\STX\DC2\ETX\f\NUL%\n\
    \\t\n\
    \\STX\ETX\ETX\DC2\ETX\r\NUL.\n\
    \\t\n\
    \\STX\ETX\EOT\DC2\ETX\SO\NUL.\n\
    \\t\n\
    \\STX\ETX\ENQ\DC2\ETX\SI\NUL/\n\
    \\t\n\
    \\STX\ETX\ACK\DC2\ETX\DLE\NUL?\n\
    \\t\n\
    \\STX\ETX\a\DC2\ETX\DC1\NUL/\n\
    \\n\
    \\n\
    \\STX\EOT\NUL\DC2\EOT\DC3\NUL*\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\NUL\SOH\DC2\ETX\DC3\b\ETB\n\
    \\f\n\
    \\EOT\EOT\NUL\b\NUL\DC2\EOT\DC4\EOT)\ENQ\n\
    \\f\n\
    \\ENQ\EOT\NUL\b\NUL\SOH\DC2\ETX\DC4\n\
    \\DC1\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\NUL\DC2\ETX\NAK\b#\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ACK\DC2\ETX\NAK\b\DC2\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX\NAK\DC3\RS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX\NAK!\"\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\SOH\DC2\ETX\SYN\b/\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETX\SYN\b\CAN\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX\SYN\EM*\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX\SYN-.\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\STX\DC2\ETX\ETB\b)\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ACK\DC2\ETX\ETB\b\DC3\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX\ETB\DC4$\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX\ETB'(\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\ETX\DC2\ETX\CAN\b:\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ACK\DC2\ETX\CAN\b\GS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX\CAN\RS5\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX\CAN89\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\EOT\DC2\ETX\EM\b%\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ACK\DC2\ETX\EM\b\DC3\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETX\EM\DC4 \n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETX\EM#$\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\ENQ\DC2\ETX\SUB\bB\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ACK\DC2\ETX\SUB\b!\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\SOH\DC2\ETX\SUB\"=\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ETX\DC2\ETX\SUB@A\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\ACK\DC2\ETX\ESC\b:\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ACK\DC2\ETX\ESC\b\GS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\SOH\DC2\ETX\ESC\RS5\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ETX\DC2\ETX\ESC89\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\a\DC2\ETX\FS\bN\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\ACK\DC2\ETX\FS\b&\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\SOH\DC2\ETX\FS'I\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\ETX\DC2\ETX\FSLM\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\b\DC2\ETX\GS\b>\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\ACK\DC2\ETX\GS\b\US\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\SOH\DC2\ETX\GS 9\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\ETX\DC2\ETX\GS<=\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\t\DC2\ETX\RS\b-\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\t\ACK\DC2\ETX\RS\b\SYN\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\t\SOH\DC2\ETX\RS\ETB'\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\t\ETX\DC2\ETX\RS*,\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\n\
    \\DC2\ETX\US\bH\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\n\
    \\ACK\DC2\ETX\US\b#\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\n\
    \\SOH\DC2\ETX\US$B\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\n\
    \\ETX\DC2\ETX\USEG\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\v\DC2\ETX \bJ\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\v\ACK\DC2\ETX \b$\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\v\SOH\DC2\ETX %D\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\v\ETX\DC2\ETX GI\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\f\DC2\ETX!\b_\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\f\ACK\DC2\ETX!\b.\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\f\SOH\DC2\ETX!/Y\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\f\ETX\DC2\ETX!\\^\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\r\DC2\ETX\"\bP\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\r\ACK\DC2\ETX\"\b'\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\r\SOH\DC2\ETX\"(J\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\r\ETX\DC2\ETX\"MO\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\SO\DC2\ETX#\b9\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SO\ACK\DC2\ETX#\b\FS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SO\SOH\DC2\ETX#\GS3\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SO\ETX\DC2\ETX#68\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\SI\DC2\ETX$\b;\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SI\ACK\DC2\ETX$\b\GS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SI\SOH\DC2\ETX$\RS5\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SI\ETX\DC2\ETX$8:\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\DLE\DC2\ETX%\bF\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DLE\ACK\DC2\ETX%\b\"\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DLE\SOH\DC2\ETX%#@\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DLE\ETX\DC2\ETX%CE\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\DC1\DC2\ETX&\bN\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC1\ACK\DC2\ETX&\b&\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC1\SOH\DC2\ETX&'H\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC1\ETX\DC2\ETX&KM\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\DC2\DC2\ETX'\bA\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC2\ACK\DC2\ETX'\b \n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC2\SOH\DC2\ETX'!;\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC2\ETX\DC2\ETX'>@\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\DC3\DC2\ETX(\b,\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC3\ACK\DC2\ETX(\b\SYN\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC3\SOH\DC2\ETX(\ETB&\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC3\ETX\DC2\ETX()+\n\
    \\n\
    \\n\
    \\STX\EOT\SOH\DC2\EOT,\NUL0\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\SOH\SOH\DC2\ETX,\b\DC2\n\
    \S\n\
    \\EOT\EOT\SOH\STX\NUL\DC2\ETX.\EOT\DC3\SUBF Lang's incremental sequence number, used as the operation identifier\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\ENQ\DC2\ETX.\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX.\v\SO\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX.\DC1\DC2\n\
    \\v\n\
    \\EOT\EOT\SOH\STX\SOH\DC2\ETX/\EOT7\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\ACK\DC2\ETX/\EOT\FS\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX/\GS2\n\
    \\f\n\
    \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX/56\n\
    \\n\
    \\n\
    \\STX\EOT\STX\DC2\EOT2\NUL5\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\STX\SOH\DC2\ETX2\b\DC3\n\
    \K\n\
    \\EOT\EOT\STX\STX\NUL\DC2\ETX4\EOT\DC3\SUB> Lang's incremental sequence number as passed to `StartTimer`\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\ETX4\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETX4\v\SO\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETX4\DC1\DC2\n\
    \\n\
    \\n\
    \\STX\EOT\ETX\DC2\EOT7\NULZ\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\ETX\SOH\DC2\ETX7\b\CAN\n\
    \S\n\
    \\EOT\EOT\ETX\STX\NUL\DC2\ETX9\EOT\DC3\SUBF Lang's incremental sequence number, used as the operation identifier\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\NUL\ENQ\DC2\ETX9\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\ETX9\v\SO\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\ETX9\DC1\DC2\n\
    \\v\n\
    \\EOT\EOT\ETX\STX\SOH\DC2\ETX:\EOT\ESC\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\SOH\ENQ\DC2\ETX:\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\SOH\SOH\DC2\ETX:\v\SYN\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\SOH\ETX\DC2\ETX:\EM\SUB\n\
    \\v\n\
    \\EOT\EOT\ETX\STX\STX\DC2\ETX;\EOT\GS\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\STX\ENQ\DC2\ETX;\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\STX\SOH\DC2\ETX;\v\CAN\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\STX\ETX\DC2\ETX;\ESC\FS\n\
    \K\n\
    \\EOT\EOT\ETX\STX\ETX\DC2\ETX=\EOT\SUB\SUB> The name of the task queue to place this activity request in\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\ETX\ENQ\DC2\ETX=\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\ETX\SOH\DC2\ETX=\v\NAK\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\ETX\ETX\DC2\ETX=\CAN\EM\n\
    \\v\n\
    \\EOT\EOT\ETX\STX\EOT\DC2\ETX>\EOT<\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\EOT\ACK\DC2\ETX>\EOT/\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\EOT\SOH\DC2\ETX>07\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\EOT\ETX\DC2\ETX>:;\n\
    \H\n\
    \\EOT\EOT\ETX\STX\ENQ\DC2\ETX@\EOT:\SUB; Arguments/input to the activity. Called \"input\" upstream.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\ENQ\EOT\DC2\ETX@\EOT\f\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\ENQ\ACK\DC2\ETX@\r+\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\ENQ\SOH\DC2\ETX@,5\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\ENQ\ETX\DC2\ETX@89\n\
    \\137\STX\n\
    \\EOT\EOT\ETX\STX\ACK\DC2\ETXD\EOT;\SUB\251\SOH Indicates how long the caller is willing to wait for an activity completion. Limits how long\n\
    \ retries will be attempted. Either this or start_to_close_timeout_seconds must be specified.\n\
    \ When not specified defaults to the workflow execution timeout.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\ACK\ACK\DC2\ETXD\EOT\FS\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\ACK\SOH\DC2\ETXD\GS6\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\ACK\ETX\DC2\ETXD9:\n\
    \\163\STX\n\
    \\EOT\EOT\ETX\STX\a\DC2\ETXH\EOT;\SUB\149\STX Limits time an activity task can stay in a task queue before a worker picks it up. This\n\
    \ timeout is always non retryable as all a retry would achieve is to put it back into the same\n\
    \ queue. Defaults to schedule_to_close_timeout or workflow execution timeout if not specified.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\a\ACK\DC2\ETXH\EOT\FS\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\a\SOH\DC2\ETXH\GS6\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\a\ETX\DC2\ETXH9:\n\
    \\186\SOH\n\
    \\EOT\EOT\ETX\STX\b\DC2\ETXK\EOT9\SUB\172\SOH Maximum time an activity is allowed to execute after a pick up by a worker. This timeout is\n\
    \ always retryable. Either this or schedule_to_close_timeout must be specified.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\b\ACK\DC2\ETXK\EOT\FS\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\b\SOH\DC2\ETXK\GS3\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\b\ETX\DC2\ETXK68\n\
    \I\n\
    \\EOT\EOT\ETX\STX\t\DC2\ETXM\EOT4\SUB< Maximum time allowed between successful worker heartbeats.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\t\ACK\DC2\ETXM\EOT\FS\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\t\SOH\DC2\ETXM\GS.\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\t\ETX\DC2\ETXM13\n\
    \\235\SOH\n\
    \\EOT\EOT\ETX\STX\n\
    \\DC2\ETXQ\EOT9\SUB\221\SOH Activities are provided by a default retry policy controlled through the service dynamic\n\
    \ configuration. Retries are happening up to schedule_to_close_timeout. To disable retries set\n\
    \ retry_policy.maximum_attempts to 1.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\n\
    \\ACK\DC2\ETXQ\EOT&\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\n\
    \\SOH\DC2\ETXQ'3\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\n\
    \\ETX\DC2\ETXQ68\n\
    \k\n\
    \\EOT\EOT\ETX\STX\v\DC2\ETXS\EOT4\SUB^ Defines how the workflow will wait (or not) for cancellation of the activity to be confirmed\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\v\ACK\DC2\ETXS\EOT\FS\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\v\SOH\DC2\ETXS\GS.\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\v\ETX\DC2\ETXS13\n\
    \\217\SOH\n\
    \\EOT\EOT\ETX\STX\f\DC2\ETXW\EOT%\SUB\203\SOH If set, the worker will not tell the service that it can immediately start executing this\n\
    \ activity. When unset/default, workers will always attempt to do so if activity execution\n\
    \ slots are available.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\f\ENQ\DC2\ETXW\EOT\b\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\f\SOH\DC2\ETXW\t\US\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\f\ETX\DC2\ETXW\"$\n\
    \^\n\
    \\EOT\EOT\ETX\STX\r\DC2\ETXY\EOT;\SUBQ Whether this activity should run on a worker with a compatible build id or not.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\r\ACK\DC2\ETXY\EOT#\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\r\SOH\DC2\ETXY$5\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\r\ETX\DC2\ETXY8:\n\
    \\v\n\
    \\STX\EOT\EOT\DC2\ENQ\\\NUL\133\SOH\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\EOT\SOH\DC2\ETX\\\b\GS\n\
    \S\n\
    \\EOT\EOT\EOT\STX\NUL\DC2\ETX^\EOT\DC3\SUBF Lang's incremental sequence number, used as the operation identifier\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\NUL\ENQ\DC2\ETX^\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\ETX^\v\SO\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\ETX^\DC1\DC2\n\
    \\v\n\
    \\EOT\EOT\EOT\STX\SOH\DC2\ETX_\EOT\ESC\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\SOH\ENQ\DC2\ETX_\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\ETX_\v\SYN\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\ETX_\EM\SUB\n\
    \\v\n\
    \\EOT\EOT\EOT\STX\STX\DC2\ETX`\EOT\GS\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\STX\ENQ\DC2\ETX`\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\STX\SOH\DC2\ETX`\v\CAN\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\STX\ETX\DC2\ETX`\ESC\FS\n\
    \\204\SOH\n\
    \\EOT\EOT\EOT\STX\ETX\DC2\ETXd\EOT\ETB\SUB\190\SOH Local activities can start with a non-1 attempt, if lang has been told to backoff using\n\
    \ a timer before retrying. It should pass the attempt number from a `DoBackoff` activity\n\
    \ resolution.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\ETX\ENQ\DC2\ETXd\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\ETX\SOH\DC2\ETXd\v\DC2\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\ETX\ETX\DC2\ETXd\NAK\SYN\n\
    \\152\SOH\n\
    \\EOT\EOT\EOT\STX\EOT\DC2\ETXg\EOT9\SUB\138\SOH If this local activity is a retry (as per the attempt field) this needs to be the original\n\
    \ scheduling time (as provided in `DoBackoff`)\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\EOT\ACK\DC2\ETXg\EOT\GS\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\EOT\SOH\DC2\ETXg\RS4\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\EOT\ETX\DC2\ETXg78\n\
    \\v\n\
    \\EOT\EOT\EOT\STX\ENQ\DC2\ETXh\EOT<\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\ENQ\ACK\DC2\ETXh\EOT/\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\ENQ\SOH\DC2\ETXh07\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\ENQ\ETX\DC2\ETXh:;\n\
    \/\n\
    \\EOT\EOT\EOT\STX\ACK\DC2\ETXj\EOT:\SUB\" Arguments/input to the activity.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\ACK\EOT\DC2\ETXj\EOT\f\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\ACK\ACK\DC2\ETXj\r+\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\ACK\SOH\DC2\ETXj,5\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\ACK\ETX\DC2\ETXj89\n\
    \\224\SOH\n\
    \\EOT\EOT\EOT\STX\a\DC2\ETXn\EOT;\SUB\210\SOH Indicates how long the caller is willing to wait for local activity completion. Limits how\n\
    \ long retries will be attempted. When not specified defaults to the workflow execution\n\
    \ timeout (which may be unset).\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\a\ACK\DC2\ETXn\EOT\FS\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\a\SOH\DC2\ETXn\GS6\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\a\ETX\DC2\ETXn9:\n\
    \\189\ETX\n\
    \\EOT\EOT\EOT\STX\b\DC2\ETXt\EOT;\SUB\175\ETX Limits time the local activity can idle internally before being executed. That can happen if\n\
    \ the worker is currently at max concurrent local activity executions. This timeout is always\n\
    \ non retryable as all a retry would achieve is to put it back into the same queue. Defaults\n\
    \ to `schedule_to_close_timeout` if not specified and that is set. Must be <=\n\
    \ `schedule_to_close_timeout` when set, otherwise, it will be clamped down.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\b\ACK\DC2\ETXt\EOT\FS\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\b\SOH\DC2\ETXt\GS6\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\b\ETX\DC2\ETXt9:\n\
    \\171\STX\n\
    \\EOT\EOT\EOT\STX\t\DC2\ETXy\EOT9\SUB\157\STX Maximum time the local activity is allowed to execute after the task is dispatched. This\n\
    \ timeout is always retryable. Either or both of `schedule_to_close_timeout` and this must be\n\
    \ specified. If set, this must be <= `schedule_to_close_timeout`, otherwise, it will be\n\
    \ clamped down.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\t\ACK\DC2\ETXy\EOT\FS\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\t\SOH\DC2\ETXy\GS3\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\t\ETX\DC2\ETXy68\n\
    \x\n\
    \\EOT\EOT\EOT\STX\n\
    \\DC2\ETX|\EOT9\SUBk Specify a retry policy for the local activity. By default local activities will be retried\n\
    \ indefinitely.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\n\
    \\ACK\DC2\ETX|\EOT&\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\n\
    \\SOH\DC2\ETX|'3\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\n\
    \\ETX\DC2\ETX|68\n\
    \\224\SOH\n\
    \\EOT\EOT\EOT\STX\v\DC2\EOT\128\SOH\EOT8\SUB\209\SOH If the activity is retrying and backoff would exceed this value, lang will be told to\n\
    \ schedule a timer and retry the activity after. Otherwise, backoff will happen internally in\n\
    \ core. Defaults to 1 minute.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\v\ACK\DC2\EOT\128\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\v\SOH\DC2\EOT\128\SOH\GS2\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\v\ETX\DC2\EOT\128\SOH57\n\
    \\233\SOH\n\
    \\EOT\EOT\EOT\STX\f\DC2\EOT\132\SOH\EOT4\SUB\218\SOH Defines how the workflow will wait (or not) for cancellation of the activity to be\n\
    \ confirmed. Lang should default this to `WAIT_CANCELLATION_COMPLETED`, even though proto\n\
    \ will default to `TRY_CANCEL` automatically.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\f\ACK\DC2\EOT\132\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\f\SOH\DC2\EOT\132\SOH\GS.\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\f\ETX\DC2\EOT\132\SOH13\n\
    \\f\n\
    \\STX\ENQ\NUL\DC2\ACK\135\SOH\NUL\145\SOH\SOH\n\
    \\v\n\
    \\ETX\ENQ\NUL\SOH\DC2\EOT\135\SOH\ENQ\GS\n\
    \d\n\
    \\EOT\ENQ\NUL\STX\NUL\DC2\EOT\137\SOH\EOT\DC3\SUBV Initiate a cancellation request and immediately report cancellation to the workflow.\n\
    \\n\
    \\r\n\
    \\ENQ\ENQ\NUL\STX\NUL\SOH\DC2\EOT\137\SOH\EOT\SO\n\
    \\r\n\
    \\ENQ\ENQ\NUL\STX\NUL\STX\DC2\EOT\137\SOH\DC1\DC2\n\
    \\132\STX\n\
    \\EOT\ENQ\NUL\STX\SOH\DC2\EOT\141\SOH\EOT$\SUB\245\SOH Wait for activity cancellation completion. Note that activity must heartbeat to receive a\n\
    \ cancellation notification. This can block the cancellation for a long time if activity\n\
    \ doesn't heartbeat or chooses to ignore the cancellation request.\n\
    \\n\
    \\r\n\
    \\ENQ\ENQ\NUL\STX\SOH\SOH\DC2\EOT\141\SOH\EOT\US\n\
    \\r\n\
    \\ENQ\ENQ\NUL\STX\SOH\STX\DC2\EOT\141\SOH\"#\n\
    \p\n\
    \\EOT\ENQ\NUL\STX\STX\DC2\EOT\144\SOH\EOT\DLE\SUBb Do not request cancellation of the activity and immediately report cancellation to the\n\
    \ workflow\n\
    \\n\
    \\r\n\
    \\ENQ\ENQ\NUL\STX\STX\SOH\DC2\EOT\144\SOH\EOT\v\n\
    \\r\n\
    \\ENQ\ENQ\NUL\STX\STX\STX\DC2\EOT\144\SOH\SO\SI\n\
    \\f\n\
    \\STX\EOT\ENQ\DC2\ACK\147\SOH\NUL\150\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\ENQ\SOH\DC2\EOT\147\SOH\b\GS\n\
    \R\n\
    \\EOT\EOT\ENQ\STX\NUL\DC2\EOT\149\SOH\EOT\DC3\SUBD Lang's incremental sequence number as passed to `ScheduleActivity`\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\ENQ\DC2\EOT\149\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\SOH\DC2\EOT\149\SOH\v\SO\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\ETX\DC2\EOT\149\SOH\DC1\DC2\n\
    \\f\n\
    \\STX\EOT\ACK\DC2\ACK\152\SOH\NUL\155\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\ACK\SOH\DC2\EOT\152\SOH\b\"\n\
    \W\n\
    \\EOT\EOT\ACK\STX\NUL\DC2\EOT\154\SOH\EOT\DC3\SUBI Lang's incremental sequence number as passed to `ScheduleLocalActivity`\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\ENQ\DC2\EOT\154\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\SOH\DC2\EOT\154\SOH\v\SO\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\ETX\DC2\EOT\154\SOH\DC1\DC2\n\
    \\f\n\
    \\STX\EOT\a\DC2\ACK\157\SOH\NUL\164\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\a\SOH\DC2\EOT\157\SOH\b\DC3\n\
    \D\n\
    \\EOT\EOT\a\STX\NUL\DC2\EOT\159\SOH\EOT\CAN\SUB6 Corresponds to the id provided in the activation job\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\ENQ\DC2\EOT\159\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\SOH\DC2\EOT\159\SOH\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\ETX\DC2\EOT\159\SOH\SYN\ETB\n\
    \\SO\n\
    \\EOT\EOT\a\b\NUL\DC2\ACK\160\SOH\EOT\163\SOH\ENQ\n\
    \\r\n\
    \\ENQ\EOT\a\b\NUL\SOH\DC2\EOT\160\SOH\n\
    \\DC1\n\
    \\f\n\
    \\EOT\EOT\a\STX\SOH\DC2\EOT\161\SOH\b#\n\
    \\r\n\
    \\ENQ\EOT\a\STX\SOH\ACK\DC2\EOT\161\SOH\b\DC4\n\
    \\r\n\
    \\ENQ\EOT\a\STX\SOH\SOH\DC2\EOT\161\SOH\NAK\RS\n\
    \\r\n\
    \\ENQ\EOT\a\STX\SOH\ETX\DC2\EOT\161\SOH!\"\n\
    \\f\n\
    \\EOT\EOT\a\STX\STX\DC2\EOT\162\SOH\b3\n\
    \\r\n\
    \\ENQ\EOT\a\STX\STX\ACK\DC2\EOT\162\SOH\b'\n\
    \\r\n\
    \\ENQ\EOT\a\STX\STX\SOH\DC2\EOT\162\SOH(.\n\
    \\r\n\
    \\ENQ\EOT\a\STX\STX\ETX\DC2\EOT\162\SOH12\n\
    \\f\n\
    \\STX\EOT\b\DC2\ACK\166\SOH\NUL\168\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\b\SOH\DC2\EOT\166\SOH\b\DC4\n\
    \\f\n\
    \\EOT\EOT\b\STX\NUL\DC2\EOT\167\SOH\EOT0\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\ACK\DC2\EOT\167\SOH\EOT\"\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\SOH\DC2\EOT\167\SOH#+\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\ETX\DC2\EOT\167\SOH./\n\
    \?\n\
    \\STX\EOT\t\DC2\ACK\171\SOH\NUL\173\SOH\SOH\SUB1 Issued when the workflow completes successfully\n\
    \\n\
    \\v\n\
    \\ETX\EOT\t\SOH\DC2\EOT\171\SOH\b!\n\
    \\f\n\
    \\EOT\EOT\t\STX\NUL\DC2\EOT\172\SOH\EOT.\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\ACK\DC2\EOT\172\SOH\EOT\"\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\SOH\DC2\EOT\172\SOH#)\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\ETX\DC2\EOT\172\SOH,-\n\
    \3\n\
    \\STX\EOT\n\
    \\DC2\ACK\176\SOH\NUL\178\SOH\SOH\SUB% Issued when the workflow errors out\n\
    \\n\
    \\v\n\
    \\ETX\EOT\n\
    \\SOH\DC2\EOT\176\SOH\b\GS\n\
    \\f\n\
    \\EOT\EOT\n\
    \\STX\NUL\DC2\EOT\177\SOH\EOT0\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\ACK\DC2\EOT\177\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\SOH\DC2\EOT\177\SOH$+\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\ETX\DC2\EOT\177\SOH./\n\
    \8\n\
    \\STX\EOT\v\DC2\ACK\181\SOH\NUL\206\SOH\SOH\SUB* Continue the workflow as a new execution\n\
    \\n\
    \\v\n\
    \\ETX\EOT\v\SOH\DC2\EOT\181\SOH\b&\n\
    \R\n\
    \\EOT\EOT\v\STX\NUL\DC2\EOT\183\SOH\EOT\GS\SUBD The identifier the lang-specific sdk uses to execute workflow code\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\ENQ\DC2\EOT\183\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\SOH\DC2\EOT\183\SOH\v\CAN\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\ETX\DC2\EOT\183\SOH\ESC\FS\n\
    \9\n\
    \\EOT\EOT\v\STX\SOH\DC2\EOT\185\SOH\EOT\SUB\SUB+ Task queue for the new workflow execution\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\SOH\ENQ\DC2\EOT\185\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\SOH\SOH\DC2\EOT\185\SOH\v\NAK\n\
    \\r\n\
    \\ENQ\EOT\v\STX\SOH\ETX\DC2\EOT\185\SOH\CAN\EM\n\
    \\140\SOH\n\
    \\EOT\EOT\v\STX\STX\DC2\EOT\188\SOH\EOT:\SUB~ Inputs to the workflow code. Should be specified. Will not re-use old arguments, as that\n\
    \ typically wouldn't make any sense.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\EOT\DC2\EOT\188\SOH\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\ACK\DC2\EOT\188\SOH\r+\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\SOH\DC2\EOT\188\SOH,5\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\ETX\DC2\EOT\188\SOH89\n\
    \g\n\
    \\EOT\EOT\v\STX\ETX\DC2\EOT\190\SOH\EOT6\SUBY Timeout for a single run of the new workflow. Will not re-use current workflow's value.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ETX\ACK\DC2\EOT\190\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ETX\SOH\DC2\EOT\190\SOH\GS1\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ETX\ETX\DC2\EOT\190\SOH45\n\
    \\\\n\
    \\EOT\EOT\v\STX\EOT\DC2\EOT\192\SOH\EOT7\SUBN Timeout of a single workflow task. Will not re-use current workflow's value.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\EOT\ACK\DC2\EOT\192\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\v\STX\EOT\SOH\DC2\EOT\192\SOH\GS2\n\
    \\r\n\
    \\ENQ\EOT\v\STX\EOT\ETX\DC2\EOT\192\SOH56\n\
    \k\n\
    \\EOT\EOT\v\STX\ENQ\DC2\EOT\194\SOH\EOT9\SUB] If set, the new workflow will have this memo. If unset, re-uses the current workflow's memo\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ENQ\ACK\DC2\EOT\194\SOH\EOT/\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ENQ\SOH\DC2\EOT\194\SOH04\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ENQ\ETX\DC2\EOT\194\SOH78\n\
    \z\n\
    \\EOT\EOT\v\STX\ACK\DC2\EOT\197\SOH\EOT<\SUBl If set, the new workflow will have these headers. Will *not* re-use current workflow's\n\
    \ headers otherwise.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ACK\ACK\DC2\EOT\197\SOH\EOT/\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ACK\SOH\DC2\EOT\197\SOH07\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ACK\ETX\DC2\EOT\197\SOH:;\n\
    \\136\SOH\n\
    \\EOT\EOT\v\STX\a\DC2\EOT\200\SOH\EOTF\SUBz If set, the new workflow will have these search attributes. If unset, re-uses the current\n\
    \ workflow's search attributes.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\a\ACK\DC2\EOT\200\SOH\EOT/\n\
    \\r\n\
    \\ENQ\EOT\v\STX\a\SOH\DC2\EOT\200\SOH0A\n\
    \\r\n\
    \\ENQ\EOT\v\STX\a\ETX\DC2\EOT\200\SOHDE\n\
    \}\n\
    \\EOT\EOT\v\STX\b\DC2\EOT\203\SOH\EOT8\SUBo If set, the new workflow will have this retry policy. If unset, re-uses the current\n\
    \ workflow's retry policy.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\b\ACK\DC2\EOT\203\SOH\EOT&\n\
    \\r\n\
    \\ENQ\EOT\v\STX\b\SOH\DC2\EOT\203\SOH'3\n\
    \\r\n\
    \\ENQ\EOT\v\STX\b\ETX\DC2\EOT\203\SOH67\n\
    \h\n\
    \\EOT\EOT\v\STX\t\DC2\EOT\205\SOH\EOT;\SUBZ Whether the continued workflow should run on a worker with a compatible build id or not.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\t\ACK\DC2\EOT\205\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\v\STX\t\SOH\DC2\EOT\205\SOH$5\n\
    \\r\n\
    \\ENQ\EOT\v\STX\t\ETX\DC2\EOT\205\SOH8:\n\
    \\139\SOH\n\
    \\STX\EOT\f\DC2\EOT\210\SOH\NUL\"\SUB\DEL Indicate a workflow has completed as cancelled. Generally sent as a response to an activation\n\
    \ containing a cancellation job.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\f\SOH\DC2\EOT\210\SOH\b\US\n\
    \K\n\
    \\STX\EOT\r\DC2\ACK\213\SOH\NUL\221\SOH\SOH\SUB= A request to set/check if a certain patch is present or not\n\
    \\n\
    \\v\n\
    \\ETX\EOT\r\SOH\DC2\EOT\213\SOH\b\SYN\n\
    \\242\SOH\n\
    \\EOT\EOT\r\STX\NUL\DC2\EOT\217\SOH\EOT\CAN\SUB\227\SOH A user-chosen identifier for this patch. If the same identifier is used in multiple places in\n\
    \ the code, those places are considered to be versioned as one unit. IE: The check call will\n\
    \ return the same result for all of them\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\ENQ\DC2\EOT\217\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\SOH\DC2\EOT\217\SOH\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\ETX\DC2\EOT\217\SOH\SYN\ETB\n\
    \\180\SOH\n\
    \\EOT\EOT\r\STX\SOH\DC2\EOT\220\SOH\EOT\CAN\SUB\165\SOH Can be set to true to indicate that branches using this change are being removed, and all\n\
    \ future worker deployments will only have the \"with change\" code in them.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\ENQ\DC2\EOT\220\SOH\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\SOH\DC2\EOT\220\SOH\t\DC3\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\ETX\DC2\EOT\220\SOH\SYN\ETB\n\
    \0\n\
    \\STX\EOT\SO\DC2\ACK\224\SOH\NUL\255\SOH\SOH\SUB\" Start a child workflow execution\n\
    \\n\
    \\v\n\
    \\ETX\EOT\SO\SOH\DC2\EOT\224\SOH\b#\n\
    \T\n\
    \\EOT\EOT\SO\STX\NUL\DC2\EOT\226\SOH\EOT\DC3\SUBF Lang's incremental sequence number, used as the operation identifier\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\NUL\ENQ\DC2\EOT\226\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\NUL\SOH\DC2\EOT\226\SOH\v\SO\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\NUL\ETX\DC2\EOT\226\SOH\DC1\DC2\n\
    \\f\n\
    \\EOT\EOT\SO\STX\SOH\DC2\EOT\227\SOH\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\SOH\ENQ\DC2\EOT\227\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\SOH\SOH\DC2\EOT\227\SOH\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\SOH\ETX\DC2\EOT\227\SOH\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\SO\STX\STX\DC2\EOT\228\SOH\EOT\ESC\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\STX\ENQ\DC2\EOT\228\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\STX\SOH\DC2\EOT\228\SOH\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\STX\ETX\DC2\EOT\228\SOH\EM\SUB\n\
    \\f\n\
    \\EOT\EOT\SO\STX\ETX\DC2\EOT\229\SOH\EOT\GS\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ETX\ENQ\DC2\EOT\229\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ETX\SOH\DC2\EOT\229\SOH\v\CAN\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ETX\ETX\DC2\EOT\229\SOH\ESC\FS\n\
    \\f\n\
    \\EOT\EOT\SO\STX\EOT\DC2\EOT\230\SOH\EOT\SUB\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\EOT\ENQ\DC2\EOT\230\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\EOT\SOH\DC2\EOT\230\SOH\v\NAK\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\EOT\ETX\DC2\EOT\230\SOH\CAN\EM\n\
    \\f\n\
    \\EOT\EOT\SO\STX\ENQ\DC2\EOT\231\SOH\EOT6\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ENQ\EOT\DC2\EOT\231\SOH\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ENQ\ACK\DC2\EOT\231\SOH\r+\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ENQ\SOH\DC2\EOT\231\SOH,1\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ENQ\ETX\DC2\EOT\231\SOH45\n\
    \W\n\
    \\EOT\EOT\SO\STX\ACK\DC2\EOT\233\SOH\EOT<\SUBI Total workflow execution timeout including retries and continue as new.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ACK\ACK\DC2\EOT\233\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ACK\SOH\DC2\EOT\233\SOH\GS7\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ACK\ETX\DC2\EOT\233\SOH:;\n\
    \1\n\
    \\EOT\EOT\SO\STX\a\DC2\EOT\235\SOH\EOT6\SUB# Timeout of a single workflow run.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\a\ACK\DC2\EOT\235\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\a\SOH\DC2\EOT\235\SOH\GS1\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\a\ETX\DC2\EOT\235\SOH45\n\
    \2\n\
    \\EOT\EOT\SO\STX\b\DC2\EOT\237\SOH\EOT7\SUB$ Timeout of a single workflow task.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\b\ACK\DC2\EOT\237\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\b\SOH\DC2\EOT\237\SOH\GS2\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\b\ETX\DC2\EOT\237\SOH56\n\
    \7\n\
    \\EOT\EOT\SO\STX\t\DC2\EOT\239\SOH\EOT>\SUB) Default: PARENT_CLOSE_POLICY_TERMINATE.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\t\ACK\DC2\EOT\239\SOH\EOT$\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\t\SOH\DC2\EOT\239\SOH%8\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\t\ETX\DC2\EOT\239\SOH;=\n\
    \\148\SOH\n\
    \\EOT\EOT\SO\STX\n\
    \\DC2\EOT\242\SOH\EOTN\SUB\133\SOH string control = 11; (unused from StartChildWorkflowExecutionCommandAttributes)\n\
    \ Default: WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\n\
    \\ACK\DC2\EOT\242\SOH\EOT/\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\n\
    \\SOH\DC2\EOT\242\SOH0H\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\n\
    \\ETX\DC2\EOT\242\SOHKM\n\
    \\f\n\
    \\EOT\EOT\SO\STX\v\DC2\EOT\243\SOH\EOT9\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\v\ACK\DC2\EOT\243\SOH\EOT&\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\v\SOH\DC2\EOT\243\SOH'3\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\v\ETX\DC2\EOT\243\SOH68\n\
    \\f\n\
    \\EOT\EOT\SO\STX\f\DC2\EOT\244\SOH\EOT\RS\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\f\ENQ\DC2\EOT\244\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\f\SOH\DC2\EOT\244\SOH\v\CAN\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\f\ETX\DC2\EOT\244\SOH\ESC\GS\n\
    \\GS\n\
    \\EOT\EOT\SO\STX\r\DC2\EOT\246\SOH\EOT=\SUB\SI Header fields\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\r\ACK\DC2\EOT\246\SOH\EOT/\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\r\SOH\DC2\EOT\246\SOH07\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\r\ETX\DC2\EOT\246\SOH:<\n\
    \\ESC\n\
    \\EOT\EOT\SO\STX\SO\DC2\EOT\248\SOH\EOT:\SUB\r Memo fields\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\SO\ACK\DC2\EOT\248\SOH\EOT/\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\SO\SOH\DC2\EOT\248\SOH04\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\SO\ETX\DC2\EOT\248\SOH79\n\
    \!\n\
    \\EOT\EOT\SO\STX\SI\DC2\EOT\250\SOH\EOTG\SUB\DC3 Search attributes\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\SI\ACK\DC2\EOT\250\SOH\EOT/\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\SI\SOH\DC2\EOT\250\SOH0A\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\SI\ETX\DC2\EOT\250\SOHDF\n\
    \q\n\
    \\EOT\EOT\SO\STX\DLE\DC2\EOT\252\SOH\EOTH\SUBc Defines behaviour of the underlying workflow when child workflow cancellation has been requested.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\DLE\ACK\DC2\EOT\252\SOH\EOT0\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\DLE\SOH\DC2\EOT\252\SOH1B\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\DLE\ETX\DC2\EOT\252\SOHEG\n\
    \\\\n\
    \\EOT\EOT\SO\STX\DC1\DC2\EOT\254\SOH\EOT;\SUBN Whether this child should run on a worker with a compatible build id or not.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\DC1\ACK\DC2\EOT\254\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\DC1\SOH\DC2\EOT\254\SOH$5\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\DC1\ETX\DC2\EOT\254\SOH8:\n\
    \'\n\
    \\STX\EOT\SI\DC2\ACK\130\STX\NUL\133\STX\SOH\SUB\EM Cancel a child workflow\n\
    \\n\
    \\v\n\
    \\ETX\EOT\SI\SOH\DC2\EOT\130\STX\b$\n\
    \U\n\
    \\EOT\EOT\SI\STX\NUL\DC2\EOT\132\STX\EOT\"\SUBG Sequence number as given to the `StartChildWorkflowExecution` command\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\NUL\ENQ\DC2\EOT\132\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\NUL\SOH\DC2\EOT\132\STX\v\GS\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\NUL\ETX\DC2\EOT\132\STX !\n\
    \e\n\
    \\STX\EOT\DLE\DC2\ACK\136\STX\NUL\146\STX\SOH\SUBW Request cancellation of an external workflow execution (which may be a started child)\n\
    \\n\
    \\v\n\
    \\ETX\EOT\DLE\SOH\DC2\EOT\136\STX\b.\n\
    \T\n\
    \\EOT\EOT\DLE\STX\NUL\DC2\EOT\138\STX\EOT\DC3\SUBF Lang's incremental sequence number, used as the operation identifier\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\NUL\ENQ\DC2\EOT\138\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\NUL\SOH\DC2\EOT\138\STX\v\SO\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\NUL\ETX\DC2\EOT\138\STX\DC1\DC2\n\
    \1\n\
    \\EOT\EOT\DLE\b\NUL\DC2\ACK\140\STX\EOT\145\STX\ENQ\SUB! What workflow is being targeted\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\b\NUL\SOH\DC2\EOT\140\STX\n\
    \\DLE\n\
    \,\n\
    \\EOT\EOT\DLE\STX\SOH\DC2\EOT\142\STX\bB\SUB\RS A specific workflow instance\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\SOH\ACK\DC2\EOT\142\STX\b*\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\SOH\SOH\DC2\EOT\142\STX+=\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\SOH\ETX\DC2\EOT\142\STX@A\n\
    \g\n\
    \\EOT\EOT\DLE\STX\STX\DC2\EOT\144\STX\b%\SUBY The desired target must be a child of the issuing workflow, and this is its workflow id\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\STX\ENQ\DC2\EOT\144\STX\b\SO\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\STX\SOH\DC2\EOT\144\STX\SI \n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\STX\ETX\DC2\EOT\144\STX#$\n\
    \>\n\
    \\STX\EOT\DC1\DC2\ACK\149\STX\NUL\165\STX\SOH\SUB0 Send a signal to an external or child workflow\n\
    \\n\
    \\v\n\
    \\ETX\EOT\DC1\SOH\DC2\EOT\149\STX\b'\n\
    \T\n\
    \\EOT\EOT\DC1\STX\NUL\DC2\EOT\151\STX\EOT\DC3\SUBF Lang's incremental sequence number, used as the operation identifier\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\NUL\ENQ\DC2\EOT\151\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\NUL\SOH\DC2\EOT\151\STX\v\SO\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\NUL\ETX\DC2\EOT\151\STX\DC1\DC2\n\
    \1\n\
    \\EOT\EOT\DC1\b\NUL\DC2\ACK\153\STX\EOT\158\STX\ENQ\SUB! What workflow is being targeted\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\b\NUL\SOH\DC2\EOT\153\STX\n\
    \\DLE\n\
    \,\n\
    \\EOT\EOT\DC1\STX\SOH\DC2\EOT\155\STX\bB\SUB\RS A specific workflow instance\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SOH\ACK\DC2\EOT\155\STX\b*\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SOH\SOH\DC2\EOT\155\STX+=\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SOH\ETX\DC2\EOT\155\STX@A\n\
    \g\n\
    \\EOT\EOT\DC1\STX\STX\DC2\EOT\157\STX\b%\SUBY The desired target must be a child of the issuing workflow, and this is its workflow id\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\STX\ENQ\DC2\EOT\157\STX\b\SO\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\STX\SOH\DC2\EOT\157\STX\SI \n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\STX\ETX\DC2\EOT\157\STX#$\n\
    \*\n\
    \\EOT\EOT\DC1\STX\ETX\DC2\EOT\160\STX\EOT\ESC\SUB\FS Name of the signal handler\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ETX\ENQ\DC2\EOT\160\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ETX\SOH\DC2\EOT\160\STX\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ETX\ETX\DC2\EOT\160\STX\EM\SUB\n\
    \)\n\
    \\EOT\EOT\DC1\STX\EOT\DC2\EOT\162\STX\EOT5\SUB\ESC Arguments for the handler\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\EOT\EOT\DC2\EOT\162\STX\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\EOT\ACK\DC2\EOT\162\STX\r+\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\EOT\SOH\DC2\EOT\162\STX,0\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\EOT\ETX\DC2\EOT\162\STX34\n\
    \/\n\
    \\EOT\EOT\DC1\STX\ENQ\DC2\EOT\164\STX\EOT<\SUB! Headers to attach to the signal\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ENQ\ACK\DC2\EOT\164\STX\EOT/\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ENQ\SOH\DC2\EOT\164\STX07\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ENQ\ETX\DC2\EOT\164\STX:;\n\
    \a\n\
    \\STX\EOT\DC2\DC2\ACK\168\STX\NUL\171\STX\SOH\SUBS Can be used to cancel not-already-sent `SignalExternalWorkflowExecution` commands\n\
    \\n\
    \\v\n\
    \\ETX\EOT\DC2\SOH\DC2\EOT\168\STX\b\FS\n\
    \a\n\
    \\EOT\EOT\DC2\STX\NUL\DC2\EOT\170\STX\EOT\DC3\SUBS Lang's incremental sequence number as passed to `SignalExternalWorkflowExecution`\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\NUL\ENQ\DC2\EOT\170\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\NUL\SOH\DC2\EOT\170\STX\v\SO\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\NUL\ETX\DC2\EOT\170\STX\DC1\DC2\n\
    \\f\n\
    \\STX\EOT\DC3\DC2\ACK\173\STX\NUL\177\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\DC3\SOH\DC2\EOT\173\STX\b&\n\
    \r\n\
    \\EOT\EOT\DC3\STX\NUL\DC2\EOT\176\STX\EOTF\SUBd SearchAttributes fields - equivalent to indexed_fields on api. Key = search index, Value =\n\
    \ value?\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\NUL\ACK\DC2\EOT\176\STX\EOT/\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\NUL\SOH\DC2\EOT\176\STX0A\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\NUL\ETX\DC2\EOT\176\STXDE\n\
    \\f\n\
    \\STX\EOT\DC4\DC2\ACK\179\STX\NUL\184\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\DC4\SOH\DC2\EOT\179\STX\b \n\
    \\242\SOH\n\
    \\EOT\EOT\DC4\STX\NUL\DC2\EOT\183\STX\EOT2\SUB\227\SOH If set, update the workflow memo with the provided values. The values will be merged with\n\
    \ the existing memo. If the user wants to delete values, a default/empty Payload should be\n\
    \ used as the value for the key being deleted.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\NUL\ACK\DC2\EOT\183\STX\EOT\US\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\NUL\SOH\DC2\EOT\183\STX -\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\NUL\ETX\DC2\EOT\183\STX01\n\
    \\166\EOT\n\
    \\STX\EOT\NAK\DC2\ACK\195\STX\NUL\209\STX\SOH\SUB\151\EOT A reply to a `DoUpdate` job - lang must run the update's validator if told to, and then\n\
    \ immediately run the handler, if the update was accepted.\n\
    \\n\
    \ There must always be an accepted or rejected response immediately, in the same activation as\n\
    \ this job, to indicate the result of the validator. Accepted for ran and accepted or skipped, or\n\
    \ rejected for rejected.\n\
    \\n\
    \ Then, in the same or any subsequent activation, after the update handler has completed, respond\n\
    \ with completed or rejected as appropriate for the result of the handler.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\NAK\SOH\DC2\EOT\195\STX\b\SYN\n\
    \0\n\
    \\EOT\EOT\NAK\STX\NUL\DC2\EOT\197\STX\EOT$\SUB\" The protocol message instance ID\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\NUL\ENQ\DC2\EOT\197\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\NUL\SOH\DC2\EOT\197\STX\v\US\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\NUL\ETX\DC2\EOT\197\STX\"#\n\
    \\SO\n\
    \\EOT\EOT\NAK\b\NUL\DC2\ACK\198\STX\EOT\208\STX\ENQ\n\
    \\r\n\
    \\ENQ\EOT\NAK\b\NUL\SOH\DC2\EOT\198\STX\n\
    \\DC2\n\
    \\209\SOH\n\
    \\EOT\EOT\NAK\STX\SOH\DC2\EOT\202\STX\b+\SUB\194\SOH Must be sent if the update's validator has passed (or lang was not asked to run it, and\n\
    \ thus should be considered already-accepted, allowing lang to always send the same\n\
    \ sequence on replay).\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\SOH\ACK\DC2\EOT\202\STX\b\GS\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\SOH\SOH\DC2\EOT\202\STX\RS&\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\SOH\ETX\DC2\EOT\202\STX)*\n\
    \w\n\
    \\EOT\EOT\NAK\STX\STX\DC2\EOT\205\STX\b5\SUBi Must be sent if the update's validator does not pass, or after acceptance if the update\n\
    \ handler fails.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\STX\ACK\DC2\EOT\205\STX\b'\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\STX\SOH\DC2\EOT\205\STX(0\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\STX\ETX\DC2\EOT\205\STX34\n\
    \L\n\
    \\EOT\EOT\NAK\STX\ETX\DC2\EOT\207\STX\b5\SUB> Must be sent once the update handler completes successfully.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\ETX\ACK\DC2\EOT\207\STX\b&\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\ETX\SOH\DC2\EOT\207\STX'0\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\ETX\ETX\DC2\EOT\207\STX34b\ACKproto3"