{- This file was auto-generated from temporal/api/workflowservice/v1/request_response.proto by the proto-lens-protoc program. -}
{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-}
{-# OPTIONS_GHC -Wno-unused-imports#-}
{-# OPTIONS_GHC -Wno-duplicate-exports#-}
{-# OPTIONS_GHC -Wno-dodgy-exports#-}
module Proto.Temporal.Api.Workflowservice.V1.RequestResponse (
        CountWorkflowExecutionsRequest(),
        CountWorkflowExecutionsResponse(),
        CountWorkflowExecutionsResponse'AggregationGroup(),
        CreateScheduleRequest(), CreateScheduleResponse(),
        DeleteScheduleRequest(), DeleteScheduleResponse(),
        DeleteWorkflowExecutionRequest(),
        DeleteWorkflowExecutionResponse(), DeprecateNamespaceRequest(),
        DeprecateNamespaceResponse(), DescribeBatchOperationRequest(),
        DescribeBatchOperationResponse(), DescribeNamespaceRequest(),
        DescribeNamespaceResponse(), DescribeScheduleRequest(),
        DescribeScheduleResponse(), DescribeTaskQueueRequest(),
        DescribeTaskQueueResponse(),
        DescribeTaskQueueResponse'VersionsInfoEntry(),
        DescribeWorkflowExecutionRequest(),
        DescribeWorkflowExecutionResponse(),
        ExecuteMultiOperationRequest(),
        ExecuteMultiOperationRequest'Operation(),
        ExecuteMultiOperationRequest'Operation'Operation(..),
        _ExecuteMultiOperationRequest'Operation'StartWorkflow,
        _ExecuteMultiOperationRequest'Operation'UpdateWorkflow,
        ExecuteMultiOperationResponse(),
        ExecuteMultiOperationResponse'Response(),
        ExecuteMultiOperationResponse'Response'Response(..),
        _ExecuteMultiOperationResponse'Response'StartWorkflow,
        _ExecuteMultiOperationResponse'Response'UpdateWorkflow,
        GetClusterInfoRequest(), GetClusterInfoResponse(),
        GetClusterInfoResponse'SupportedClientsEntry(),
        GetSearchAttributesRequest(), GetSearchAttributesResponse(),
        GetSearchAttributesResponse'KeysEntry(), GetSystemInfoRequest(),
        GetSystemInfoResponse(), GetSystemInfoResponse'Capabilities(),
        GetWorkerBuildIdCompatibilityRequest(),
        GetWorkerBuildIdCompatibilityResponse(),
        GetWorkerTaskReachabilityRequest(),
        GetWorkerTaskReachabilityResponse(),
        GetWorkerVersioningRulesRequest(),
        GetWorkerVersioningRulesResponse(),
        GetWorkflowExecutionHistoryRequest(),
        GetWorkflowExecutionHistoryResponse(),
        GetWorkflowExecutionHistoryReverseRequest(),
        GetWorkflowExecutionHistoryReverseResponse(),
        ListArchivedWorkflowExecutionsRequest(),
        ListArchivedWorkflowExecutionsResponse(),
        ListBatchOperationsRequest(), ListBatchOperationsResponse(),
        ListClosedWorkflowExecutionsRequest(),
        ListClosedWorkflowExecutionsRequest'Filters(..),
        _ListClosedWorkflowExecutionsRequest'ExecutionFilter,
        _ListClosedWorkflowExecutionsRequest'TypeFilter,
        _ListClosedWorkflowExecutionsRequest'StatusFilter,
        ListClosedWorkflowExecutionsResponse(), ListNamespacesRequest(),
        ListNamespacesResponse(), ListOpenWorkflowExecutionsRequest(),
        ListOpenWorkflowExecutionsRequest'Filters(..),
        _ListOpenWorkflowExecutionsRequest'ExecutionFilter,
        _ListOpenWorkflowExecutionsRequest'TypeFilter,
        ListOpenWorkflowExecutionsResponse(),
        ListScheduleMatchingTimesRequest(),
        ListScheduleMatchingTimesResponse(), ListSchedulesRequest(),
        ListSchedulesResponse(), ListTaskQueuePartitionsRequest(),
        ListTaskQueuePartitionsResponse(), ListWorkflowExecutionsRequest(),
        ListWorkflowExecutionsResponse(), PatchScheduleRequest(),
        PatchScheduleResponse(), PollActivityTaskQueueRequest(),
        PollActivityTaskQueueResponse(), PollNexusTaskQueueRequest(),
        PollNexusTaskQueueResponse(), PollWorkflowExecutionUpdateRequest(),
        PollWorkflowExecutionUpdateResponse(),
        PollWorkflowTaskQueueRequest(), PollWorkflowTaskQueueResponse(),
        PollWorkflowTaskQueueResponse'QueriesEntry(),
        QueryWorkflowRequest(), QueryWorkflowResponse(),
        RecordActivityTaskHeartbeatByIdRequest(),
        RecordActivityTaskHeartbeatByIdResponse(),
        RecordActivityTaskHeartbeatRequest(),
        RecordActivityTaskHeartbeatResponse(), RegisterNamespaceRequest(),
        RegisterNamespaceRequest'DataEntry(), RegisterNamespaceResponse(),
        RequestCancelWorkflowExecutionRequest(),
        RequestCancelWorkflowExecutionResponse(),
        ResetStickyTaskQueueRequest(), ResetStickyTaskQueueResponse(),
        ResetWorkflowExecutionRequest(), ResetWorkflowExecutionResponse(),
        RespondActivityTaskCanceledByIdRequest(),
        RespondActivityTaskCanceledByIdResponse(),
        RespondActivityTaskCanceledRequest(),
        RespondActivityTaskCanceledResponse(),
        RespondActivityTaskCompletedByIdRequest(),
        RespondActivityTaskCompletedByIdResponse(),
        RespondActivityTaskCompletedRequest(),
        RespondActivityTaskCompletedResponse(),
        RespondActivityTaskFailedByIdRequest(),
        RespondActivityTaskFailedByIdResponse(),
        RespondActivityTaskFailedRequest(),
        RespondActivityTaskFailedResponse(),
        RespondNexusTaskCompletedRequest(),
        RespondNexusTaskCompletedResponse(),
        RespondNexusTaskFailedRequest(), RespondNexusTaskFailedResponse(),
        RespondQueryTaskCompletedRequest(),
        RespondQueryTaskCompletedResponse(),
        RespondWorkflowTaskCompletedRequest(),
        RespondWorkflowTaskCompletedRequest'QueryResultsEntry(),
        RespondWorkflowTaskCompletedResponse(),
        RespondWorkflowTaskFailedRequest(),
        RespondWorkflowTaskFailedResponse(),
        ScanWorkflowExecutionsRequest(), ScanWorkflowExecutionsResponse(),
        SignalWithStartWorkflowExecutionRequest(),
        SignalWithStartWorkflowExecutionResponse(),
        SignalWorkflowExecutionRequest(),
        SignalWorkflowExecutionResponse(), StartBatchOperationRequest(),
        StartBatchOperationRequest'Operation(..),
        _StartBatchOperationRequest'TerminationOperation,
        _StartBatchOperationRequest'SignalOperation,
        _StartBatchOperationRequest'CancellationOperation,
        _StartBatchOperationRequest'DeletionOperation,
        _StartBatchOperationRequest'ResetOperation,
        StartBatchOperationResponse(), StartWorkflowExecutionRequest(),
        StartWorkflowExecutionResponse(), StopBatchOperationRequest(),
        StopBatchOperationResponse(), TerminateWorkflowExecutionRequest(),
        TerminateWorkflowExecutionResponse(), UpdateNamespaceRequest(),
        UpdateNamespaceResponse(), UpdateScheduleRequest(),
        UpdateScheduleResponse(),
        UpdateWorkerBuildIdCompatibilityRequest(),
        UpdateWorkerBuildIdCompatibilityRequest'Operation(..),
        _UpdateWorkerBuildIdCompatibilityRequest'AddNewBuildIdInNewDefaultSet,
        _UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleBuildId,
        _UpdateWorkerBuildIdCompatibilityRequest'PromoteSetByBuildId,
        _UpdateWorkerBuildIdCompatibilityRequest'PromoteBuildIdWithinSet,
        _UpdateWorkerBuildIdCompatibilityRequest'MergeSets',
        UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion(),
        UpdateWorkerBuildIdCompatibilityRequest'MergeSets(),
        UpdateWorkerBuildIdCompatibilityResponse(),
        UpdateWorkerVersioningRulesRequest(),
        UpdateWorkerVersioningRulesRequest'Operation(..),
        _UpdateWorkerVersioningRulesRequest'InsertAssignmentRule,
        _UpdateWorkerVersioningRulesRequest'ReplaceAssignmentRule,
        _UpdateWorkerVersioningRulesRequest'DeleteAssignmentRule,
        _UpdateWorkerVersioningRulesRequest'AddCompatibleRedirectRule,
        _UpdateWorkerVersioningRulesRequest'ReplaceCompatibleRedirectRule,
        _UpdateWorkerVersioningRulesRequest'DeleteCompatibleRedirectRule,
        _UpdateWorkerVersioningRulesRequest'CommitBuildId',
        UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule(),
        UpdateWorkerVersioningRulesRequest'CommitBuildId(),
        UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule(),
        UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule(),
        UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule(),
        UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule(),
        UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule(),
        UpdateWorkerVersioningRulesResponse(),
        UpdateWorkflowExecutionRequest(), UpdateWorkflowExecutionResponse()
    ) where
import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism
import qualified Data.ProtoLens.Runtime.Prelude as Prelude
import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int
import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid
import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word
import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types
import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2
import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked
import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text
import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map
import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString
import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8
import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding
import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector
import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic
import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed
import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read
import qualified Proto.Google.Protobuf.Duration
import qualified Proto.Google.Protobuf.Timestamp
import qualified Proto.Temporal.Api.Batch.V1.Message
import qualified Proto.Temporal.Api.Command.V1.Message
import qualified Proto.Temporal.Api.Common.V1.Message
import qualified Proto.Temporal.Api.Enums.V1.BatchOperation
import qualified Proto.Temporal.Api.Enums.V1.Common
import qualified Proto.Temporal.Api.Enums.V1.FailedCause
import qualified Proto.Temporal.Api.Enums.V1.Namespace
import qualified Proto.Temporal.Api.Enums.V1.Query
import qualified Proto.Temporal.Api.Enums.V1.Reset
import qualified Proto.Temporal.Api.Enums.V1.TaskQueue
import qualified Proto.Temporal.Api.Enums.V1.Update
import qualified Proto.Temporal.Api.Enums.V1.Workflow
import qualified Proto.Temporal.Api.Failure.V1.Message
import qualified Proto.Temporal.Api.Filter.V1.Message
import qualified Proto.Temporal.Api.History.V1.Message
import qualified Proto.Temporal.Api.Namespace.V1.Message
import qualified Proto.Temporal.Api.Nexus.V1.Message
import qualified Proto.Temporal.Api.Protocol.V1.Message
import qualified Proto.Temporal.Api.Query.V1.Message
import qualified Proto.Temporal.Api.Replication.V1.Message
import qualified Proto.Temporal.Api.Schedule.V1.Message
import qualified Proto.Temporal.Api.Sdk.V1.TaskCompleteMetadata
import qualified Proto.Temporal.Api.Taskqueue.V1.Message
import qualified Proto.Temporal.Api.Update.V1.Message
import qualified Proto.Temporal.Api.Version.V1.Message
import qualified Proto.Temporal.Api.Workflow.V1.Message
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' CountWorkflowExecutionsRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.query' @:: Lens' CountWorkflowExecutionsRequest Data.Text.Text@ -}
data CountWorkflowExecutionsRequest
  = CountWorkflowExecutionsRequest'_constructor {CountWorkflowExecutionsRequest -> Text
_CountWorkflowExecutionsRequest'namespace :: !Data.Text.Text,
                                                 CountWorkflowExecutionsRequest -> Text
_CountWorkflowExecutionsRequest'query :: !Data.Text.Text,
                                                 CountWorkflowExecutionsRequest -> FieldSet
_CountWorkflowExecutionsRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Bool
(CountWorkflowExecutionsRequest
 -> CountWorkflowExecutionsRequest -> Bool)
-> (CountWorkflowExecutionsRequest
    -> CountWorkflowExecutionsRequest -> Bool)
-> Eq CountWorkflowExecutionsRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Bool
== :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Bool
$c/= :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Bool
/= :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Bool
Prelude.Eq, Eq CountWorkflowExecutionsRequest
Eq CountWorkflowExecutionsRequest =>
(CountWorkflowExecutionsRequest
 -> CountWorkflowExecutionsRequest -> Ordering)
-> (CountWorkflowExecutionsRequest
    -> CountWorkflowExecutionsRequest -> Bool)
-> (CountWorkflowExecutionsRequest
    -> CountWorkflowExecutionsRequest -> Bool)
-> (CountWorkflowExecutionsRequest
    -> CountWorkflowExecutionsRequest -> Bool)
-> (CountWorkflowExecutionsRequest
    -> CountWorkflowExecutionsRequest -> Bool)
-> (CountWorkflowExecutionsRequest
    -> CountWorkflowExecutionsRequest
    -> CountWorkflowExecutionsRequest)
-> (CountWorkflowExecutionsRequest
    -> CountWorkflowExecutionsRequest
    -> CountWorkflowExecutionsRequest)
-> Ord CountWorkflowExecutionsRequest
CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Bool
CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Ordering
CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> CountWorkflowExecutionsRequest
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 :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Ordering
compare :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Ordering
$c< :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Bool
< :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Bool
$c<= :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Bool
<= :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Bool
$c> :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Bool
> :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Bool
$c>= :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Bool
>= :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> Bool
$cmax :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> CountWorkflowExecutionsRequest
max :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> CountWorkflowExecutionsRequest
$cmin :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> CountWorkflowExecutionsRequest
min :: CountWorkflowExecutionsRequest
-> CountWorkflowExecutionsRequest -> CountWorkflowExecutionsRequest
Prelude.Ord)
instance Prelude.Show CountWorkflowExecutionsRequest where
  showsPrec :: Int -> CountWorkflowExecutionsRequest -> ShowS
showsPrec Int
_ CountWorkflowExecutionsRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (CountWorkflowExecutionsRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CountWorkflowExecutionsRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField CountWorkflowExecutionsRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> CountWorkflowExecutionsRequest
-> f CountWorkflowExecutionsRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> CountWorkflowExecutionsRequest
 -> f CountWorkflowExecutionsRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> CountWorkflowExecutionsRequest
-> f CountWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CountWorkflowExecutionsRequest -> Text)
-> (CountWorkflowExecutionsRequest
    -> Text -> CountWorkflowExecutionsRequest)
-> Lens
     CountWorkflowExecutionsRequest
     CountWorkflowExecutionsRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CountWorkflowExecutionsRequest -> Text
_CountWorkflowExecutionsRequest'namespace
           (\ CountWorkflowExecutionsRequest
x__ Text
y__
              -> CountWorkflowExecutionsRequest
x__ {_CountWorkflowExecutionsRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CountWorkflowExecutionsRequest "query" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "query"
-> (Text -> f Text)
-> CountWorkflowExecutionsRequest
-> f CountWorkflowExecutionsRequest
fieldOf Proxy# "query"
_
    = ((Text -> f Text)
 -> CountWorkflowExecutionsRequest
 -> f CountWorkflowExecutionsRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> CountWorkflowExecutionsRequest
-> f CountWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CountWorkflowExecutionsRequest -> Text)
-> (CountWorkflowExecutionsRequest
    -> Text -> CountWorkflowExecutionsRequest)
-> Lens
     CountWorkflowExecutionsRequest
     CountWorkflowExecutionsRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CountWorkflowExecutionsRequest -> Text
_CountWorkflowExecutionsRequest'query
           (\ CountWorkflowExecutionsRequest
x__ Text
y__ -> CountWorkflowExecutionsRequest
x__ {_CountWorkflowExecutionsRequest'query = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CountWorkflowExecutionsRequest where
  messageName :: Proxy CountWorkflowExecutionsRequest -> Text
messageName Proxy CountWorkflowExecutionsRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.CountWorkflowExecutionsRequest"
  packedMessageDescriptor :: Proxy CountWorkflowExecutionsRequest -> ByteString
packedMessageDescriptor Proxy CountWorkflowExecutionsRequest
_
    = ByteString
"\n\
      \\RSCountWorkflowExecutionsRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\DC4\n\
      \\ENQquery\CAN\STX \SOH(\tR\ENQquery"
  packedFileDescriptor :: Proxy CountWorkflowExecutionsRequest -> ByteString
packedFileDescriptor Proxy CountWorkflowExecutionsRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CountWorkflowExecutionsRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor CountWorkflowExecutionsRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor CountWorkflowExecutionsRequest Text
-> FieldDescriptor CountWorkflowExecutionsRequest
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
     CountWorkflowExecutionsRequest
     CountWorkflowExecutionsRequest
     Text
     Text
-> FieldAccessor CountWorkflowExecutionsRequest 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 CountWorkflowExecutionsRequest
        query__field_descriptor :: FieldDescriptor CountWorkflowExecutionsRequest
query__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor CountWorkflowExecutionsRequest Text
-> FieldDescriptor CountWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"query"
              (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
     CountWorkflowExecutionsRequest
     CountWorkflowExecutionsRequest
     Text
     Text
-> FieldAccessor CountWorkflowExecutionsRequest 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 @"query")) ::
              Data.ProtoLens.FieldDescriptor CountWorkflowExecutionsRequest
      in
        [(Tag, FieldDescriptor CountWorkflowExecutionsRequest)]
-> Map Tag (FieldDescriptor CountWorkflowExecutionsRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor CountWorkflowExecutionsRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor CountWorkflowExecutionsRequest
query__field_descriptor)]
  unknownFields :: Lens' CountWorkflowExecutionsRequest FieldSet
unknownFields
    = (CountWorkflowExecutionsRequest -> FieldSet)
-> (CountWorkflowExecutionsRequest
    -> FieldSet -> CountWorkflowExecutionsRequest)
-> Lens' CountWorkflowExecutionsRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CountWorkflowExecutionsRequest -> FieldSet
_CountWorkflowExecutionsRequest'_unknownFields
        (\ CountWorkflowExecutionsRequest
x__ FieldSet
y__
           -> CountWorkflowExecutionsRequest
x__ {_CountWorkflowExecutionsRequest'_unknownFields = y__})
  defMessage :: CountWorkflowExecutionsRequest
defMessage
    = CountWorkflowExecutionsRequest'_constructor
        {_CountWorkflowExecutionsRequest'namespace :: Text
_CountWorkflowExecutionsRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CountWorkflowExecutionsRequest'query :: Text
_CountWorkflowExecutionsRequest'query = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CountWorkflowExecutionsRequest'_unknownFields :: FieldSet
_CountWorkflowExecutionsRequest'_unknownFields = []}
  parseMessage :: Parser CountWorkflowExecutionsRequest
parseMessage
    = let
        loop ::
          CountWorkflowExecutionsRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser CountWorkflowExecutionsRequest
        loop :: CountWorkflowExecutionsRequest
-> Parser CountWorkflowExecutionsRequest
loop CountWorkflowExecutionsRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"query"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"query") 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 CountWorkflowExecutionsRequest
-> String -> Parser CountWorkflowExecutionsRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do CountWorkflowExecutionsRequest
-> Parser CountWorkflowExecutionsRequest
loop CountWorkflowExecutionsRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"CountWorkflowExecutionsRequest"
  buildMessage :: CountWorkflowExecutionsRequest -> Builder
buildMessage
    = \ CountWorkflowExecutionsRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  CountWorkflowExecutionsRequest
  CountWorkflowExecutionsRequest
  Text
  Text
-> CountWorkflowExecutionsRequest -> 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") CountWorkflowExecutionsRequest
_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
  CountWorkflowExecutionsRequest
  CountWorkflowExecutionsRequest
  Text
  Text
-> CountWorkflowExecutionsRequest -> 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 @"query") CountWorkflowExecutionsRequest
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  CountWorkflowExecutionsRequest
  CountWorkflowExecutionsRequest
  FieldSet
  FieldSet
-> CountWorkflowExecutionsRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CountWorkflowExecutionsRequest
  CountWorkflowExecutionsRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' CountWorkflowExecutionsRequest FieldSet
Data.ProtoLens.unknownFields CountWorkflowExecutionsRequest
_x)))
instance Control.DeepSeq.NFData CountWorkflowExecutionsRequest where
  rnf :: CountWorkflowExecutionsRequest -> ()
rnf
    = \ CountWorkflowExecutionsRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CountWorkflowExecutionsRequest -> FieldSet
_CountWorkflowExecutionsRequest'_unknownFields CountWorkflowExecutionsRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (CountWorkflowExecutionsRequest -> Text
_CountWorkflowExecutionsRequest'namespace CountWorkflowExecutionsRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (CountWorkflowExecutionsRequest -> Text
_CountWorkflowExecutionsRequest'query CountWorkflowExecutionsRequest
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.count' @:: Lens' CountWorkflowExecutionsResponse Data.Int.Int64@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.groups' @:: Lens' CountWorkflowExecutionsResponse [CountWorkflowExecutionsResponse'AggregationGroup]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'groups' @:: Lens' CountWorkflowExecutionsResponse (Data.Vector.Vector CountWorkflowExecutionsResponse'AggregationGroup)@ -}
data CountWorkflowExecutionsResponse
  = CountWorkflowExecutionsResponse'_constructor {CountWorkflowExecutionsResponse -> Int64
_CountWorkflowExecutionsResponse'count :: !Data.Int.Int64,
                                                  CountWorkflowExecutionsResponse
-> Vector CountWorkflowExecutionsResponse'AggregationGroup
_CountWorkflowExecutionsResponse'groups :: !(Data.Vector.Vector CountWorkflowExecutionsResponse'AggregationGroup),
                                                  CountWorkflowExecutionsResponse -> FieldSet
_CountWorkflowExecutionsResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Bool
(CountWorkflowExecutionsResponse
 -> CountWorkflowExecutionsResponse -> Bool)
-> (CountWorkflowExecutionsResponse
    -> CountWorkflowExecutionsResponse -> Bool)
-> Eq CountWorkflowExecutionsResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Bool
== :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Bool
$c/= :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Bool
/= :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Bool
Prelude.Eq, Eq CountWorkflowExecutionsResponse
Eq CountWorkflowExecutionsResponse =>
(CountWorkflowExecutionsResponse
 -> CountWorkflowExecutionsResponse -> Ordering)
-> (CountWorkflowExecutionsResponse
    -> CountWorkflowExecutionsResponse -> Bool)
-> (CountWorkflowExecutionsResponse
    -> CountWorkflowExecutionsResponse -> Bool)
-> (CountWorkflowExecutionsResponse
    -> CountWorkflowExecutionsResponse -> Bool)
-> (CountWorkflowExecutionsResponse
    -> CountWorkflowExecutionsResponse -> Bool)
-> (CountWorkflowExecutionsResponse
    -> CountWorkflowExecutionsResponse
    -> CountWorkflowExecutionsResponse)
-> (CountWorkflowExecutionsResponse
    -> CountWorkflowExecutionsResponse
    -> CountWorkflowExecutionsResponse)
-> Ord CountWorkflowExecutionsResponse
CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Bool
CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Ordering
CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse
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 :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Ordering
compare :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Ordering
$c< :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Bool
< :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Bool
$c<= :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Bool
<= :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Bool
$c> :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Bool
> :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Bool
$c>= :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Bool
>= :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse -> Bool
$cmax :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse
max :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse
$cmin :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse
min :: CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse
-> CountWorkflowExecutionsResponse
Prelude.Ord)
instance Prelude.Show CountWorkflowExecutionsResponse where
  showsPrec :: Int -> CountWorkflowExecutionsResponse -> ShowS
showsPrec Int
_ CountWorkflowExecutionsResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (CountWorkflowExecutionsResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CountWorkflowExecutionsResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField CountWorkflowExecutionsResponse "count" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "count"
-> (Int64 -> f Int64)
-> CountWorkflowExecutionsResponse
-> f CountWorkflowExecutionsResponse
fieldOf Proxy# "count"
_
    = ((Int64 -> f Int64)
 -> CountWorkflowExecutionsResponse
 -> f CountWorkflowExecutionsResponse)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> CountWorkflowExecutionsResponse
-> f CountWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CountWorkflowExecutionsResponse -> Int64)
-> (CountWorkflowExecutionsResponse
    -> Int64 -> CountWorkflowExecutionsResponse)
-> Lens
     CountWorkflowExecutionsResponse
     CountWorkflowExecutionsResponse
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CountWorkflowExecutionsResponse -> Int64
_CountWorkflowExecutionsResponse'count
           (\ CountWorkflowExecutionsResponse
x__ Int64
y__ -> CountWorkflowExecutionsResponse
x__ {_CountWorkflowExecutionsResponse'count = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CountWorkflowExecutionsResponse "groups" [CountWorkflowExecutionsResponse'AggregationGroup] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "groups"
-> ([CountWorkflowExecutionsResponse'AggregationGroup]
    -> f [CountWorkflowExecutionsResponse'AggregationGroup])
-> CountWorkflowExecutionsResponse
-> f CountWorkflowExecutionsResponse
fieldOf Proxy# "groups"
_
    = ((Vector CountWorkflowExecutionsResponse'AggregationGroup
  -> f (Vector CountWorkflowExecutionsResponse'AggregationGroup))
 -> CountWorkflowExecutionsResponse
 -> f CountWorkflowExecutionsResponse)
-> (([CountWorkflowExecutionsResponse'AggregationGroup]
     -> f [CountWorkflowExecutionsResponse'AggregationGroup])
    -> Vector CountWorkflowExecutionsResponse'AggregationGroup
    -> f (Vector CountWorkflowExecutionsResponse'AggregationGroup))
-> ([CountWorkflowExecutionsResponse'AggregationGroup]
    -> f [CountWorkflowExecutionsResponse'AggregationGroup])
-> CountWorkflowExecutionsResponse
-> f CountWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CountWorkflowExecutionsResponse
 -> Vector CountWorkflowExecutionsResponse'AggregationGroup)
-> (CountWorkflowExecutionsResponse
    -> Vector CountWorkflowExecutionsResponse'AggregationGroup
    -> CountWorkflowExecutionsResponse)
-> Lens
     CountWorkflowExecutionsResponse
     CountWorkflowExecutionsResponse
     (Vector CountWorkflowExecutionsResponse'AggregationGroup)
     (Vector CountWorkflowExecutionsResponse'AggregationGroup)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CountWorkflowExecutionsResponse
-> Vector CountWorkflowExecutionsResponse'AggregationGroup
_CountWorkflowExecutionsResponse'groups
           (\ CountWorkflowExecutionsResponse
x__ Vector CountWorkflowExecutionsResponse'AggregationGroup
y__ -> CountWorkflowExecutionsResponse
x__ {_CountWorkflowExecutionsResponse'groups = y__}))
        ((Vector CountWorkflowExecutionsResponse'AggregationGroup
 -> [CountWorkflowExecutionsResponse'AggregationGroup])
-> (Vector CountWorkflowExecutionsResponse'AggregationGroup
    -> [CountWorkflowExecutionsResponse'AggregationGroup]
    -> Vector CountWorkflowExecutionsResponse'AggregationGroup)
-> Lens
     (Vector CountWorkflowExecutionsResponse'AggregationGroup)
     (Vector CountWorkflowExecutionsResponse'AggregationGroup)
     [CountWorkflowExecutionsResponse'AggregationGroup]
     [CountWorkflowExecutionsResponse'AggregationGroup]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector CountWorkflowExecutionsResponse'AggregationGroup
-> [CountWorkflowExecutionsResponse'AggregationGroup]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector CountWorkflowExecutionsResponse'AggregationGroup
_ [CountWorkflowExecutionsResponse'AggregationGroup]
y__ -> [CountWorkflowExecutionsResponse'AggregationGroup]
-> Vector CountWorkflowExecutionsResponse'AggregationGroup
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [CountWorkflowExecutionsResponse'AggregationGroup]
y__))
instance Data.ProtoLens.Field.HasField CountWorkflowExecutionsResponse "vec'groups" (Data.Vector.Vector CountWorkflowExecutionsResponse'AggregationGroup) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'groups"
-> (Vector CountWorkflowExecutionsResponse'AggregationGroup
    -> f (Vector CountWorkflowExecutionsResponse'AggregationGroup))
-> CountWorkflowExecutionsResponse
-> f CountWorkflowExecutionsResponse
fieldOf Proxy# "vec'groups"
_
    = ((Vector CountWorkflowExecutionsResponse'AggregationGroup
  -> f (Vector CountWorkflowExecutionsResponse'AggregationGroup))
 -> CountWorkflowExecutionsResponse
 -> f CountWorkflowExecutionsResponse)
-> ((Vector CountWorkflowExecutionsResponse'AggregationGroup
     -> f (Vector CountWorkflowExecutionsResponse'AggregationGroup))
    -> Vector CountWorkflowExecutionsResponse'AggregationGroup
    -> f (Vector CountWorkflowExecutionsResponse'AggregationGroup))
-> (Vector CountWorkflowExecutionsResponse'AggregationGroup
    -> f (Vector CountWorkflowExecutionsResponse'AggregationGroup))
-> CountWorkflowExecutionsResponse
-> f CountWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CountWorkflowExecutionsResponse
 -> Vector CountWorkflowExecutionsResponse'AggregationGroup)
-> (CountWorkflowExecutionsResponse
    -> Vector CountWorkflowExecutionsResponse'AggregationGroup
    -> CountWorkflowExecutionsResponse)
-> Lens
     CountWorkflowExecutionsResponse
     CountWorkflowExecutionsResponse
     (Vector CountWorkflowExecutionsResponse'AggregationGroup)
     (Vector CountWorkflowExecutionsResponse'AggregationGroup)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CountWorkflowExecutionsResponse
-> Vector CountWorkflowExecutionsResponse'AggregationGroup
_CountWorkflowExecutionsResponse'groups
           (\ CountWorkflowExecutionsResponse
x__ Vector CountWorkflowExecutionsResponse'AggregationGroup
y__ -> CountWorkflowExecutionsResponse
x__ {_CountWorkflowExecutionsResponse'groups = y__}))
        (Vector CountWorkflowExecutionsResponse'AggregationGroup
 -> f (Vector CountWorkflowExecutionsResponse'AggregationGroup))
-> Vector CountWorkflowExecutionsResponse'AggregationGroup
-> f (Vector CountWorkflowExecutionsResponse'AggregationGroup)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CountWorkflowExecutionsResponse where
  messageName :: Proxy CountWorkflowExecutionsResponse -> Text
messageName Proxy CountWorkflowExecutionsResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.CountWorkflowExecutionsResponse"
  packedMessageDescriptor :: Proxy CountWorkflowExecutionsResponse -> ByteString
packedMessageDescriptor Proxy CountWorkflowExecutionsResponse
_
    = ByteString
"\n\
      \\USCountWorkflowExecutionsResponse\DC2\DC4\n\
      \\ENQcount\CAN\SOH \SOH(\ETXR\ENQcount\DC2i\n\
      \\ACKgroups\CAN\STX \ETX(\v2Q.temporal.api.workflowservice.v1.CountWorkflowExecutionsResponse.AggregationGroupR\ACKgroups\SUBl\n\
      \\DLEAggregationGroup\DC2B\n\
      \\fgroup_values\CAN\SOH \ETX(\v2\US.temporal.api.common.v1.PayloadR\vgroupValues\DC2\DC4\n\
      \\ENQcount\CAN\STX \SOH(\ETXR\ENQcount"
  packedFileDescriptor :: Proxy CountWorkflowExecutionsResponse -> ByteString
packedFileDescriptor Proxy CountWorkflowExecutionsResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CountWorkflowExecutionsResponse)
fieldsByTag
    = let
        count__field_descriptor :: FieldDescriptor CountWorkflowExecutionsResponse
count__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor CountWorkflowExecutionsResponse Int64
-> FieldDescriptor CountWorkflowExecutionsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"count"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens
     CountWorkflowExecutionsResponse
     CountWorkflowExecutionsResponse
     Int64
     Int64
-> FieldAccessor CountWorkflowExecutionsResponse Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"count")) ::
              Data.ProtoLens.FieldDescriptor CountWorkflowExecutionsResponse
        groups__field_descriptor :: FieldDescriptor CountWorkflowExecutionsResponse
groups__field_descriptor
          = String
-> FieldTypeDescriptor
     CountWorkflowExecutionsResponse'AggregationGroup
-> FieldAccessor
     CountWorkflowExecutionsResponse
     CountWorkflowExecutionsResponse'AggregationGroup
-> FieldDescriptor CountWorkflowExecutionsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"groups"
              (MessageOrGroup
-> FieldTypeDescriptor
     CountWorkflowExecutionsResponse'AggregationGroup
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor CountWorkflowExecutionsResponse'AggregationGroup)
              (Packing
-> Lens'
     CountWorkflowExecutionsResponse
     [CountWorkflowExecutionsResponse'AggregationGroup]
-> FieldAccessor
     CountWorkflowExecutionsResponse
     CountWorkflowExecutionsResponse'AggregationGroup
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 @"groups")) ::
              Data.ProtoLens.FieldDescriptor CountWorkflowExecutionsResponse
      in
        [(Tag, FieldDescriptor CountWorkflowExecutionsResponse)]
-> Map Tag (FieldDescriptor CountWorkflowExecutionsResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor CountWorkflowExecutionsResponse
count__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor CountWorkflowExecutionsResponse
groups__field_descriptor)]
  unknownFields :: Lens' CountWorkflowExecutionsResponse FieldSet
unknownFields
    = (CountWorkflowExecutionsResponse -> FieldSet)
-> (CountWorkflowExecutionsResponse
    -> FieldSet -> CountWorkflowExecutionsResponse)
-> Lens' CountWorkflowExecutionsResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CountWorkflowExecutionsResponse -> FieldSet
_CountWorkflowExecutionsResponse'_unknownFields
        (\ CountWorkflowExecutionsResponse
x__ FieldSet
y__
           -> CountWorkflowExecutionsResponse
x__ {_CountWorkflowExecutionsResponse'_unknownFields = y__})
  defMessage :: CountWorkflowExecutionsResponse
defMessage
    = CountWorkflowExecutionsResponse'_constructor
        {_CountWorkflowExecutionsResponse'count :: Int64
_CountWorkflowExecutionsResponse'count = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CountWorkflowExecutionsResponse'groups :: Vector CountWorkflowExecutionsResponse'AggregationGroup
_CountWorkflowExecutionsResponse'groups = Vector CountWorkflowExecutionsResponse'AggregationGroup
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _CountWorkflowExecutionsResponse'_unknownFields :: FieldSet
_CountWorkflowExecutionsResponse'_unknownFields = []}
  parseMessage :: Parser CountWorkflowExecutionsResponse
parseMessage
    = let
        loop ::
          CountWorkflowExecutionsResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld CountWorkflowExecutionsResponse'AggregationGroup
             -> Data.ProtoLens.Encoding.Bytes.Parser CountWorkflowExecutionsResponse
        loop :: CountWorkflowExecutionsResponse
-> Growing
     Vector RealWorld CountWorkflowExecutionsResponse'AggregationGroup
-> Parser CountWorkflowExecutionsResponse
loop CountWorkflowExecutionsResponse
x Growing
  Vector RealWorld CountWorkflowExecutionsResponse'AggregationGroup
mutable'groups
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'groups <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                         (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                            mutable'groups)
                      (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'groups") frozen'groups x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
8 -> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"count"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"count") y x)
                                  mutable'groups
                        Word64
18
                          -> do !y <- Parser CountWorkflowExecutionsResponse'AggregationGroup
-> String
-> Parser CountWorkflowExecutionsResponse'AggregationGroup
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"groups"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'groups y)
                                loop x v
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
                                  mutable'groups
      in
        Parser CountWorkflowExecutionsResponse
-> String -> Parser CountWorkflowExecutionsResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'groups <- IO
  (Growing
     Vector RealWorld CountWorkflowExecutionsResponse'AggregationGroup)
-> Parser
     (Growing
        Vector RealWorld CountWorkflowExecutionsResponse'AggregationGroup)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                  IO
  (Growing
     Vector RealWorld CountWorkflowExecutionsResponse'AggregationGroup)
IO
  (Growing
     Vector
     (PrimState IO)
     CountWorkflowExecutionsResponse'AggregationGroup)
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'groups)
          String
"CountWorkflowExecutionsResponse"
  buildMessage :: CountWorkflowExecutionsResponse -> Builder
buildMessage
    = \ CountWorkflowExecutionsResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v = FoldLike
  Int64
  CountWorkflowExecutionsResponse
  CountWorkflowExecutionsResponse
  Int64
  Int64
-> CountWorkflowExecutionsResponse -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"count") CountWorkflowExecutionsResponse
_x
              in
                if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
8)
                      ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                ((CountWorkflowExecutionsResponse'AggregationGroup -> Builder)
-> Vector CountWorkflowExecutionsResponse'AggregationGroup
-> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                   (\ CountWorkflowExecutionsResponse'AggregationGroup
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                           ((ByteString -> Builder)
-> (CountWorkflowExecutionsResponse'AggregationGroup -> ByteString)
-> CountWorkflowExecutionsResponse'AggregationGroup
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ ByteString
bs
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                              CountWorkflowExecutionsResponse'AggregationGroup -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage CountWorkflowExecutionsResponse'AggregationGroup
_v))
                   (FoldLike
  (Vector CountWorkflowExecutionsResponse'AggregationGroup)
  CountWorkflowExecutionsResponse
  CountWorkflowExecutionsResponse
  (Vector CountWorkflowExecutionsResponse'AggregationGroup)
  (Vector CountWorkflowExecutionsResponse'AggregationGroup)
-> CountWorkflowExecutionsResponse
-> Vector CountWorkflowExecutionsResponse'AggregationGroup
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'groups") CountWorkflowExecutionsResponse
_x))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  CountWorkflowExecutionsResponse
  CountWorkflowExecutionsResponse
  FieldSet
  FieldSet
-> CountWorkflowExecutionsResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CountWorkflowExecutionsResponse
  CountWorkflowExecutionsResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' CountWorkflowExecutionsResponse FieldSet
Data.ProtoLens.unknownFields CountWorkflowExecutionsResponse
_x)))
instance Control.DeepSeq.NFData CountWorkflowExecutionsResponse where
  rnf :: CountWorkflowExecutionsResponse -> ()
rnf
    = \ CountWorkflowExecutionsResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CountWorkflowExecutionsResponse -> FieldSet
_CountWorkflowExecutionsResponse'_unknownFields CountWorkflowExecutionsResponse
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (CountWorkflowExecutionsResponse -> Int64
_CountWorkflowExecutionsResponse'count CountWorkflowExecutionsResponse
x__)
                (Vector CountWorkflowExecutionsResponse'AggregationGroup -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (CountWorkflowExecutionsResponse
-> Vector CountWorkflowExecutionsResponse'AggregationGroup
_CountWorkflowExecutionsResponse'groups CountWorkflowExecutionsResponse
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.groupValues' @:: Lens' CountWorkflowExecutionsResponse'AggregationGroup [Proto.Temporal.Api.Common.V1.Message.Payload]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'groupValues' @:: Lens' CountWorkflowExecutionsResponse'AggregationGroup (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.count' @:: Lens' CountWorkflowExecutionsResponse'AggregationGroup Data.Int.Int64@ -}
data CountWorkflowExecutionsResponse'AggregationGroup
  = CountWorkflowExecutionsResponse'AggregationGroup'_constructor {CountWorkflowExecutionsResponse'AggregationGroup -> Vector Payload
_CountWorkflowExecutionsResponse'AggregationGroup'groupValues :: !(Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload),
                                                                   CountWorkflowExecutionsResponse'AggregationGroup -> Int64
_CountWorkflowExecutionsResponse'AggregationGroup'count :: !Data.Int.Int64,
                                                                   CountWorkflowExecutionsResponse'AggregationGroup -> FieldSet
_CountWorkflowExecutionsResponse'AggregationGroup'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Bool
(CountWorkflowExecutionsResponse'AggregationGroup
 -> CountWorkflowExecutionsResponse'AggregationGroup -> Bool)
-> (CountWorkflowExecutionsResponse'AggregationGroup
    -> CountWorkflowExecutionsResponse'AggregationGroup -> Bool)
-> Eq CountWorkflowExecutionsResponse'AggregationGroup
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Bool
== :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Bool
$c/= :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Bool
/= :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Bool
Prelude.Eq, Eq CountWorkflowExecutionsResponse'AggregationGroup
Eq CountWorkflowExecutionsResponse'AggregationGroup =>
(CountWorkflowExecutionsResponse'AggregationGroup
 -> CountWorkflowExecutionsResponse'AggregationGroup -> Ordering)
-> (CountWorkflowExecutionsResponse'AggregationGroup
    -> CountWorkflowExecutionsResponse'AggregationGroup -> Bool)
-> (CountWorkflowExecutionsResponse'AggregationGroup
    -> CountWorkflowExecutionsResponse'AggregationGroup -> Bool)
-> (CountWorkflowExecutionsResponse'AggregationGroup
    -> CountWorkflowExecutionsResponse'AggregationGroup -> Bool)
-> (CountWorkflowExecutionsResponse'AggregationGroup
    -> CountWorkflowExecutionsResponse'AggregationGroup -> Bool)
-> (CountWorkflowExecutionsResponse'AggregationGroup
    -> CountWorkflowExecutionsResponse'AggregationGroup
    -> CountWorkflowExecutionsResponse'AggregationGroup)
-> (CountWorkflowExecutionsResponse'AggregationGroup
    -> CountWorkflowExecutionsResponse'AggregationGroup
    -> CountWorkflowExecutionsResponse'AggregationGroup)
-> Ord CountWorkflowExecutionsResponse'AggregationGroup
CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Bool
CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Ordering
CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup
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 :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Ordering
compare :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Ordering
$c< :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Bool
< :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Bool
$c<= :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Bool
<= :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Bool
$c> :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Bool
> :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Bool
$c>= :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Bool
>= :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup -> Bool
$cmax :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup
max :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup
$cmin :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup
min :: CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup
-> CountWorkflowExecutionsResponse'AggregationGroup
Prelude.Ord)
instance Prelude.Show CountWorkflowExecutionsResponse'AggregationGroup where
  showsPrec :: Int -> CountWorkflowExecutionsResponse'AggregationGroup -> ShowS
showsPrec Int
_ CountWorkflowExecutionsResponse'AggregationGroup
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (CountWorkflowExecutionsResponse'AggregationGroup -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CountWorkflowExecutionsResponse'AggregationGroup
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField CountWorkflowExecutionsResponse'AggregationGroup "groupValues" [Proto.Temporal.Api.Common.V1.Message.Payload] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "groupValues"
-> ([Payload] -> f [Payload])
-> CountWorkflowExecutionsResponse'AggregationGroup
-> f CountWorkflowExecutionsResponse'AggregationGroup
fieldOf Proxy# "groupValues"
_
    = ((Vector Payload -> f (Vector Payload))
 -> CountWorkflowExecutionsResponse'AggregationGroup
 -> f CountWorkflowExecutionsResponse'AggregationGroup)
-> (([Payload] -> f [Payload])
    -> Vector Payload -> f (Vector Payload))
-> ([Payload] -> f [Payload])
-> CountWorkflowExecutionsResponse'AggregationGroup
-> f CountWorkflowExecutionsResponse'AggregationGroup
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CountWorkflowExecutionsResponse'AggregationGroup
 -> Vector Payload)
-> (CountWorkflowExecutionsResponse'AggregationGroup
    -> Vector Payload
    -> CountWorkflowExecutionsResponse'AggregationGroup)
-> Lens
     CountWorkflowExecutionsResponse'AggregationGroup
     CountWorkflowExecutionsResponse'AggregationGroup
     (Vector Payload)
     (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CountWorkflowExecutionsResponse'AggregationGroup -> Vector Payload
_CountWorkflowExecutionsResponse'AggregationGroup'groupValues
           (\ CountWorkflowExecutionsResponse'AggregationGroup
x__ Vector Payload
y__
              -> CountWorkflowExecutionsResponse'AggregationGroup
x__
                   {_CountWorkflowExecutionsResponse'AggregationGroup'groupValues = 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 CountWorkflowExecutionsResponse'AggregationGroup "vec'groupValues" (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'groupValues"
-> (Vector Payload -> f (Vector Payload))
-> CountWorkflowExecutionsResponse'AggregationGroup
-> f CountWorkflowExecutionsResponse'AggregationGroup
fieldOf Proxy# "vec'groupValues"
_
    = ((Vector Payload -> f (Vector Payload))
 -> CountWorkflowExecutionsResponse'AggregationGroup
 -> f CountWorkflowExecutionsResponse'AggregationGroup)
-> ((Vector Payload -> f (Vector Payload))
    -> Vector Payload -> f (Vector Payload))
-> (Vector Payload -> f (Vector Payload))
-> CountWorkflowExecutionsResponse'AggregationGroup
-> f CountWorkflowExecutionsResponse'AggregationGroup
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CountWorkflowExecutionsResponse'AggregationGroup
 -> Vector Payload)
-> (CountWorkflowExecutionsResponse'AggregationGroup
    -> Vector Payload
    -> CountWorkflowExecutionsResponse'AggregationGroup)
-> Lens
     CountWorkflowExecutionsResponse'AggregationGroup
     CountWorkflowExecutionsResponse'AggregationGroup
     (Vector Payload)
     (Vector Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CountWorkflowExecutionsResponse'AggregationGroup -> Vector Payload
_CountWorkflowExecutionsResponse'AggregationGroup'groupValues
           (\ CountWorkflowExecutionsResponse'AggregationGroup
x__ Vector Payload
y__
              -> CountWorkflowExecutionsResponse'AggregationGroup
x__
                   {_CountWorkflowExecutionsResponse'AggregationGroup'groupValues = y__}))
        (Vector Payload -> f (Vector Payload))
-> Vector Payload -> f (Vector Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CountWorkflowExecutionsResponse'AggregationGroup "count" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "count"
-> (Int64 -> f Int64)
-> CountWorkflowExecutionsResponse'AggregationGroup
-> f CountWorkflowExecutionsResponse'AggregationGroup
fieldOf Proxy# "count"
_
    = ((Int64 -> f Int64)
 -> CountWorkflowExecutionsResponse'AggregationGroup
 -> f CountWorkflowExecutionsResponse'AggregationGroup)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> CountWorkflowExecutionsResponse'AggregationGroup
-> f CountWorkflowExecutionsResponse'AggregationGroup
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CountWorkflowExecutionsResponse'AggregationGroup -> Int64)
-> (CountWorkflowExecutionsResponse'AggregationGroup
    -> Int64 -> CountWorkflowExecutionsResponse'AggregationGroup)
-> Lens
     CountWorkflowExecutionsResponse'AggregationGroup
     CountWorkflowExecutionsResponse'AggregationGroup
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CountWorkflowExecutionsResponse'AggregationGroup -> Int64
_CountWorkflowExecutionsResponse'AggregationGroup'count
           (\ CountWorkflowExecutionsResponse'AggregationGroup
x__ Int64
y__
              -> CountWorkflowExecutionsResponse'AggregationGroup
x__
                   {_CountWorkflowExecutionsResponse'AggregationGroup'count = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CountWorkflowExecutionsResponse'AggregationGroup where
  messageName :: Proxy CountWorkflowExecutionsResponse'AggregationGroup -> Text
messageName Proxy CountWorkflowExecutionsResponse'AggregationGroup
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.CountWorkflowExecutionsResponse.AggregationGroup"
  packedMessageDescriptor :: Proxy CountWorkflowExecutionsResponse'AggregationGroup
-> ByteString
packedMessageDescriptor Proxy CountWorkflowExecutionsResponse'AggregationGroup
_
    = ByteString
"\n\
      \\DLEAggregationGroup\DC2B\n\
      \\fgroup_values\CAN\SOH \ETX(\v2\US.temporal.api.common.v1.PayloadR\vgroupValues\DC2\DC4\n\
      \\ENQcount\CAN\STX \SOH(\ETXR\ENQcount"
  packedFileDescriptor :: Proxy CountWorkflowExecutionsResponse'AggregationGroup
-> ByteString
packedFileDescriptor Proxy CountWorkflowExecutionsResponse'AggregationGroup
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor CountWorkflowExecutionsResponse'AggregationGroup)
fieldsByTag
    = let
        groupValues__field_descriptor :: FieldDescriptor CountWorkflowExecutionsResponse'AggregationGroup
groupValues__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor
     CountWorkflowExecutionsResponse'AggregationGroup Payload
-> FieldDescriptor CountWorkflowExecutionsResponse'AggregationGroup
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"group_values"
              (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' CountWorkflowExecutionsResponse'AggregationGroup [Payload]
-> FieldAccessor
     CountWorkflowExecutionsResponse'AggregationGroup 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 @"groupValues")) ::
              Data.ProtoLens.FieldDescriptor CountWorkflowExecutionsResponse'AggregationGroup
        count__field_descriptor :: FieldDescriptor CountWorkflowExecutionsResponse'AggregationGroup
count__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     CountWorkflowExecutionsResponse'AggregationGroup Int64
-> FieldDescriptor CountWorkflowExecutionsResponse'AggregationGroup
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"count"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens
     CountWorkflowExecutionsResponse'AggregationGroup
     CountWorkflowExecutionsResponse'AggregationGroup
     Int64
     Int64
-> FieldAccessor
     CountWorkflowExecutionsResponse'AggregationGroup Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"count")) ::
              Data.ProtoLens.FieldDescriptor CountWorkflowExecutionsResponse'AggregationGroup
      in
        [(Tag,
  FieldDescriptor CountWorkflowExecutionsResponse'AggregationGroup)]
-> Map
     Tag
     (FieldDescriptor CountWorkflowExecutionsResponse'AggregationGroup)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor CountWorkflowExecutionsResponse'AggregationGroup
groupValues__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor CountWorkflowExecutionsResponse'AggregationGroup
count__field_descriptor)]
  unknownFields :: Lens' CountWorkflowExecutionsResponse'AggregationGroup FieldSet
unknownFields
    = (CountWorkflowExecutionsResponse'AggregationGroup -> FieldSet)
-> (CountWorkflowExecutionsResponse'AggregationGroup
    -> FieldSet -> CountWorkflowExecutionsResponse'AggregationGroup)
-> Lens' CountWorkflowExecutionsResponse'AggregationGroup FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CountWorkflowExecutionsResponse'AggregationGroup -> FieldSet
_CountWorkflowExecutionsResponse'AggregationGroup'_unknownFields
        (\ CountWorkflowExecutionsResponse'AggregationGroup
x__ FieldSet
y__
           -> CountWorkflowExecutionsResponse'AggregationGroup
x__
                {_CountWorkflowExecutionsResponse'AggregationGroup'_unknownFields = y__})
  defMessage :: CountWorkflowExecutionsResponse'AggregationGroup
defMessage
    = CountWorkflowExecutionsResponse'AggregationGroup'_constructor
        {_CountWorkflowExecutionsResponse'AggregationGroup'groupValues :: Vector Payload
_CountWorkflowExecutionsResponse'AggregationGroup'groupValues = Vector Payload
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _CountWorkflowExecutionsResponse'AggregationGroup'count :: Int64
_CountWorkflowExecutionsResponse'AggregationGroup'count = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CountWorkflowExecutionsResponse'AggregationGroup'_unknownFields :: FieldSet
_CountWorkflowExecutionsResponse'AggregationGroup'_unknownFields = []}
  parseMessage :: Parser CountWorkflowExecutionsResponse'AggregationGroup
parseMessage
    = let
        loop ::
          CountWorkflowExecutionsResponse'AggregationGroup
          -> 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 CountWorkflowExecutionsResponse'AggregationGroup
        loop :: CountWorkflowExecutionsResponse'AggregationGroup
-> Growing Vector RealWorld Payload
-> Parser CountWorkflowExecutionsResponse'AggregationGroup
loop CountWorkflowExecutionsResponse'AggregationGroup
x Growing Vector RealWorld Payload
mutable'groupValues
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'groupValues <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                              (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                 mutable'groupValues)
                      (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'groupValues") frozen'groupValues
                              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
"group_values"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'groupValues y)
                                loop x v
                        Word64
16
                          -> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"count"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"count") y x)
                                  mutable'groupValues
                        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'groupValues
      in
        Parser CountWorkflowExecutionsResponse'AggregationGroup
-> String
-> Parser CountWorkflowExecutionsResponse'AggregationGroup
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'groupValues <- 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'groupValues)
          String
"AggregationGroup"
  buildMessage :: CountWorkflowExecutionsResponse'AggregationGroup -> Builder
buildMessage
    = \ CountWorkflowExecutionsResponse'AggregationGroup
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((Payload -> Builder) -> Vector Payload -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ Payload
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (Payload -> ByteString) -> Payload -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           Payload -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payload
_v))
                (FoldLike
  (Vector Payload)
  CountWorkflowExecutionsResponse'AggregationGroup
  CountWorkflowExecutionsResponse'AggregationGroup
  (Vector Payload)
  (Vector Payload)
-> CountWorkflowExecutionsResponse'AggregationGroup
-> 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'groupValues") CountWorkflowExecutionsResponse'AggregationGroup
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Int64
_v = FoldLike
  Int64
  CountWorkflowExecutionsResponse'AggregationGroup
  CountWorkflowExecutionsResponse'AggregationGroup
  Int64
  Int64
-> CountWorkflowExecutionsResponse'AggregationGroup -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"count") CountWorkflowExecutionsResponse'AggregationGroup
_x
                 in
                   if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
16)
                         ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  CountWorkflowExecutionsResponse'AggregationGroup
  CountWorkflowExecutionsResponse'AggregationGroup
  FieldSet
  FieldSet
-> CountWorkflowExecutionsResponse'AggregationGroup -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CountWorkflowExecutionsResponse'AggregationGroup
  CountWorkflowExecutionsResponse'AggregationGroup
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' CountWorkflowExecutionsResponse'AggregationGroup FieldSet
Data.ProtoLens.unknownFields CountWorkflowExecutionsResponse'AggregationGroup
_x)))
instance Control.DeepSeq.NFData CountWorkflowExecutionsResponse'AggregationGroup where
  rnf :: CountWorkflowExecutionsResponse'AggregationGroup -> ()
rnf
    = \ CountWorkflowExecutionsResponse'AggregationGroup
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CountWorkflowExecutionsResponse'AggregationGroup -> FieldSet
_CountWorkflowExecutionsResponse'AggregationGroup'_unknownFields
                CountWorkflowExecutionsResponse'AggregationGroup
x__)
             (Vector Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (CountWorkflowExecutionsResponse'AggregationGroup -> Vector Payload
_CountWorkflowExecutionsResponse'AggregationGroup'groupValues CountWorkflowExecutionsResponse'AggregationGroup
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (CountWorkflowExecutionsResponse'AggregationGroup -> Int64
_CountWorkflowExecutionsResponse'AggregationGroup'count CountWorkflowExecutionsResponse'AggregationGroup
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' CreateScheduleRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.scheduleId' @:: Lens' CreateScheduleRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.schedule' @:: Lens' CreateScheduleRequest Proto.Temporal.Api.Schedule.V1.Message.Schedule@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'schedule' @:: Lens' CreateScheduleRequest (Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.Schedule)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.initialPatch' @:: Lens' CreateScheduleRequest Proto.Temporal.Api.Schedule.V1.Message.SchedulePatch@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'initialPatch' @:: Lens' CreateScheduleRequest (Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.SchedulePatch)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' CreateScheduleRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.requestId' @:: Lens' CreateScheduleRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.memo' @:: Lens' CreateScheduleRequest Proto.Temporal.Api.Common.V1.Message.Memo@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'memo' @:: Lens' CreateScheduleRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.searchAttributes' @:: Lens' CreateScheduleRequest Proto.Temporal.Api.Common.V1.Message.SearchAttributes@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'searchAttributes' @:: Lens' CreateScheduleRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes)@ -}
data CreateScheduleRequest
  = CreateScheduleRequest'_constructor {CreateScheduleRequest -> Text
_CreateScheduleRequest'namespace :: !Data.Text.Text,
                                        CreateScheduleRequest -> Text
_CreateScheduleRequest'scheduleId :: !Data.Text.Text,
                                        CreateScheduleRequest -> Maybe Schedule
_CreateScheduleRequest'schedule :: !(Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.Schedule),
                                        CreateScheduleRequest -> Maybe SchedulePatch
_CreateScheduleRequest'initialPatch :: !(Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.SchedulePatch),
                                        CreateScheduleRequest -> Text
_CreateScheduleRequest'identity :: !Data.Text.Text,
                                        CreateScheduleRequest -> Text
_CreateScheduleRequest'requestId :: !Data.Text.Text,
                                        CreateScheduleRequest -> Maybe Memo
_CreateScheduleRequest'memo :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo),
                                        CreateScheduleRequest -> Maybe SearchAttributes
_CreateScheduleRequest'searchAttributes :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes),
                                        CreateScheduleRequest -> FieldSet
_CreateScheduleRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CreateScheduleRequest -> CreateScheduleRequest -> Bool
(CreateScheduleRequest -> CreateScheduleRequest -> Bool)
-> (CreateScheduleRequest -> CreateScheduleRequest -> Bool)
-> Eq CreateScheduleRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CreateScheduleRequest -> CreateScheduleRequest -> Bool
== :: CreateScheduleRequest -> CreateScheduleRequest -> Bool
$c/= :: CreateScheduleRequest -> CreateScheduleRequest -> Bool
/= :: CreateScheduleRequest -> CreateScheduleRequest -> Bool
Prelude.Eq, Eq CreateScheduleRequest
Eq CreateScheduleRequest =>
(CreateScheduleRequest -> CreateScheduleRequest -> Ordering)
-> (CreateScheduleRequest -> CreateScheduleRequest -> Bool)
-> (CreateScheduleRequest -> CreateScheduleRequest -> Bool)
-> (CreateScheduleRequest -> CreateScheduleRequest -> Bool)
-> (CreateScheduleRequest -> CreateScheduleRequest -> Bool)
-> (CreateScheduleRequest
    -> CreateScheduleRequest -> CreateScheduleRequest)
-> (CreateScheduleRequest
    -> CreateScheduleRequest -> CreateScheduleRequest)
-> Ord CreateScheduleRequest
CreateScheduleRequest -> CreateScheduleRequest -> Bool
CreateScheduleRequest -> CreateScheduleRequest -> Ordering
CreateScheduleRequest
-> CreateScheduleRequest -> CreateScheduleRequest
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 :: CreateScheduleRequest -> CreateScheduleRequest -> Ordering
compare :: CreateScheduleRequest -> CreateScheduleRequest -> Ordering
$c< :: CreateScheduleRequest -> CreateScheduleRequest -> Bool
< :: CreateScheduleRequest -> CreateScheduleRequest -> Bool
$c<= :: CreateScheduleRequest -> CreateScheduleRequest -> Bool
<= :: CreateScheduleRequest -> CreateScheduleRequest -> Bool
$c> :: CreateScheduleRequest -> CreateScheduleRequest -> Bool
> :: CreateScheduleRequest -> CreateScheduleRequest -> Bool
$c>= :: CreateScheduleRequest -> CreateScheduleRequest -> Bool
>= :: CreateScheduleRequest -> CreateScheduleRequest -> Bool
$cmax :: CreateScheduleRequest
-> CreateScheduleRequest -> CreateScheduleRequest
max :: CreateScheduleRequest
-> CreateScheduleRequest -> CreateScheduleRequest
$cmin :: CreateScheduleRequest
-> CreateScheduleRequest -> CreateScheduleRequest
min :: CreateScheduleRequest
-> CreateScheduleRequest -> CreateScheduleRequest
Prelude.Ord)
instance Prelude.Show CreateScheduleRequest where
  showsPrec :: Int -> CreateScheduleRequest -> ShowS
showsPrec Int
_ CreateScheduleRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (CreateScheduleRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CreateScheduleRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField CreateScheduleRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> CreateScheduleRequest
-> f CreateScheduleRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> CreateScheduleRequest -> f CreateScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> CreateScheduleRequest
-> f CreateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CreateScheduleRequest -> Text)
-> (CreateScheduleRequest -> Text -> CreateScheduleRequest)
-> Lens CreateScheduleRequest CreateScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CreateScheduleRequest -> Text
_CreateScheduleRequest'namespace
           (\ CreateScheduleRequest
x__ Text
y__ -> CreateScheduleRequest
x__ {_CreateScheduleRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CreateScheduleRequest "scheduleId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleId"
-> (Text -> f Text)
-> CreateScheduleRequest
-> f CreateScheduleRequest
fieldOf Proxy# "scheduleId"
_
    = ((Text -> f Text)
 -> CreateScheduleRequest -> f CreateScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> CreateScheduleRequest
-> f CreateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CreateScheduleRequest -> Text)
-> (CreateScheduleRequest -> Text -> CreateScheduleRequest)
-> Lens CreateScheduleRequest CreateScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CreateScheduleRequest -> Text
_CreateScheduleRequest'scheduleId
           (\ CreateScheduleRequest
x__ Text
y__ -> CreateScheduleRequest
x__ {_CreateScheduleRequest'scheduleId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CreateScheduleRequest "schedule" Proto.Temporal.Api.Schedule.V1.Message.Schedule where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "schedule"
-> (Schedule -> f Schedule)
-> CreateScheduleRequest
-> f CreateScheduleRequest
fieldOf Proxy# "schedule"
_
    = ((Maybe Schedule -> f (Maybe Schedule))
 -> CreateScheduleRequest -> f CreateScheduleRequest)
-> ((Schedule -> f Schedule)
    -> Maybe Schedule -> f (Maybe Schedule))
-> (Schedule -> f Schedule)
-> CreateScheduleRequest
-> f CreateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CreateScheduleRequest -> Maybe Schedule)
-> (CreateScheduleRequest
    -> Maybe Schedule -> CreateScheduleRequest)
-> Lens
     CreateScheduleRequest
     CreateScheduleRequest
     (Maybe Schedule)
     (Maybe Schedule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CreateScheduleRequest -> Maybe Schedule
_CreateScheduleRequest'schedule
           (\ CreateScheduleRequest
x__ Maybe Schedule
y__ -> CreateScheduleRequest
x__ {_CreateScheduleRequest'schedule = y__}))
        (Schedule -> Lens' (Maybe Schedule) Schedule
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Schedule
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField CreateScheduleRequest "maybe'schedule" (Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.Schedule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'schedule"
-> (Maybe Schedule -> f (Maybe Schedule))
-> CreateScheduleRequest
-> f CreateScheduleRequest
fieldOf Proxy# "maybe'schedule"
_
    = ((Maybe Schedule -> f (Maybe Schedule))
 -> CreateScheduleRequest -> f CreateScheduleRequest)
-> ((Maybe Schedule -> f (Maybe Schedule))
    -> Maybe Schedule -> f (Maybe Schedule))
-> (Maybe Schedule -> f (Maybe Schedule))
-> CreateScheduleRequest
-> f CreateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CreateScheduleRequest -> Maybe Schedule)
-> (CreateScheduleRequest
    -> Maybe Schedule -> CreateScheduleRequest)
-> Lens
     CreateScheduleRequest
     CreateScheduleRequest
     (Maybe Schedule)
     (Maybe Schedule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CreateScheduleRequest -> Maybe Schedule
_CreateScheduleRequest'schedule
           (\ CreateScheduleRequest
x__ Maybe Schedule
y__ -> CreateScheduleRequest
x__ {_CreateScheduleRequest'schedule = y__}))
        (Maybe Schedule -> f (Maybe Schedule))
-> Maybe Schedule -> f (Maybe Schedule)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CreateScheduleRequest "initialPatch" Proto.Temporal.Api.Schedule.V1.Message.SchedulePatch where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "initialPatch"
-> (SchedulePatch -> f SchedulePatch)
-> CreateScheduleRequest
-> f CreateScheduleRequest
fieldOf Proxy# "initialPatch"
_
    = ((Maybe SchedulePatch -> f (Maybe SchedulePatch))
 -> CreateScheduleRequest -> f CreateScheduleRequest)
-> ((SchedulePatch -> f SchedulePatch)
    -> Maybe SchedulePatch -> f (Maybe SchedulePatch))
-> (SchedulePatch -> f SchedulePatch)
-> CreateScheduleRequest
-> f CreateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CreateScheduleRequest -> Maybe SchedulePatch)
-> (CreateScheduleRequest
    -> Maybe SchedulePatch -> CreateScheduleRequest)
-> Lens
     CreateScheduleRequest
     CreateScheduleRequest
     (Maybe SchedulePatch)
     (Maybe SchedulePatch)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CreateScheduleRequest -> Maybe SchedulePatch
_CreateScheduleRequest'initialPatch
           (\ CreateScheduleRequest
x__ Maybe SchedulePatch
y__ -> CreateScheduleRequest
x__ {_CreateScheduleRequest'initialPatch = y__}))
        (SchedulePatch -> Lens' (Maybe SchedulePatch) SchedulePatch
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SchedulePatch
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField CreateScheduleRequest "maybe'initialPatch" (Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.SchedulePatch) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'initialPatch"
-> (Maybe SchedulePatch -> f (Maybe SchedulePatch))
-> CreateScheduleRequest
-> f CreateScheduleRequest
fieldOf Proxy# "maybe'initialPatch"
_
    = ((Maybe SchedulePatch -> f (Maybe SchedulePatch))
 -> CreateScheduleRequest -> f CreateScheduleRequest)
-> ((Maybe SchedulePatch -> f (Maybe SchedulePatch))
    -> Maybe SchedulePatch -> f (Maybe SchedulePatch))
-> (Maybe SchedulePatch -> f (Maybe SchedulePatch))
-> CreateScheduleRequest
-> f CreateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CreateScheduleRequest -> Maybe SchedulePatch)
-> (CreateScheduleRequest
    -> Maybe SchedulePatch -> CreateScheduleRequest)
-> Lens
     CreateScheduleRequest
     CreateScheduleRequest
     (Maybe SchedulePatch)
     (Maybe SchedulePatch)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CreateScheduleRequest -> Maybe SchedulePatch
_CreateScheduleRequest'initialPatch
           (\ CreateScheduleRequest
x__ Maybe SchedulePatch
y__ -> CreateScheduleRequest
x__ {_CreateScheduleRequest'initialPatch = y__}))
        (Maybe SchedulePatch -> f (Maybe SchedulePatch))
-> Maybe SchedulePatch -> f (Maybe SchedulePatch)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CreateScheduleRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> CreateScheduleRequest
-> f CreateScheduleRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> CreateScheduleRequest -> f CreateScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> CreateScheduleRequest
-> f CreateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CreateScheduleRequest -> Text)
-> (CreateScheduleRequest -> Text -> CreateScheduleRequest)
-> Lens CreateScheduleRequest CreateScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CreateScheduleRequest -> Text
_CreateScheduleRequest'identity
           (\ CreateScheduleRequest
x__ Text
y__ -> CreateScheduleRequest
x__ {_CreateScheduleRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CreateScheduleRequest "requestId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestId"
-> (Text -> f Text)
-> CreateScheduleRequest
-> f CreateScheduleRequest
fieldOf Proxy# "requestId"
_
    = ((Text -> f Text)
 -> CreateScheduleRequest -> f CreateScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> CreateScheduleRequest
-> f CreateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CreateScheduleRequest -> Text)
-> (CreateScheduleRequest -> Text -> CreateScheduleRequest)
-> Lens CreateScheduleRequest CreateScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CreateScheduleRequest -> Text
_CreateScheduleRequest'requestId
           (\ CreateScheduleRequest
x__ Text
y__ -> CreateScheduleRequest
x__ {_CreateScheduleRequest'requestId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CreateScheduleRequest "memo" Proto.Temporal.Api.Common.V1.Message.Memo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "memo"
-> (Memo -> f Memo)
-> CreateScheduleRequest
-> f CreateScheduleRequest
fieldOf Proxy# "memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> CreateScheduleRequest -> f CreateScheduleRequest)
-> ((Memo -> f Memo) -> Maybe Memo -> f (Maybe Memo))
-> (Memo -> f Memo)
-> CreateScheduleRequest
-> f CreateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CreateScheduleRequest -> Maybe Memo)
-> (CreateScheduleRequest -> Maybe Memo -> CreateScheduleRequest)
-> Lens
     CreateScheduleRequest
     CreateScheduleRequest
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CreateScheduleRequest -> Maybe Memo
_CreateScheduleRequest'memo
           (\ CreateScheduleRequest
x__ Maybe Memo
y__ -> CreateScheduleRequest
x__ {_CreateScheduleRequest'memo = y__}))
        (Memo -> Lens' (Maybe Memo) Memo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Memo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField CreateScheduleRequest "maybe'memo" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'memo"
-> (Maybe Memo -> f (Maybe Memo))
-> CreateScheduleRequest
-> f CreateScheduleRequest
fieldOf Proxy# "maybe'memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> CreateScheduleRequest -> f CreateScheduleRequest)
-> ((Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo))
-> (Maybe Memo -> f (Maybe Memo))
-> CreateScheduleRequest
-> f CreateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CreateScheduleRequest -> Maybe Memo)
-> (CreateScheduleRequest -> Maybe Memo -> CreateScheduleRequest)
-> Lens
     CreateScheduleRequest
     CreateScheduleRequest
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CreateScheduleRequest -> Maybe Memo
_CreateScheduleRequest'memo
           (\ CreateScheduleRequest
x__ Maybe Memo
y__ -> CreateScheduleRequest
x__ {_CreateScheduleRequest'memo = y__}))
        (Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CreateScheduleRequest "searchAttributes" Proto.Temporal.Api.Common.V1.Message.SearchAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "searchAttributes"
-> (SearchAttributes -> f SearchAttributes)
-> CreateScheduleRequest
-> f CreateScheduleRequest
fieldOf Proxy# "searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> CreateScheduleRequest -> f CreateScheduleRequest)
-> ((SearchAttributes -> f SearchAttributes)
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (SearchAttributes -> f SearchAttributes)
-> CreateScheduleRequest
-> f CreateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CreateScheduleRequest -> Maybe SearchAttributes)
-> (CreateScheduleRequest
    -> Maybe SearchAttributes -> CreateScheduleRequest)
-> Lens
     CreateScheduleRequest
     CreateScheduleRequest
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CreateScheduleRequest -> Maybe SearchAttributes
_CreateScheduleRequest'searchAttributes
           (\ CreateScheduleRequest
x__ Maybe SearchAttributes
y__ -> CreateScheduleRequest
x__ {_CreateScheduleRequest'searchAttributes = y__}))
        (SearchAttributes -> Lens' (Maybe SearchAttributes) SearchAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SearchAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField CreateScheduleRequest "maybe'searchAttributes" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'searchAttributes"
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> CreateScheduleRequest
-> f CreateScheduleRequest
fieldOf Proxy# "maybe'searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> CreateScheduleRequest -> f CreateScheduleRequest)
-> ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> CreateScheduleRequest
-> f CreateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CreateScheduleRequest -> Maybe SearchAttributes)
-> (CreateScheduleRequest
    -> Maybe SearchAttributes -> CreateScheduleRequest)
-> Lens
     CreateScheduleRequest
     CreateScheduleRequest
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CreateScheduleRequest -> Maybe SearchAttributes
_CreateScheduleRequest'searchAttributes
           (\ CreateScheduleRequest
x__ Maybe SearchAttributes
y__ -> CreateScheduleRequest
x__ {_CreateScheduleRequest'searchAttributes = y__}))
        (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> Maybe SearchAttributes -> f (Maybe SearchAttributes)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CreateScheduleRequest where
  messageName :: Proxy CreateScheduleRequest -> Text
messageName Proxy CreateScheduleRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.CreateScheduleRequest"
  packedMessageDescriptor :: Proxy CreateScheduleRequest -> ByteString
packedMessageDescriptor Proxy CreateScheduleRequest
_
    = ByteString
"\n\
      \\NAKCreateScheduleRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
      \\vschedule_id\CAN\STX \SOH(\tR\n\
      \scheduleId\DC2>\n\
      \\bschedule\CAN\ETX \SOH(\v2\".temporal.api.schedule.v1.ScheduleR\bschedule\DC2L\n\
      \\rinitial_patch\CAN\EOT \SOH(\v2'.temporal.api.schedule.v1.SchedulePatchR\finitialPatch\DC2\SUB\n\
      \\bidentity\CAN\ENQ \SOH(\tR\bidentity\DC2\GS\n\
      \\n\
      \request_id\CAN\ACK \SOH(\tR\trequestId\DC20\n\
      \\EOTmemo\CAN\a \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
      \\DC1search_attributes\CAN\b \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes"
  packedFileDescriptor :: Proxy CreateScheduleRequest -> ByteString
packedFileDescriptor Proxy CreateScheduleRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CreateScheduleRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor CreateScheduleRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor CreateScheduleRequest Text
-> FieldDescriptor CreateScheduleRequest
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 CreateScheduleRequest CreateScheduleRequest Text Text
-> FieldAccessor CreateScheduleRequest 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 CreateScheduleRequest
        scheduleId__field_descriptor :: FieldDescriptor CreateScheduleRequest
scheduleId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor CreateScheduleRequest Text
-> FieldDescriptor CreateScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule_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 CreateScheduleRequest CreateScheduleRequest Text Text
-> FieldAccessor CreateScheduleRequest 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 @"scheduleId")) ::
              Data.ProtoLens.FieldDescriptor CreateScheduleRequest
        schedule__field_descriptor :: FieldDescriptor CreateScheduleRequest
schedule__field_descriptor
          = String
-> FieldTypeDescriptor Schedule
-> FieldAccessor CreateScheduleRequest Schedule
-> FieldDescriptor CreateScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule"
              (MessageOrGroup -> FieldTypeDescriptor Schedule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Schedule.V1.Message.Schedule)
              (Lens
  CreateScheduleRequest
  CreateScheduleRequest
  (Maybe Schedule)
  (Maybe Schedule)
-> FieldAccessor CreateScheduleRequest Schedule
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'schedule")) ::
              Data.ProtoLens.FieldDescriptor CreateScheduleRequest
        initialPatch__field_descriptor :: FieldDescriptor CreateScheduleRequest
initialPatch__field_descriptor
          = String
-> FieldTypeDescriptor SchedulePatch
-> FieldAccessor CreateScheduleRequest SchedulePatch
-> FieldDescriptor CreateScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"initial_patch"
              (MessageOrGroup -> FieldTypeDescriptor SchedulePatch
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Schedule.V1.Message.SchedulePatch)
              (Lens
  CreateScheduleRequest
  CreateScheduleRequest
  (Maybe SchedulePatch)
  (Maybe SchedulePatch)
-> FieldAccessor CreateScheduleRequest SchedulePatch
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'initialPatch")) ::
              Data.ProtoLens.FieldDescriptor CreateScheduleRequest
        identity__field_descriptor :: FieldDescriptor CreateScheduleRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor CreateScheduleRequest Text
-> FieldDescriptor CreateScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens CreateScheduleRequest CreateScheduleRequest Text Text
-> FieldAccessor CreateScheduleRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor CreateScheduleRequest
        requestId__field_descriptor :: FieldDescriptor CreateScheduleRequest
requestId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor CreateScheduleRequest Text
-> FieldDescriptor CreateScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens CreateScheduleRequest CreateScheduleRequest Text Text
-> FieldAccessor CreateScheduleRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId")) ::
              Data.ProtoLens.FieldDescriptor CreateScheduleRequest
        memo__field_descriptor :: FieldDescriptor CreateScheduleRequest
memo__field_descriptor
          = String
-> FieldTypeDescriptor Memo
-> FieldAccessor CreateScheduleRequest Memo
-> FieldDescriptor CreateScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"memo"
              (MessageOrGroup -> FieldTypeDescriptor Memo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Memo)
              (Lens
  CreateScheduleRequest
  CreateScheduleRequest
  (Maybe Memo)
  (Maybe Memo)
-> FieldAccessor CreateScheduleRequest Memo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'memo")) ::
              Data.ProtoLens.FieldDescriptor CreateScheduleRequest
        searchAttributes__field_descriptor :: FieldDescriptor CreateScheduleRequest
searchAttributes__field_descriptor
          = String
-> FieldTypeDescriptor SearchAttributes
-> FieldAccessor CreateScheduleRequest SearchAttributes
-> FieldDescriptor CreateScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"search_attributes"
              (MessageOrGroup -> FieldTypeDescriptor SearchAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.SearchAttributes)
              (Lens
  CreateScheduleRequest
  CreateScheduleRequest
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> FieldAccessor CreateScheduleRequest SearchAttributes
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'searchAttributes")) ::
              Data.ProtoLens.FieldDescriptor CreateScheduleRequest
      in
        [(Tag, FieldDescriptor CreateScheduleRequest)]
-> Map Tag (FieldDescriptor CreateScheduleRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor CreateScheduleRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor CreateScheduleRequest
scheduleId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor CreateScheduleRequest
schedule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor CreateScheduleRequest
initialPatch__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor CreateScheduleRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor CreateScheduleRequest
requestId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor CreateScheduleRequest
memo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor CreateScheduleRequest
searchAttributes__field_descriptor)]
  unknownFields :: Lens' CreateScheduleRequest FieldSet
unknownFields
    = (CreateScheduleRequest -> FieldSet)
-> (CreateScheduleRequest -> FieldSet -> CreateScheduleRequest)
-> Lens' CreateScheduleRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CreateScheduleRequest -> FieldSet
_CreateScheduleRequest'_unknownFields
        (\ CreateScheduleRequest
x__ FieldSet
y__ -> CreateScheduleRequest
x__ {_CreateScheduleRequest'_unknownFields = y__})
  defMessage :: CreateScheduleRequest
defMessage
    = CreateScheduleRequest'_constructor
        {_CreateScheduleRequest'namespace :: Text
_CreateScheduleRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CreateScheduleRequest'scheduleId :: Text
_CreateScheduleRequest'scheduleId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CreateScheduleRequest'schedule :: Maybe Schedule
_CreateScheduleRequest'schedule = Maybe Schedule
forall a. Maybe a
Prelude.Nothing,
         _CreateScheduleRequest'initialPatch :: Maybe SchedulePatch
_CreateScheduleRequest'initialPatch = Maybe SchedulePatch
forall a. Maybe a
Prelude.Nothing,
         _CreateScheduleRequest'identity :: Text
_CreateScheduleRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CreateScheduleRequest'requestId :: Text
_CreateScheduleRequest'requestId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CreateScheduleRequest'memo :: Maybe Memo
_CreateScheduleRequest'memo = Maybe Memo
forall a. Maybe a
Prelude.Nothing,
         _CreateScheduleRequest'searchAttributes :: Maybe SearchAttributes
_CreateScheduleRequest'searchAttributes = Maybe SearchAttributes
forall a. Maybe a
Prelude.Nothing,
         _CreateScheduleRequest'_unknownFields :: FieldSet
_CreateScheduleRequest'_unknownFields = []}
  parseMessage :: Parser CreateScheduleRequest
parseMessage
    = let
        loop ::
          CreateScheduleRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser CreateScheduleRequest
        loop :: CreateScheduleRequest -> Parser CreateScheduleRequest
loop CreateScheduleRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
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
"schedule_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"scheduleId") y x)
                        Word64
26
                          -> do y <- Parser Schedule -> String -> Parser Schedule
forall a. Parser a -> String -> Parser a
(Data.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"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"schedule") y x)
                        Word64
34
                          -> do y <- Parser SchedulePatch -> String -> Parser SchedulePatch
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"initial_patch"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"initialPatch") y x)
                        Word64
42
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
50
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"request_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x)
                        Word64
58
                          -> do y <- Parser Memo -> String -> Parser Memo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"memo"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"memo") y x)
                        Word64
66
                          -> do y <- Parser SearchAttributes -> String -> Parser SearchAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"search_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"searchAttributes") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser CreateScheduleRequest
-> String -> Parser CreateScheduleRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do CreateScheduleRequest -> Parser CreateScheduleRequest
loop CreateScheduleRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"CreateScheduleRequest"
  buildMessage :: CreateScheduleRequest -> Builder
buildMessage
    = \ CreateScheduleRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike Text CreateScheduleRequest CreateScheduleRequest Text Text
-> CreateScheduleRequest -> 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") CreateScheduleRequest
_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 CreateScheduleRequest CreateScheduleRequest Text Text
-> CreateScheduleRequest -> 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 @"scheduleId") CreateScheduleRequest
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe Schedule)
  CreateScheduleRequest
  CreateScheduleRequest
  (Maybe Schedule)
  (Maybe Schedule)
-> CreateScheduleRequest -> Maybe Schedule
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'schedule") CreateScheduleRequest
_x
                    of
                      Maybe Schedule
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just Schedule
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (Schedule -> ByteString) -> Schedule -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                Schedule -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Schedule
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe SchedulePatch)
  CreateScheduleRequest
  CreateScheduleRequest
  (Maybe SchedulePatch)
  (Maybe SchedulePatch)
-> CreateScheduleRequest -> Maybe SchedulePatch
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'initialPatch") CreateScheduleRequest
_x
                       of
                         Maybe SchedulePatch
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just SchedulePatch
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (SchedulePatch -> ByteString) -> SchedulePatch -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   SchedulePatch -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage SchedulePatch
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Text
_v = FoldLike Text CreateScheduleRequest CreateScheduleRequest Text Text
-> CreateScheduleRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") CreateScheduleRequest
_x
                          in
                            if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                  ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     (\ ByteString
bs
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                     Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v = FoldLike Text CreateScheduleRequest CreateScheduleRequest Text Text
-> CreateScheduleRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId") CreateScheduleRequest
_x
                             in
                               if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                     ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        (\ ByteString
bs
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (case
                                    FoldLike
  (Maybe Memo)
  CreateScheduleRequest
  CreateScheduleRequest
  (Maybe Memo)
  (Maybe Memo)
-> CreateScheduleRequest -> Maybe Memo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'memo") CreateScheduleRequest
_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
58)
                                         ((ByteString -> Builder) -> (Memo -> ByteString) -> Memo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                            (\ ByteString
bs
                                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                          (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                            Memo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Memo
_v))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (case
                                       FoldLike
  (Maybe SearchAttributes)
  CreateScheduleRequest
  CreateScheduleRequest
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> CreateScheduleRequest -> Maybe SearchAttributes
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'searchAttributes") CreateScheduleRequest
_x
                                   of
                                     Maybe SearchAttributes
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                     (Prelude.Just SearchAttributes
_v)
                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                                            ((ByteString -> Builder)
-> (SearchAttributes -> ByteString) -> SearchAttributes -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                               (\ ByteString
bs
                                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                             (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                               SearchAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage SearchAttributes
_v))
                                  (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                     (FoldLike
  FieldSet
  CreateScheduleRequest
  CreateScheduleRequest
  FieldSet
  FieldSet
-> CreateScheduleRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CreateScheduleRequest
  CreateScheduleRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' CreateScheduleRequest FieldSet
Data.ProtoLens.unknownFields CreateScheduleRequest
_x)))))))))
instance Control.DeepSeq.NFData CreateScheduleRequest where
  rnf :: CreateScheduleRequest -> ()
rnf
    = \ CreateScheduleRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CreateScheduleRequest -> FieldSet
_CreateScheduleRequest'_unknownFields CreateScheduleRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (CreateScheduleRequest -> Text
_CreateScheduleRequest'namespace CreateScheduleRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (CreateScheduleRequest -> Text
_CreateScheduleRequest'scheduleId CreateScheduleRequest
x__)
                   (Maybe Schedule -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (CreateScheduleRequest -> Maybe Schedule
_CreateScheduleRequest'schedule CreateScheduleRequest
x__)
                      (Maybe SchedulePatch -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (CreateScheduleRequest -> Maybe SchedulePatch
_CreateScheduleRequest'initialPatch CreateScheduleRequest
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (CreateScheduleRequest -> Text
_CreateScheduleRequest'identity CreateScheduleRequest
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (CreateScheduleRequest -> Text
_CreateScheduleRequest'requestId CreateScheduleRequest
x__)
                               (Maybe Memo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (CreateScheduleRequest -> Maybe Memo
_CreateScheduleRequest'memo CreateScheduleRequest
x__)
                                  (Maybe SearchAttributes -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (CreateScheduleRequest -> Maybe SearchAttributes
_CreateScheduleRequest'searchAttributes CreateScheduleRequest
x__) ()))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.conflictToken' @:: Lens' CreateScheduleResponse Data.ByteString.ByteString@ -}
data CreateScheduleResponse
  = CreateScheduleResponse'_constructor {CreateScheduleResponse -> ByteString
_CreateScheduleResponse'conflictToken :: !Data.ByteString.ByteString,
                                         CreateScheduleResponse -> FieldSet
_CreateScheduleResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (CreateScheduleResponse -> CreateScheduleResponse -> Bool
(CreateScheduleResponse -> CreateScheduleResponse -> Bool)
-> (CreateScheduleResponse -> CreateScheduleResponse -> Bool)
-> Eq CreateScheduleResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CreateScheduleResponse -> CreateScheduleResponse -> Bool
== :: CreateScheduleResponse -> CreateScheduleResponse -> Bool
$c/= :: CreateScheduleResponse -> CreateScheduleResponse -> Bool
/= :: CreateScheduleResponse -> CreateScheduleResponse -> Bool
Prelude.Eq, Eq CreateScheduleResponse
Eq CreateScheduleResponse =>
(CreateScheduleResponse -> CreateScheduleResponse -> Ordering)
-> (CreateScheduleResponse -> CreateScheduleResponse -> Bool)
-> (CreateScheduleResponse -> CreateScheduleResponse -> Bool)
-> (CreateScheduleResponse -> CreateScheduleResponse -> Bool)
-> (CreateScheduleResponse -> CreateScheduleResponse -> Bool)
-> (CreateScheduleResponse
    -> CreateScheduleResponse -> CreateScheduleResponse)
-> (CreateScheduleResponse
    -> CreateScheduleResponse -> CreateScheduleResponse)
-> Ord CreateScheduleResponse
CreateScheduleResponse -> CreateScheduleResponse -> Bool
CreateScheduleResponse -> CreateScheduleResponse -> Ordering
CreateScheduleResponse
-> CreateScheduleResponse -> CreateScheduleResponse
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 :: CreateScheduleResponse -> CreateScheduleResponse -> Ordering
compare :: CreateScheduleResponse -> CreateScheduleResponse -> Ordering
$c< :: CreateScheduleResponse -> CreateScheduleResponse -> Bool
< :: CreateScheduleResponse -> CreateScheduleResponse -> Bool
$c<= :: CreateScheduleResponse -> CreateScheduleResponse -> Bool
<= :: CreateScheduleResponse -> CreateScheduleResponse -> Bool
$c> :: CreateScheduleResponse -> CreateScheduleResponse -> Bool
> :: CreateScheduleResponse -> CreateScheduleResponse -> Bool
$c>= :: CreateScheduleResponse -> CreateScheduleResponse -> Bool
>= :: CreateScheduleResponse -> CreateScheduleResponse -> Bool
$cmax :: CreateScheduleResponse
-> CreateScheduleResponse -> CreateScheduleResponse
max :: CreateScheduleResponse
-> CreateScheduleResponse -> CreateScheduleResponse
$cmin :: CreateScheduleResponse
-> CreateScheduleResponse -> CreateScheduleResponse
min :: CreateScheduleResponse
-> CreateScheduleResponse -> CreateScheduleResponse
Prelude.Ord)
instance Prelude.Show CreateScheduleResponse where
  showsPrec :: Int -> CreateScheduleResponse -> ShowS
showsPrec Int
_ CreateScheduleResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (CreateScheduleResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CreateScheduleResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField CreateScheduleResponse "conflictToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "conflictToken"
-> (ByteString -> f ByteString)
-> CreateScheduleResponse
-> f CreateScheduleResponse
fieldOf Proxy# "conflictToken"
_
    = ((ByteString -> f ByteString)
 -> CreateScheduleResponse -> f CreateScheduleResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> CreateScheduleResponse
-> f CreateScheduleResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((CreateScheduleResponse -> ByteString)
-> (CreateScheduleResponse -> ByteString -> CreateScheduleResponse)
-> Lens
     CreateScheduleResponse CreateScheduleResponse ByteString ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           CreateScheduleResponse -> ByteString
_CreateScheduleResponse'conflictToken
           (\ CreateScheduleResponse
x__ ByteString
y__ -> CreateScheduleResponse
x__ {_CreateScheduleResponse'conflictToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CreateScheduleResponse where
  messageName :: Proxy CreateScheduleResponse -> Text
messageName Proxy CreateScheduleResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.CreateScheduleResponse"
  packedMessageDescriptor :: Proxy CreateScheduleResponse -> ByteString
packedMessageDescriptor Proxy CreateScheduleResponse
_
    = ByteString
"\n\
      \\SYNCreateScheduleResponse\DC2%\n\
      \\SOconflict_token\CAN\SOH \SOH(\fR\rconflictToken"
  packedFileDescriptor :: Proxy CreateScheduleResponse -> ByteString
packedFileDescriptor Proxy CreateScheduleResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor CreateScheduleResponse)
fieldsByTag
    = let
        conflictToken__field_descriptor :: FieldDescriptor CreateScheduleResponse
conflictToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor CreateScheduleResponse ByteString
-> FieldDescriptor CreateScheduleResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"conflict_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     CreateScheduleResponse CreateScheduleResponse ByteString ByteString
-> FieldAccessor CreateScheduleResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"conflictToken")) ::
              Data.ProtoLens.FieldDescriptor CreateScheduleResponse
      in
        [(Tag, FieldDescriptor CreateScheduleResponse)]
-> Map Tag (FieldDescriptor CreateScheduleResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor CreateScheduleResponse
conflictToken__field_descriptor)]
  unknownFields :: Lens' CreateScheduleResponse FieldSet
unknownFields
    = (CreateScheduleResponse -> FieldSet)
-> (CreateScheduleResponse -> FieldSet -> CreateScheduleResponse)
-> Lens' CreateScheduleResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        CreateScheduleResponse -> FieldSet
_CreateScheduleResponse'_unknownFields
        (\ CreateScheduleResponse
x__ FieldSet
y__ -> CreateScheduleResponse
x__ {_CreateScheduleResponse'_unknownFields = y__})
  defMessage :: CreateScheduleResponse
defMessage
    = CreateScheduleResponse'_constructor
        {_CreateScheduleResponse'conflictToken :: ByteString
_CreateScheduleResponse'conflictToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _CreateScheduleResponse'_unknownFields :: FieldSet
_CreateScheduleResponse'_unknownFields = []}
  parseMessage :: Parser CreateScheduleResponse
parseMessage
    = let
        loop ::
          CreateScheduleResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser CreateScheduleResponse
        loop :: CreateScheduleResponse -> Parser CreateScheduleResponse
loop CreateScheduleResponse
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 ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"conflict_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"conflictToken") 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 CreateScheduleResponse
-> String -> Parser CreateScheduleResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do CreateScheduleResponse -> Parser CreateScheduleResponse
loop CreateScheduleResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"CreateScheduleResponse"
  buildMessage :: CreateScheduleResponse -> Builder
buildMessage
    = \ CreateScheduleResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: ByteString
_v
                  = FoldLike
  ByteString
  CreateScheduleResponse
  CreateScheduleResponse
  ByteString
  ByteString
-> CreateScheduleResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"conflictToken") CreateScheduleResponse
_x
              in
                if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
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
bs
                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         ByteString
_v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  CreateScheduleResponse
  CreateScheduleResponse
  FieldSet
  FieldSet
-> CreateScheduleResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  CreateScheduleResponse
  CreateScheduleResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' CreateScheduleResponse FieldSet
Data.ProtoLens.unknownFields CreateScheduleResponse
_x))
instance Control.DeepSeq.NFData CreateScheduleResponse where
  rnf :: CreateScheduleResponse -> ()
rnf
    = \ CreateScheduleResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (CreateScheduleResponse -> FieldSet
_CreateScheduleResponse'_unknownFields CreateScheduleResponse
x__)
             (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (CreateScheduleResponse -> ByteString
_CreateScheduleResponse'conflictToken CreateScheduleResponse
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' DeleteScheduleRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.scheduleId' @:: Lens' DeleteScheduleRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' DeleteScheduleRequest Data.Text.Text@ -}
data DeleteScheduleRequest
  = DeleteScheduleRequest'_constructor {DeleteScheduleRequest -> Text
_DeleteScheduleRequest'namespace :: !Data.Text.Text,
                                        DeleteScheduleRequest -> Text
_DeleteScheduleRequest'scheduleId :: !Data.Text.Text,
                                        DeleteScheduleRequest -> Text
_DeleteScheduleRequest'identity :: !Data.Text.Text,
                                        DeleteScheduleRequest -> FieldSet
_DeleteScheduleRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DeleteScheduleRequest -> DeleteScheduleRequest -> Bool
(DeleteScheduleRequest -> DeleteScheduleRequest -> Bool)
-> (DeleteScheduleRequest -> DeleteScheduleRequest -> Bool)
-> Eq DeleteScheduleRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DeleteScheduleRequest -> DeleteScheduleRequest -> Bool
== :: DeleteScheduleRequest -> DeleteScheduleRequest -> Bool
$c/= :: DeleteScheduleRequest -> DeleteScheduleRequest -> Bool
/= :: DeleteScheduleRequest -> DeleteScheduleRequest -> Bool
Prelude.Eq, Eq DeleteScheduleRequest
Eq DeleteScheduleRequest =>
(DeleteScheduleRequest -> DeleteScheduleRequest -> Ordering)
-> (DeleteScheduleRequest -> DeleteScheduleRequest -> Bool)
-> (DeleteScheduleRequest -> DeleteScheduleRequest -> Bool)
-> (DeleteScheduleRequest -> DeleteScheduleRequest -> Bool)
-> (DeleteScheduleRequest -> DeleteScheduleRequest -> Bool)
-> (DeleteScheduleRequest
    -> DeleteScheduleRequest -> DeleteScheduleRequest)
-> (DeleteScheduleRequest
    -> DeleteScheduleRequest -> DeleteScheduleRequest)
-> Ord DeleteScheduleRequest
DeleteScheduleRequest -> DeleteScheduleRequest -> Bool
DeleteScheduleRequest -> DeleteScheduleRequest -> Ordering
DeleteScheduleRequest
-> DeleteScheduleRequest -> DeleteScheduleRequest
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 :: DeleteScheduleRequest -> DeleteScheduleRequest -> Ordering
compare :: DeleteScheduleRequest -> DeleteScheduleRequest -> Ordering
$c< :: DeleteScheduleRequest -> DeleteScheduleRequest -> Bool
< :: DeleteScheduleRequest -> DeleteScheduleRequest -> Bool
$c<= :: DeleteScheduleRequest -> DeleteScheduleRequest -> Bool
<= :: DeleteScheduleRequest -> DeleteScheduleRequest -> Bool
$c> :: DeleteScheduleRequest -> DeleteScheduleRequest -> Bool
> :: DeleteScheduleRequest -> DeleteScheduleRequest -> Bool
$c>= :: DeleteScheduleRequest -> DeleteScheduleRequest -> Bool
>= :: DeleteScheduleRequest -> DeleteScheduleRequest -> Bool
$cmax :: DeleteScheduleRequest
-> DeleteScheduleRequest -> DeleteScheduleRequest
max :: DeleteScheduleRequest
-> DeleteScheduleRequest -> DeleteScheduleRequest
$cmin :: DeleteScheduleRequest
-> DeleteScheduleRequest -> DeleteScheduleRequest
min :: DeleteScheduleRequest
-> DeleteScheduleRequest -> DeleteScheduleRequest
Prelude.Ord)
instance Prelude.Show DeleteScheduleRequest where
  showsPrec :: Int -> DeleteScheduleRequest -> ShowS
showsPrec Int
_ DeleteScheduleRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DeleteScheduleRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DeleteScheduleRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DeleteScheduleRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> DeleteScheduleRequest
-> f DeleteScheduleRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> DeleteScheduleRequest -> f DeleteScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DeleteScheduleRequest
-> f DeleteScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DeleteScheduleRequest -> Text)
-> (DeleteScheduleRequest -> Text -> DeleteScheduleRequest)
-> Lens DeleteScheduleRequest DeleteScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DeleteScheduleRequest -> Text
_DeleteScheduleRequest'namespace
           (\ DeleteScheduleRequest
x__ Text
y__ -> DeleteScheduleRequest
x__ {_DeleteScheduleRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DeleteScheduleRequest "scheduleId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleId"
-> (Text -> f Text)
-> DeleteScheduleRequest
-> f DeleteScheduleRequest
fieldOf Proxy# "scheduleId"
_
    = ((Text -> f Text)
 -> DeleteScheduleRequest -> f DeleteScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DeleteScheduleRequest
-> f DeleteScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DeleteScheduleRequest -> Text)
-> (DeleteScheduleRequest -> Text -> DeleteScheduleRequest)
-> Lens DeleteScheduleRequest DeleteScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DeleteScheduleRequest -> Text
_DeleteScheduleRequest'scheduleId
           (\ DeleteScheduleRequest
x__ Text
y__ -> DeleteScheduleRequest
x__ {_DeleteScheduleRequest'scheduleId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DeleteScheduleRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> DeleteScheduleRequest
-> f DeleteScheduleRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> DeleteScheduleRequest -> f DeleteScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DeleteScheduleRequest
-> f DeleteScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DeleteScheduleRequest -> Text)
-> (DeleteScheduleRequest -> Text -> DeleteScheduleRequest)
-> Lens DeleteScheduleRequest DeleteScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DeleteScheduleRequest -> Text
_DeleteScheduleRequest'identity
           (\ DeleteScheduleRequest
x__ Text
y__ -> DeleteScheduleRequest
x__ {_DeleteScheduleRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DeleteScheduleRequest where
  messageName :: Proxy DeleteScheduleRequest -> Text
messageName Proxy DeleteScheduleRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DeleteScheduleRequest"
  packedMessageDescriptor :: Proxy DeleteScheduleRequest -> ByteString
packedMessageDescriptor Proxy DeleteScheduleRequest
_
    = ByteString
"\n\
      \\NAKDeleteScheduleRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
      \\vschedule_id\CAN\STX \SOH(\tR\n\
      \scheduleId\DC2\SUB\n\
      \\bidentity\CAN\ETX \SOH(\tR\bidentity"
  packedFileDescriptor :: Proxy DeleteScheduleRequest -> ByteString
packedFileDescriptor Proxy DeleteScheduleRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DeleteScheduleRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor DeleteScheduleRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DeleteScheduleRequest Text
-> FieldDescriptor DeleteScheduleRequest
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 DeleteScheduleRequest DeleteScheduleRequest Text Text
-> FieldAccessor DeleteScheduleRequest 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 DeleteScheduleRequest
        scheduleId__field_descriptor :: FieldDescriptor DeleteScheduleRequest
scheduleId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DeleteScheduleRequest Text
-> FieldDescriptor DeleteScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule_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 DeleteScheduleRequest DeleteScheduleRequest Text Text
-> FieldAccessor DeleteScheduleRequest 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 @"scheduleId")) ::
              Data.ProtoLens.FieldDescriptor DeleteScheduleRequest
        identity__field_descriptor :: FieldDescriptor DeleteScheduleRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DeleteScheduleRequest Text
-> FieldDescriptor DeleteScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens DeleteScheduleRequest DeleteScheduleRequest Text Text
-> FieldAccessor DeleteScheduleRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor DeleteScheduleRequest
      in
        [(Tag, FieldDescriptor DeleteScheduleRequest)]
-> Map Tag (FieldDescriptor DeleteScheduleRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DeleteScheduleRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DeleteScheduleRequest
scheduleId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor DeleteScheduleRequest
identity__field_descriptor)]
  unknownFields :: Lens' DeleteScheduleRequest FieldSet
unknownFields
    = (DeleteScheduleRequest -> FieldSet)
-> (DeleteScheduleRequest -> FieldSet -> DeleteScheduleRequest)
-> Lens' DeleteScheduleRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DeleteScheduleRequest -> FieldSet
_DeleteScheduleRequest'_unknownFields
        (\ DeleteScheduleRequest
x__ FieldSet
y__ -> DeleteScheduleRequest
x__ {_DeleteScheduleRequest'_unknownFields = y__})
  defMessage :: DeleteScheduleRequest
defMessage
    = DeleteScheduleRequest'_constructor
        {_DeleteScheduleRequest'namespace :: Text
_DeleteScheduleRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DeleteScheduleRequest'scheduleId :: Text
_DeleteScheduleRequest'scheduleId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DeleteScheduleRequest'identity :: Text
_DeleteScheduleRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DeleteScheduleRequest'_unknownFields :: FieldSet
_DeleteScheduleRequest'_unknownFields = []}
  parseMessage :: Parser DeleteScheduleRequest
parseMessage
    = let
        loop ::
          DeleteScheduleRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser DeleteScheduleRequest
        loop :: DeleteScheduleRequest -> Parser DeleteScheduleRequest
loop DeleteScheduleRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
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
"schedule_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"scheduleId") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser DeleteScheduleRequest
-> String -> Parser DeleteScheduleRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do DeleteScheduleRequest -> Parser DeleteScheduleRequest
loop DeleteScheduleRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"DeleteScheduleRequest"
  buildMessage :: DeleteScheduleRequest -> Builder
buildMessage
    = \ DeleteScheduleRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike Text DeleteScheduleRequest DeleteScheduleRequest Text Text
-> DeleteScheduleRequest -> 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") DeleteScheduleRequest
_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 DeleteScheduleRequest DeleteScheduleRequest Text Text
-> DeleteScheduleRequest -> 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 @"scheduleId") DeleteScheduleRequest
_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 DeleteScheduleRequest DeleteScheduleRequest Text Text
-> DeleteScheduleRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") DeleteScheduleRequest
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  DeleteScheduleRequest
  DeleteScheduleRequest
  FieldSet
  FieldSet
-> DeleteScheduleRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DeleteScheduleRequest
  DeleteScheduleRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DeleteScheduleRequest FieldSet
Data.ProtoLens.unknownFields DeleteScheduleRequest
_x))))
instance Control.DeepSeq.NFData DeleteScheduleRequest where
  rnf :: DeleteScheduleRequest -> ()
rnf
    = \ DeleteScheduleRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DeleteScheduleRequest -> FieldSet
_DeleteScheduleRequest'_unknownFields DeleteScheduleRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DeleteScheduleRequest -> Text
_DeleteScheduleRequest'namespace DeleteScheduleRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (DeleteScheduleRequest -> Text
_DeleteScheduleRequest'scheduleId DeleteScheduleRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (DeleteScheduleRequest -> Text
_DeleteScheduleRequest'identity DeleteScheduleRequest
x__) ())))
{- | Fields :
      -}
data DeleteScheduleResponse
  = DeleteScheduleResponse'_constructor {DeleteScheduleResponse -> FieldSet
_DeleteScheduleResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DeleteScheduleResponse -> DeleteScheduleResponse -> Bool
(DeleteScheduleResponse -> DeleteScheduleResponse -> Bool)
-> (DeleteScheduleResponse -> DeleteScheduleResponse -> Bool)
-> Eq DeleteScheduleResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DeleteScheduleResponse -> DeleteScheduleResponse -> Bool
== :: DeleteScheduleResponse -> DeleteScheduleResponse -> Bool
$c/= :: DeleteScheduleResponse -> DeleteScheduleResponse -> Bool
/= :: DeleteScheduleResponse -> DeleteScheduleResponse -> Bool
Prelude.Eq, Eq DeleteScheduleResponse
Eq DeleteScheduleResponse =>
(DeleteScheduleResponse -> DeleteScheduleResponse -> Ordering)
-> (DeleteScheduleResponse -> DeleteScheduleResponse -> Bool)
-> (DeleteScheduleResponse -> DeleteScheduleResponse -> Bool)
-> (DeleteScheduleResponse -> DeleteScheduleResponse -> Bool)
-> (DeleteScheduleResponse -> DeleteScheduleResponse -> Bool)
-> (DeleteScheduleResponse
    -> DeleteScheduleResponse -> DeleteScheduleResponse)
-> (DeleteScheduleResponse
    -> DeleteScheduleResponse -> DeleteScheduleResponse)
-> Ord DeleteScheduleResponse
DeleteScheduleResponse -> DeleteScheduleResponse -> Bool
DeleteScheduleResponse -> DeleteScheduleResponse -> Ordering
DeleteScheduleResponse
-> DeleteScheduleResponse -> DeleteScheduleResponse
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 :: DeleteScheduleResponse -> DeleteScheduleResponse -> Ordering
compare :: DeleteScheduleResponse -> DeleteScheduleResponse -> Ordering
$c< :: DeleteScheduleResponse -> DeleteScheduleResponse -> Bool
< :: DeleteScheduleResponse -> DeleteScheduleResponse -> Bool
$c<= :: DeleteScheduleResponse -> DeleteScheduleResponse -> Bool
<= :: DeleteScheduleResponse -> DeleteScheduleResponse -> Bool
$c> :: DeleteScheduleResponse -> DeleteScheduleResponse -> Bool
> :: DeleteScheduleResponse -> DeleteScheduleResponse -> Bool
$c>= :: DeleteScheduleResponse -> DeleteScheduleResponse -> Bool
>= :: DeleteScheduleResponse -> DeleteScheduleResponse -> Bool
$cmax :: DeleteScheduleResponse
-> DeleteScheduleResponse -> DeleteScheduleResponse
max :: DeleteScheduleResponse
-> DeleteScheduleResponse -> DeleteScheduleResponse
$cmin :: DeleteScheduleResponse
-> DeleteScheduleResponse -> DeleteScheduleResponse
min :: DeleteScheduleResponse
-> DeleteScheduleResponse -> DeleteScheduleResponse
Prelude.Ord)
instance Prelude.Show DeleteScheduleResponse where
  showsPrec :: Int -> DeleteScheduleResponse -> ShowS
showsPrec Int
_ DeleteScheduleResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DeleteScheduleResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DeleteScheduleResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message DeleteScheduleResponse where
  messageName :: Proxy DeleteScheduleResponse -> Text
messageName Proxy DeleteScheduleResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DeleteScheduleResponse"
  packedMessageDescriptor :: Proxy DeleteScheduleResponse -> ByteString
packedMessageDescriptor Proxy DeleteScheduleResponse
_
    = ByteString
"\n\
      \\SYNDeleteScheduleResponse"
  packedFileDescriptor :: Proxy DeleteScheduleResponse -> ByteString
packedFileDescriptor Proxy DeleteScheduleResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DeleteScheduleResponse)
fieldsByTag = let in [(Tag, FieldDescriptor DeleteScheduleResponse)]
-> Map Tag (FieldDescriptor DeleteScheduleResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' DeleteScheduleResponse FieldSet
unknownFields
    = (DeleteScheduleResponse -> FieldSet)
-> (DeleteScheduleResponse -> FieldSet -> DeleteScheduleResponse)
-> Lens' DeleteScheduleResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DeleteScheduleResponse -> FieldSet
_DeleteScheduleResponse'_unknownFields
        (\ DeleteScheduleResponse
x__ FieldSet
y__ -> DeleteScheduleResponse
x__ {_DeleteScheduleResponse'_unknownFields = y__})
  defMessage :: DeleteScheduleResponse
defMessage
    = DeleteScheduleResponse'_constructor
        {_DeleteScheduleResponse'_unknownFields :: FieldSet
_DeleteScheduleResponse'_unknownFields = []}
  parseMessage :: Parser DeleteScheduleResponse
parseMessage
    = let
        loop ::
          DeleteScheduleResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser DeleteScheduleResponse
        loop :: DeleteScheduleResponse -> Parser DeleteScheduleResponse
loop DeleteScheduleResponse
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 DeleteScheduleResponse
-> String -> Parser DeleteScheduleResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do DeleteScheduleResponse -> Parser DeleteScheduleResponse
loop DeleteScheduleResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"DeleteScheduleResponse"
  buildMessage :: DeleteScheduleResponse -> Builder
buildMessage
    = \ DeleteScheduleResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  DeleteScheduleResponse
  DeleteScheduleResponse
  FieldSet
  FieldSet
-> DeleteScheduleResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DeleteScheduleResponse
  DeleteScheduleResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DeleteScheduleResponse FieldSet
Data.ProtoLens.unknownFields DeleteScheduleResponse
_x)
instance Control.DeepSeq.NFData DeleteScheduleResponse where
  rnf :: DeleteScheduleResponse -> ()
rnf
    = \ DeleteScheduleResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DeleteScheduleResponse -> FieldSet
_DeleteScheduleResponse'_unknownFields DeleteScheduleResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' DeleteWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowExecution' @:: Lens' DeleteWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowExecution' @:: Lens' DeleteWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@ -}
data DeleteWorkflowExecutionRequest
  = DeleteWorkflowExecutionRequest'_constructor {DeleteWorkflowExecutionRequest -> Text
_DeleteWorkflowExecutionRequest'namespace :: !Data.Text.Text,
                                                 DeleteWorkflowExecutionRequest -> Maybe WorkflowExecution
_DeleteWorkflowExecutionRequest'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                 DeleteWorkflowExecutionRequest -> FieldSet
_DeleteWorkflowExecutionRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Bool
(DeleteWorkflowExecutionRequest
 -> DeleteWorkflowExecutionRequest -> Bool)
-> (DeleteWorkflowExecutionRequest
    -> DeleteWorkflowExecutionRequest -> Bool)
-> Eq DeleteWorkflowExecutionRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Bool
== :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Bool
$c/= :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Bool
/= :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Bool
Prelude.Eq, Eq DeleteWorkflowExecutionRequest
Eq DeleteWorkflowExecutionRequest =>
(DeleteWorkflowExecutionRequest
 -> DeleteWorkflowExecutionRequest -> Ordering)
-> (DeleteWorkflowExecutionRequest
    -> DeleteWorkflowExecutionRequest -> Bool)
-> (DeleteWorkflowExecutionRequest
    -> DeleteWorkflowExecutionRequest -> Bool)
-> (DeleteWorkflowExecutionRequest
    -> DeleteWorkflowExecutionRequest -> Bool)
-> (DeleteWorkflowExecutionRequest
    -> DeleteWorkflowExecutionRequest -> Bool)
-> (DeleteWorkflowExecutionRequest
    -> DeleteWorkflowExecutionRequest
    -> DeleteWorkflowExecutionRequest)
-> (DeleteWorkflowExecutionRequest
    -> DeleteWorkflowExecutionRequest
    -> DeleteWorkflowExecutionRequest)
-> Ord DeleteWorkflowExecutionRequest
DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Bool
DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Ordering
DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> DeleteWorkflowExecutionRequest
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 :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Ordering
compare :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Ordering
$c< :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Bool
< :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Bool
$c<= :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Bool
<= :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Bool
$c> :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Bool
> :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Bool
$c>= :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Bool
>= :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> Bool
$cmax :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> DeleteWorkflowExecutionRequest
max :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> DeleteWorkflowExecutionRequest
$cmin :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> DeleteWorkflowExecutionRequest
min :: DeleteWorkflowExecutionRequest
-> DeleteWorkflowExecutionRequest -> DeleteWorkflowExecutionRequest
Prelude.Ord)
instance Prelude.Show DeleteWorkflowExecutionRequest where
  showsPrec :: Int -> DeleteWorkflowExecutionRequest -> ShowS
showsPrec Int
_ DeleteWorkflowExecutionRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DeleteWorkflowExecutionRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DeleteWorkflowExecutionRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DeleteWorkflowExecutionRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> DeleteWorkflowExecutionRequest
-> f DeleteWorkflowExecutionRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> DeleteWorkflowExecutionRequest
 -> f DeleteWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DeleteWorkflowExecutionRequest
-> f DeleteWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DeleteWorkflowExecutionRequest -> Text)
-> (DeleteWorkflowExecutionRequest
    -> Text -> DeleteWorkflowExecutionRequest)
-> Lens
     DeleteWorkflowExecutionRequest
     DeleteWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DeleteWorkflowExecutionRequest -> Text
_DeleteWorkflowExecutionRequest'namespace
           (\ DeleteWorkflowExecutionRequest
x__ Text
y__
              -> DeleteWorkflowExecutionRequest
x__ {_DeleteWorkflowExecutionRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DeleteWorkflowExecutionRequest "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> DeleteWorkflowExecutionRequest
-> f DeleteWorkflowExecutionRequest
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> DeleteWorkflowExecutionRequest
 -> f DeleteWorkflowExecutionRequest)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> DeleteWorkflowExecutionRequest
-> f DeleteWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DeleteWorkflowExecutionRequest -> Maybe WorkflowExecution)
-> (DeleteWorkflowExecutionRequest
    -> Maybe WorkflowExecution -> DeleteWorkflowExecutionRequest)
-> Lens
     DeleteWorkflowExecutionRequest
     DeleteWorkflowExecutionRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DeleteWorkflowExecutionRequest -> Maybe WorkflowExecution
_DeleteWorkflowExecutionRequest'workflowExecution
           (\ DeleteWorkflowExecutionRequest
x__ Maybe WorkflowExecution
y__
              -> DeleteWorkflowExecutionRequest
x__ {_DeleteWorkflowExecutionRequest'workflowExecution = y__}))
        (WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DeleteWorkflowExecutionRequest "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> DeleteWorkflowExecutionRequest
-> f DeleteWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> DeleteWorkflowExecutionRequest
 -> f DeleteWorkflowExecutionRequest)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> DeleteWorkflowExecutionRequest
-> f DeleteWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DeleteWorkflowExecutionRequest -> Maybe WorkflowExecution)
-> (DeleteWorkflowExecutionRequest
    -> Maybe WorkflowExecution -> DeleteWorkflowExecutionRequest)
-> Lens
     DeleteWorkflowExecutionRequest
     DeleteWorkflowExecutionRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DeleteWorkflowExecutionRequest -> Maybe WorkflowExecution
_DeleteWorkflowExecutionRequest'workflowExecution
           (\ DeleteWorkflowExecutionRequest
x__ Maybe WorkflowExecution
y__
              -> DeleteWorkflowExecutionRequest
x__ {_DeleteWorkflowExecutionRequest'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DeleteWorkflowExecutionRequest where
  messageName :: Proxy DeleteWorkflowExecutionRequest -> Text
messageName Proxy DeleteWorkflowExecutionRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DeleteWorkflowExecutionRequest"
  packedMessageDescriptor :: Proxy DeleteWorkflowExecutionRequest -> ByteString
packedMessageDescriptor Proxy DeleteWorkflowExecutionRequest
_
    = ByteString
"\n\
      \\RSDeleteWorkflowExecutionRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2X\n\
      \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution"
  packedFileDescriptor :: Proxy DeleteWorkflowExecutionRequest -> ByteString
packedFileDescriptor Proxy DeleteWorkflowExecutionRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DeleteWorkflowExecutionRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor DeleteWorkflowExecutionRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DeleteWorkflowExecutionRequest Text
-> FieldDescriptor DeleteWorkflowExecutionRequest
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
     DeleteWorkflowExecutionRequest
     DeleteWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor DeleteWorkflowExecutionRequest 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 DeleteWorkflowExecutionRequest
        workflowExecution__field_descriptor :: FieldDescriptor DeleteWorkflowExecutionRequest
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor DeleteWorkflowExecutionRequest WorkflowExecution
-> FieldDescriptor DeleteWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
              (Lens
  DeleteWorkflowExecutionRequest
  DeleteWorkflowExecutionRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor DeleteWorkflowExecutionRequest WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor DeleteWorkflowExecutionRequest
      in
        [(Tag, FieldDescriptor DeleteWorkflowExecutionRequest)]
-> Map Tag (FieldDescriptor DeleteWorkflowExecutionRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DeleteWorkflowExecutionRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DeleteWorkflowExecutionRequest
workflowExecution__field_descriptor)]
  unknownFields :: Lens' DeleteWorkflowExecutionRequest FieldSet
unknownFields
    = (DeleteWorkflowExecutionRequest -> FieldSet)
-> (DeleteWorkflowExecutionRequest
    -> FieldSet -> DeleteWorkflowExecutionRequest)
-> Lens' DeleteWorkflowExecutionRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DeleteWorkflowExecutionRequest -> FieldSet
_DeleteWorkflowExecutionRequest'_unknownFields
        (\ DeleteWorkflowExecutionRequest
x__ FieldSet
y__
           -> DeleteWorkflowExecutionRequest
x__ {_DeleteWorkflowExecutionRequest'_unknownFields = y__})
  defMessage :: DeleteWorkflowExecutionRequest
defMessage
    = DeleteWorkflowExecutionRequest'_constructor
        {_DeleteWorkflowExecutionRequest'namespace :: Text
_DeleteWorkflowExecutionRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DeleteWorkflowExecutionRequest'workflowExecution :: Maybe WorkflowExecution
_DeleteWorkflowExecutionRequest'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _DeleteWorkflowExecutionRequest'_unknownFields :: FieldSet
_DeleteWorkflowExecutionRequest'_unknownFields = []}
  parseMessage :: Parser DeleteWorkflowExecutionRequest
parseMessage
    = let
        loop ::
          DeleteWorkflowExecutionRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser DeleteWorkflowExecutionRequest
        loop :: DeleteWorkflowExecutionRequest
-> Parser DeleteWorkflowExecutionRequest
loop DeleteWorkflowExecutionRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                        Word64
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 DeleteWorkflowExecutionRequest
-> String -> Parser DeleteWorkflowExecutionRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do DeleteWorkflowExecutionRequest
-> Parser DeleteWorkflowExecutionRequest
loop DeleteWorkflowExecutionRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"DeleteWorkflowExecutionRequest"
  buildMessage :: DeleteWorkflowExecutionRequest -> Builder
buildMessage
    = \ DeleteWorkflowExecutionRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  DeleteWorkflowExecutionRequest
  DeleteWorkflowExecutionRequest
  Text
  Text
-> DeleteWorkflowExecutionRequest -> 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") DeleteWorkflowExecutionRequest
_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 WorkflowExecution)
  DeleteWorkflowExecutionRequest
  DeleteWorkflowExecutionRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> DeleteWorkflowExecutionRequest -> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution") DeleteWorkflowExecutionRequest
_x
                 of
                   Maybe WorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just WorkflowExecution
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  DeleteWorkflowExecutionRequest
  DeleteWorkflowExecutionRequest
  FieldSet
  FieldSet
-> DeleteWorkflowExecutionRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DeleteWorkflowExecutionRequest
  DeleteWorkflowExecutionRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DeleteWorkflowExecutionRequest FieldSet
Data.ProtoLens.unknownFields DeleteWorkflowExecutionRequest
_x)))
instance Control.DeepSeq.NFData DeleteWorkflowExecutionRequest where
  rnf :: DeleteWorkflowExecutionRequest -> ()
rnf
    = \ DeleteWorkflowExecutionRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DeleteWorkflowExecutionRequest -> FieldSet
_DeleteWorkflowExecutionRequest'_unknownFields DeleteWorkflowExecutionRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DeleteWorkflowExecutionRequest -> Text
_DeleteWorkflowExecutionRequest'namespace DeleteWorkflowExecutionRequest
x__)
                (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (DeleteWorkflowExecutionRequest -> Maybe WorkflowExecution
_DeleteWorkflowExecutionRequest'workflowExecution DeleteWorkflowExecutionRequest
x__) ()))
{- | Fields :
      -}
data DeleteWorkflowExecutionResponse
  = DeleteWorkflowExecutionResponse'_constructor {DeleteWorkflowExecutionResponse -> FieldSet
_DeleteWorkflowExecutionResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Bool
(DeleteWorkflowExecutionResponse
 -> DeleteWorkflowExecutionResponse -> Bool)
-> (DeleteWorkflowExecutionResponse
    -> DeleteWorkflowExecutionResponse -> Bool)
-> Eq DeleteWorkflowExecutionResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Bool
== :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Bool
$c/= :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Bool
/= :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Bool
Prelude.Eq, Eq DeleteWorkflowExecutionResponse
Eq DeleteWorkflowExecutionResponse =>
(DeleteWorkflowExecutionResponse
 -> DeleteWorkflowExecutionResponse -> Ordering)
-> (DeleteWorkflowExecutionResponse
    -> DeleteWorkflowExecutionResponse -> Bool)
-> (DeleteWorkflowExecutionResponse
    -> DeleteWorkflowExecutionResponse -> Bool)
-> (DeleteWorkflowExecutionResponse
    -> DeleteWorkflowExecutionResponse -> Bool)
-> (DeleteWorkflowExecutionResponse
    -> DeleteWorkflowExecutionResponse -> Bool)
-> (DeleteWorkflowExecutionResponse
    -> DeleteWorkflowExecutionResponse
    -> DeleteWorkflowExecutionResponse)
-> (DeleteWorkflowExecutionResponse
    -> DeleteWorkflowExecutionResponse
    -> DeleteWorkflowExecutionResponse)
-> Ord DeleteWorkflowExecutionResponse
DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Bool
DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Ordering
DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse
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 :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Ordering
compare :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Ordering
$c< :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Bool
< :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Bool
$c<= :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Bool
<= :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Bool
$c> :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Bool
> :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Bool
$c>= :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Bool
>= :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse -> Bool
$cmax :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse
max :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse
$cmin :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse
min :: DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse
-> DeleteWorkflowExecutionResponse
Prelude.Ord)
instance Prelude.Show DeleteWorkflowExecutionResponse where
  showsPrec :: Int -> DeleteWorkflowExecutionResponse -> ShowS
showsPrec Int
_ DeleteWorkflowExecutionResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DeleteWorkflowExecutionResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DeleteWorkflowExecutionResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message DeleteWorkflowExecutionResponse where
  messageName :: Proxy DeleteWorkflowExecutionResponse -> Text
messageName Proxy DeleteWorkflowExecutionResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DeleteWorkflowExecutionResponse"
  packedMessageDescriptor :: Proxy DeleteWorkflowExecutionResponse -> ByteString
packedMessageDescriptor Proxy DeleteWorkflowExecutionResponse
_
    = ByteString
"\n\
      \\USDeleteWorkflowExecutionResponse"
  packedFileDescriptor :: Proxy DeleteWorkflowExecutionResponse -> ByteString
packedFileDescriptor Proxy DeleteWorkflowExecutionResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DeleteWorkflowExecutionResponse)
fieldsByTag = let in [(Tag, FieldDescriptor DeleteWorkflowExecutionResponse)]
-> Map Tag (FieldDescriptor DeleteWorkflowExecutionResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' DeleteWorkflowExecutionResponse FieldSet
unknownFields
    = (DeleteWorkflowExecutionResponse -> FieldSet)
-> (DeleteWorkflowExecutionResponse
    -> FieldSet -> DeleteWorkflowExecutionResponse)
-> Lens' DeleteWorkflowExecutionResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DeleteWorkflowExecutionResponse -> FieldSet
_DeleteWorkflowExecutionResponse'_unknownFields
        (\ DeleteWorkflowExecutionResponse
x__ FieldSet
y__
           -> DeleteWorkflowExecutionResponse
x__ {_DeleteWorkflowExecutionResponse'_unknownFields = y__})
  defMessage :: DeleteWorkflowExecutionResponse
defMessage
    = DeleteWorkflowExecutionResponse'_constructor
        {_DeleteWorkflowExecutionResponse'_unknownFields :: FieldSet
_DeleteWorkflowExecutionResponse'_unknownFields = []}
  parseMessage :: Parser DeleteWorkflowExecutionResponse
parseMessage
    = let
        loop ::
          DeleteWorkflowExecutionResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser DeleteWorkflowExecutionResponse
        loop :: DeleteWorkflowExecutionResponse
-> Parser DeleteWorkflowExecutionResponse
loop DeleteWorkflowExecutionResponse
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 DeleteWorkflowExecutionResponse
-> String -> Parser DeleteWorkflowExecutionResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do DeleteWorkflowExecutionResponse
-> Parser DeleteWorkflowExecutionResponse
loop DeleteWorkflowExecutionResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"DeleteWorkflowExecutionResponse"
  buildMessage :: DeleteWorkflowExecutionResponse -> Builder
buildMessage
    = \ DeleteWorkflowExecutionResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  DeleteWorkflowExecutionResponse
  DeleteWorkflowExecutionResponse
  FieldSet
  FieldSet
-> DeleteWorkflowExecutionResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DeleteWorkflowExecutionResponse
  DeleteWorkflowExecutionResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DeleteWorkflowExecutionResponse FieldSet
Data.ProtoLens.unknownFields DeleteWorkflowExecutionResponse
_x)
instance Control.DeepSeq.NFData DeleteWorkflowExecutionResponse where
  rnf :: DeleteWorkflowExecutionResponse -> ()
rnf
    = \ DeleteWorkflowExecutionResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DeleteWorkflowExecutionResponse -> FieldSet
_DeleteWorkflowExecutionResponse'_unknownFields DeleteWorkflowExecutionResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' DeprecateNamespaceRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.securityToken' @:: Lens' DeprecateNamespaceRequest Data.Text.Text@ -}
data DeprecateNamespaceRequest
  = DeprecateNamespaceRequest'_constructor {DeprecateNamespaceRequest -> Text
_DeprecateNamespaceRequest'namespace :: !Data.Text.Text,
                                            DeprecateNamespaceRequest -> Text
_DeprecateNamespaceRequest'securityToken :: !Data.Text.Text,
                                            DeprecateNamespaceRequest -> FieldSet
_DeprecateNamespaceRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool
(DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool)
-> (DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool)
-> Eq DeprecateNamespaceRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool
== :: DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool
$c/= :: DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool
/= :: DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool
Prelude.Eq, Eq DeprecateNamespaceRequest
Eq DeprecateNamespaceRequest =>
(DeprecateNamespaceRequest
 -> DeprecateNamespaceRequest -> Ordering)
-> (DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool)
-> (DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool)
-> (DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool)
-> (DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool)
-> (DeprecateNamespaceRequest
    -> DeprecateNamespaceRequest -> DeprecateNamespaceRequest)
-> (DeprecateNamespaceRequest
    -> DeprecateNamespaceRequest -> DeprecateNamespaceRequest)
-> Ord DeprecateNamespaceRequest
DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool
DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Ordering
DeprecateNamespaceRequest
-> DeprecateNamespaceRequest -> DeprecateNamespaceRequest
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 :: DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Ordering
compare :: DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Ordering
$c< :: DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool
< :: DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool
$c<= :: DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool
<= :: DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool
$c> :: DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool
> :: DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool
$c>= :: DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool
>= :: DeprecateNamespaceRequest -> DeprecateNamespaceRequest -> Bool
$cmax :: DeprecateNamespaceRequest
-> DeprecateNamespaceRequest -> DeprecateNamespaceRequest
max :: DeprecateNamespaceRequest
-> DeprecateNamespaceRequest -> DeprecateNamespaceRequest
$cmin :: DeprecateNamespaceRequest
-> DeprecateNamespaceRequest -> DeprecateNamespaceRequest
min :: DeprecateNamespaceRequest
-> DeprecateNamespaceRequest -> DeprecateNamespaceRequest
Prelude.Ord)
instance Prelude.Show DeprecateNamespaceRequest where
  showsPrec :: Int -> DeprecateNamespaceRequest -> ShowS
showsPrec Int
_ DeprecateNamespaceRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DeprecateNamespaceRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DeprecateNamespaceRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DeprecateNamespaceRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> DeprecateNamespaceRequest
-> f DeprecateNamespaceRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> DeprecateNamespaceRequest -> f DeprecateNamespaceRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DeprecateNamespaceRequest
-> f DeprecateNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DeprecateNamespaceRequest -> Text)
-> (DeprecateNamespaceRequest -> Text -> DeprecateNamespaceRequest)
-> Lens
     DeprecateNamespaceRequest DeprecateNamespaceRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DeprecateNamespaceRequest -> Text
_DeprecateNamespaceRequest'namespace
           (\ DeprecateNamespaceRequest
x__ Text
y__ -> DeprecateNamespaceRequest
x__ {_DeprecateNamespaceRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DeprecateNamespaceRequest "securityToken" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "securityToken"
-> (Text -> f Text)
-> DeprecateNamespaceRequest
-> f DeprecateNamespaceRequest
fieldOf Proxy# "securityToken"
_
    = ((Text -> f Text)
 -> DeprecateNamespaceRequest -> f DeprecateNamespaceRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DeprecateNamespaceRequest
-> f DeprecateNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DeprecateNamespaceRequest -> Text)
-> (DeprecateNamespaceRequest -> Text -> DeprecateNamespaceRequest)
-> Lens
     DeprecateNamespaceRequest DeprecateNamespaceRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DeprecateNamespaceRequest -> Text
_DeprecateNamespaceRequest'securityToken
           (\ DeprecateNamespaceRequest
x__ Text
y__
              -> DeprecateNamespaceRequest
x__ {_DeprecateNamespaceRequest'securityToken = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DeprecateNamespaceRequest where
  messageName :: Proxy DeprecateNamespaceRequest -> Text
messageName Proxy DeprecateNamespaceRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DeprecateNamespaceRequest"
  packedMessageDescriptor :: Proxy DeprecateNamespaceRequest -> ByteString
packedMessageDescriptor Proxy DeprecateNamespaceRequest
_
    = ByteString
"\n\
      \\EMDeprecateNamespaceRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2%\n\
      \\SOsecurity_token\CAN\STX \SOH(\tR\rsecurityToken"
  packedFileDescriptor :: Proxy DeprecateNamespaceRequest -> ByteString
packedFileDescriptor Proxy DeprecateNamespaceRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DeprecateNamespaceRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor DeprecateNamespaceRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DeprecateNamespaceRequest Text
-> FieldDescriptor DeprecateNamespaceRequest
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
     DeprecateNamespaceRequest DeprecateNamespaceRequest Text Text
-> FieldAccessor DeprecateNamespaceRequest 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 DeprecateNamespaceRequest
        securityToken__field_descriptor :: FieldDescriptor DeprecateNamespaceRequest
securityToken__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DeprecateNamespaceRequest Text
-> FieldDescriptor DeprecateNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"security_token"
              (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
     DeprecateNamespaceRequest DeprecateNamespaceRequest Text Text
-> FieldAccessor DeprecateNamespaceRequest 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 @"securityToken")) ::
              Data.ProtoLens.FieldDescriptor DeprecateNamespaceRequest
      in
        [(Tag, FieldDescriptor DeprecateNamespaceRequest)]
-> Map Tag (FieldDescriptor DeprecateNamespaceRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DeprecateNamespaceRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DeprecateNamespaceRequest
securityToken__field_descriptor)]
  unknownFields :: Lens' DeprecateNamespaceRequest FieldSet
unknownFields
    = (DeprecateNamespaceRequest -> FieldSet)
-> (DeprecateNamespaceRequest
    -> FieldSet -> DeprecateNamespaceRequest)
-> Lens' DeprecateNamespaceRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DeprecateNamespaceRequest -> FieldSet
_DeprecateNamespaceRequest'_unknownFields
        (\ DeprecateNamespaceRequest
x__ FieldSet
y__
           -> DeprecateNamespaceRequest
x__ {_DeprecateNamespaceRequest'_unknownFields = y__})
  defMessage :: DeprecateNamespaceRequest
defMessage
    = DeprecateNamespaceRequest'_constructor
        {_DeprecateNamespaceRequest'namespace :: Text
_DeprecateNamespaceRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DeprecateNamespaceRequest'securityToken :: Text
_DeprecateNamespaceRequest'securityToken = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DeprecateNamespaceRequest'_unknownFields :: FieldSet
_DeprecateNamespaceRequest'_unknownFields = []}
  parseMessage :: Parser DeprecateNamespaceRequest
parseMessage
    = let
        loop ::
          DeprecateNamespaceRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser DeprecateNamespaceRequest
        loop :: DeprecateNamespaceRequest -> Parser DeprecateNamespaceRequest
loop DeprecateNamespaceRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
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
"security_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"securityToken") 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 DeprecateNamespaceRequest
-> String -> Parser DeprecateNamespaceRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do DeprecateNamespaceRequest -> Parser DeprecateNamespaceRequest
loop DeprecateNamespaceRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"DeprecateNamespaceRequest"
  buildMessage :: DeprecateNamespaceRequest -> Builder
buildMessage
    = \ DeprecateNamespaceRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text DeprecateNamespaceRequest DeprecateNamespaceRequest Text Text
-> DeprecateNamespaceRequest -> 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") DeprecateNamespaceRequest
_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 DeprecateNamespaceRequest DeprecateNamespaceRequest Text Text
-> DeprecateNamespaceRequest -> 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 @"securityToken") DeprecateNamespaceRequest
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  DeprecateNamespaceRequest
  DeprecateNamespaceRequest
  FieldSet
  FieldSet
-> DeprecateNamespaceRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DeprecateNamespaceRequest
  DeprecateNamespaceRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DeprecateNamespaceRequest FieldSet
Data.ProtoLens.unknownFields DeprecateNamespaceRequest
_x)))
instance Control.DeepSeq.NFData DeprecateNamespaceRequest where
  rnf :: DeprecateNamespaceRequest -> ()
rnf
    = \ DeprecateNamespaceRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DeprecateNamespaceRequest -> FieldSet
_DeprecateNamespaceRequest'_unknownFields DeprecateNamespaceRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DeprecateNamespaceRequest -> Text
_DeprecateNamespaceRequest'namespace DeprecateNamespaceRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (DeprecateNamespaceRequest -> Text
_DeprecateNamespaceRequest'securityToken DeprecateNamespaceRequest
x__) ()))
{- | Fields :
      -}
data DeprecateNamespaceResponse
  = DeprecateNamespaceResponse'_constructor {DeprecateNamespaceResponse -> FieldSet
_DeprecateNamespaceResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DeprecateNamespaceResponse -> DeprecateNamespaceResponse -> Bool
(DeprecateNamespaceResponse -> DeprecateNamespaceResponse -> Bool)
-> (DeprecateNamespaceResponse
    -> DeprecateNamespaceResponse -> Bool)
-> Eq DeprecateNamespaceResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DeprecateNamespaceResponse -> DeprecateNamespaceResponse -> Bool
== :: DeprecateNamespaceResponse -> DeprecateNamespaceResponse -> Bool
$c/= :: DeprecateNamespaceResponse -> DeprecateNamespaceResponse -> Bool
/= :: DeprecateNamespaceResponse -> DeprecateNamespaceResponse -> Bool
Prelude.Eq, Eq DeprecateNamespaceResponse
Eq DeprecateNamespaceResponse =>
(DeprecateNamespaceResponse
 -> DeprecateNamespaceResponse -> Ordering)
-> (DeprecateNamespaceResponse
    -> DeprecateNamespaceResponse -> Bool)
-> (DeprecateNamespaceResponse
    -> DeprecateNamespaceResponse -> Bool)
-> (DeprecateNamespaceResponse
    -> DeprecateNamespaceResponse -> Bool)
-> (DeprecateNamespaceResponse
    -> DeprecateNamespaceResponse -> Bool)
-> (DeprecateNamespaceResponse
    -> DeprecateNamespaceResponse -> DeprecateNamespaceResponse)
-> (DeprecateNamespaceResponse
    -> DeprecateNamespaceResponse -> DeprecateNamespaceResponse)
-> Ord DeprecateNamespaceResponse
DeprecateNamespaceResponse -> DeprecateNamespaceResponse -> Bool
DeprecateNamespaceResponse
-> DeprecateNamespaceResponse -> Ordering
DeprecateNamespaceResponse
-> DeprecateNamespaceResponse -> DeprecateNamespaceResponse
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 :: DeprecateNamespaceResponse
-> DeprecateNamespaceResponse -> Ordering
compare :: DeprecateNamespaceResponse
-> DeprecateNamespaceResponse -> Ordering
$c< :: DeprecateNamespaceResponse -> DeprecateNamespaceResponse -> Bool
< :: DeprecateNamespaceResponse -> DeprecateNamespaceResponse -> Bool
$c<= :: DeprecateNamespaceResponse -> DeprecateNamespaceResponse -> Bool
<= :: DeprecateNamespaceResponse -> DeprecateNamespaceResponse -> Bool
$c> :: DeprecateNamespaceResponse -> DeprecateNamespaceResponse -> Bool
> :: DeprecateNamespaceResponse -> DeprecateNamespaceResponse -> Bool
$c>= :: DeprecateNamespaceResponse -> DeprecateNamespaceResponse -> Bool
>= :: DeprecateNamespaceResponse -> DeprecateNamespaceResponse -> Bool
$cmax :: DeprecateNamespaceResponse
-> DeprecateNamespaceResponse -> DeprecateNamespaceResponse
max :: DeprecateNamespaceResponse
-> DeprecateNamespaceResponse -> DeprecateNamespaceResponse
$cmin :: DeprecateNamespaceResponse
-> DeprecateNamespaceResponse -> DeprecateNamespaceResponse
min :: DeprecateNamespaceResponse
-> DeprecateNamespaceResponse -> DeprecateNamespaceResponse
Prelude.Ord)
instance Prelude.Show DeprecateNamespaceResponse where
  showsPrec :: Int -> DeprecateNamespaceResponse -> ShowS
showsPrec Int
_ DeprecateNamespaceResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DeprecateNamespaceResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DeprecateNamespaceResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message DeprecateNamespaceResponse where
  messageName :: Proxy DeprecateNamespaceResponse -> Text
messageName Proxy DeprecateNamespaceResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DeprecateNamespaceResponse"
  packedMessageDescriptor :: Proxy DeprecateNamespaceResponse -> ByteString
packedMessageDescriptor Proxy DeprecateNamespaceResponse
_
    = ByteString
"\n\
      \\SUBDeprecateNamespaceResponse"
  packedFileDescriptor :: Proxy DeprecateNamespaceResponse -> ByteString
packedFileDescriptor Proxy DeprecateNamespaceResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DeprecateNamespaceResponse)
fieldsByTag = let in [(Tag, FieldDescriptor DeprecateNamespaceResponse)]
-> Map Tag (FieldDescriptor DeprecateNamespaceResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' DeprecateNamespaceResponse FieldSet
unknownFields
    = (DeprecateNamespaceResponse -> FieldSet)
-> (DeprecateNamespaceResponse
    -> FieldSet -> DeprecateNamespaceResponse)
-> Lens' DeprecateNamespaceResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DeprecateNamespaceResponse -> FieldSet
_DeprecateNamespaceResponse'_unknownFields
        (\ DeprecateNamespaceResponse
x__ FieldSet
y__
           -> DeprecateNamespaceResponse
x__ {_DeprecateNamespaceResponse'_unknownFields = y__})
  defMessage :: DeprecateNamespaceResponse
defMessage
    = DeprecateNamespaceResponse'_constructor
        {_DeprecateNamespaceResponse'_unknownFields :: FieldSet
_DeprecateNamespaceResponse'_unknownFields = []}
  parseMessage :: Parser DeprecateNamespaceResponse
parseMessage
    = let
        loop ::
          DeprecateNamespaceResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser DeprecateNamespaceResponse
        loop :: DeprecateNamespaceResponse -> Parser DeprecateNamespaceResponse
loop DeprecateNamespaceResponse
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 DeprecateNamespaceResponse
-> String -> Parser DeprecateNamespaceResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do DeprecateNamespaceResponse -> Parser DeprecateNamespaceResponse
loop DeprecateNamespaceResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"DeprecateNamespaceResponse"
  buildMessage :: DeprecateNamespaceResponse -> Builder
buildMessage
    = \ DeprecateNamespaceResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  DeprecateNamespaceResponse
  DeprecateNamespaceResponse
  FieldSet
  FieldSet
-> DeprecateNamespaceResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DeprecateNamespaceResponse
  DeprecateNamespaceResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DeprecateNamespaceResponse FieldSet
Data.ProtoLens.unknownFields DeprecateNamespaceResponse
_x)
instance Control.DeepSeq.NFData DeprecateNamespaceResponse where
  rnf :: DeprecateNamespaceResponse -> ()
rnf
    = \ DeprecateNamespaceResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DeprecateNamespaceResponse -> FieldSet
_DeprecateNamespaceResponse'_unknownFields DeprecateNamespaceResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' DescribeBatchOperationRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.jobId' @:: Lens' DescribeBatchOperationRequest Data.Text.Text@ -}
data DescribeBatchOperationRequest
  = DescribeBatchOperationRequest'_constructor {DescribeBatchOperationRequest -> Text
_DescribeBatchOperationRequest'namespace :: !Data.Text.Text,
                                                DescribeBatchOperationRequest -> Text
_DescribeBatchOperationRequest'jobId :: !Data.Text.Text,
                                                DescribeBatchOperationRequest -> FieldSet
_DescribeBatchOperationRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Bool
(DescribeBatchOperationRequest
 -> DescribeBatchOperationRequest -> Bool)
-> (DescribeBatchOperationRequest
    -> DescribeBatchOperationRequest -> Bool)
-> Eq DescribeBatchOperationRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Bool
== :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Bool
$c/= :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Bool
/= :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Bool
Prelude.Eq, Eq DescribeBatchOperationRequest
Eq DescribeBatchOperationRequest =>
(DescribeBatchOperationRequest
 -> DescribeBatchOperationRequest -> Ordering)
-> (DescribeBatchOperationRequest
    -> DescribeBatchOperationRequest -> Bool)
-> (DescribeBatchOperationRequest
    -> DescribeBatchOperationRequest -> Bool)
-> (DescribeBatchOperationRequest
    -> DescribeBatchOperationRequest -> Bool)
-> (DescribeBatchOperationRequest
    -> DescribeBatchOperationRequest -> Bool)
-> (DescribeBatchOperationRequest
    -> DescribeBatchOperationRequest -> DescribeBatchOperationRequest)
-> (DescribeBatchOperationRequest
    -> DescribeBatchOperationRequest -> DescribeBatchOperationRequest)
-> Ord DescribeBatchOperationRequest
DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Bool
DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Ordering
DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> DescribeBatchOperationRequest
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 :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Ordering
compare :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Ordering
$c< :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Bool
< :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Bool
$c<= :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Bool
<= :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Bool
$c> :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Bool
> :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Bool
$c>= :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Bool
>= :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> Bool
$cmax :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> DescribeBatchOperationRequest
max :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> DescribeBatchOperationRequest
$cmin :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> DescribeBatchOperationRequest
min :: DescribeBatchOperationRequest
-> DescribeBatchOperationRequest -> DescribeBatchOperationRequest
Prelude.Ord)
instance Prelude.Show DescribeBatchOperationRequest where
  showsPrec :: Int -> DescribeBatchOperationRequest -> ShowS
showsPrec Int
_ DescribeBatchOperationRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DescribeBatchOperationRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DescribeBatchOperationRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DescribeBatchOperationRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> DescribeBatchOperationRequest
-> f DescribeBatchOperationRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> DescribeBatchOperationRequest
 -> f DescribeBatchOperationRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DescribeBatchOperationRequest
-> f DescribeBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeBatchOperationRequest -> Text)
-> (DescribeBatchOperationRequest
    -> Text -> DescribeBatchOperationRequest)
-> Lens
     DescribeBatchOperationRequest
     DescribeBatchOperationRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeBatchOperationRequest -> Text
_DescribeBatchOperationRequest'namespace
           (\ DescribeBatchOperationRequest
x__ Text
y__
              -> DescribeBatchOperationRequest
x__ {_DescribeBatchOperationRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeBatchOperationRequest "jobId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "jobId"
-> (Text -> f Text)
-> DescribeBatchOperationRequest
-> f DescribeBatchOperationRequest
fieldOf Proxy# "jobId"
_
    = ((Text -> f Text)
 -> DescribeBatchOperationRequest
 -> f DescribeBatchOperationRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DescribeBatchOperationRequest
-> f DescribeBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeBatchOperationRequest -> Text)
-> (DescribeBatchOperationRequest
    -> Text -> DescribeBatchOperationRequest)
-> Lens
     DescribeBatchOperationRequest
     DescribeBatchOperationRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeBatchOperationRequest -> Text
_DescribeBatchOperationRequest'jobId
           (\ DescribeBatchOperationRequest
x__ Text
y__ -> DescribeBatchOperationRequest
x__ {_DescribeBatchOperationRequest'jobId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DescribeBatchOperationRequest where
  messageName :: Proxy DescribeBatchOperationRequest -> Text
messageName Proxy DescribeBatchOperationRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DescribeBatchOperationRequest"
  packedMessageDescriptor :: Proxy DescribeBatchOperationRequest -> ByteString
packedMessageDescriptor Proxy DescribeBatchOperationRequest
_
    = ByteString
"\n\
      \\GSDescribeBatchOperationRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\NAK\n\
      \\ACKjob_id\CAN\STX \SOH(\tR\ENQjobId"
  packedFileDescriptor :: Proxy DescribeBatchOperationRequest -> ByteString
packedFileDescriptor Proxy DescribeBatchOperationRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DescribeBatchOperationRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor DescribeBatchOperationRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DescribeBatchOperationRequest Text
-> FieldDescriptor DescribeBatchOperationRequest
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
     DescribeBatchOperationRequest
     DescribeBatchOperationRequest
     Text
     Text
-> FieldAccessor DescribeBatchOperationRequest 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 DescribeBatchOperationRequest
        jobId__field_descriptor :: FieldDescriptor DescribeBatchOperationRequest
jobId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DescribeBatchOperationRequest Text
-> FieldDescriptor DescribeBatchOperationRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"job_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
     DescribeBatchOperationRequest
     DescribeBatchOperationRequest
     Text
     Text
-> FieldAccessor DescribeBatchOperationRequest 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 @"jobId")) ::
              Data.ProtoLens.FieldDescriptor DescribeBatchOperationRequest
      in
        [(Tag, FieldDescriptor DescribeBatchOperationRequest)]
-> Map Tag (FieldDescriptor DescribeBatchOperationRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DescribeBatchOperationRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DescribeBatchOperationRequest
jobId__field_descriptor)]
  unknownFields :: Lens' DescribeBatchOperationRequest FieldSet
unknownFields
    = (DescribeBatchOperationRequest -> FieldSet)
-> (DescribeBatchOperationRequest
    -> FieldSet -> DescribeBatchOperationRequest)
-> Lens' DescribeBatchOperationRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DescribeBatchOperationRequest -> FieldSet
_DescribeBatchOperationRequest'_unknownFields
        (\ DescribeBatchOperationRequest
x__ FieldSet
y__
           -> DescribeBatchOperationRequest
x__ {_DescribeBatchOperationRequest'_unknownFields = y__})
  defMessage :: DescribeBatchOperationRequest
defMessage
    = DescribeBatchOperationRequest'_constructor
        {_DescribeBatchOperationRequest'namespace :: Text
_DescribeBatchOperationRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeBatchOperationRequest'jobId :: Text
_DescribeBatchOperationRequest'jobId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeBatchOperationRequest'_unknownFields :: FieldSet
_DescribeBatchOperationRequest'_unknownFields = []}
  parseMessage :: Parser DescribeBatchOperationRequest
parseMessage
    = let
        loop ::
          DescribeBatchOperationRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser DescribeBatchOperationRequest
        loop :: DescribeBatchOperationRequest
-> Parser DescribeBatchOperationRequest
loop DescribeBatchOperationRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
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
"job_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"jobId") 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 DescribeBatchOperationRequest
-> String -> Parser DescribeBatchOperationRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do DescribeBatchOperationRequest
-> Parser DescribeBatchOperationRequest
loop DescribeBatchOperationRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"DescribeBatchOperationRequest"
  buildMessage :: DescribeBatchOperationRequest -> Builder
buildMessage
    = \ DescribeBatchOperationRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  DescribeBatchOperationRequest
  DescribeBatchOperationRequest
  Text
  Text
-> DescribeBatchOperationRequest -> 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") DescribeBatchOperationRequest
_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
  DescribeBatchOperationRequest
  DescribeBatchOperationRequest
  Text
  Text
-> DescribeBatchOperationRequest -> 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 @"jobId") DescribeBatchOperationRequest
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  DescribeBatchOperationRequest
  DescribeBatchOperationRequest
  FieldSet
  FieldSet
-> DescribeBatchOperationRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DescribeBatchOperationRequest
  DescribeBatchOperationRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DescribeBatchOperationRequest FieldSet
Data.ProtoLens.unknownFields DescribeBatchOperationRequest
_x)))
instance Control.DeepSeq.NFData DescribeBatchOperationRequest where
  rnf :: DescribeBatchOperationRequest -> ()
rnf
    = \ DescribeBatchOperationRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DescribeBatchOperationRequest -> FieldSet
_DescribeBatchOperationRequest'_unknownFields DescribeBatchOperationRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DescribeBatchOperationRequest -> Text
_DescribeBatchOperationRequest'namespace DescribeBatchOperationRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (DescribeBatchOperationRequest -> Text
_DescribeBatchOperationRequest'jobId DescribeBatchOperationRequest
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.operationType' @:: Lens' DescribeBatchOperationResponse Proto.Temporal.Api.Enums.V1.BatchOperation.BatchOperationType@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.jobId' @:: Lens' DescribeBatchOperationResponse Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.state' @:: Lens' DescribeBatchOperationResponse Proto.Temporal.Api.Enums.V1.BatchOperation.BatchOperationState@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.startTime' @:: Lens' DescribeBatchOperationResponse Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'startTime' @:: Lens' DescribeBatchOperationResponse (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.closeTime' @:: Lens' DescribeBatchOperationResponse Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'closeTime' @:: Lens' DescribeBatchOperationResponse (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.totalOperationCount' @:: Lens' DescribeBatchOperationResponse Data.Int.Int64@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.completeOperationCount' @:: Lens' DescribeBatchOperationResponse Data.Int.Int64@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.failureOperationCount' @:: Lens' DescribeBatchOperationResponse Data.Int.Int64@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' DescribeBatchOperationResponse Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.reason' @:: Lens' DescribeBatchOperationResponse Data.Text.Text@ -}
data DescribeBatchOperationResponse
  = DescribeBatchOperationResponse'_constructor {DescribeBatchOperationResponse -> BatchOperationType
_DescribeBatchOperationResponse'operationType :: !Proto.Temporal.Api.Enums.V1.BatchOperation.BatchOperationType,
                                                 DescribeBatchOperationResponse -> Text
_DescribeBatchOperationResponse'jobId :: !Data.Text.Text,
                                                 DescribeBatchOperationResponse -> BatchOperationState
_DescribeBatchOperationResponse'state :: !Proto.Temporal.Api.Enums.V1.BatchOperation.BatchOperationState,
                                                 DescribeBatchOperationResponse -> Maybe Timestamp
_DescribeBatchOperationResponse'startTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                                 DescribeBatchOperationResponse -> Maybe Timestamp
_DescribeBatchOperationResponse'closeTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                                 DescribeBatchOperationResponse -> Int64
_DescribeBatchOperationResponse'totalOperationCount :: !Data.Int.Int64,
                                                 DescribeBatchOperationResponse -> Int64
_DescribeBatchOperationResponse'completeOperationCount :: !Data.Int.Int64,
                                                 DescribeBatchOperationResponse -> Int64
_DescribeBatchOperationResponse'failureOperationCount :: !Data.Int.Int64,
                                                 DescribeBatchOperationResponse -> Text
_DescribeBatchOperationResponse'identity :: !Data.Text.Text,
                                                 DescribeBatchOperationResponse -> Text
_DescribeBatchOperationResponse'reason :: !Data.Text.Text,
                                                 DescribeBatchOperationResponse -> FieldSet
_DescribeBatchOperationResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Bool
(DescribeBatchOperationResponse
 -> DescribeBatchOperationResponse -> Bool)
-> (DescribeBatchOperationResponse
    -> DescribeBatchOperationResponse -> Bool)
-> Eq DescribeBatchOperationResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Bool
== :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Bool
$c/= :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Bool
/= :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Bool
Prelude.Eq, Eq DescribeBatchOperationResponse
Eq DescribeBatchOperationResponse =>
(DescribeBatchOperationResponse
 -> DescribeBatchOperationResponse -> Ordering)
-> (DescribeBatchOperationResponse
    -> DescribeBatchOperationResponse -> Bool)
-> (DescribeBatchOperationResponse
    -> DescribeBatchOperationResponse -> Bool)
-> (DescribeBatchOperationResponse
    -> DescribeBatchOperationResponse -> Bool)
-> (DescribeBatchOperationResponse
    -> DescribeBatchOperationResponse -> Bool)
-> (DescribeBatchOperationResponse
    -> DescribeBatchOperationResponse
    -> DescribeBatchOperationResponse)
-> (DescribeBatchOperationResponse
    -> DescribeBatchOperationResponse
    -> DescribeBatchOperationResponse)
-> Ord DescribeBatchOperationResponse
DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Bool
DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Ordering
DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> DescribeBatchOperationResponse
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 :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Ordering
compare :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Ordering
$c< :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Bool
< :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Bool
$c<= :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Bool
<= :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Bool
$c> :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Bool
> :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Bool
$c>= :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Bool
>= :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> Bool
$cmax :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> DescribeBatchOperationResponse
max :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> DescribeBatchOperationResponse
$cmin :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> DescribeBatchOperationResponse
min :: DescribeBatchOperationResponse
-> DescribeBatchOperationResponse -> DescribeBatchOperationResponse
Prelude.Ord)
instance Prelude.Show DescribeBatchOperationResponse where
  showsPrec :: Int -> DescribeBatchOperationResponse -> ShowS
showsPrec Int
_ DescribeBatchOperationResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DescribeBatchOperationResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DescribeBatchOperationResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DescribeBatchOperationResponse "operationType" Proto.Temporal.Api.Enums.V1.BatchOperation.BatchOperationType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "operationType"
-> (BatchOperationType -> f BatchOperationType)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
fieldOf Proxy# "operationType"
_
    = ((BatchOperationType -> f BatchOperationType)
 -> DescribeBatchOperationResponse
 -> f DescribeBatchOperationResponse)
-> ((BatchOperationType -> f BatchOperationType)
    -> BatchOperationType -> f BatchOperationType)
-> (BatchOperationType -> f BatchOperationType)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeBatchOperationResponse -> BatchOperationType)
-> (DescribeBatchOperationResponse
    -> BatchOperationType -> DescribeBatchOperationResponse)
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     BatchOperationType
     BatchOperationType
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeBatchOperationResponse -> BatchOperationType
_DescribeBatchOperationResponse'operationType
           (\ DescribeBatchOperationResponse
x__ BatchOperationType
y__
              -> DescribeBatchOperationResponse
x__ {_DescribeBatchOperationResponse'operationType = y__}))
        (BatchOperationType -> f BatchOperationType)
-> BatchOperationType -> f BatchOperationType
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeBatchOperationResponse "jobId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "jobId"
-> (Text -> f Text)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
fieldOf Proxy# "jobId"
_
    = ((Text -> f Text)
 -> DescribeBatchOperationResponse
 -> f DescribeBatchOperationResponse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeBatchOperationResponse -> Text)
-> (DescribeBatchOperationResponse
    -> Text -> DescribeBatchOperationResponse)
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeBatchOperationResponse -> Text
_DescribeBatchOperationResponse'jobId
           (\ DescribeBatchOperationResponse
x__ Text
y__ -> DescribeBatchOperationResponse
x__ {_DescribeBatchOperationResponse'jobId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeBatchOperationResponse "state" Proto.Temporal.Api.Enums.V1.BatchOperation.BatchOperationState where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "state"
-> (BatchOperationState -> f BatchOperationState)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
fieldOf Proxy# "state"
_
    = ((BatchOperationState -> f BatchOperationState)
 -> DescribeBatchOperationResponse
 -> f DescribeBatchOperationResponse)
-> ((BatchOperationState -> f BatchOperationState)
    -> BatchOperationState -> f BatchOperationState)
-> (BatchOperationState -> f BatchOperationState)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeBatchOperationResponse -> BatchOperationState)
-> (DescribeBatchOperationResponse
    -> BatchOperationState -> DescribeBatchOperationResponse)
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     BatchOperationState
     BatchOperationState
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeBatchOperationResponse -> BatchOperationState
_DescribeBatchOperationResponse'state
           (\ DescribeBatchOperationResponse
x__ BatchOperationState
y__ -> DescribeBatchOperationResponse
x__ {_DescribeBatchOperationResponse'state = y__}))
        (BatchOperationState -> f BatchOperationState)
-> BatchOperationState -> f BatchOperationState
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeBatchOperationResponse "startTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startTime"
-> (Timestamp -> f Timestamp)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
fieldOf Proxy# "startTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> DescribeBatchOperationResponse
 -> f DescribeBatchOperationResponse)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeBatchOperationResponse -> Maybe Timestamp)
-> (DescribeBatchOperationResponse
    -> Maybe Timestamp -> DescribeBatchOperationResponse)
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeBatchOperationResponse -> Maybe Timestamp
_DescribeBatchOperationResponse'startTime
           (\ DescribeBatchOperationResponse
x__ Maybe Timestamp
y__
              -> DescribeBatchOperationResponse
x__ {_DescribeBatchOperationResponse'startTime = y__}))
        (Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeBatchOperationResponse "maybe'startTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
fieldOf Proxy# "maybe'startTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> DescribeBatchOperationResponse
 -> f DescribeBatchOperationResponse)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeBatchOperationResponse -> Maybe Timestamp)
-> (DescribeBatchOperationResponse
    -> Maybe Timestamp -> DescribeBatchOperationResponse)
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeBatchOperationResponse -> Maybe Timestamp
_DescribeBatchOperationResponse'startTime
           (\ DescribeBatchOperationResponse
x__ Maybe Timestamp
y__
              -> DescribeBatchOperationResponse
x__ {_DescribeBatchOperationResponse'startTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeBatchOperationResponse "closeTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "closeTime"
-> (Timestamp -> f Timestamp)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
fieldOf Proxy# "closeTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> DescribeBatchOperationResponse
 -> f DescribeBatchOperationResponse)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeBatchOperationResponse -> Maybe Timestamp)
-> (DescribeBatchOperationResponse
    -> Maybe Timestamp -> DescribeBatchOperationResponse)
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeBatchOperationResponse -> Maybe Timestamp
_DescribeBatchOperationResponse'closeTime
           (\ DescribeBatchOperationResponse
x__ Maybe Timestamp
y__
              -> DescribeBatchOperationResponse
x__ {_DescribeBatchOperationResponse'closeTime = y__}))
        (Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeBatchOperationResponse "maybe'closeTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'closeTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
fieldOf Proxy# "maybe'closeTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> DescribeBatchOperationResponse
 -> f DescribeBatchOperationResponse)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeBatchOperationResponse -> Maybe Timestamp)
-> (DescribeBatchOperationResponse
    -> Maybe Timestamp -> DescribeBatchOperationResponse)
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeBatchOperationResponse -> Maybe Timestamp
_DescribeBatchOperationResponse'closeTime
           (\ DescribeBatchOperationResponse
x__ Maybe Timestamp
y__
              -> DescribeBatchOperationResponse
x__ {_DescribeBatchOperationResponse'closeTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeBatchOperationResponse "totalOperationCount" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "totalOperationCount"
-> (Int64 -> f Int64)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
fieldOf Proxy# "totalOperationCount"
_
    = ((Int64 -> f Int64)
 -> DescribeBatchOperationResponse
 -> f DescribeBatchOperationResponse)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeBatchOperationResponse -> Int64)
-> (DescribeBatchOperationResponse
    -> Int64 -> DescribeBatchOperationResponse)
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeBatchOperationResponse -> Int64
_DescribeBatchOperationResponse'totalOperationCount
           (\ DescribeBatchOperationResponse
x__ Int64
y__
              -> DescribeBatchOperationResponse
x__
                   {_DescribeBatchOperationResponse'totalOperationCount = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeBatchOperationResponse "completeOperationCount" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "completeOperationCount"
-> (Int64 -> f Int64)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
fieldOf Proxy# "completeOperationCount"
_
    = ((Int64 -> f Int64)
 -> DescribeBatchOperationResponse
 -> f DescribeBatchOperationResponse)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeBatchOperationResponse -> Int64)
-> (DescribeBatchOperationResponse
    -> Int64 -> DescribeBatchOperationResponse)
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeBatchOperationResponse -> Int64
_DescribeBatchOperationResponse'completeOperationCount
           (\ DescribeBatchOperationResponse
x__ Int64
y__
              -> DescribeBatchOperationResponse
x__
                   {_DescribeBatchOperationResponse'completeOperationCount = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeBatchOperationResponse "failureOperationCount" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failureOperationCount"
-> (Int64 -> f Int64)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
fieldOf Proxy# "failureOperationCount"
_
    = ((Int64 -> f Int64)
 -> DescribeBatchOperationResponse
 -> f DescribeBatchOperationResponse)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeBatchOperationResponse -> Int64)
-> (DescribeBatchOperationResponse
    -> Int64 -> DescribeBatchOperationResponse)
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeBatchOperationResponse -> Int64
_DescribeBatchOperationResponse'failureOperationCount
           (\ DescribeBatchOperationResponse
x__ Int64
y__
              -> DescribeBatchOperationResponse
x__
                   {_DescribeBatchOperationResponse'failureOperationCount = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeBatchOperationResponse "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> DescribeBatchOperationResponse
 -> f DescribeBatchOperationResponse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeBatchOperationResponse -> Text)
-> (DescribeBatchOperationResponse
    -> Text -> DescribeBatchOperationResponse)
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeBatchOperationResponse -> Text
_DescribeBatchOperationResponse'identity
           (\ DescribeBatchOperationResponse
x__ Text
y__
              -> DescribeBatchOperationResponse
x__ {_DescribeBatchOperationResponse'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeBatchOperationResponse "reason" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "reason"
-> (Text -> f Text)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
fieldOf Proxy# "reason"
_
    = ((Text -> f Text)
 -> DescribeBatchOperationResponse
 -> f DescribeBatchOperationResponse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DescribeBatchOperationResponse
-> f DescribeBatchOperationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeBatchOperationResponse -> Text)
-> (DescribeBatchOperationResponse
    -> Text -> DescribeBatchOperationResponse)
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeBatchOperationResponse -> Text
_DescribeBatchOperationResponse'reason
           (\ DescribeBatchOperationResponse
x__ Text
y__ -> DescribeBatchOperationResponse
x__ {_DescribeBatchOperationResponse'reason = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DescribeBatchOperationResponse where
  messageName :: Proxy DescribeBatchOperationResponse -> Text
messageName Proxy DescribeBatchOperationResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DescribeBatchOperationResponse"
  packedMessageDescriptor :: Proxy DescribeBatchOperationResponse -> ByteString
packedMessageDescriptor Proxy DescribeBatchOperationResponse
_
    = ByteString
"\n\
      \\RSDescribeBatchOperationResponse\DC2P\n\
      \\SOoperation_type\CAN\SOH \SOH(\SO2).temporal.api.enums.v1.BatchOperationTypeR\roperationType\DC2\NAK\n\
      \\ACKjob_id\CAN\STX \SOH(\tR\ENQjobId\DC2@\n\
      \\ENQstate\CAN\ETX \SOH(\SO2*.temporal.api.enums.v1.BatchOperationStateR\ENQstate\DC29\n\
      \\n\
      \start_time\CAN\EOT \SOH(\v2\SUB.google.protobuf.TimestampR\tstartTime\DC29\n\
      \\n\
      \close_time\CAN\ENQ \SOH(\v2\SUB.google.protobuf.TimestampR\tcloseTime\DC22\n\
      \\NAKtotal_operation_count\CAN\ACK \SOH(\ETXR\DC3totalOperationCount\DC28\n\
      \\CANcomplete_operation_count\CAN\a \SOH(\ETXR\SYNcompleteOperationCount\DC26\n\
      \\ETBfailure_operation_count\CAN\b \SOH(\ETXR\NAKfailureOperationCount\DC2\SUB\n\
      \\bidentity\CAN\t \SOH(\tR\bidentity\DC2\SYN\n\
      \\ACKreason\CAN\n\
      \ \SOH(\tR\ACKreason"
  packedFileDescriptor :: Proxy DescribeBatchOperationResponse -> ByteString
packedFileDescriptor Proxy DescribeBatchOperationResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DescribeBatchOperationResponse)
fieldsByTag
    = let
        operationType__field_descriptor :: FieldDescriptor DescribeBatchOperationResponse
operationType__field_descriptor
          = String
-> FieldTypeDescriptor BatchOperationType
-> FieldAccessor DescribeBatchOperationResponse BatchOperationType
-> FieldDescriptor DescribeBatchOperationResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"operation_type"
              (ScalarField BatchOperationType
-> FieldTypeDescriptor BatchOperationType
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField BatchOperationType
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.BatchOperation.BatchOperationType)
              (WireDefault BatchOperationType
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     BatchOperationType
     BatchOperationType
-> FieldAccessor DescribeBatchOperationResponse BatchOperationType
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault BatchOperationType
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"operationType")) ::
              Data.ProtoLens.FieldDescriptor DescribeBatchOperationResponse
        jobId__field_descriptor :: FieldDescriptor DescribeBatchOperationResponse
jobId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DescribeBatchOperationResponse Text
-> FieldDescriptor DescribeBatchOperationResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"job_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
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     Text
     Text
-> FieldAccessor DescribeBatchOperationResponse 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 @"jobId")) ::
              Data.ProtoLens.FieldDescriptor DescribeBatchOperationResponse
        state__field_descriptor :: FieldDescriptor DescribeBatchOperationResponse
state__field_descriptor
          = String
-> FieldTypeDescriptor BatchOperationState
-> FieldAccessor DescribeBatchOperationResponse BatchOperationState
-> FieldDescriptor DescribeBatchOperationResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"state"
              (ScalarField BatchOperationState
-> FieldTypeDescriptor BatchOperationState
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField BatchOperationState
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.BatchOperation.BatchOperationState)
              (WireDefault BatchOperationState
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     BatchOperationState
     BatchOperationState
-> FieldAccessor DescribeBatchOperationResponse BatchOperationState
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault BatchOperationState
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"state")) ::
              Data.ProtoLens.FieldDescriptor DescribeBatchOperationResponse
        startTime__field_descriptor :: FieldDescriptor DescribeBatchOperationResponse
startTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor DescribeBatchOperationResponse Timestamp
-> FieldDescriptor DescribeBatchOperationResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_time"
              (MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
              (Lens
  DescribeBatchOperationResponse
  DescribeBatchOperationResponse
  (Maybe Timestamp)
  (Maybe Timestamp)
-> FieldAccessor DescribeBatchOperationResponse Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startTime")) ::
              Data.ProtoLens.FieldDescriptor DescribeBatchOperationResponse
        closeTime__field_descriptor :: FieldDescriptor DescribeBatchOperationResponse
closeTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor DescribeBatchOperationResponse Timestamp
-> FieldDescriptor DescribeBatchOperationResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"close_time"
              (MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
              (Lens
  DescribeBatchOperationResponse
  DescribeBatchOperationResponse
  (Maybe Timestamp)
  (Maybe Timestamp)
-> FieldAccessor DescribeBatchOperationResponse Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'closeTime")) ::
              Data.ProtoLens.FieldDescriptor DescribeBatchOperationResponse
        totalOperationCount__field_descriptor :: FieldDescriptor DescribeBatchOperationResponse
totalOperationCount__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor DescribeBatchOperationResponse Int64
-> FieldDescriptor DescribeBatchOperationResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"total_operation_count"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     Int64
     Int64
-> FieldAccessor DescribeBatchOperationResponse Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"totalOperationCount")) ::
              Data.ProtoLens.FieldDescriptor DescribeBatchOperationResponse
        completeOperationCount__field_descriptor :: FieldDescriptor DescribeBatchOperationResponse
completeOperationCount__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor DescribeBatchOperationResponse Int64
-> FieldDescriptor DescribeBatchOperationResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"complete_operation_count"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     Int64
     Int64
-> FieldAccessor DescribeBatchOperationResponse Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"completeOperationCount")) ::
              Data.ProtoLens.FieldDescriptor DescribeBatchOperationResponse
        failureOperationCount__field_descriptor :: FieldDescriptor DescribeBatchOperationResponse
failureOperationCount__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor DescribeBatchOperationResponse Int64
-> FieldDescriptor DescribeBatchOperationResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"failure_operation_count"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     Int64
     Int64
-> FieldAccessor DescribeBatchOperationResponse Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"failureOperationCount")) ::
              Data.ProtoLens.FieldDescriptor DescribeBatchOperationResponse
        identity__field_descriptor :: FieldDescriptor DescribeBatchOperationResponse
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DescribeBatchOperationResponse Text
-> FieldDescriptor DescribeBatchOperationResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     Text
     Text
-> FieldAccessor DescribeBatchOperationResponse Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor DescribeBatchOperationResponse
        reason__field_descriptor :: FieldDescriptor DescribeBatchOperationResponse
reason__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DescribeBatchOperationResponse Text
-> FieldDescriptor DescribeBatchOperationResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"reason"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     DescribeBatchOperationResponse
     DescribeBatchOperationResponse
     Text
     Text
-> FieldAccessor DescribeBatchOperationResponse Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reason")) ::
              Data.ProtoLens.FieldDescriptor DescribeBatchOperationResponse
      in
        [(Tag, FieldDescriptor DescribeBatchOperationResponse)]
-> Map Tag (FieldDescriptor DescribeBatchOperationResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DescribeBatchOperationResponse
operationType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DescribeBatchOperationResponse
jobId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor DescribeBatchOperationResponse
state__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor DescribeBatchOperationResponse
startTime__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor DescribeBatchOperationResponse
closeTime__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor DescribeBatchOperationResponse
totalOperationCount__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor DescribeBatchOperationResponse
completeOperationCount__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor DescribeBatchOperationResponse
failureOperationCount__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor DescribeBatchOperationResponse
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor DescribeBatchOperationResponse
reason__field_descriptor)]
  unknownFields :: Lens' DescribeBatchOperationResponse FieldSet
unknownFields
    = (DescribeBatchOperationResponse -> FieldSet)
-> (DescribeBatchOperationResponse
    -> FieldSet -> DescribeBatchOperationResponse)
-> Lens' DescribeBatchOperationResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DescribeBatchOperationResponse -> FieldSet
_DescribeBatchOperationResponse'_unknownFields
        (\ DescribeBatchOperationResponse
x__ FieldSet
y__
           -> DescribeBatchOperationResponse
x__ {_DescribeBatchOperationResponse'_unknownFields = y__})
  defMessage :: DescribeBatchOperationResponse
defMessage
    = DescribeBatchOperationResponse'_constructor
        {_DescribeBatchOperationResponse'operationType :: BatchOperationType
_DescribeBatchOperationResponse'operationType = BatchOperationType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeBatchOperationResponse'jobId :: Text
_DescribeBatchOperationResponse'jobId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeBatchOperationResponse'state :: BatchOperationState
_DescribeBatchOperationResponse'state = BatchOperationState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeBatchOperationResponse'startTime :: Maybe Timestamp
_DescribeBatchOperationResponse'startTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _DescribeBatchOperationResponse'closeTime :: Maybe Timestamp
_DescribeBatchOperationResponse'closeTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _DescribeBatchOperationResponse'totalOperationCount :: Int64
_DescribeBatchOperationResponse'totalOperationCount = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeBatchOperationResponse'completeOperationCount :: Int64
_DescribeBatchOperationResponse'completeOperationCount = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeBatchOperationResponse'failureOperationCount :: Int64
_DescribeBatchOperationResponse'failureOperationCount = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeBatchOperationResponse'identity :: Text
_DescribeBatchOperationResponse'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeBatchOperationResponse'reason :: Text
_DescribeBatchOperationResponse'reason = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeBatchOperationResponse'_unknownFields :: FieldSet
_DescribeBatchOperationResponse'_unknownFields = []}
  parseMessage :: Parser DescribeBatchOperationResponse
parseMessage
    = let
        loop ::
          DescribeBatchOperationResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser DescribeBatchOperationResponse
        loop :: DescribeBatchOperationResponse
-> Parser DescribeBatchOperationResponse
loop DescribeBatchOperationResponse
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 BatchOperationType -> String -> Parser BatchOperationType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> BatchOperationType)
-> Parser Int -> Parser BatchOperationType
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> BatchOperationType
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
"operation_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"operationType") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"job_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"jobId") y x)
                        Word64
24
                          -> do y <- Parser BatchOperationState -> String -> Parser BatchOperationState
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> BatchOperationState)
-> Parser Int -> Parser BatchOperationState
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> BatchOperationState
forall a. Enum a => Int -> a
Prelude.toEnum
                                          ((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                             Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                             Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
                                       String
"state"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"state") y x)
                        Word64
34
                          -> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"start_time"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"startTime") y x)
                        Word64
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
"close_time"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"closeTime") y x)
                        Word64
48
                          -> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"total_operation_count"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"totalOperationCount") y x)
                        Word64
56
                          -> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"complete_operation_count"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"completeOperationCount") y x)
                        Word64
64
                          -> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"failure_operation_count"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"failureOperationCount") y x)
                        Word64
74
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
82
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"reason"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"reason") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser DescribeBatchOperationResponse
-> String -> Parser DescribeBatchOperationResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do DescribeBatchOperationResponse
-> Parser DescribeBatchOperationResponse
loop DescribeBatchOperationResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"DescribeBatchOperationResponse"
  buildMessage :: DescribeBatchOperationResponse -> Builder
buildMessage
    = \ DescribeBatchOperationResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: BatchOperationType
_v
                  = FoldLike
  BatchOperationType
  DescribeBatchOperationResponse
  DescribeBatchOperationResponse
  BatchOperationType
  BatchOperationType
-> DescribeBatchOperationResponse -> BatchOperationType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                      (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"operationType") DescribeBatchOperationResponse
_x
              in
                if BatchOperationType -> BatchOperationType -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) BatchOperationType
_v BatchOperationType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
8)
                      ((Int -> Builder)
-> (BatchOperationType -> Int) -> BatchOperationType -> 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)
                         BatchOperationType -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum BatchOperationType
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Text
_v = FoldLike
  Text
  DescribeBatchOperationResponse
  DescribeBatchOperationResponse
  Text
  Text
-> DescribeBatchOperationResponse -> 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 @"jobId") DescribeBatchOperationResponse
_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 :: BatchOperationState
_v = FoldLike
  BatchOperationState
  DescribeBatchOperationResponse
  DescribeBatchOperationResponse
  BatchOperationState
  BatchOperationState
-> DescribeBatchOperationResponse -> BatchOperationState
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"state") DescribeBatchOperationResponse
_x
                    in
                      if BatchOperationState -> BatchOperationState -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) BatchOperationState
_v BatchOperationState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
24)
                            ((Int -> Builder)
-> (BatchOperationState -> Int) -> BatchOperationState -> 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)
                               BatchOperationState -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum BatchOperationState
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe Timestamp)
  DescribeBatchOperationResponse
  DescribeBatchOperationResponse
  (Maybe Timestamp)
  (Maybe Timestamp)
-> DescribeBatchOperationResponse -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                             (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startTime") DescribeBatchOperationResponse
_x
                       of
                         Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just Timestamp
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Timestamp)
  DescribeBatchOperationResponse
  DescribeBatchOperationResponse
  (Maybe Timestamp)
  (Maybe Timestamp)
-> DescribeBatchOperationResponse -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'closeTime") DescribeBatchOperationResponse
_x
                          of
                            Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just Timestamp
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Int64
_v
                                 = FoldLike
  Int64
  DescribeBatchOperationResponse
  DescribeBatchOperationResponse
  Int64
  Int64
-> DescribeBatchOperationResponse -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"totalOperationCount") DescribeBatchOperationResponse
_x
                             in
                               if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
48)
                                     ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                        Int64
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Int64
_v
                                    = FoldLike
  Int64
  DescribeBatchOperationResponse
  DescribeBatchOperationResponse
  Int64
  Int64
-> DescribeBatchOperationResponse -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                        (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"completeOperationCount") DescribeBatchOperationResponse
_x
                                in
                                  if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                      Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  else
                                      Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
56)
                                        ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                           Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (let
                                     _v :: Int64
_v
                                       = FoldLike
  Int64
  DescribeBatchOperationResponse
  DescribeBatchOperationResponse
  Int64
  Int64
-> DescribeBatchOperationResponse -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                           (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"failureOperationCount") DescribeBatchOperationResponse
_x
                                   in
                                     if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                         Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                     else
                                         Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
64)
                                           ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                              Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
                                  (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (let
                                        _v :: Text
_v
                                          = FoldLike
  Text
  DescribeBatchOperationResponse
  DescribeBatchOperationResponse
  Text
  Text
-> DescribeBatchOperationResponse -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") DescribeBatchOperationResponse
_x
                                      in
                                        if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                            Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                        else
                                            Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
                                              ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                 (\ ByteString
bs
                                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                            (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                               (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                         (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                            ByteString
bs))
                                                 Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                                     (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (let
                                           _v :: Text
_v
                                             = FoldLike
  Text
  DescribeBatchOperationResponse
  DescribeBatchOperationResponse
  Text
  Text
-> DescribeBatchOperationResponse -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reason") DescribeBatchOperationResponse
_x
                                         in
                                           if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                               Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                           else
                                               Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
                                                 ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                    (\ ByteString
bs
                                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                               (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                  (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                            (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                               ByteString
bs))
                                                    Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                                        (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                           (FoldLike
  FieldSet
  DescribeBatchOperationResponse
  DescribeBatchOperationResponse
  FieldSet
  FieldSet
-> DescribeBatchOperationResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                              FoldLike
  FieldSet
  DescribeBatchOperationResponse
  DescribeBatchOperationResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DescribeBatchOperationResponse FieldSet
Data.ProtoLens.unknownFields DescribeBatchOperationResponse
_x)))))))))))
instance Control.DeepSeq.NFData DescribeBatchOperationResponse where
  rnf :: DescribeBatchOperationResponse -> ()
rnf
    = \ DescribeBatchOperationResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DescribeBatchOperationResponse -> FieldSet
_DescribeBatchOperationResponse'_unknownFields DescribeBatchOperationResponse
x__)
             (BatchOperationType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DescribeBatchOperationResponse -> BatchOperationType
_DescribeBatchOperationResponse'operationType DescribeBatchOperationResponse
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (DescribeBatchOperationResponse -> Text
_DescribeBatchOperationResponse'jobId DescribeBatchOperationResponse
x__)
                   (BatchOperationState -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (DescribeBatchOperationResponse -> BatchOperationState
_DescribeBatchOperationResponse'state DescribeBatchOperationResponse
x__)
                      (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (DescribeBatchOperationResponse -> Maybe Timestamp
_DescribeBatchOperationResponse'startTime DescribeBatchOperationResponse
x__)
                         (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (DescribeBatchOperationResponse -> Maybe Timestamp
_DescribeBatchOperationResponse'closeTime DescribeBatchOperationResponse
x__)
                            (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (DescribeBatchOperationResponse -> Int64
_DescribeBatchOperationResponse'totalOperationCount DescribeBatchOperationResponse
x__)
                               (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (DescribeBatchOperationResponse -> Int64
_DescribeBatchOperationResponse'completeOperationCount DescribeBatchOperationResponse
x__)
                                  (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (DescribeBatchOperationResponse -> Int64
_DescribeBatchOperationResponse'failureOperationCount DescribeBatchOperationResponse
x__)
                                     (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (DescribeBatchOperationResponse -> Text
_DescribeBatchOperationResponse'identity DescribeBatchOperationResponse
x__)
                                        (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (DescribeBatchOperationResponse -> Text
_DescribeBatchOperationResponse'reason DescribeBatchOperationResponse
x__) ()))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' DescribeNamespaceRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.id' @:: Lens' DescribeNamespaceRequest Data.Text.Text@ -}
data DescribeNamespaceRequest
  = DescribeNamespaceRequest'_constructor {DescribeNamespaceRequest -> Text
_DescribeNamespaceRequest'namespace :: !Data.Text.Text,
                                           DescribeNamespaceRequest -> Text
_DescribeNamespaceRequest'id :: !Data.Text.Text,
                                           DescribeNamespaceRequest -> FieldSet
_DescribeNamespaceRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool
(DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool)
-> (DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool)
-> Eq DescribeNamespaceRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool
== :: DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool
$c/= :: DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool
/= :: DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool
Prelude.Eq, Eq DescribeNamespaceRequest
Eq DescribeNamespaceRequest =>
(DescribeNamespaceRequest -> DescribeNamespaceRequest -> Ordering)
-> (DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool)
-> (DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool)
-> (DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool)
-> (DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool)
-> (DescribeNamespaceRequest
    -> DescribeNamespaceRequest -> DescribeNamespaceRequest)
-> (DescribeNamespaceRequest
    -> DescribeNamespaceRequest -> DescribeNamespaceRequest)
-> Ord DescribeNamespaceRequest
DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool
DescribeNamespaceRequest -> DescribeNamespaceRequest -> Ordering
DescribeNamespaceRequest
-> DescribeNamespaceRequest -> DescribeNamespaceRequest
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 :: DescribeNamespaceRequest -> DescribeNamespaceRequest -> Ordering
compare :: DescribeNamespaceRequest -> DescribeNamespaceRequest -> Ordering
$c< :: DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool
< :: DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool
$c<= :: DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool
<= :: DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool
$c> :: DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool
> :: DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool
$c>= :: DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool
>= :: DescribeNamespaceRequest -> DescribeNamespaceRequest -> Bool
$cmax :: DescribeNamespaceRequest
-> DescribeNamespaceRequest -> DescribeNamespaceRequest
max :: DescribeNamespaceRequest
-> DescribeNamespaceRequest -> DescribeNamespaceRequest
$cmin :: DescribeNamespaceRequest
-> DescribeNamespaceRequest -> DescribeNamespaceRequest
min :: DescribeNamespaceRequest
-> DescribeNamespaceRequest -> DescribeNamespaceRequest
Prelude.Ord)
instance Prelude.Show DescribeNamespaceRequest where
  showsPrec :: Int -> DescribeNamespaceRequest -> ShowS
showsPrec Int
_ DescribeNamespaceRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DescribeNamespaceRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DescribeNamespaceRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DescribeNamespaceRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> DescribeNamespaceRequest
-> f DescribeNamespaceRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> DescribeNamespaceRequest -> f DescribeNamespaceRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DescribeNamespaceRequest
-> f DescribeNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeNamespaceRequest -> Text)
-> (DescribeNamespaceRequest -> Text -> DescribeNamespaceRequest)
-> Lens DescribeNamespaceRequest DescribeNamespaceRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeNamespaceRequest -> Text
_DescribeNamespaceRequest'namespace
           (\ DescribeNamespaceRequest
x__ Text
y__ -> DescribeNamespaceRequest
x__ {_DescribeNamespaceRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeNamespaceRequest "id" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "id"
-> (Text -> f Text)
-> DescribeNamespaceRequest
-> f DescribeNamespaceRequest
fieldOf Proxy# "id"
_
    = ((Text -> f Text)
 -> DescribeNamespaceRequest -> f DescribeNamespaceRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DescribeNamespaceRequest
-> f DescribeNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeNamespaceRequest -> Text)
-> (DescribeNamespaceRequest -> Text -> DescribeNamespaceRequest)
-> Lens DescribeNamespaceRequest DescribeNamespaceRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeNamespaceRequest -> Text
_DescribeNamespaceRequest'id
           (\ DescribeNamespaceRequest
x__ Text
y__ -> DescribeNamespaceRequest
x__ {_DescribeNamespaceRequest'id = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DescribeNamespaceRequest where
  messageName :: Proxy DescribeNamespaceRequest -> Text
messageName Proxy DescribeNamespaceRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DescribeNamespaceRequest"
  packedMessageDescriptor :: Proxy DescribeNamespaceRequest -> ByteString
packedMessageDescriptor Proxy DescribeNamespaceRequest
_
    = ByteString
"\n\
      \\CANDescribeNamespaceRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\SO\n\
      \\STXid\CAN\STX \SOH(\tR\STXid"
  packedFileDescriptor :: Proxy DescribeNamespaceRequest -> ByteString
packedFileDescriptor Proxy DescribeNamespaceRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DescribeNamespaceRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor DescribeNamespaceRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DescribeNamespaceRequest Text
-> FieldDescriptor DescribeNamespaceRequest
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 DescribeNamespaceRequest DescribeNamespaceRequest Text Text
-> FieldAccessor DescribeNamespaceRequest 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 DescribeNamespaceRequest
        id__field_descriptor :: FieldDescriptor DescribeNamespaceRequest
id__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DescribeNamespaceRequest Text
-> FieldDescriptor DescribeNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens DescribeNamespaceRequest DescribeNamespaceRequest Text Text
-> FieldAccessor DescribeNamespaceRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"id")) ::
              Data.ProtoLens.FieldDescriptor DescribeNamespaceRequest
      in
        [(Tag, FieldDescriptor DescribeNamespaceRequest)]
-> Map Tag (FieldDescriptor DescribeNamespaceRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DescribeNamespaceRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DescribeNamespaceRequest
id__field_descriptor)]
  unknownFields :: Lens' DescribeNamespaceRequest FieldSet
unknownFields
    = (DescribeNamespaceRequest -> FieldSet)
-> (DescribeNamespaceRequest
    -> FieldSet -> DescribeNamespaceRequest)
-> Lens' DescribeNamespaceRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DescribeNamespaceRequest -> FieldSet
_DescribeNamespaceRequest'_unknownFields
        (\ DescribeNamespaceRequest
x__ FieldSet
y__ -> DescribeNamespaceRequest
x__ {_DescribeNamespaceRequest'_unknownFields = y__})
  defMessage :: DescribeNamespaceRequest
defMessage
    = DescribeNamespaceRequest'_constructor
        {_DescribeNamespaceRequest'namespace :: Text
_DescribeNamespaceRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeNamespaceRequest'id :: Text
_DescribeNamespaceRequest'id = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeNamespaceRequest'_unknownFields :: FieldSet
_DescribeNamespaceRequest'_unknownFields = []}
  parseMessage :: Parser DescribeNamespaceRequest
parseMessage
    = let
        loop ::
          DescribeNamespaceRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser DescribeNamespaceRequest
        loop :: DescribeNamespaceRequest -> Parser DescribeNamespaceRequest
loop DescribeNamespaceRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
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
"id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"id") 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 DescribeNamespaceRequest
-> String -> Parser DescribeNamespaceRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do DescribeNamespaceRequest -> Parser DescribeNamespaceRequest
loop DescribeNamespaceRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"DescribeNamespaceRequest"
  buildMessage :: DescribeNamespaceRequest -> Builder
buildMessage
    = \ DescribeNamespaceRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text DescribeNamespaceRequest DescribeNamespaceRequest Text Text
-> DescribeNamespaceRequest -> 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") DescribeNamespaceRequest
_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 DescribeNamespaceRequest DescribeNamespaceRequest Text Text
-> DescribeNamespaceRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"id") DescribeNamespaceRequest
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  DescribeNamespaceRequest
  DescribeNamespaceRequest
  FieldSet
  FieldSet
-> DescribeNamespaceRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DescribeNamespaceRequest
  DescribeNamespaceRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DescribeNamespaceRequest FieldSet
Data.ProtoLens.unknownFields DescribeNamespaceRequest
_x)))
instance Control.DeepSeq.NFData DescribeNamespaceRequest where
  rnf :: DescribeNamespaceRequest -> ()
rnf
    = \ DescribeNamespaceRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DescribeNamespaceRequest -> FieldSet
_DescribeNamespaceRequest'_unknownFields DescribeNamespaceRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DescribeNamespaceRequest -> Text
_DescribeNamespaceRequest'namespace DescribeNamespaceRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (DescribeNamespaceRequest -> Text
_DescribeNamespaceRequest'id DescribeNamespaceRequest
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespaceInfo' @:: Lens' DescribeNamespaceResponse Proto.Temporal.Api.Namespace.V1.Message.NamespaceInfo@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'namespaceInfo' @:: Lens' DescribeNamespaceResponse (Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.config' @:: Lens' DescribeNamespaceResponse Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'config' @:: Lens' DescribeNamespaceResponse (Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.replicationConfig' @:: Lens' DescribeNamespaceResponse Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'replicationConfig' @:: Lens' DescribeNamespaceResponse (Prelude.Maybe Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.failoverVersion' @:: Lens' DescribeNamespaceResponse Data.Int.Int64@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.isGlobalNamespace' @:: Lens' DescribeNamespaceResponse Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.failoverHistory' @:: Lens' DescribeNamespaceResponse [Proto.Temporal.Api.Replication.V1.Message.FailoverStatus]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'failoverHistory' @:: Lens' DescribeNamespaceResponse (Data.Vector.Vector Proto.Temporal.Api.Replication.V1.Message.FailoverStatus)@ -}
data DescribeNamespaceResponse
  = DescribeNamespaceResponse'_constructor {DescribeNamespaceResponse -> Maybe NamespaceInfo
_DescribeNamespaceResponse'namespaceInfo :: !(Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceInfo),
                                            DescribeNamespaceResponse -> Maybe NamespaceConfig
_DescribeNamespaceResponse'config :: !(Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig),
                                            DescribeNamespaceResponse -> Maybe NamespaceReplicationConfig
_DescribeNamespaceResponse'replicationConfig :: !(Prelude.Maybe Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig),
                                            DescribeNamespaceResponse -> Int64
_DescribeNamespaceResponse'failoverVersion :: !Data.Int.Int64,
                                            DescribeNamespaceResponse -> Bool
_DescribeNamespaceResponse'isGlobalNamespace :: !Prelude.Bool,
                                            DescribeNamespaceResponse -> Vector FailoverStatus
_DescribeNamespaceResponse'failoverHistory :: !(Data.Vector.Vector Proto.Temporal.Api.Replication.V1.Message.FailoverStatus),
                                            DescribeNamespaceResponse -> FieldSet
_DescribeNamespaceResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool
(DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool)
-> (DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool)
-> Eq DescribeNamespaceResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool
== :: DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool
$c/= :: DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool
/= :: DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool
Prelude.Eq, Eq DescribeNamespaceResponse
Eq DescribeNamespaceResponse =>
(DescribeNamespaceResponse
 -> DescribeNamespaceResponse -> Ordering)
-> (DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool)
-> (DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool)
-> (DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool)
-> (DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool)
-> (DescribeNamespaceResponse
    -> DescribeNamespaceResponse -> DescribeNamespaceResponse)
-> (DescribeNamespaceResponse
    -> DescribeNamespaceResponse -> DescribeNamespaceResponse)
-> Ord DescribeNamespaceResponse
DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool
DescribeNamespaceResponse -> DescribeNamespaceResponse -> Ordering
DescribeNamespaceResponse
-> DescribeNamespaceResponse -> DescribeNamespaceResponse
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 :: DescribeNamespaceResponse -> DescribeNamespaceResponse -> Ordering
compare :: DescribeNamespaceResponse -> DescribeNamespaceResponse -> Ordering
$c< :: DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool
< :: DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool
$c<= :: DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool
<= :: DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool
$c> :: DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool
> :: DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool
$c>= :: DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool
>= :: DescribeNamespaceResponse -> DescribeNamespaceResponse -> Bool
$cmax :: DescribeNamespaceResponse
-> DescribeNamespaceResponse -> DescribeNamespaceResponse
max :: DescribeNamespaceResponse
-> DescribeNamespaceResponse -> DescribeNamespaceResponse
$cmin :: DescribeNamespaceResponse
-> DescribeNamespaceResponse -> DescribeNamespaceResponse
min :: DescribeNamespaceResponse
-> DescribeNamespaceResponse -> DescribeNamespaceResponse
Prelude.Ord)
instance Prelude.Show DescribeNamespaceResponse where
  showsPrec :: Int -> DescribeNamespaceResponse -> ShowS
showsPrec Int
_ DescribeNamespaceResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DescribeNamespaceResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DescribeNamespaceResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DescribeNamespaceResponse "namespaceInfo" Proto.Temporal.Api.Namespace.V1.Message.NamespaceInfo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceInfo"
-> (NamespaceInfo -> f NamespaceInfo)
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
fieldOf Proxy# "namespaceInfo"
_
    = ((Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
 -> DescribeNamespaceResponse -> f DescribeNamespaceResponse)
-> ((NamespaceInfo -> f NamespaceInfo)
    -> Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
-> (NamespaceInfo -> f NamespaceInfo)
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeNamespaceResponse -> Maybe NamespaceInfo)
-> (DescribeNamespaceResponse
    -> Maybe NamespaceInfo -> DescribeNamespaceResponse)
-> Lens
     DescribeNamespaceResponse
     DescribeNamespaceResponse
     (Maybe NamespaceInfo)
     (Maybe NamespaceInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeNamespaceResponse -> Maybe NamespaceInfo
_DescribeNamespaceResponse'namespaceInfo
           (\ DescribeNamespaceResponse
x__ Maybe NamespaceInfo
y__
              -> DescribeNamespaceResponse
x__ {_DescribeNamespaceResponse'namespaceInfo = y__}))
        (NamespaceInfo -> Lens' (Maybe NamespaceInfo) NamespaceInfo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NamespaceInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeNamespaceResponse "maybe'namespaceInfo" (Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'namespaceInfo"
-> (Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
fieldOf Proxy# "maybe'namespaceInfo"
_
    = ((Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
 -> DescribeNamespaceResponse -> f DescribeNamespaceResponse)
-> ((Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
    -> Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
-> (Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeNamespaceResponse -> Maybe NamespaceInfo)
-> (DescribeNamespaceResponse
    -> Maybe NamespaceInfo -> DescribeNamespaceResponse)
-> Lens
     DescribeNamespaceResponse
     DescribeNamespaceResponse
     (Maybe NamespaceInfo)
     (Maybe NamespaceInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeNamespaceResponse -> Maybe NamespaceInfo
_DescribeNamespaceResponse'namespaceInfo
           (\ DescribeNamespaceResponse
x__ Maybe NamespaceInfo
y__
              -> DescribeNamespaceResponse
x__ {_DescribeNamespaceResponse'namespaceInfo = y__}))
        (Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
-> Maybe NamespaceInfo -> f (Maybe NamespaceInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeNamespaceResponse "config" Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "config"
-> (NamespaceConfig -> f NamespaceConfig)
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
fieldOf Proxy# "config"
_
    = ((Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
 -> DescribeNamespaceResponse -> f DescribeNamespaceResponse)
-> ((NamespaceConfig -> f NamespaceConfig)
    -> Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
-> (NamespaceConfig -> f NamespaceConfig)
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeNamespaceResponse -> Maybe NamespaceConfig)
-> (DescribeNamespaceResponse
    -> Maybe NamespaceConfig -> DescribeNamespaceResponse)
-> Lens
     DescribeNamespaceResponse
     DescribeNamespaceResponse
     (Maybe NamespaceConfig)
     (Maybe NamespaceConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeNamespaceResponse -> Maybe NamespaceConfig
_DescribeNamespaceResponse'config
           (\ DescribeNamespaceResponse
x__ Maybe NamespaceConfig
y__ -> DescribeNamespaceResponse
x__ {_DescribeNamespaceResponse'config = y__}))
        (NamespaceConfig -> Lens' (Maybe NamespaceConfig) NamespaceConfig
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NamespaceConfig
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeNamespaceResponse "maybe'config" (Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'config"
-> (Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
fieldOf Proxy# "maybe'config"
_
    = ((Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
 -> DescribeNamespaceResponse -> f DescribeNamespaceResponse)
-> ((Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
    -> Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
-> (Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeNamespaceResponse -> Maybe NamespaceConfig)
-> (DescribeNamespaceResponse
    -> Maybe NamespaceConfig -> DescribeNamespaceResponse)
-> Lens
     DescribeNamespaceResponse
     DescribeNamespaceResponse
     (Maybe NamespaceConfig)
     (Maybe NamespaceConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeNamespaceResponse -> Maybe NamespaceConfig
_DescribeNamespaceResponse'config
           (\ DescribeNamespaceResponse
x__ Maybe NamespaceConfig
y__ -> DescribeNamespaceResponse
x__ {_DescribeNamespaceResponse'config = y__}))
        (Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
-> Maybe NamespaceConfig -> f (Maybe NamespaceConfig)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeNamespaceResponse "replicationConfig" Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "replicationConfig"
-> (NamespaceReplicationConfig -> f NamespaceReplicationConfig)
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
fieldOf Proxy# "replicationConfig"
_
    = ((Maybe NamespaceReplicationConfig
  -> f (Maybe NamespaceReplicationConfig))
 -> DescribeNamespaceResponse -> f DescribeNamespaceResponse)
-> ((NamespaceReplicationConfig -> f NamespaceReplicationConfig)
    -> Maybe NamespaceReplicationConfig
    -> f (Maybe NamespaceReplicationConfig))
-> (NamespaceReplicationConfig -> f NamespaceReplicationConfig)
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeNamespaceResponse -> Maybe NamespaceReplicationConfig)
-> (DescribeNamespaceResponse
    -> Maybe NamespaceReplicationConfig -> DescribeNamespaceResponse)
-> Lens
     DescribeNamespaceResponse
     DescribeNamespaceResponse
     (Maybe NamespaceReplicationConfig)
     (Maybe NamespaceReplicationConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeNamespaceResponse -> Maybe NamespaceReplicationConfig
_DescribeNamespaceResponse'replicationConfig
           (\ DescribeNamespaceResponse
x__ Maybe NamespaceReplicationConfig
y__
              -> DescribeNamespaceResponse
x__ {_DescribeNamespaceResponse'replicationConfig = y__}))
        (NamespaceReplicationConfig
-> Lens'
     (Maybe NamespaceReplicationConfig) NamespaceReplicationConfig
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NamespaceReplicationConfig
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeNamespaceResponse "maybe'replicationConfig" (Prelude.Maybe Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'replicationConfig"
-> (Maybe NamespaceReplicationConfig
    -> f (Maybe NamespaceReplicationConfig))
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
fieldOf Proxy# "maybe'replicationConfig"
_
    = ((Maybe NamespaceReplicationConfig
  -> f (Maybe NamespaceReplicationConfig))
 -> DescribeNamespaceResponse -> f DescribeNamespaceResponse)
-> ((Maybe NamespaceReplicationConfig
     -> f (Maybe NamespaceReplicationConfig))
    -> Maybe NamespaceReplicationConfig
    -> f (Maybe NamespaceReplicationConfig))
-> (Maybe NamespaceReplicationConfig
    -> f (Maybe NamespaceReplicationConfig))
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeNamespaceResponse -> Maybe NamespaceReplicationConfig)
-> (DescribeNamespaceResponse
    -> Maybe NamespaceReplicationConfig -> DescribeNamespaceResponse)
-> Lens
     DescribeNamespaceResponse
     DescribeNamespaceResponse
     (Maybe NamespaceReplicationConfig)
     (Maybe NamespaceReplicationConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeNamespaceResponse -> Maybe NamespaceReplicationConfig
_DescribeNamespaceResponse'replicationConfig
           (\ DescribeNamespaceResponse
x__ Maybe NamespaceReplicationConfig
y__
              -> DescribeNamespaceResponse
x__ {_DescribeNamespaceResponse'replicationConfig = y__}))
        (Maybe NamespaceReplicationConfig
 -> f (Maybe NamespaceReplicationConfig))
-> Maybe NamespaceReplicationConfig
-> f (Maybe NamespaceReplicationConfig)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeNamespaceResponse "failoverVersion" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failoverVersion"
-> (Int64 -> f Int64)
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
fieldOf Proxy# "failoverVersion"
_
    = ((Int64 -> f Int64)
 -> DescribeNamespaceResponse -> f DescribeNamespaceResponse)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeNamespaceResponse -> Int64)
-> (DescribeNamespaceResponse
    -> Int64 -> DescribeNamespaceResponse)
-> Lens
     DescribeNamespaceResponse DescribeNamespaceResponse Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeNamespaceResponse -> Int64
_DescribeNamespaceResponse'failoverVersion
           (\ DescribeNamespaceResponse
x__ Int64
y__
              -> DescribeNamespaceResponse
x__ {_DescribeNamespaceResponse'failoverVersion = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeNamespaceResponse "isGlobalNamespace" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "isGlobalNamespace"
-> (Bool -> f Bool)
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
fieldOf Proxy# "isGlobalNamespace"
_
    = ((Bool -> f Bool)
 -> DescribeNamespaceResponse -> f DescribeNamespaceResponse)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeNamespaceResponse -> Bool)
-> (DescribeNamespaceResponse -> Bool -> DescribeNamespaceResponse)
-> Lens
     DescribeNamespaceResponse DescribeNamespaceResponse Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeNamespaceResponse -> Bool
_DescribeNamespaceResponse'isGlobalNamespace
           (\ DescribeNamespaceResponse
x__ Bool
y__
              -> DescribeNamespaceResponse
x__ {_DescribeNamespaceResponse'isGlobalNamespace = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeNamespaceResponse "failoverHistory" [Proto.Temporal.Api.Replication.V1.Message.FailoverStatus] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failoverHistory"
-> ([FailoverStatus] -> f [FailoverStatus])
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
fieldOf Proxy# "failoverHistory"
_
    = ((Vector FailoverStatus -> f (Vector FailoverStatus))
 -> DescribeNamespaceResponse -> f DescribeNamespaceResponse)
-> (([FailoverStatus] -> f [FailoverStatus])
    -> Vector FailoverStatus -> f (Vector FailoverStatus))
-> ([FailoverStatus] -> f [FailoverStatus])
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeNamespaceResponse -> Vector FailoverStatus)
-> (DescribeNamespaceResponse
    -> Vector FailoverStatus -> DescribeNamespaceResponse)
-> Lens
     DescribeNamespaceResponse
     DescribeNamespaceResponse
     (Vector FailoverStatus)
     (Vector FailoverStatus)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeNamespaceResponse -> Vector FailoverStatus
_DescribeNamespaceResponse'failoverHistory
           (\ DescribeNamespaceResponse
x__ Vector FailoverStatus
y__
              -> DescribeNamespaceResponse
x__ {_DescribeNamespaceResponse'failoverHistory = y__}))
        ((Vector FailoverStatus -> [FailoverStatus])
-> (Vector FailoverStatus
    -> [FailoverStatus] -> Vector FailoverStatus)
-> Lens
     (Vector FailoverStatus)
     (Vector FailoverStatus)
     [FailoverStatus]
     [FailoverStatus]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector FailoverStatus -> [FailoverStatus]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector FailoverStatus
_ [FailoverStatus]
y__ -> [FailoverStatus] -> Vector FailoverStatus
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [FailoverStatus]
y__))
instance Data.ProtoLens.Field.HasField DescribeNamespaceResponse "vec'failoverHistory" (Data.Vector.Vector Proto.Temporal.Api.Replication.V1.Message.FailoverStatus) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'failoverHistory"
-> (Vector FailoverStatus -> f (Vector FailoverStatus))
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
fieldOf Proxy# "vec'failoverHistory"
_
    = ((Vector FailoverStatus -> f (Vector FailoverStatus))
 -> DescribeNamespaceResponse -> f DescribeNamespaceResponse)
-> ((Vector FailoverStatus -> f (Vector FailoverStatus))
    -> Vector FailoverStatus -> f (Vector FailoverStatus))
-> (Vector FailoverStatus -> f (Vector FailoverStatus))
-> DescribeNamespaceResponse
-> f DescribeNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeNamespaceResponse -> Vector FailoverStatus)
-> (DescribeNamespaceResponse
    -> Vector FailoverStatus -> DescribeNamespaceResponse)
-> Lens
     DescribeNamespaceResponse
     DescribeNamespaceResponse
     (Vector FailoverStatus)
     (Vector FailoverStatus)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeNamespaceResponse -> Vector FailoverStatus
_DescribeNamespaceResponse'failoverHistory
           (\ DescribeNamespaceResponse
x__ Vector FailoverStatus
y__
              -> DescribeNamespaceResponse
x__ {_DescribeNamespaceResponse'failoverHistory = y__}))
        (Vector FailoverStatus -> f (Vector FailoverStatus))
-> Vector FailoverStatus -> f (Vector FailoverStatus)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DescribeNamespaceResponse where
  messageName :: Proxy DescribeNamespaceResponse -> Text
messageName Proxy DescribeNamespaceResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DescribeNamespaceResponse"
  packedMessageDescriptor :: Proxy DescribeNamespaceResponse -> ByteString
packedMessageDescriptor Proxy DescribeNamespaceResponse
_
    = ByteString
"\n\
      \\EMDescribeNamespaceResponse\DC2O\n\
      \\SOnamespace_info\CAN\SOH \SOH(\v2(.temporal.api.namespace.v1.NamespaceInfoR\rnamespaceInfo\DC2B\n\
      \\ACKconfig\CAN\STX \SOH(\v2*.temporal.api.namespace.v1.NamespaceConfigR\ACKconfig\DC2f\n\
      \\DC2replication_config\CAN\ETX \SOH(\v27.temporal.api.replication.v1.NamespaceReplicationConfigR\DC1replicationConfig\DC2)\n\
      \\DLEfailover_version\CAN\EOT \SOH(\ETXR\SIfailoverVersion\DC2.\n\
      \\DC3is_global_namespace\CAN\ENQ \SOH(\bR\DC1isGlobalNamespace\DC2V\n\
      \\DLEfailover_history\CAN\ACK \ETX(\v2+.temporal.api.replication.v1.FailoverStatusR\SIfailoverHistory"
  packedFileDescriptor :: Proxy DescribeNamespaceResponse -> ByteString
packedFileDescriptor Proxy DescribeNamespaceResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DescribeNamespaceResponse)
fieldsByTag
    = let
        namespaceInfo__field_descriptor :: FieldDescriptor DescribeNamespaceResponse
namespaceInfo__field_descriptor
          = String
-> FieldTypeDescriptor NamespaceInfo
-> FieldAccessor DescribeNamespaceResponse NamespaceInfo
-> FieldDescriptor DescribeNamespaceResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace_info"
              (MessageOrGroup -> FieldTypeDescriptor NamespaceInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Namespace.V1.Message.NamespaceInfo)
              (Lens
  DescribeNamespaceResponse
  DescribeNamespaceResponse
  (Maybe NamespaceInfo)
  (Maybe NamespaceInfo)
-> FieldAccessor DescribeNamespaceResponse NamespaceInfo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'namespaceInfo")) ::
              Data.ProtoLens.FieldDescriptor DescribeNamespaceResponse
        config__field_descriptor :: FieldDescriptor DescribeNamespaceResponse
config__field_descriptor
          = String
-> FieldTypeDescriptor NamespaceConfig
-> FieldAccessor DescribeNamespaceResponse NamespaceConfig
-> FieldDescriptor DescribeNamespaceResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"config"
              (MessageOrGroup -> FieldTypeDescriptor NamespaceConfig
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig)
              (Lens
  DescribeNamespaceResponse
  DescribeNamespaceResponse
  (Maybe NamespaceConfig)
  (Maybe NamespaceConfig)
-> FieldAccessor DescribeNamespaceResponse NamespaceConfig
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'config")) ::
              Data.ProtoLens.FieldDescriptor DescribeNamespaceResponse
        replicationConfig__field_descriptor :: FieldDescriptor DescribeNamespaceResponse
replicationConfig__field_descriptor
          = String
-> FieldTypeDescriptor NamespaceReplicationConfig
-> FieldAccessor
     DescribeNamespaceResponse NamespaceReplicationConfig
-> FieldDescriptor DescribeNamespaceResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"replication_config"
              (MessageOrGroup -> FieldTypeDescriptor NamespaceReplicationConfig
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig)
              (Lens
  DescribeNamespaceResponse
  DescribeNamespaceResponse
  (Maybe NamespaceReplicationConfig)
  (Maybe NamespaceReplicationConfig)
-> FieldAccessor
     DescribeNamespaceResponse NamespaceReplicationConfig
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'replicationConfig")) ::
              Data.ProtoLens.FieldDescriptor DescribeNamespaceResponse
        failoverVersion__field_descriptor :: FieldDescriptor DescribeNamespaceResponse
failoverVersion__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor DescribeNamespaceResponse Int64
-> FieldDescriptor DescribeNamespaceResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"failover_version"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens
     DescribeNamespaceResponse DescribeNamespaceResponse Int64 Int64
-> FieldAccessor DescribeNamespaceResponse Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"failoverVersion")) ::
              Data.ProtoLens.FieldDescriptor DescribeNamespaceResponse
        isGlobalNamespace__field_descriptor :: FieldDescriptor DescribeNamespaceResponse
isGlobalNamespace__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor DescribeNamespaceResponse Bool
-> FieldDescriptor DescribeNamespaceResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"is_global_namespace"
              (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
     DescribeNamespaceResponse DescribeNamespaceResponse Bool Bool
-> FieldAccessor DescribeNamespaceResponse 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 @"isGlobalNamespace")) ::
              Data.ProtoLens.FieldDescriptor DescribeNamespaceResponse
        failoverHistory__field_descriptor :: FieldDescriptor DescribeNamespaceResponse
failoverHistory__field_descriptor
          = String
-> FieldTypeDescriptor FailoverStatus
-> FieldAccessor DescribeNamespaceResponse FailoverStatus
-> FieldDescriptor DescribeNamespaceResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"failover_history"
              (MessageOrGroup -> FieldTypeDescriptor FailoverStatus
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Replication.V1.Message.FailoverStatus)
              (Packing
-> Lens' DescribeNamespaceResponse [FailoverStatus]
-> FieldAccessor DescribeNamespaceResponse FailoverStatus
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 @"failoverHistory")) ::
              Data.ProtoLens.FieldDescriptor DescribeNamespaceResponse
      in
        [(Tag, FieldDescriptor DescribeNamespaceResponse)]
-> Map Tag (FieldDescriptor DescribeNamespaceResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DescribeNamespaceResponse
namespaceInfo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DescribeNamespaceResponse
config__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor DescribeNamespaceResponse
replicationConfig__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor DescribeNamespaceResponse
failoverVersion__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor DescribeNamespaceResponse
isGlobalNamespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor DescribeNamespaceResponse
failoverHistory__field_descriptor)]
  unknownFields :: Lens' DescribeNamespaceResponse FieldSet
unknownFields
    = (DescribeNamespaceResponse -> FieldSet)
-> (DescribeNamespaceResponse
    -> FieldSet -> DescribeNamespaceResponse)
-> Lens' DescribeNamespaceResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DescribeNamespaceResponse -> FieldSet
_DescribeNamespaceResponse'_unknownFields
        (\ DescribeNamespaceResponse
x__ FieldSet
y__
           -> DescribeNamespaceResponse
x__ {_DescribeNamespaceResponse'_unknownFields = y__})
  defMessage :: DescribeNamespaceResponse
defMessage
    = DescribeNamespaceResponse'_constructor
        {_DescribeNamespaceResponse'namespaceInfo :: Maybe NamespaceInfo
_DescribeNamespaceResponse'namespaceInfo = Maybe NamespaceInfo
forall a. Maybe a
Prelude.Nothing,
         _DescribeNamespaceResponse'config :: Maybe NamespaceConfig
_DescribeNamespaceResponse'config = Maybe NamespaceConfig
forall a. Maybe a
Prelude.Nothing,
         _DescribeNamespaceResponse'replicationConfig :: Maybe NamespaceReplicationConfig
_DescribeNamespaceResponse'replicationConfig = Maybe NamespaceReplicationConfig
forall a. Maybe a
Prelude.Nothing,
         _DescribeNamespaceResponse'failoverVersion :: Int64
_DescribeNamespaceResponse'failoverVersion = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeNamespaceResponse'isGlobalNamespace :: Bool
_DescribeNamespaceResponse'isGlobalNamespace = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeNamespaceResponse'failoverHistory :: Vector FailoverStatus
_DescribeNamespaceResponse'failoverHistory = Vector FailoverStatus
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _DescribeNamespaceResponse'_unknownFields :: FieldSet
_DescribeNamespaceResponse'_unknownFields = []}
  parseMessage :: Parser DescribeNamespaceResponse
parseMessage
    = let
        loop ::
          DescribeNamespaceResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Replication.V1.Message.FailoverStatus
             -> Data.ProtoLens.Encoding.Bytes.Parser DescribeNamespaceResponse
        loop :: DescribeNamespaceResponse
-> Growing Vector RealWorld FailoverStatus
-> Parser DescribeNamespaceResponse
loop DescribeNamespaceResponse
x Growing Vector RealWorld FailoverStatus
mutable'failoverHistory
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'failoverHistory <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                  (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                     mutable'failoverHistory)
                      (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'failoverHistory")
                              frozen'failoverHistory x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser NamespaceInfo -> String -> Parser NamespaceInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"namespace_info"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"namespaceInfo") y x)
                                  mutable'failoverHistory
                        Word64
18
                          -> do y <- Parser NamespaceConfig -> String -> Parser NamespaceConfig
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"config"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"config") y x)
                                  mutable'failoverHistory
                        Word64
26
                          -> do y <- Parser NamespaceReplicationConfig
-> String -> Parser NamespaceReplicationConfig
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"replication_config"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"replicationConfig") y x)
                                  mutable'failoverHistory
                        Word64
32
                          -> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"failover_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"failoverVersion") y x)
                                  mutable'failoverHistory
                        Word64
40
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"is_global_namespace"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"isGlobalNamespace") y x)
                                  mutable'failoverHistory
                        Word64
50
                          -> do !y <- Parser FailoverStatus -> String -> Parser FailoverStatus
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"failover_history"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'failoverHistory y)
                                loop x v
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
                                  mutable'failoverHistory
      in
        Parser DescribeNamespaceResponse
-> String -> Parser DescribeNamespaceResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'failoverHistory <- IO (Growing Vector RealWorld FailoverStatus)
-> Parser (Growing Vector RealWorld FailoverStatus)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           IO (Growing Vector RealWorld FailoverStatus)
IO (Growing Vector (PrimState IO) FailoverStatus)
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'failoverHistory)
          String
"DescribeNamespaceResponse"
  buildMessage :: DescribeNamespaceResponse -> Builder
buildMessage
    = \ DescribeNamespaceResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe NamespaceInfo)
  DescribeNamespaceResponse
  DescribeNamespaceResponse
  (Maybe NamespaceInfo)
  (Maybe NamespaceInfo)
-> DescribeNamespaceResponse -> Maybe NamespaceInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'namespaceInfo") DescribeNamespaceResponse
_x
              of
                Maybe NamespaceInfo
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just NamespaceInfo
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (NamespaceInfo -> ByteString) -> NamespaceInfo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          NamespaceInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NamespaceInfo
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe NamespaceConfig)
  DescribeNamespaceResponse
  DescribeNamespaceResponse
  (Maybe NamespaceConfig)
  (Maybe NamespaceConfig)
-> DescribeNamespaceResponse -> Maybe NamespaceConfig
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'config") DescribeNamespaceResponse
_x
                 of
                   Maybe NamespaceConfig
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just NamespaceConfig
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (NamespaceConfig -> ByteString) -> NamespaceConfig -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             NamespaceConfig -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NamespaceConfig
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe NamespaceReplicationConfig)
  DescribeNamespaceResponse
  DescribeNamespaceResponse
  (Maybe NamespaceReplicationConfig)
  (Maybe NamespaceReplicationConfig)
-> DescribeNamespaceResponse -> Maybe NamespaceReplicationConfig
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'replicationConfig") DescribeNamespaceResponse
_x
                    of
                      Maybe NamespaceReplicationConfig
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just NamespaceReplicationConfig
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (NamespaceReplicationConfig -> ByteString)
-> NamespaceReplicationConfig
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                NamespaceReplicationConfig -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NamespaceReplicationConfig
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Int64
_v
                           = FoldLike
  Int64
  DescribeNamespaceResponse
  DescribeNamespaceResponse
  Int64
  Int64
-> DescribeNamespaceResponse -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"failoverVersion") DescribeNamespaceResponse
_x
                       in
                         if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
32)
                               ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Bool
_v
                              = FoldLike
  Bool DescribeNamespaceResponse DescribeNamespaceResponse Bool Bool
-> DescribeNamespaceResponse -> 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 @"isGlobalNamespace") DescribeNamespaceResponse
_x
                          in
                            if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
40)
                                  ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (\ Bool
b -> if Bool
b then Word64
1 else Word64
0) Bool
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            ((FailoverStatus -> Builder) -> Vector FailoverStatus -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                               (\ FailoverStatus
_v
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                       ((ByteString -> Builder)
-> (FailoverStatus -> ByteString) -> FailoverStatus -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                          (\ ByteString
bs
                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                        (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                          FailoverStatus -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage FailoverStatus
_v))
                               (FoldLike
  (Vector FailoverStatus)
  DescribeNamespaceResponse
  DescribeNamespaceResponse
  (Vector FailoverStatus)
  (Vector FailoverStatus)
-> DescribeNamespaceResponse -> Vector FailoverStatus
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'failoverHistory") DescribeNamespaceResponse
_x))
                            (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                               (FoldLike
  FieldSet
  DescribeNamespaceResponse
  DescribeNamespaceResponse
  FieldSet
  FieldSet
-> DescribeNamespaceResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DescribeNamespaceResponse
  DescribeNamespaceResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DescribeNamespaceResponse FieldSet
Data.ProtoLens.unknownFields DescribeNamespaceResponse
_x)))))))
instance Control.DeepSeq.NFData DescribeNamespaceResponse where
  rnf :: DescribeNamespaceResponse -> ()
rnf
    = \ DescribeNamespaceResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DescribeNamespaceResponse -> FieldSet
_DescribeNamespaceResponse'_unknownFields DescribeNamespaceResponse
x__)
             (Maybe NamespaceInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DescribeNamespaceResponse -> Maybe NamespaceInfo
_DescribeNamespaceResponse'namespaceInfo DescribeNamespaceResponse
x__)
                (Maybe NamespaceConfig -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (DescribeNamespaceResponse -> Maybe NamespaceConfig
_DescribeNamespaceResponse'config DescribeNamespaceResponse
x__)
                   (Maybe NamespaceReplicationConfig -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (DescribeNamespaceResponse -> Maybe NamespaceReplicationConfig
_DescribeNamespaceResponse'replicationConfig DescribeNamespaceResponse
x__)
                      (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (DescribeNamespaceResponse -> Int64
_DescribeNamespaceResponse'failoverVersion DescribeNamespaceResponse
x__)
                         (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (DescribeNamespaceResponse -> Bool
_DescribeNamespaceResponse'isGlobalNamespace DescribeNamespaceResponse
x__)
                            (Vector FailoverStatus -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (DescribeNamespaceResponse -> Vector FailoverStatus
_DescribeNamespaceResponse'failoverHistory DescribeNamespaceResponse
x__) ()))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' DescribeScheduleRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.scheduleId' @:: Lens' DescribeScheduleRequest Data.Text.Text@ -}
data DescribeScheduleRequest
  = DescribeScheduleRequest'_constructor {DescribeScheduleRequest -> Text
_DescribeScheduleRequest'namespace :: !Data.Text.Text,
                                          DescribeScheduleRequest -> Text
_DescribeScheduleRequest'scheduleId :: !Data.Text.Text,
                                          DescribeScheduleRequest -> FieldSet
_DescribeScheduleRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DescribeScheduleRequest -> DescribeScheduleRequest -> Bool
(DescribeScheduleRequest -> DescribeScheduleRequest -> Bool)
-> (DescribeScheduleRequest -> DescribeScheduleRequest -> Bool)
-> Eq DescribeScheduleRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DescribeScheduleRequest -> DescribeScheduleRequest -> Bool
== :: DescribeScheduleRequest -> DescribeScheduleRequest -> Bool
$c/= :: DescribeScheduleRequest -> DescribeScheduleRequest -> Bool
/= :: DescribeScheduleRequest -> DescribeScheduleRequest -> Bool
Prelude.Eq, Eq DescribeScheduleRequest
Eq DescribeScheduleRequest =>
(DescribeScheduleRequest -> DescribeScheduleRequest -> Ordering)
-> (DescribeScheduleRequest -> DescribeScheduleRequest -> Bool)
-> (DescribeScheduleRequest -> DescribeScheduleRequest -> Bool)
-> (DescribeScheduleRequest -> DescribeScheduleRequest -> Bool)
-> (DescribeScheduleRequest -> DescribeScheduleRequest -> Bool)
-> (DescribeScheduleRequest
    -> DescribeScheduleRequest -> DescribeScheduleRequest)
-> (DescribeScheduleRequest
    -> DescribeScheduleRequest -> DescribeScheduleRequest)
-> Ord DescribeScheduleRequest
DescribeScheduleRequest -> DescribeScheduleRequest -> Bool
DescribeScheduleRequest -> DescribeScheduleRequest -> Ordering
DescribeScheduleRequest
-> DescribeScheduleRequest -> DescribeScheduleRequest
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 :: DescribeScheduleRequest -> DescribeScheduleRequest -> Ordering
compare :: DescribeScheduleRequest -> DescribeScheduleRequest -> Ordering
$c< :: DescribeScheduleRequest -> DescribeScheduleRequest -> Bool
< :: DescribeScheduleRequest -> DescribeScheduleRequest -> Bool
$c<= :: DescribeScheduleRequest -> DescribeScheduleRequest -> Bool
<= :: DescribeScheduleRequest -> DescribeScheduleRequest -> Bool
$c> :: DescribeScheduleRequest -> DescribeScheduleRequest -> Bool
> :: DescribeScheduleRequest -> DescribeScheduleRequest -> Bool
$c>= :: DescribeScheduleRequest -> DescribeScheduleRequest -> Bool
>= :: DescribeScheduleRequest -> DescribeScheduleRequest -> Bool
$cmax :: DescribeScheduleRequest
-> DescribeScheduleRequest -> DescribeScheduleRequest
max :: DescribeScheduleRequest
-> DescribeScheduleRequest -> DescribeScheduleRequest
$cmin :: DescribeScheduleRequest
-> DescribeScheduleRequest -> DescribeScheduleRequest
min :: DescribeScheduleRequest
-> DescribeScheduleRequest -> DescribeScheduleRequest
Prelude.Ord)
instance Prelude.Show DescribeScheduleRequest where
  showsPrec :: Int -> DescribeScheduleRequest -> ShowS
showsPrec Int
_ DescribeScheduleRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DescribeScheduleRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DescribeScheduleRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DescribeScheduleRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> DescribeScheduleRequest
-> f DescribeScheduleRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> DescribeScheduleRequest -> f DescribeScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DescribeScheduleRequest
-> f DescribeScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeScheduleRequest -> Text)
-> (DescribeScheduleRequest -> Text -> DescribeScheduleRequest)
-> Lens DescribeScheduleRequest DescribeScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeScheduleRequest -> Text
_DescribeScheduleRequest'namespace
           (\ DescribeScheduleRequest
x__ Text
y__ -> DescribeScheduleRequest
x__ {_DescribeScheduleRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeScheduleRequest "scheduleId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleId"
-> (Text -> f Text)
-> DescribeScheduleRequest
-> f DescribeScheduleRequest
fieldOf Proxy# "scheduleId"
_
    = ((Text -> f Text)
 -> DescribeScheduleRequest -> f DescribeScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DescribeScheduleRequest
-> f DescribeScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeScheduleRequest -> Text)
-> (DescribeScheduleRequest -> Text -> DescribeScheduleRequest)
-> Lens DescribeScheduleRequest DescribeScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeScheduleRequest -> Text
_DescribeScheduleRequest'scheduleId
           (\ DescribeScheduleRequest
x__ Text
y__ -> DescribeScheduleRequest
x__ {_DescribeScheduleRequest'scheduleId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DescribeScheduleRequest where
  messageName :: Proxy DescribeScheduleRequest -> Text
messageName Proxy DescribeScheduleRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DescribeScheduleRequest"
  packedMessageDescriptor :: Proxy DescribeScheduleRequest -> ByteString
packedMessageDescriptor Proxy DescribeScheduleRequest
_
    = ByteString
"\n\
      \\ETBDescribeScheduleRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
      \\vschedule_id\CAN\STX \SOH(\tR\n\
      \scheduleId"
  packedFileDescriptor :: Proxy DescribeScheduleRequest -> ByteString
packedFileDescriptor Proxy DescribeScheduleRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DescribeScheduleRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor DescribeScheduleRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DescribeScheduleRequest Text
-> FieldDescriptor DescribeScheduleRequest
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 DescribeScheduleRequest DescribeScheduleRequest Text Text
-> FieldAccessor DescribeScheduleRequest 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 DescribeScheduleRequest
        scheduleId__field_descriptor :: FieldDescriptor DescribeScheduleRequest
scheduleId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DescribeScheduleRequest Text
-> FieldDescriptor DescribeScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule_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 DescribeScheduleRequest DescribeScheduleRequest Text Text
-> FieldAccessor DescribeScheduleRequest 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 @"scheduleId")) ::
              Data.ProtoLens.FieldDescriptor DescribeScheduleRequest
      in
        [(Tag, FieldDescriptor DescribeScheduleRequest)]
-> Map Tag (FieldDescriptor DescribeScheduleRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DescribeScheduleRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DescribeScheduleRequest
scheduleId__field_descriptor)]
  unknownFields :: Lens' DescribeScheduleRequest FieldSet
unknownFields
    = (DescribeScheduleRequest -> FieldSet)
-> (DescribeScheduleRequest -> FieldSet -> DescribeScheduleRequest)
-> Lens' DescribeScheduleRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DescribeScheduleRequest -> FieldSet
_DescribeScheduleRequest'_unknownFields
        (\ DescribeScheduleRequest
x__ FieldSet
y__ -> DescribeScheduleRequest
x__ {_DescribeScheduleRequest'_unknownFields = y__})
  defMessage :: DescribeScheduleRequest
defMessage
    = DescribeScheduleRequest'_constructor
        {_DescribeScheduleRequest'namespace :: Text
_DescribeScheduleRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeScheduleRequest'scheduleId :: Text
_DescribeScheduleRequest'scheduleId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeScheduleRequest'_unknownFields :: FieldSet
_DescribeScheduleRequest'_unknownFields = []}
  parseMessage :: Parser DescribeScheduleRequest
parseMessage
    = let
        loop ::
          DescribeScheduleRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser DescribeScheduleRequest
        loop :: DescribeScheduleRequest -> Parser DescribeScheduleRequest
loop DescribeScheduleRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
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
"schedule_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"scheduleId") 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 DescribeScheduleRequest
-> String -> Parser DescribeScheduleRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do DescribeScheduleRequest -> Parser DescribeScheduleRequest
loop DescribeScheduleRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"DescribeScheduleRequest"
  buildMessage :: DescribeScheduleRequest -> Builder
buildMessage
    = \ DescribeScheduleRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text DescribeScheduleRequest DescribeScheduleRequest Text Text
-> DescribeScheduleRequest -> 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") DescribeScheduleRequest
_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 DescribeScheduleRequest DescribeScheduleRequest Text Text
-> DescribeScheduleRequest -> 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 @"scheduleId") DescribeScheduleRequest
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  DescribeScheduleRequest
  DescribeScheduleRequest
  FieldSet
  FieldSet
-> DescribeScheduleRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DescribeScheduleRequest
  DescribeScheduleRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DescribeScheduleRequest FieldSet
Data.ProtoLens.unknownFields DescribeScheduleRequest
_x)))
instance Control.DeepSeq.NFData DescribeScheduleRequest where
  rnf :: DescribeScheduleRequest -> ()
rnf
    = \ DescribeScheduleRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DescribeScheduleRequest -> FieldSet
_DescribeScheduleRequest'_unknownFields DescribeScheduleRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DescribeScheduleRequest -> Text
_DescribeScheduleRequest'namespace DescribeScheduleRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (DescribeScheduleRequest -> Text
_DescribeScheduleRequest'scheduleId DescribeScheduleRequest
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.schedule' @:: Lens' DescribeScheduleResponse Proto.Temporal.Api.Schedule.V1.Message.Schedule@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'schedule' @:: Lens' DescribeScheduleResponse (Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.Schedule)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.info' @:: Lens' DescribeScheduleResponse Proto.Temporal.Api.Schedule.V1.Message.ScheduleInfo@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'info' @:: Lens' DescribeScheduleResponse (Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.ScheduleInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.memo' @:: Lens' DescribeScheduleResponse Proto.Temporal.Api.Common.V1.Message.Memo@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'memo' @:: Lens' DescribeScheduleResponse (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.searchAttributes' @:: Lens' DescribeScheduleResponse Proto.Temporal.Api.Common.V1.Message.SearchAttributes@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'searchAttributes' @:: Lens' DescribeScheduleResponse (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.conflictToken' @:: Lens' DescribeScheduleResponse Data.ByteString.ByteString@ -}
data DescribeScheduleResponse
  = DescribeScheduleResponse'_constructor {DescribeScheduleResponse -> Maybe Schedule
_DescribeScheduleResponse'schedule :: !(Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.Schedule),
                                           DescribeScheduleResponse -> Maybe ScheduleInfo
_DescribeScheduleResponse'info :: !(Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.ScheduleInfo),
                                           DescribeScheduleResponse -> Maybe Memo
_DescribeScheduleResponse'memo :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo),
                                           DescribeScheduleResponse -> Maybe SearchAttributes
_DescribeScheduleResponse'searchAttributes :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes),
                                           DescribeScheduleResponse -> ByteString
_DescribeScheduleResponse'conflictToken :: !Data.ByteString.ByteString,
                                           DescribeScheduleResponse -> FieldSet
_DescribeScheduleResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DescribeScheduleResponse -> DescribeScheduleResponse -> Bool
(DescribeScheduleResponse -> DescribeScheduleResponse -> Bool)
-> (DescribeScheduleResponse -> DescribeScheduleResponse -> Bool)
-> Eq DescribeScheduleResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DescribeScheduleResponse -> DescribeScheduleResponse -> Bool
== :: DescribeScheduleResponse -> DescribeScheduleResponse -> Bool
$c/= :: DescribeScheduleResponse -> DescribeScheduleResponse -> Bool
/= :: DescribeScheduleResponse -> DescribeScheduleResponse -> Bool
Prelude.Eq, Eq DescribeScheduleResponse
Eq DescribeScheduleResponse =>
(DescribeScheduleResponse -> DescribeScheduleResponse -> Ordering)
-> (DescribeScheduleResponse -> DescribeScheduleResponse -> Bool)
-> (DescribeScheduleResponse -> DescribeScheduleResponse -> Bool)
-> (DescribeScheduleResponse -> DescribeScheduleResponse -> Bool)
-> (DescribeScheduleResponse -> DescribeScheduleResponse -> Bool)
-> (DescribeScheduleResponse
    -> DescribeScheduleResponse -> DescribeScheduleResponse)
-> (DescribeScheduleResponse
    -> DescribeScheduleResponse -> DescribeScheduleResponse)
-> Ord DescribeScheduleResponse
DescribeScheduleResponse -> DescribeScheduleResponse -> Bool
DescribeScheduleResponse -> DescribeScheduleResponse -> Ordering
DescribeScheduleResponse
-> DescribeScheduleResponse -> DescribeScheduleResponse
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 :: DescribeScheduleResponse -> DescribeScheduleResponse -> Ordering
compare :: DescribeScheduleResponse -> DescribeScheduleResponse -> Ordering
$c< :: DescribeScheduleResponse -> DescribeScheduleResponse -> Bool
< :: DescribeScheduleResponse -> DescribeScheduleResponse -> Bool
$c<= :: DescribeScheduleResponse -> DescribeScheduleResponse -> Bool
<= :: DescribeScheduleResponse -> DescribeScheduleResponse -> Bool
$c> :: DescribeScheduleResponse -> DescribeScheduleResponse -> Bool
> :: DescribeScheduleResponse -> DescribeScheduleResponse -> Bool
$c>= :: DescribeScheduleResponse -> DescribeScheduleResponse -> Bool
>= :: DescribeScheduleResponse -> DescribeScheduleResponse -> Bool
$cmax :: DescribeScheduleResponse
-> DescribeScheduleResponse -> DescribeScheduleResponse
max :: DescribeScheduleResponse
-> DescribeScheduleResponse -> DescribeScheduleResponse
$cmin :: DescribeScheduleResponse
-> DescribeScheduleResponse -> DescribeScheduleResponse
min :: DescribeScheduleResponse
-> DescribeScheduleResponse -> DescribeScheduleResponse
Prelude.Ord)
instance Prelude.Show DescribeScheduleResponse where
  showsPrec :: Int -> DescribeScheduleResponse -> ShowS
showsPrec Int
_ DescribeScheduleResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DescribeScheduleResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DescribeScheduleResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DescribeScheduleResponse "schedule" Proto.Temporal.Api.Schedule.V1.Message.Schedule where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "schedule"
-> (Schedule -> f Schedule)
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
fieldOf Proxy# "schedule"
_
    = ((Maybe Schedule -> f (Maybe Schedule))
 -> DescribeScheduleResponse -> f DescribeScheduleResponse)
-> ((Schedule -> f Schedule)
    -> Maybe Schedule -> f (Maybe Schedule))
-> (Schedule -> f Schedule)
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeScheduleResponse -> Maybe Schedule)
-> (DescribeScheduleResponse
    -> Maybe Schedule -> DescribeScheduleResponse)
-> Lens
     DescribeScheduleResponse
     DescribeScheduleResponse
     (Maybe Schedule)
     (Maybe Schedule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeScheduleResponse -> Maybe Schedule
_DescribeScheduleResponse'schedule
           (\ DescribeScheduleResponse
x__ Maybe Schedule
y__ -> DescribeScheduleResponse
x__ {_DescribeScheduleResponse'schedule = y__}))
        (Schedule -> Lens' (Maybe Schedule) Schedule
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Schedule
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeScheduleResponse "maybe'schedule" (Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.Schedule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'schedule"
-> (Maybe Schedule -> f (Maybe Schedule))
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
fieldOf Proxy# "maybe'schedule"
_
    = ((Maybe Schedule -> f (Maybe Schedule))
 -> DescribeScheduleResponse -> f DescribeScheduleResponse)
-> ((Maybe Schedule -> f (Maybe Schedule))
    -> Maybe Schedule -> f (Maybe Schedule))
-> (Maybe Schedule -> f (Maybe Schedule))
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeScheduleResponse -> Maybe Schedule)
-> (DescribeScheduleResponse
    -> Maybe Schedule -> DescribeScheduleResponse)
-> Lens
     DescribeScheduleResponse
     DescribeScheduleResponse
     (Maybe Schedule)
     (Maybe Schedule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeScheduleResponse -> Maybe Schedule
_DescribeScheduleResponse'schedule
           (\ DescribeScheduleResponse
x__ Maybe Schedule
y__ -> DescribeScheduleResponse
x__ {_DescribeScheduleResponse'schedule = y__}))
        (Maybe Schedule -> f (Maybe Schedule))
-> Maybe Schedule -> f (Maybe Schedule)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeScheduleResponse "info" Proto.Temporal.Api.Schedule.V1.Message.ScheduleInfo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "info"
-> (ScheduleInfo -> f ScheduleInfo)
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
fieldOf Proxy# "info"
_
    = ((Maybe ScheduleInfo -> f (Maybe ScheduleInfo))
 -> DescribeScheduleResponse -> f DescribeScheduleResponse)
-> ((ScheduleInfo -> f ScheduleInfo)
    -> Maybe ScheduleInfo -> f (Maybe ScheduleInfo))
-> (ScheduleInfo -> f ScheduleInfo)
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeScheduleResponse -> Maybe ScheduleInfo)
-> (DescribeScheduleResponse
    -> Maybe ScheduleInfo -> DescribeScheduleResponse)
-> Lens
     DescribeScheduleResponse
     DescribeScheduleResponse
     (Maybe ScheduleInfo)
     (Maybe ScheduleInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeScheduleResponse -> Maybe ScheduleInfo
_DescribeScheduleResponse'info
           (\ DescribeScheduleResponse
x__ Maybe ScheduleInfo
y__ -> DescribeScheduleResponse
x__ {_DescribeScheduleResponse'info = y__}))
        (ScheduleInfo -> Lens' (Maybe ScheduleInfo) ScheduleInfo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ScheduleInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeScheduleResponse "maybe'info" (Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.ScheduleInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'info"
-> (Maybe ScheduleInfo -> f (Maybe ScheduleInfo))
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
fieldOf Proxy# "maybe'info"
_
    = ((Maybe ScheduleInfo -> f (Maybe ScheduleInfo))
 -> DescribeScheduleResponse -> f DescribeScheduleResponse)
-> ((Maybe ScheduleInfo -> f (Maybe ScheduleInfo))
    -> Maybe ScheduleInfo -> f (Maybe ScheduleInfo))
-> (Maybe ScheduleInfo -> f (Maybe ScheduleInfo))
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeScheduleResponse -> Maybe ScheduleInfo)
-> (DescribeScheduleResponse
    -> Maybe ScheduleInfo -> DescribeScheduleResponse)
-> Lens
     DescribeScheduleResponse
     DescribeScheduleResponse
     (Maybe ScheduleInfo)
     (Maybe ScheduleInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeScheduleResponse -> Maybe ScheduleInfo
_DescribeScheduleResponse'info
           (\ DescribeScheduleResponse
x__ Maybe ScheduleInfo
y__ -> DescribeScheduleResponse
x__ {_DescribeScheduleResponse'info = y__}))
        (Maybe ScheduleInfo -> f (Maybe ScheduleInfo))
-> Maybe ScheduleInfo -> f (Maybe ScheduleInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeScheduleResponse "memo" Proto.Temporal.Api.Common.V1.Message.Memo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "memo"
-> (Memo -> f Memo)
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
fieldOf Proxy# "memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> DescribeScheduleResponse -> f DescribeScheduleResponse)
-> ((Memo -> f Memo) -> Maybe Memo -> f (Maybe Memo))
-> (Memo -> f Memo)
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeScheduleResponse -> Maybe Memo)
-> (DescribeScheduleResponse
    -> Maybe Memo -> DescribeScheduleResponse)
-> Lens
     DescribeScheduleResponse
     DescribeScheduleResponse
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeScheduleResponse -> Maybe Memo
_DescribeScheduleResponse'memo
           (\ DescribeScheduleResponse
x__ Maybe Memo
y__ -> DescribeScheduleResponse
x__ {_DescribeScheduleResponse'memo = y__}))
        (Memo -> Lens' (Maybe Memo) Memo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Memo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeScheduleResponse "maybe'memo" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'memo"
-> (Maybe Memo -> f (Maybe Memo))
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
fieldOf Proxy# "maybe'memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> DescribeScheduleResponse -> f DescribeScheduleResponse)
-> ((Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo))
-> (Maybe Memo -> f (Maybe Memo))
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeScheduleResponse -> Maybe Memo)
-> (DescribeScheduleResponse
    -> Maybe Memo -> DescribeScheduleResponse)
-> Lens
     DescribeScheduleResponse
     DescribeScheduleResponse
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeScheduleResponse -> Maybe Memo
_DescribeScheduleResponse'memo
           (\ DescribeScheduleResponse
x__ Maybe Memo
y__ -> DescribeScheduleResponse
x__ {_DescribeScheduleResponse'memo = y__}))
        (Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeScheduleResponse "searchAttributes" Proto.Temporal.Api.Common.V1.Message.SearchAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "searchAttributes"
-> (SearchAttributes -> f SearchAttributes)
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
fieldOf Proxy# "searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> DescribeScheduleResponse -> f DescribeScheduleResponse)
-> ((SearchAttributes -> f SearchAttributes)
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (SearchAttributes -> f SearchAttributes)
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeScheduleResponse -> Maybe SearchAttributes)
-> (DescribeScheduleResponse
    -> Maybe SearchAttributes -> DescribeScheduleResponse)
-> Lens
     DescribeScheduleResponse
     DescribeScheduleResponse
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeScheduleResponse -> Maybe SearchAttributes
_DescribeScheduleResponse'searchAttributes
           (\ DescribeScheduleResponse
x__ Maybe SearchAttributes
y__
              -> DescribeScheduleResponse
x__ {_DescribeScheduleResponse'searchAttributes = y__}))
        (SearchAttributes -> Lens' (Maybe SearchAttributes) SearchAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SearchAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeScheduleResponse "maybe'searchAttributes" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'searchAttributes"
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
fieldOf Proxy# "maybe'searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> DescribeScheduleResponse -> f DescribeScheduleResponse)
-> ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeScheduleResponse -> Maybe SearchAttributes)
-> (DescribeScheduleResponse
    -> Maybe SearchAttributes -> DescribeScheduleResponse)
-> Lens
     DescribeScheduleResponse
     DescribeScheduleResponse
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeScheduleResponse -> Maybe SearchAttributes
_DescribeScheduleResponse'searchAttributes
           (\ DescribeScheduleResponse
x__ Maybe SearchAttributes
y__
              -> DescribeScheduleResponse
x__ {_DescribeScheduleResponse'searchAttributes = y__}))
        (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> Maybe SearchAttributes -> f (Maybe SearchAttributes)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeScheduleResponse "conflictToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "conflictToken"
-> (ByteString -> f ByteString)
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
fieldOf Proxy# "conflictToken"
_
    = ((ByteString -> f ByteString)
 -> DescribeScheduleResponse -> f DescribeScheduleResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> DescribeScheduleResponse
-> f DescribeScheduleResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeScheduleResponse -> ByteString)
-> (DescribeScheduleResponse
    -> ByteString -> DescribeScheduleResponse)
-> Lens
     DescribeScheduleResponse
     DescribeScheduleResponse
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeScheduleResponse -> ByteString
_DescribeScheduleResponse'conflictToken
           (\ DescribeScheduleResponse
x__ ByteString
y__ -> DescribeScheduleResponse
x__ {_DescribeScheduleResponse'conflictToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DescribeScheduleResponse where
  messageName :: Proxy DescribeScheduleResponse -> Text
messageName Proxy DescribeScheduleResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DescribeScheduleResponse"
  packedMessageDescriptor :: Proxy DescribeScheduleResponse -> ByteString
packedMessageDescriptor Proxy DescribeScheduleResponse
_
    = ByteString
"\n\
      \\CANDescribeScheduleResponse\DC2>\n\
      \\bschedule\CAN\SOH \SOH(\v2\".temporal.api.schedule.v1.ScheduleR\bschedule\DC2:\n\
      \\EOTinfo\CAN\STX \SOH(\v2&.temporal.api.schedule.v1.ScheduleInfoR\EOTinfo\DC20\n\
      \\EOTmemo\CAN\ETX \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
      \\DC1search_attributes\CAN\EOT \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC2%\n\
      \\SOconflict_token\CAN\ENQ \SOH(\fR\rconflictToken"
  packedFileDescriptor :: Proxy DescribeScheduleResponse -> ByteString
packedFileDescriptor Proxy DescribeScheduleResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DescribeScheduleResponse)
fieldsByTag
    = let
        schedule__field_descriptor :: FieldDescriptor DescribeScheduleResponse
schedule__field_descriptor
          = String
-> FieldTypeDescriptor Schedule
-> FieldAccessor DescribeScheduleResponse Schedule
-> FieldDescriptor DescribeScheduleResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule"
              (MessageOrGroup -> FieldTypeDescriptor Schedule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Schedule.V1.Message.Schedule)
              (Lens
  DescribeScheduleResponse
  DescribeScheduleResponse
  (Maybe Schedule)
  (Maybe Schedule)
-> FieldAccessor DescribeScheduleResponse Schedule
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'schedule")) ::
              Data.ProtoLens.FieldDescriptor DescribeScheduleResponse
        info__field_descriptor :: FieldDescriptor DescribeScheduleResponse
info__field_descriptor
          = String
-> FieldTypeDescriptor ScheduleInfo
-> FieldAccessor DescribeScheduleResponse ScheduleInfo
-> FieldDescriptor DescribeScheduleResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"info"
              (MessageOrGroup -> FieldTypeDescriptor ScheduleInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Schedule.V1.Message.ScheduleInfo)
              (Lens
  DescribeScheduleResponse
  DescribeScheduleResponse
  (Maybe ScheduleInfo)
  (Maybe ScheduleInfo)
-> FieldAccessor DescribeScheduleResponse ScheduleInfo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'info")) ::
              Data.ProtoLens.FieldDescriptor DescribeScheduleResponse
        memo__field_descriptor :: FieldDescriptor DescribeScheduleResponse
memo__field_descriptor
          = String
-> FieldTypeDescriptor Memo
-> FieldAccessor DescribeScheduleResponse Memo
-> FieldDescriptor DescribeScheduleResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"memo"
              (MessageOrGroup -> FieldTypeDescriptor Memo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Memo)
              (Lens
  DescribeScheduleResponse
  DescribeScheduleResponse
  (Maybe Memo)
  (Maybe Memo)
-> FieldAccessor DescribeScheduleResponse Memo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'memo")) ::
              Data.ProtoLens.FieldDescriptor DescribeScheduleResponse
        searchAttributes__field_descriptor :: FieldDescriptor DescribeScheduleResponse
searchAttributes__field_descriptor
          = String
-> FieldTypeDescriptor SearchAttributes
-> FieldAccessor DescribeScheduleResponse SearchAttributes
-> FieldDescriptor DescribeScheduleResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"search_attributes"
              (MessageOrGroup -> FieldTypeDescriptor SearchAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.SearchAttributes)
              (Lens
  DescribeScheduleResponse
  DescribeScheduleResponse
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> FieldAccessor DescribeScheduleResponse SearchAttributes
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'searchAttributes")) ::
              Data.ProtoLens.FieldDescriptor DescribeScheduleResponse
        conflictToken__field_descriptor :: FieldDescriptor DescribeScheduleResponse
conflictToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor DescribeScheduleResponse ByteString
-> FieldDescriptor DescribeScheduleResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"conflict_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     DescribeScheduleResponse
     DescribeScheduleResponse
     ByteString
     ByteString
-> FieldAccessor DescribeScheduleResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"conflictToken")) ::
              Data.ProtoLens.FieldDescriptor DescribeScheduleResponse
      in
        [(Tag, FieldDescriptor DescribeScheduleResponse)]
-> Map Tag (FieldDescriptor DescribeScheduleResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DescribeScheduleResponse
schedule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DescribeScheduleResponse
info__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor DescribeScheduleResponse
memo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor DescribeScheduleResponse
searchAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor DescribeScheduleResponse
conflictToken__field_descriptor)]
  unknownFields :: Lens' DescribeScheduleResponse FieldSet
unknownFields
    = (DescribeScheduleResponse -> FieldSet)
-> (DescribeScheduleResponse
    -> FieldSet -> DescribeScheduleResponse)
-> Lens' DescribeScheduleResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DescribeScheduleResponse -> FieldSet
_DescribeScheduleResponse'_unknownFields
        (\ DescribeScheduleResponse
x__ FieldSet
y__ -> DescribeScheduleResponse
x__ {_DescribeScheduleResponse'_unknownFields = y__})
  defMessage :: DescribeScheduleResponse
defMessage
    = DescribeScheduleResponse'_constructor
        {_DescribeScheduleResponse'schedule :: Maybe Schedule
_DescribeScheduleResponse'schedule = Maybe Schedule
forall a. Maybe a
Prelude.Nothing,
         _DescribeScheduleResponse'info :: Maybe ScheduleInfo
_DescribeScheduleResponse'info = Maybe ScheduleInfo
forall a. Maybe a
Prelude.Nothing,
         _DescribeScheduleResponse'memo :: Maybe Memo
_DescribeScheduleResponse'memo = Maybe Memo
forall a. Maybe a
Prelude.Nothing,
         _DescribeScheduleResponse'searchAttributes :: Maybe SearchAttributes
_DescribeScheduleResponse'searchAttributes = Maybe SearchAttributes
forall a. Maybe a
Prelude.Nothing,
         _DescribeScheduleResponse'conflictToken :: ByteString
_DescribeScheduleResponse'conflictToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeScheduleResponse'_unknownFields :: FieldSet
_DescribeScheduleResponse'_unknownFields = []}
  parseMessage :: Parser DescribeScheduleResponse
parseMessage
    = let
        loop ::
          DescribeScheduleResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser DescribeScheduleResponse
        loop :: DescribeScheduleResponse -> Parser DescribeScheduleResponse
loop DescribeScheduleResponse
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 Schedule -> String -> Parser Schedule
forall a. Parser a -> String -> Parser a
(Data.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"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"schedule") y x)
                        Word64
18
                          -> do y <- Parser ScheduleInfo -> String -> Parser ScheduleInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"info"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"info") y x)
                        Word64
26
                          -> do y <- Parser Memo -> String -> Parser Memo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"memo"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"memo") y x)
                        Word64
34
                          -> do y <- Parser SearchAttributes -> String -> Parser SearchAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"search_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"searchAttributes") y x)
                        Word64
42
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"conflict_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"conflictToken") 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 DescribeScheduleResponse
-> String -> Parser DescribeScheduleResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do DescribeScheduleResponse -> Parser DescribeScheduleResponse
loop DescribeScheduleResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"DescribeScheduleResponse"
  buildMessage :: DescribeScheduleResponse -> Builder
buildMessage
    = \ DescribeScheduleResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Schedule)
  DescribeScheduleResponse
  DescribeScheduleResponse
  (Maybe Schedule)
  (Maybe Schedule)
-> DescribeScheduleResponse -> Maybe Schedule
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'schedule") DescribeScheduleResponse
_x
              of
                Maybe Schedule
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just Schedule
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (Schedule -> ByteString) -> Schedule -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          Schedule -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Schedule
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe ScheduleInfo)
  DescribeScheduleResponse
  DescribeScheduleResponse
  (Maybe ScheduleInfo)
  (Maybe ScheduleInfo)
-> DescribeScheduleResponse -> Maybe ScheduleInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'info") DescribeScheduleResponse
_x
                 of
                   Maybe ScheduleInfo
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just ScheduleInfo
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (ScheduleInfo -> ByteString) -> ScheduleInfo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             ScheduleInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ScheduleInfo
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe Memo)
  DescribeScheduleResponse
  DescribeScheduleResponse
  (Maybe Memo)
  (Maybe Memo)
-> DescribeScheduleResponse -> Maybe Memo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'memo") DescribeScheduleResponse
_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
26)
                             ((ByteString -> Builder) -> (Memo -> ByteString) -> Memo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                Memo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Memo
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe SearchAttributes)
  DescribeScheduleResponse
  DescribeScheduleResponse
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> DescribeScheduleResponse -> Maybe SearchAttributes
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                             (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'searchAttributes") DescribeScheduleResponse
_x
                       of
                         Maybe SearchAttributes
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just SearchAttributes
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (SearchAttributes -> ByteString) -> SearchAttributes -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   SearchAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage SearchAttributes
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: ByteString
_v
                              = FoldLike
  ByteString
  DescribeScheduleResponse
  DescribeScheduleResponse
  ByteString
  ByteString
-> DescribeScheduleResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                  (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"conflictToken") DescribeScheduleResponse
_x
                          in
                            if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
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
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                     ByteString
_v))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  DescribeScheduleResponse
  DescribeScheduleResponse
  FieldSet
  FieldSet
-> DescribeScheduleResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DescribeScheduleResponse
  DescribeScheduleResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DescribeScheduleResponse FieldSet
Data.ProtoLens.unknownFields DescribeScheduleResponse
_x))))))
instance Control.DeepSeq.NFData DescribeScheduleResponse where
  rnf :: DescribeScheduleResponse -> ()
rnf
    = \ DescribeScheduleResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DescribeScheduleResponse -> FieldSet
_DescribeScheduleResponse'_unknownFields DescribeScheduleResponse
x__)
             (Maybe Schedule -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DescribeScheduleResponse -> Maybe Schedule
_DescribeScheduleResponse'schedule DescribeScheduleResponse
x__)
                (Maybe ScheduleInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (DescribeScheduleResponse -> Maybe ScheduleInfo
_DescribeScheduleResponse'info DescribeScheduleResponse
x__)
                   (Maybe Memo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (DescribeScheduleResponse -> Maybe Memo
_DescribeScheduleResponse'memo DescribeScheduleResponse
x__)
                      (Maybe SearchAttributes -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (DescribeScheduleResponse -> Maybe SearchAttributes
_DescribeScheduleResponse'searchAttributes DescribeScheduleResponse
x__)
                         (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (DescribeScheduleResponse -> ByteString
_DescribeScheduleResponse'conflictToken DescribeScheduleResponse
x__) ())))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' DescribeTaskQueueRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueue' @:: Lens' DescribeTaskQueueRequest Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'taskQueue' @:: Lens' DescribeTaskQueueRequest (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueueType' @:: Lens' DescribeTaskQueueRequest Proto.Temporal.Api.Enums.V1.TaskQueue.TaskQueueType@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.includeTaskQueueStatus' @:: Lens' DescribeTaskQueueRequest Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.apiMode' @:: Lens' DescribeTaskQueueRequest Proto.Temporal.Api.Enums.V1.TaskQueue.DescribeTaskQueueMode@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.versions' @:: Lens' DescribeTaskQueueRequest Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueVersionSelection@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'versions' @:: Lens' DescribeTaskQueueRequest (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueVersionSelection)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueueTypes' @:: Lens' DescribeTaskQueueRequest [Proto.Temporal.Api.Enums.V1.TaskQueue.TaskQueueType]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'taskQueueTypes' @:: Lens' DescribeTaskQueueRequest (Data.Vector.Vector Proto.Temporal.Api.Enums.V1.TaskQueue.TaskQueueType)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.reportPollers' @:: Lens' DescribeTaskQueueRequest Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.reportTaskReachability' @:: Lens' DescribeTaskQueueRequest Prelude.Bool@ -}
data DescribeTaskQueueRequest
  = DescribeTaskQueueRequest'_constructor {DescribeTaskQueueRequest -> Text
_DescribeTaskQueueRequest'namespace :: !Data.Text.Text,
                                           DescribeTaskQueueRequest -> Maybe TaskQueue
_DescribeTaskQueueRequest'taskQueue :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue),
                                           DescribeTaskQueueRequest -> TaskQueueType
_DescribeTaskQueueRequest'taskQueueType :: !Proto.Temporal.Api.Enums.V1.TaskQueue.TaskQueueType,
                                           DescribeTaskQueueRequest -> Bool
_DescribeTaskQueueRequest'includeTaskQueueStatus :: !Prelude.Bool,
                                           DescribeTaskQueueRequest -> DescribeTaskQueueMode
_DescribeTaskQueueRequest'apiMode :: !Proto.Temporal.Api.Enums.V1.TaskQueue.DescribeTaskQueueMode,
                                           DescribeTaskQueueRequest -> Maybe TaskQueueVersionSelection
_DescribeTaskQueueRequest'versions :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueVersionSelection),
                                           DescribeTaskQueueRequest -> Vector TaskQueueType
_DescribeTaskQueueRequest'taskQueueTypes :: !(Data.Vector.Vector Proto.Temporal.Api.Enums.V1.TaskQueue.TaskQueueType),
                                           DescribeTaskQueueRequest -> Bool
_DescribeTaskQueueRequest'reportPollers :: !Prelude.Bool,
                                           DescribeTaskQueueRequest -> Bool
_DescribeTaskQueueRequest'reportTaskReachability :: !Prelude.Bool,
                                           DescribeTaskQueueRequest -> FieldSet
_DescribeTaskQueueRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool
(DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool)
-> (DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool)
-> Eq DescribeTaskQueueRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool
== :: DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool
$c/= :: DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool
/= :: DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool
Prelude.Eq, Eq DescribeTaskQueueRequest
Eq DescribeTaskQueueRequest =>
(DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Ordering)
-> (DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool)
-> (DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool)
-> (DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool)
-> (DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool)
-> (DescribeTaskQueueRequest
    -> DescribeTaskQueueRequest -> DescribeTaskQueueRequest)
-> (DescribeTaskQueueRequest
    -> DescribeTaskQueueRequest -> DescribeTaskQueueRequest)
-> Ord DescribeTaskQueueRequest
DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool
DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Ordering
DescribeTaskQueueRequest
-> DescribeTaskQueueRequest -> DescribeTaskQueueRequest
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 :: DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Ordering
compare :: DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Ordering
$c< :: DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool
< :: DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool
$c<= :: DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool
<= :: DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool
$c> :: DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool
> :: DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool
$c>= :: DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool
>= :: DescribeTaskQueueRequest -> DescribeTaskQueueRequest -> Bool
$cmax :: DescribeTaskQueueRequest
-> DescribeTaskQueueRequest -> DescribeTaskQueueRequest
max :: DescribeTaskQueueRequest
-> DescribeTaskQueueRequest -> DescribeTaskQueueRequest
$cmin :: DescribeTaskQueueRequest
-> DescribeTaskQueueRequest -> DescribeTaskQueueRequest
min :: DescribeTaskQueueRequest
-> DescribeTaskQueueRequest -> DescribeTaskQueueRequest
Prelude.Ord)
instance Prelude.Show DescribeTaskQueueRequest where
  showsPrec :: Int -> DescribeTaskQueueRequest -> ShowS
showsPrec Int
_ DescribeTaskQueueRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DescribeTaskQueueRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DescribeTaskQueueRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DescribeTaskQueueRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> DescribeTaskQueueRequest -> f DescribeTaskQueueRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueRequest -> Text)
-> (DescribeTaskQueueRequest -> Text -> DescribeTaskQueueRequest)
-> Lens DescribeTaskQueueRequest DescribeTaskQueueRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueRequest -> Text
_DescribeTaskQueueRequest'namespace
           (\ DescribeTaskQueueRequest
x__ Text
y__ -> DescribeTaskQueueRequest
x__ {_DescribeTaskQueueRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeTaskQueueRequest "taskQueue" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (TaskQueue -> f TaskQueue)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
fieldOf Proxy# "taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> DescribeTaskQueueRequest -> f DescribeTaskQueueRequest)
-> ((TaskQueue -> f TaskQueue)
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (TaskQueue -> f TaskQueue)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueRequest -> Maybe TaskQueue)
-> (DescribeTaskQueueRequest
    -> Maybe TaskQueue -> DescribeTaskQueueRequest)
-> Lens
     DescribeTaskQueueRequest
     DescribeTaskQueueRequest
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueRequest -> Maybe TaskQueue
_DescribeTaskQueueRequest'taskQueue
           (\ DescribeTaskQueueRequest
x__ Maybe TaskQueue
y__ -> DescribeTaskQueueRequest
x__ {_DescribeTaskQueueRequest'taskQueue = y__}))
        (TaskQueue -> Lens' (Maybe TaskQueue) TaskQueue
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TaskQueue
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeTaskQueueRequest "maybe'taskQueue" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'taskQueue"
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
fieldOf Proxy# "maybe'taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> DescribeTaskQueueRequest -> f DescribeTaskQueueRequest)
-> ((Maybe TaskQueue -> f (Maybe TaskQueue))
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueRequest -> Maybe TaskQueue)
-> (DescribeTaskQueueRequest
    -> Maybe TaskQueue -> DescribeTaskQueueRequest)
-> Lens
     DescribeTaskQueueRequest
     DescribeTaskQueueRequest
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueRequest -> Maybe TaskQueue
_DescribeTaskQueueRequest'taskQueue
           (\ DescribeTaskQueueRequest
x__ Maybe TaskQueue
y__ -> DescribeTaskQueueRequest
x__ {_DescribeTaskQueueRequest'taskQueue = y__}))
        (Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeTaskQueueRequest "taskQueueType" Proto.Temporal.Api.Enums.V1.TaskQueue.TaskQueueType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueueType"
-> (TaskQueueType -> f TaskQueueType)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
fieldOf Proxy# "taskQueueType"
_
    = ((TaskQueueType -> f TaskQueueType)
 -> DescribeTaskQueueRequest -> f DescribeTaskQueueRequest)
-> ((TaskQueueType -> f TaskQueueType)
    -> TaskQueueType -> f TaskQueueType)
-> (TaskQueueType -> f TaskQueueType)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueRequest -> TaskQueueType)
-> (DescribeTaskQueueRequest
    -> TaskQueueType -> DescribeTaskQueueRequest)
-> Lens
     DescribeTaskQueueRequest
     DescribeTaskQueueRequest
     TaskQueueType
     TaskQueueType
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueRequest -> TaskQueueType
_DescribeTaskQueueRequest'taskQueueType
           (\ DescribeTaskQueueRequest
x__ TaskQueueType
y__ -> DescribeTaskQueueRequest
x__ {_DescribeTaskQueueRequest'taskQueueType = y__}))
        (TaskQueueType -> f TaskQueueType)
-> TaskQueueType -> f TaskQueueType
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeTaskQueueRequest "includeTaskQueueStatus" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "includeTaskQueueStatus"
-> (Bool -> f Bool)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
fieldOf Proxy# "includeTaskQueueStatus"
_
    = ((Bool -> f Bool)
 -> DescribeTaskQueueRequest -> f DescribeTaskQueueRequest)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueRequest -> Bool)
-> (DescribeTaskQueueRequest -> Bool -> DescribeTaskQueueRequest)
-> Lens DescribeTaskQueueRequest DescribeTaskQueueRequest Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueRequest -> Bool
_DescribeTaskQueueRequest'includeTaskQueueStatus
           (\ DescribeTaskQueueRequest
x__ Bool
y__
              -> DescribeTaskQueueRequest
x__ {_DescribeTaskQueueRequest'includeTaskQueueStatus = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeTaskQueueRequest "apiMode" Proto.Temporal.Api.Enums.V1.TaskQueue.DescribeTaskQueueMode where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "apiMode"
-> (DescribeTaskQueueMode -> f DescribeTaskQueueMode)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
fieldOf Proxy# "apiMode"
_
    = ((DescribeTaskQueueMode -> f DescribeTaskQueueMode)
 -> DescribeTaskQueueRequest -> f DescribeTaskQueueRequest)
-> ((DescribeTaskQueueMode -> f DescribeTaskQueueMode)
    -> DescribeTaskQueueMode -> f DescribeTaskQueueMode)
-> (DescribeTaskQueueMode -> f DescribeTaskQueueMode)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueRequest -> DescribeTaskQueueMode)
-> (DescribeTaskQueueRequest
    -> DescribeTaskQueueMode -> DescribeTaskQueueRequest)
-> Lens
     DescribeTaskQueueRequest
     DescribeTaskQueueRequest
     DescribeTaskQueueMode
     DescribeTaskQueueMode
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueRequest -> DescribeTaskQueueMode
_DescribeTaskQueueRequest'apiMode
           (\ DescribeTaskQueueRequest
x__ DescribeTaskQueueMode
y__ -> DescribeTaskQueueRequest
x__ {_DescribeTaskQueueRequest'apiMode = y__}))
        (DescribeTaskQueueMode -> f DescribeTaskQueueMode)
-> DescribeTaskQueueMode -> f DescribeTaskQueueMode
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeTaskQueueRequest "versions" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueVersionSelection where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "versions"
-> (TaskQueueVersionSelection -> f TaskQueueVersionSelection)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
fieldOf Proxy# "versions"
_
    = ((Maybe TaskQueueVersionSelection
  -> f (Maybe TaskQueueVersionSelection))
 -> DescribeTaskQueueRequest -> f DescribeTaskQueueRequest)
-> ((TaskQueueVersionSelection -> f TaskQueueVersionSelection)
    -> Maybe TaskQueueVersionSelection
    -> f (Maybe TaskQueueVersionSelection))
-> (TaskQueueVersionSelection -> f TaskQueueVersionSelection)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueRequest -> Maybe TaskQueueVersionSelection)
-> (DescribeTaskQueueRequest
    -> Maybe TaskQueueVersionSelection -> DescribeTaskQueueRequest)
-> Lens
     DescribeTaskQueueRequest
     DescribeTaskQueueRequest
     (Maybe TaskQueueVersionSelection)
     (Maybe TaskQueueVersionSelection)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueRequest -> Maybe TaskQueueVersionSelection
_DescribeTaskQueueRequest'versions
           (\ DescribeTaskQueueRequest
x__ Maybe TaskQueueVersionSelection
y__ -> DescribeTaskQueueRequest
x__ {_DescribeTaskQueueRequest'versions = y__}))
        (TaskQueueVersionSelection
-> Lens'
     (Maybe TaskQueueVersionSelection) TaskQueueVersionSelection
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TaskQueueVersionSelection
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeTaskQueueRequest "maybe'versions" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueVersionSelection) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'versions"
-> (Maybe TaskQueueVersionSelection
    -> f (Maybe TaskQueueVersionSelection))
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
fieldOf Proxy# "maybe'versions"
_
    = ((Maybe TaskQueueVersionSelection
  -> f (Maybe TaskQueueVersionSelection))
 -> DescribeTaskQueueRequest -> f DescribeTaskQueueRequest)
-> ((Maybe TaskQueueVersionSelection
     -> f (Maybe TaskQueueVersionSelection))
    -> Maybe TaskQueueVersionSelection
    -> f (Maybe TaskQueueVersionSelection))
-> (Maybe TaskQueueVersionSelection
    -> f (Maybe TaskQueueVersionSelection))
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueRequest -> Maybe TaskQueueVersionSelection)
-> (DescribeTaskQueueRequest
    -> Maybe TaskQueueVersionSelection -> DescribeTaskQueueRequest)
-> Lens
     DescribeTaskQueueRequest
     DescribeTaskQueueRequest
     (Maybe TaskQueueVersionSelection)
     (Maybe TaskQueueVersionSelection)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueRequest -> Maybe TaskQueueVersionSelection
_DescribeTaskQueueRequest'versions
           (\ DescribeTaskQueueRequest
x__ Maybe TaskQueueVersionSelection
y__ -> DescribeTaskQueueRequest
x__ {_DescribeTaskQueueRequest'versions = y__}))
        (Maybe TaskQueueVersionSelection
 -> f (Maybe TaskQueueVersionSelection))
-> Maybe TaskQueueVersionSelection
-> f (Maybe TaskQueueVersionSelection)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeTaskQueueRequest "taskQueueTypes" [Proto.Temporal.Api.Enums.V1.TaskQueue.TaskQueueType] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueueTypes"
-> ([TaskQueueType] -> f [TaskQueueType])
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
fieldOf Proxy# "taskQueueTypes"
_
    = ((Vector TaskQueueType -> f (Vector TaskQueueType))
 -> DescribeTaskQueueRequest -> f DescribeTaskQueueRequest)
-> (([TaskQueueType] -> f [TaskQueueType])
    -> Vector TaskQueueType -> f (Vector TaskQueueType))
-> ([TaskQueueType] -> f [TaskQueueType])
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueRequest -> Vector TaskQueueType)
-> (DescribeTaskQueueRequest
    -> Vector TaskQueueType -> DescribeTaskQueueRequest)
-> Lens
     DescribeTaskQueueRequest
     DescribeTaskQueueRequest
     (Vector TaskQueueType)
     (Vector TaskQueueType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueRequest -> Vector TaskQueueType
_DescribeTaskQueueRequest'taskQueueTypes
           (\ DescribeTaskQueueRequest
x__ Vector TaskQueueType
y__
              -> DescribeTaskQueueRequest
x__ {_DescribeTaskQueueRequest'taskQueueTypes = y__}))
        ((Vector TaskQueueType -> [TaskQueueType])
-> (Vector TaskQueueType
    -> [TaskQueueType] -> Vector TaskQueueType)
-> Lens
     (Vector TaskQueueType)
     (Vector TaskQueueType)
     [TaskQueueType]
     [TaskQueueType]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector TaskQueueType -> [TaskQueueType]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector TaskQueueType
_ [TaskQueueType]
y__ -> [TaskQueueType] -> Vector TaskQueueType
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [TaskQueueType]
y__))
instance Data.ProtoLens.Field.HasField DescribeTaskQueueRequest "vec'taskQueueTypes" (Data.Vector.Vector Proto.Temporal.Api.Enums.V1.TaskQueue.TaskQueueType) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'taskQueueTypes"
-> (Vector TaskQueueType -> f (Vector TaskQueueType))
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
fieldOf Proxy# "vec'taskQueueTypes"
_
    = ((Vector TaskQueueType -> f (Vector TaskQueueType))
 -> DescribeTaskQueueRequest -> f DescribeTaskQueueRequest)
-> ((Vector TaskQueueType -> f (Vector TaskQueueType))
    -> Vector TaskQueueType -> f (Vector TaskQueueType))
-> (Vector TaskQueueType -> f (Vector TaskQueueType))
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueRequest -> Vector TaskQueueType)
-> (DescribeTaskQueueRequest
    -> Vector TaskQueueType -> DescribeTaskQueueRequest)
-> Lens
     DescribeTaskQueueRequest
     DescribeTaskQueueRequest
     (Vector TaskQueueType)
     (Vector TaskQueueType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueRequest -> Vector TaskQueueType
_DescribeTaskQueueRequest'taskQueueTypes
           (\ DescribeTaskQueueRequest
x__ Vector TaskQueueType
y__
              -> DescribeTaskQueueRequest
x__ {_DescribeTaskQueueRequest'taskQueueTypes = y__}))
        (Vector TaskQueueType -> f (Vector TaskQueueType))
-> Vector TaskQueueType -> f (Vector TaskQueueType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeTaskQueueRequest "reportPollers" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "reportPollers"
-> (Bool -> f Bool)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
fieldOf Proxy# "reportPollers"
_
    = ((Bool -> f Bool)
 -> DescribeTaskQueueRequest -> f DescribeTaskQueueRequest)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueRequest -> Bool)
-> (DescribeTaskQueueRequest -> Bool -> DescribeTaskQueueRequest)
-> Lens DescribeTaskQueueRequest DescribeTaskQueueRequest Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueRequest -> Bool
_DescribeTaskQueueRequest'reportPollers
           (\ DescribeTaskQueueRequest
x__ Bool
y__ -> DescribeTaskQueueRequest
x__ {_DescribeTaskQueueRequest'reportPollers = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeTaskQueueRequest "reportTaskReachability" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "reportTaskReachability"
-> (Bool -> f Bool)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
fieldOf Proxy# "reportTaskReachability"
_
    = ((Bool -> f Bool)
 -> DescribeTaskQueueRequest -> f DescribeTaskQueueRequest)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> DescribeTaskQueueRequest
-> f DescribeTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueRequest -> Bool)
-> (DescribeTaskQueueRequest -> Bool -> DescribeTaskQueueRequest)
-> Lens DescribeTaskQueueRequest DescribeTaskQueueRequest Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueRequest -> Bool
_DescribeTaskQueueRequest'reportTaskReachability
           (\ DescribeTaskQueueRequest
x__ Bool
y__
              -> DescribeTaskQueueRequest
x__ {_DescribeTaskQueueRequest'reportTaskReachability = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DescribeTaskQueueRequest where
  messageName :: Proxy DescribeTaskQueueRequest -> Text
messageName Proxy DescribeTaskQueueRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DescribeTaskQueueRequest"
  packedMessageDescriptor :: Proxy DescribeTaskQueueRequest -> ByteString
packedMessageDescriptor Proxy DescribeTaskQueueRequest
_
    = ByteString
"\n\
      \\CANDescribeTaskQueueRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2C\n\
      \\n\
      \task_queue\CAN\STX \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC2L\n\
      \\SItask_queue_type\CAN\ETX \SOH(\SO2$.temporal.api.enums.v1.TaskQueueTypeR\rtaskQueueType\DC29\n\
      \\EMinclude_task_queue_status\CAN\EOT \SOH(\bR\SYNincludeTaskQueueStatus\DC2G\n\
      \\bapi_mode\CAN\ENQ \SOH(\SO2,.temporal.api.enums.v1.DescribeTaskQueueModeR\aapiMode\DC2P\n\
      \\bversions\CAN\ACK \SOH(\v24.temporal.api.taskqueue.v1.TaskQueueVersionSelectionR\bversions\DC2N\n\
      \\DLEtask_queue_types\CAN\a \ETX(\SO2$.temporal.api.enums.v1.TaskQueueTypeR\SOtaskQueueTypes\DC2%\n\
      \\SOreport_pollers\CAN\t \SOH(\bR\rreportPollers\DC28\n\
      \\CANreport_task_reachability\CAN\n\
      \ \SOH(\bR\SYNreportTaskReachability"
  packedFileDescriptor :: Proxy DescribeTaskQueueRequest -> ByteString
packedFileDescriptor Proxy DescribeTaskQueueRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DescribeTaskQueueRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor DescribeTaskQueueRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DescribeTaskQueueRequest Text
-> FieldDescriptor DescribeTaskQueueRequest
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 DescribeTaskQueueRequest DescribeTaskQueueRequest Text Text
-> FieldAccessor DescribeTaskQueueRequest 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 DescribeTaskQueueRequest
        taskQueue__field_descriptor :: FieldDescriptor DescribeTaskQueueRequest
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueue
-> FieldAccessor DescribeTaskQueueRequest TaskQueue
-> FieldDescriptor DescribeTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_queue"
              (MessageOrGroup -> FieldTypeDescriptor TaskQueue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)
              (Lens
  DescribeTaskQueueRequest
  DescribeTaskQueueRequest
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> FieldAccessor DescribeTaskQueueRequest TaskQueue
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue")) ::
              Data.ProtoLens.FieldDescriptor DescribeTaskQueueRequest
        taskQueueType__field_descriptor :: FieldDescriptor DescribeTaskQueueRequest
taskQueueType__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueueType
-> FieldAccessor DescribeTaskQueueRequest TaskQueueType
-> FieldDescriptor DescribeTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_queue_type"
              (ScalarField TaskQueueType -> FieldTypeDescriptor TaskQueueType
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField TaskQueueType
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.TaskQueue.TaskQueueType)
              (WireDefault TaskQueueType
-> Lens
     DescribeTaskQueueRequest
     DescribeTaskQueueRequest
     TaskQueueType
     TaskQueueType
-> FieldAccessor DescribeTaskQueueRequest TaskQueueType
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault TaskQueueType
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskQueueType")) ::
              Data.ProtoLens.FieldDescriptor DescribeTaskQueueRequest
        includeTaskQueueStatus__field_descriptor :: FieldDescriptor DescribeTaskQueueRequest
includeTaskQueueStatus__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor DescribeTaskQueueRequest Bool
-> FieldDescriptor DescribeTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"include_task_queue_status"
              (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 DescribeTaskQueueRequest DescribeTaskQueueRequest Bool Bool
-> FieldAccessor DescribeTaskQueueRequest 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 @"includeTaskQueueStatus")) ::
              Data.ProtoLens.FieldDescriptor DescribeTaskQueueRequest
        apiMode__field_descriptor :: FieldDescriptor DescribeTaskQueueRequest
apiMode__field_descriptor
          = String
-> FieldTypeDescriptor DescribeTaskQueueMode
-> FieldAccessor DescribeTaskQueueRequest DescribeTaskQueueMode
-> FieldDescriptor DescribeTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"api_mode"
              (ScalarField DescribeTaskQueueMode
-> FieldTypeDescriptor DescribeTaskQueueMode
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField DescribeTaskQueueMode
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.TaskQueue.DescribeTaskQueueMode)
              (WireDefault DescribeTaskQueueMode
-> Lens
     DescribeTaskQueueRequest
     DescribeTaskQueueRequest
     DescribeTaskQueueMode
     DescribeTaskQueueMode
-> FieldAccessor DescribeTaskQueueRequest DescribeTaskQueueMode
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault DescribeTaskQueueMode
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"apiMode")) ::
              Data.ProtoLens.FieldDescriptor DescribeTaskQueueRequest
        versions__field_descriptor :: FieldDescriptor DescribeTaskQueueRequest
versions__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueueVersionSelection
-> FieldAccessor DescribeTaskQueueRequest TaskQueueVersionSelection
-> FieldDescriptor DescribeTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"versions"
              (MessageOrGroup -> FieldTypeDescriptor TaskQueueVersionSelection
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueVersionSelection)
              (Lens
  DescribeTaskQueueRequest
  DescribeTaskQueueRequest
  (Maybe TaskQueueVersionSelection)
  (Maybe TaskQueueVersionSelection)
-> FieldAccessor DescribeTaskQueueRequest TaskQueueVersionSelection
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'versions")) ::
              Data.ProtoLens.FieldDescriptor DescribeTaskQueueRequest
        taskQueueTypes__field_descriptor :: FieldDescriptor DescribeTaskQueueRequest
taskQueueTypes__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueueType
-> FieldAccessor DescribeTaskQueueRequest TaskQueueType
-> FieldDescriptor DescribeTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_queue_types"
              (ScalarField TaskQueueType -> FieldTypeDescriptor TaskQueueType
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField TaskQueueType
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.TaskQueue.TaskQueueType)
              (Packing
-> Lens' DescribeTaskQueueRequest [TaskQueueType]
-> FieldAccessor DescribeTaskQueueRequest TaskQueueType
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskQueueTypes")) ::
              Data.ProtoLens.FieldDescriptor DescribeTaskQueueRequest
        reportPollers__field_descriptor :: FieldDescriptor DescribeTaskQueueRequest
reportPollers__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor DescribeTaskQueueRequest Bool
-> FieldDescriptor DescribeTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"report_pollers"
              (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 DescribeTaskQueueRequest DescribeTaskQueueRequest Bool Bool
-> FieldAccessor DescribeTaskQueueRequest 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 @"reportPollers")) ::
              Data.ProtoLens.FieldDescriptor DescribeTaskQueueRequest
        reportTaskReachability__field_descriptor :: FieldDescriptor DescribeTaskQueueRequest
reportTaskReachability__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor DescribeTaskQueueRequest Bool
-> FieldDescriptor DescribeTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"report_task_reachability"
              (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 DescribeTaskQueueRequest DescribeTaskQueueRequest Bool Bool
-> FieldAccessor DescribeTaskQueueRequest 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 @"reportTaskReachability")) ::
              Data.ProtoLens.FieldDescriptor DescribeTaskQueueRequest
      in
        [(Tag, FieldDescriptor DescribeTaskQueueRequest)]
-> Map Tag (FieldDescriptor DescribeTaskQueueRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DescribeTaskQueueRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DescribeTaskQueueRequest
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor DescribeTaskQueueRequest
taskQueueType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor DescribeTaskQueueRequest
includeTaskQueueStatus__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor DescribeTaskQueueRequest
apiMode__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor DescribeTaskQueueRequest
versions__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor DescribeTaskQueueRequest
taskQueueTypes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor DescribeTaskQueueRequest
reportPollers__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor DescribeTaskQueueRequest
reportTaskReachability__field_descriptor)]
  unknownFields :: Lens' DescribeTaskQueueRequest FieldSet
unknownFields
    = (DescribeTaskQueueRequest -> FieldSet)
-> (DescribeTaskQueueRequest
    -> FieldSet -> DescribeTaskQueueRequest)
-> Lens' DescribeTaskQueueRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DescribeTaskQueueRequest -> FieldSet
_DescribeTaskQueueRequest'_unknownFields
        (\ DescribeTaskQueueRequest
x__ FieldSet
y__ -> DescribeTaskQueueRequest
x__ {_DescribeTaskQueueRequest'_unknownFields = y__})
  defMessage :: DescribeTaskQueueRequest
defMessage
    = DescribeTaskQueueRequest'_constructor
        {_DescribeTaskQueueRequest'namespace :: Text
_DescribeTaskQueueRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeTaskQueueRequest'taskQueue :: Maybe TaskQueue
_DescribeTaskQueueRequest'taskQueue = Maybe TaskQueue
forall a. Maybe a
Prelude.Nothing,
         _DescribeTaskQueueRequest'taskQueueType :: TaskQueueType
_DescribeTaskQueueRequest'taskQueueType = TaskQueueType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeTaskQueueRequest'includeTaskQueueStatus :: Bool
_DescribeTaskQueueRequest'includeTaskQueueStatus = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeTaskQueueRequest'apiMode :: DescribeTaskQueueMode
_DescribeTaskQueueRequest'apiMode = DescribeTaskQueueMode
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeTaskQueueRequest'versions :: Maybe TaskQueueVersionSelection
_DescribeTaskQueueRequest'versions = Maybe TaskQueueVersionSelection
forall a. Maybe a
Prelude.Nothing,
         _DescribeTaskQueueRequest'taskQueueTypes :: Vector TaskQueueType
_DescribeTaskQueueRequest'taskQueueTypes = Vector TaskQueueType
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _DescribeTaskQueueRequest'reportPollers :: Bool
_DescribeTaskQueueRequest'reportPollers = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeTaskQueueRequest'reportTaskReachability :: Bool
_DescribeTaskQueueRequest'reportTaskReachability = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeTaskQueueRequest'_unknownFields :: FieldSet
_DescribeTaskQueueRequest'_unknownFields = []}
  parseMessage :: Parser DescribeTaskQueueRequest
parseMessage
    = let
        loop ::
          DescribeTaskQueueRequest
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Enums.V1.TaskQueue.TaskQueueType
             -> Data.ProtoLens.Encoding.Bytes.Parser DescribeTaskQueueRequest
        loop :: DescribeTaskQueueRequest
-> Growing Vector RealWorld TaskQueueType
-> Parser DescribeTaskQueueRequest
loop DescribeTaskQueueRequest
x Growing Vector RealWorld TaskQueueType
mutable'taskQueueTypes
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'taskQueueTypes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                 (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                    mutable'taskQueueTypes)
                      (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'taskQueueTypes")
                              frozen'taskQueueTypes x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                                  mutable'taskQueueTypes
                        Word64
18
                          -> do y <- Parser TaskQueue -> String -> Parser TaskQueue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"task_queue"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskQueue") y x)
                                  mutable'taskQueueTypes
                        Word64
24
                          -> do y <- Parser TaskQueueType -> String -> Parser TaskQueueType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> TaskQueueType) -> Parser Int -> Parser TaskQueueType
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> TaskQueueType
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
"task_queue_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"taskQueueType") y x)
                                  mutable'taskQueueTypes
                        Word64
32
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"include_task_queue_status"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"includeTaskQueueStatus") y x)
                                  mutable'taskQueueTypes
                        Word64
40
                          -> do y <- Parser DescribeTaskQueueMode
-> String -> Parser DescribeTaskQueueMode
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> DescribeTaskQueueMode)
-> Parser Int -> Parser DescribeTaskQueueMode
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> DescribeTaskQueueMode
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
"api_mode"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"apiMode") y x)
                                  mutable'taskQueueTypes
                        Word64
50
                          -> do y <- Parser TaskQueueVersionSelection
-> String -> Parser TaskQueueVersionSelection
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"versions"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"versions") y x)
                                  mutable'taskQueueTypes
                        Word64
56
                          -> do !y <- Parser TaskQueueType -> String -> Parser TaskQueueType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        ((Int -> TaskQueueType) -> Parser Int -> Parser TaskQueueType
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                           Int -> TaskQueueType
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
"task_queue_types"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'taskQueueTypes y)
                                loop x v
                        Word64
58
                          -> do y <- do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Data.ProtoLens.Encoding.Bytes.isolate
                                          (Prelude.fromIntegral len)
                                          ((let
                                              ploop Growing v RealWorld a
qs
                                                = do packedEnd <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
                                                     if packedEnd then
                                                         Prelude.return qs
                                                     else
                                                         do !q <- (Data.ProtoLens.Encoding.Bytes.<?>)
                                                                    (Prelude.fmap
                                                                       Prelude.toEnum
                                                                       (Prelude.fmap
                                                                          Prelude.fromIntegral
                                                                          Data.ProtoLens.Encoding.Bytes.getVarInt))
                                                                    "task_queue_types"
                                                            qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                                     (Data.ProtoLens.Encoding.Growing.append
                                                                        qs q)
                                                            ploop qs'
                                            in ploop)
                                             mutable'taskQueueTypes)
                                loop x y
                        Word64
72
                          -> 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
"report_pollers"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"reportPollers") y x)
                                  mutable'taskQueueTypes
                        Word64
80
                          -> 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
"report_task_reachability"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"reportTaskReachability") y x)
                                  mutable'taskQueueTypes
                        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'taskQueueTypes
      in
        Parser DescribeTaskQueueRequest
-> String -> Parser DescribeTaskQueueRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'taskQueueTypes <- IO (Growing Vector RealWorld TaskQueueType)
-> Parser (Growing Vector RealWorld TaskQueueType)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                          IO (Growing Vector RealWorld TaskQueueType)
IO (Growing Vector (PrimState IO) TaskQueueType)
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'taskQueueTypes)
          String
"DescribeTaskQueueRequest"
  buildMessage :: DescribeTaskQueueRequest -> Builder
buildMessage
    = \ DescribeTaskQueueRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text DescribeTaskQueueRequest DescribeTaskQueueRequest Text Text
-> DescribeTaskQueueRequest -> 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") DescribeTaskQueueRequest
_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 TaskQueue)
  DescribeTaskQueueRequest
  DescribeTaskQueueRequest
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> DescribeTaskQueueRequest -> Maybe TaskQueue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue") DescribeTaskQueueRequest
_x
                 of
                   Maybe TaskQueue
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just TaskQueue
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (TaskQueue -> ByteString) -> TaskQueue -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             TaskQueue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueue
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: TaskQueueType
_v
                        = FoldLike
  TaskQueueType
  DescribeTaskQueueRequest
  DescribeTaskQueueRequest
  TaskQueueType
  TaskQueueType
-> DescribeTaskQueueRequest -> TaskQueueType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskQueueType") DescribeTaskQueueRequest
_x
                    in
                      if TaskQueueType -> TaskQueueType -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) TaskQueueType
_v TaskQueueType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
24)
                            ((Int -> Builder)
-> (TaskQueueType -> Int) -> TaskQueueType -> 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)
                               TaskQueueType -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum TaskQueueType
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Bool
_v
                           = FoldLike
  Bool DescribeTaskQueueRequest DescribeTaskQueueRequest Bool Bool
-> DescribeTaskQueueRequest -> 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 @"includeTaskQueueStatus") DescribeTaskQueueRequest
_x
                       in
                         if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
32)
                               ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (\ Bool
b -> if Bool
b then Word64
1 else Word64
0) Bool
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: DescribeTaskQueueMode
_v = FoldLike
  DescribeTaskQueueMode
  DescribeTaskQueueRequest
  DescribeTaskQueueRequest
  DescribeTaskQueueMode
  DescribeTaskQueueMode
-> DescribeTaskQueueRequest -> DescribeTaskQueueMode
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"apiMode") DescribeTaskQueueRequest
_x
                          in
                            if DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) DescribeTaskQueueMode
_v DescribeTaskQueueMode
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
40)
                                  ((Int -> Builder)
-> (DescribeTaskQueueMode -> Int)
-> DescribeTaskQueueMode
-> 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)
                                     DescribeTaskQueueMode -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum DescribeTaskQueueMode
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (case
                                 FoldLike
  (Maybe TaskQueueVersionSelection)
  DescribeTaskQueueRequest
  DescribeTaskQueueRequest
  (Maybe TaskQueueVersionSelection)
  (Maybe TaskQueueVersionSelection)
-> DescribeTaskQueueRequest -> Maybe TaskQueueVersionSelection
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'versions") DescribeTaskQueueRequest
_x
                             of
                               Maybe TaskQueueVersionSelection
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               (Prelude.Just TaskQueueVersionSelection
_v)
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                      ((ByteString -> Builder)
-> (TaskQueueVersionSelection -> ByteString)
-> TaskQueueVersionSelection
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                         (\ ByteString
bs
                                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                       (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                         TaskQueueVersionSelection -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueueVersionSelection
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  p :: Vector TaskQueueType
p = FoldLike
  (Vector TaskQueueType)
  DescribeTaskQueueRequest
  DescribeTaskQueueRequest
  (Vector TaskQueueType)
  (Vector TaskQueueType)
-> DescribeTaskQueueRequest -> Vector TaskQueueType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'taskQueueTypes") DescribeTaskQueueRequest
_x
                                in
                                  if Vector TaskQueueType -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector TaskQueueType
p then
                                      Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  else
                                      Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                        ((\ ByteString
bs
                                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                       (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                           (Builder -> ByteString
Data.ProtoLens.Encoding.Bytes.runBuilder
                                              ((TaskQueueType -> Builder) -> Vector TaskQueueType -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                                 ((Int -> Builder)
-> (TaskQueueType -> Int) -> TaskQueueType -> 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)
                                                    TaskQueueType -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum)
                                                 Vector TaskQueueType
p))))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (let
                                     _v :: Bool
_v
                                       = FoldLike
  Bool DescribeTaskQueueRequest DescribeTaskQueueRequest Bool Bool
-> DescribeTaskQueueRequest -> 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 @"reportPollers") DescribeTaskQueueRequest
_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
72)
                                           ((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 :: Bool
_v
                                          = FoldLike
  Bool DescribeTaskQueueRequest DescribeTaskQueueRequest Bool Bool
-> DescribeTaskQueueRequest -> 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 @"reportTaskReachability")
                                              DescribeTaskQueueRequest
_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
80)
                                              ((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
  DescribeTaskQueueRequest
  DescribeTaskQueueRequest
  FieldSet
  FieldSet
-> DescribeTaskQueueRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DescribeTaskQueueRequest
  DescribeTaskQueueRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DescribeTaskQueueRequest FieldSet
Data.ProtoLens.unknownFields DescribeTaskQueueRequest
_x))))))))))
instance Control.DeepSeq.NFData DescribeTaskQueueRequest where
  rnf :: DescribeTaskQueueRequest -> ()
rnf
    = \ DescribeTaskQueueRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DescribeTaskQueueRequest -> FieldSet
_DescribeTaskQueueRequest'_unknownFields DescribeTaskQueueRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DescribeTaskQueueRequest -> Text
_DescribeTaskQueueRequest'namespace DescribeTaskQueueRequest
x__)
                (Maybe TaskQueue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (DescribeTaskQueueRequest -> Maybe TaskQueue
_DescribeTaskQueueRequest'taskQueue DescribeTaskQueueRequest
x__)
                   (TaskQueueType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (DescribeTaskQueueRequest -> TaskQueueType
_DescribeTaskQueueRequest'taskQueueType DescribeTaskQueueRequest
x__)
                      (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (DescribeTaskQueueRequest -> Bool
_DescribeTaskQueueRequest'includeTaskQueueStatus DescribeTaskQueueRequest
x__)
                         (DescribeTaskQueueMode -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (DescribeTaskQueueRequest -> DescribeTaskQueueMode
_DescribeTaskQueueRequest'apiMode DescribeTaskQueueRequest
x__)
                            (Maybe TaskQueueVersionSelection -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (DescribeTaskQueueRequest -> Maybe TaskQueueVersionSelection
_DescribeTaskQueueRequest'versions DescribeTaskQueueRequest
x__)
                               (Vector TaskQueueType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (DescribeTaskQueueRequest -> Vector TaskQueueType
_DescribeTaskQueueRequest'taskQueueTypes DescribeTaskQueueRequest
x__)
                                  (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (DescribeTaskQueueRequest -> Bool
_DescribeTaskQueueRequest'reportPollers DescribeTaskQueueRequest
x__)
                                     (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (DescribeTaskQueueRequest -> Bool
_DescribeTaskQueueRequest'reportTaskReachability DescribeTaskQueueRequest
x__)
                                        ())))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.pollers' @:: Lens' DescribeTaskQueueResponse [Proto.Temporal.Api.Taskqueue.V1.Message.PollerInfo]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'pollers' @:: Lens' DescribeTaskQueueResponse (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.PollerInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueueStatus' @:: Lens' DescribeTaskQueueResponse Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueStatus@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'taskQueueStatus' @:: Lens' DescribeTaskQueueResponse (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueStatus)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.versionsInfo' @:: Lens' DescribeTaskQueueResponse (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueVersionInfo)@ -}
data DescribeTaskQueueResponse
  = DescribeTaskQueueResponse'_constructor {DescribeTaskQueueResponse -> Vector PollerInfo
_DescribeTaskQueueResponse'pollers :: !(Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.PollerInfo),
                                            DescribeTaskQueueResponse -> Maybe TaskQueueStatus
_DescribeTaskQueueResponse'taskQueueStatus :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueStatus),
                                            DescribeTaskQueueResponse -> Map Text TaskQueueVersionInfo
_DescribeTaskQueueResponse'versionsInfo :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueVersionInfo),
                                            DescribeTaskQueueResponse -> FieldSet
_DescribeTaskQueueResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool
(DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool)
-> (DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool)
-> Eq DescribeTaskQueueResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool
== :: DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool
$c/= :: DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool
/= :: DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool
Prelude.Eq, Eq DescribeTaskQueueResponse
Eq DescribeTaskQueueResponse =>
(DescribeTaskQueueResponse
 -> DescribeTaskQueueResponse -> Ordering)
-> (DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool)
-> (DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool)
-> (DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool)
-> (DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool)
-> (DescribeTaskQueueResponse
    -> DescribeTaskQueueResponse -> DescribeTaskQueueResponse)
-> (DescribeTaskQueueResponse
    -> DescribeTaskQueueResponse -> DescribeTaskQueueResponse)
-> Ord DescribeTaskQueueResponse
DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool
DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Ordering
DescribeTaskQueueResponse
-> DescribeTaskQueueResponse -> DescribeTaskQueueResponse
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 :: DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Ordering
compare :: DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Ordering
$c< :: DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool
< :: DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool
$c<= :: DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool
<= :: DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool
$c> :: DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool
> :: DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool
$c>= :: DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool
>= :: DescribeTaskQueueResponse -> DescribeTaskQueueResponse -> Bool
$cmax :: DescribeTaskQueueResponse
-> DescribeTaskQueueResponse -> DescribeTaskQueueResponse
max :: DescribeTaskQueueResponse
-> DescribeTaskQueueResponse -> DescribeTaskQueueResponse
$cmin :: DescribeTaskQueueResponse
-> DescribeTaskQueueResponse -> DescribeTaskQueueResponse
min :: DescribeTaskQueueResponse
-> DescribeTaskQueueResponse -> DescribeTaskQueueResponse
Prelude.Ord)
instance Prelude.Show DescribeTaskQueueResponse where
  showsPrec :: Int -> DescribeTaskQueueResponse -> ShowS
showsPrec Int
_ DescribeTaskQueueResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DescribeTaskQueueResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DescribeTaskQueueResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DescribeTaskQueueResponse "pollers" [Proto.Temporal.Api.Taskqueue.V1.Message.PollerInfo] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "pollers"
-> ([PollerInfo] -> f [PollerInfo])
-> DescribeTaskQueueResponse
-> f DescribeTaskQueueResponse
fieldOf Proxy# "pollers"
_
    = ((Vector PollerInfo -> f (Vector PollerInfo))
 -> DescribeTaskQueueResponse -> f DescribeTaskQueueResponse)
-> (([PollerInfo] -> f [PollerInfo])
    -> Vector PollerInfo -> f (Vector PollerInfo))
-> ([PollerInfo] -> f [PollerInfo])
-> DescribeTaskQueueResponse
-> f DescribeTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueResponse -> Vector PollerInfo)
-> (DescribeTaskQueueResponse
    -> Vector PollerInfo -> DescribeTaskQueueResponse)
-> Lens
     DescribeTaskQueueResponse
     DescribeTaskQueueResponse
     (Vector PollerInfo)
     (Vector PollerInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueResponse -> Vector PollerInfo
_DescribeTaskQueueResponse'pollers
           (\ DescribeTaskQueueResponse
x__ Vector PollerInfo
y__ -> DescribeTaskQueueResponse
x__ {_DescribeTaskQueueResponse'pollers = y__}))
        ((Vector PollerInfo -> [PollerInfo])
-> (Vector PollerInfo -> [PollerInfo] -> Vector PollerInfo)
-> Lens
     (Vector PollerInfo) (Vector PollerInfo) [PollerInfo] [PollerInfo]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector PollerInfo -> [PollerInfo]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector PollerInfo
_ [PollerInfo]
y__ -> [PollerInfo] -> Vector PollerInfo
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [PollerInfo]
y__))
instance Data.ProtoLens.Field.HasField DescribeTaskQueueResponse "vec'pollers" (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.PollerInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'pollers"
-> (Vector PollerInfo -> f (Vector PollerInfo))
-> DescribeTaskQueueResponse
-> f DescribeTaskQueueResponse
fieldOf Proxy# "vec'pollers"
_
    = ((Vector PollerInfo -> f (Vector PollerInfo))
 -> DescribeTaskQueueResponse -> f DescribeTaskQueueResponse)
-> ((Vector PollerInfo -> f (Vector PollerInfo))
    -> Vector PollerInfo -> f (Vector PollerInfo))
-> (Vector PollerInfo -> f (Vector PollerInfo))
-> DescribeTaskQueueResponse
-> f DescribeTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueResponse -> Vector PollerInfo)
-> (DescribeTaskQueueResponse
    -> Vector PollerInfo -> DescribeTaskQueueResponse)
-> Lens
     DescribeTaskQueueResponse
     DescribeTaskQueueResponse
     (Vector PollerInfo)
     (Vector PollerInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueResponse -> Vector PollerInfo
_DescribeTaskQueueResponse'pollers
           (\ DescribeTaskQueueResponse
x__ Vector PollerInfo
y__ -> DescribeTaskQueueResponse
x__ {_DescribeTaskQueueResponse'pollers = y__}))
        (Vector PollerInfo -> f (Vector PollerInfo))
-> Vector PollerInfo -> f (Vector PollerInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeTaskQueueResponse "taskQueueStatus" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueStatus where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueueStatus"
-> (TaskQueueStatus -> f TaskQueueStatus)
-> DescribeTaskQueueResponse
-> f DescribeTaskQueueResponse
fieldOf Proxy# "taskQueueStatus"
_
    = ((Maybe TaskQueueStatus -> f (Maybe TaskQueueStatus))
 -> DescribeTaskQueueResponse -> f DescribeTaskQueueResponse)
-> ((TaskQueueStatus -> f TaskQueueStatus)
    -> Maybe TaskQueueStatus -> f (Maybe TaskQueueStatus))
-> (TaskQueueStatus -> f TaskQueueStatus)
-> DescribeTaskQueueResponse
-> f DescribeTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueResponse -> Maybe TaskQueueStatus)
-> (DescribeTaskQueueResponse
    -> Maybe TaskQueueStatus -> DescribeTaskQueueResponse)
-> Lens
     DescribeTaskQueueResponse
     DescribeTaskQueueResponse
     (Maybe TaskQueueStatus)
     (Maybe TaskQueueStatus)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueResponse -> Maybe TaskQueueStatus
_DescribeTaskQueueResponse'taskQueueStatus
           (\ DescribeTaskQueueResponse
x__ Maybe TaskQueueStatus
y__
              -> DescribeTaskQueueResponse
x__ {_DescribeTaskQueueResponse'taskQueueStatus = y__}))
        (TaskQueueStatus -> Lens' (Maybe TaskQueueStatus) TaskQueueStatus
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TaskQueueStatus
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeTaskQueueResponse "maybe'taskQueueStatus" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueStatus) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'taskQueueStatus"
-> (Maybe TaskQueueStatus -> f (Maybe TaskQueueStatus))
-> DescribeTaskQueueResponse
-> f DescribeTaskQueueResponse
fieldOf Proxy# "maybe'taskQueueStatus"
_
    = ((Maybe TaskQueueStatus -> f (Maybe TaskQueueStatus))
 -> DescribeTaskQueueResponse -> f DescribeTaskQueueResponse)
-> ((Maybe TaskQueueStatus -> f (Maybe TaskQueueStatus))
    -> Maybe TaskQueueStatus -> f (Maybe TaskQueueStatus))
-> (Maybe TaskQueueStatus -> f (Maybe TaskQueueStatus))
-> DescribeTaskQueueResponse
-> f DescribeTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueResponse -> Maybe TaskQueueStatus)
-> (DescribeTaskQueueResponse
    -> Maybe TaskQueueStatus -> DescribeTaskQueueResponse)
-> Lens
     DescribeTaskQueueResponse
     DescribeTaskQueueResponse
     (Maybe TaskQueueStatus)
     (Maybe TaskQueueStatus)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueResponse -> Maybe TaskQueueStatus
_DescribeTaskQueueResponse'taskQueueStatus
           (\ DescribeTaskQueueResponse
x__ Maybe TaskQueueStatus
y__
              -> DescribeTaskQueueResponse
x__ {_DescribeTaskQueueResponse'taskQueueStatus = y__}))
        (Maybe TaskQueueStatus -> f (Maybe TaskQueueStatus))
-> Maybe TaskQueueStatus -> f (Maybe TaskQueueStatus)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeTaskQueueResponse "versionsInfo" (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueVersionInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "versionsInfo"
-> (Map Text TaskQueueVersionInfo
    -> f (Map Text TaskQueueVersionInfo))
-> DescribeTaskQueueResponse
-> f DescribeTaskQueueResponse
fieldOf Proxy# "versionsInfo"
_
    = ((Map Text TaskQueueVersionInfo
  -> f (Map Text TaskQueueVersionInfo))
 -> DescribeTaskQueueResponse -> f DescribeTaskQueueResponse)
-> ((Map Text TaskQueueVersionInfo
     -> f (Map Text TaskQueueVersionInfo))
    -> Map Text TaskQueueVersionInfo
    -> f (Map Text TaskQueueVersionInfo))
-> (Map Text TaskQueueVersionInfo
    -> f (Map Text TaskQueueVersionInfo))
-> DescribeTaskQueueResponse
-> f DescribeTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueResponse -> Map Text TaskQueueVersionInfo)
-> (DescribeTaskQueueResponse
    -> Map Text TaskQueueVersionInfo -> DescribeTaskQueueResponse)
-> Lens
     DescribeTaskQueueResponse
     DescribeTaskQueueResponse
     (Map Text TaskQueueVersionInfo)
     (Map Text TaskQueueVersionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueResponse -> Map Text TaskQueueVersionInfo
_DescribeTaskQueueResponse'versionsInfo
           (\ DescribeTaskQueueResponse
x__ Map Text TaskQueueVersionInfo
y__ -> DescribeTaskQueueResponse
x__ {_DescribeTaskQueueResponse'versionsInfo = y__}))
        (Map Text TaskQueueVersionInfo
 -> f (Map Text TaskQueueVersionInfo))
-> Map Text TaskQueueVersionInfo
-> f (Map Text TaskQueueVersionInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DescribeTaskQueueResponse where
  messageName :: Proxy DescribeTaskQueueResponse -> Text
messageName Proxy DescribeTaskQueueResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DescribeTaskQueueResponse"
  packedMessageDescriptor :: Proxy DescribeTaskQueueResponse -> ByteString
packedMessageDescriptor Proxy DescribeTaskQueueResponse
_
    = ByteString
"\n\
      \\EMDescribeTaskQueueResponse\DC2?\n\
      \\apollers\CAN\SOH \ETX(\v2%.temporal.api.taskqueue.v1.PollerInfoR\apollers\DC2V\n\
      \\DC1task_queue_status\CAN\STX \SOH(\v2*.temporal.api.taskqueue.v1.TaskQueueStatusR\SItaskQueueStatus\DC2q\n\
      \\rversions_info\CAN\ETX \ETX(\v2L.temporal.api.workflowservice.v1.DescribeTaskQueueResponse.VersionsInfoEntryR\fversionsInfo\SUBp\n\
      \\DC1VersionsInfoEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2E\n\
      \\ENQvalue\CAN\STX \SOH(\v2/.temporal.api.taskqueue.v1.TaskQueueVersionInfoR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy DescribeTaskQueueResponse -> ByteString
packedFileDescriptor Proxy DescribeTaskQueueResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DescribeTaskQueueResponse)
fieldsByTag
    = let
        pollers__field_descriptor :: FieldDescriptor DescribeTaskQueueResponse
pollers__field_descriptor
          = String
-> FieldTypeDescriptor PollerInfo
-> FieldAccessor DescribeTaskQueueResponse PollerInfo
-> FieldDescriptor DescribeTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"pollers"
              (MessageOrGroup -> FieldTypeDescriptor PollerInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.PollerInfo)
              (Packing
-> Lens' DescribeTaskQueueResponse [PollerInfo]
-> FieldAccessor DescribeTaskQueueResponse PollerInfo
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 @"pollers")) ::
              Data.ProtoLens.FieldDescriptor DescribeTaskQueueResponse
        taskQueueStatus__field_descriptor :: FieldDescriptor DescribeTaskQueueResponse
taskQueueStatus__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueueStatus
-> FieldAccessor DescribeTaskQueueResponse TaskQueueStatus
-> FieldDescriptor DescribeTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_queue_status"
              (MessageOrGroup -> FieldTypeDescriptor TaskQueueStatus
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueStatus)
              (Lens
  DescribeTaskQueueResponse
  DescribeTaskQueueResponse
  (Maybe TaskQueueStatus)
  (Maybe TaskQueueStatus)
-> FieldAccessor DescribeTaskQueueResponse TaskQueueStatus
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueueStatus")) ::
              Data.ProtoLens.FieldDescriptor DescribeTaskQueueResponse
        versionsInfo__field_descriptor :: FieldDescriptor DescribeTaskQueueResponse
versionsInfo__field_descriptor
          = String
-> FieldTypeDescriptor DescribeTaskQueueResponse'VersionsInfoEntry
-> FieldAccessor
     DescribeTaskQueueResponse
     DescribeTaskQueueResponse'VersionsInfoEntry
-> FieldDescriptor DescribeTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"versions_info"
              (MessageOrGroup
-> FieldTypeDescriptor DescribeTaskQueueResponse'VersionsInfoEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor DescribeTaskQueueResponse'VersionsInfoEntry)
              (Lens' DescribeTaskQueueResponse'VersionsInfoEntry Text
-> Lens'
     DescribeTaskQueueResponse'VersionsInfoEntry TaskQueueVersionInfo
-> Lens
     DescribeTaskQueueResponse
     DescribeTaskQueueResponse
     (Map Text TaskQueueVersionInfo)
     (Map Text TaskQueueVersionInfo)
-> FieldAccessor
     DescribeTaskQueueResponse
     DescribeTaskQueueResponse'VersionsInfoEntry
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 @"versionsInfo")) ::
              Data.ProtoLens.FieldDescriptor DescribeTaskQueueResponse
      in
        [(Tag, FieldDescriptor DescribeTaskQueueResponse)]
-> Map Tag (FieldDescriptor DescribeTaskQueueResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DescribeTaskQueueResponse
pollers__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DescribeTaskQueueResponse
taskQueueStatus__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor DescribeTaskQueueResponse
versionsInfo__field_descriptor)]
  unknownFields :: Lens' DescribeTaskQueueResponse FieldSet
unknownFields
    = (DescribeTaskQueueResponse -> FieldSet)
-> (DescribeTaskQueueResponse
    -> FieldSet -> DescribeTaskQueueResponse)
-> Lens' DescribeTaskQueueResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DescribeTaskQueueResponse -> FieldSet
_DescribeTaskQueueResponse'_unknownFields
        (\ DescribeTaskQueueResponse
x__ FieldSet
y__
           -> DescribeTaskQueueResponse
x__ {_DescribeTaskQueueResponse'_unknownFields = y__})
  defMessage :: DescribeTaskQueueResponse
defMessage
    = DescribeTaskQueueResponse'_constructor
        {_DescribeTaskQueueResponse'pollers :: Vector PollerInfo
_DescribeTaskQueueResponse'pollers = Vector PollerInfo
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _DescribeTaskQueueResponse'taskQueueStatus :: Maybe TaskQueueStatus
_DescribeTaskQueueResponse'taskQueueStatus = Maybe TaskQueueStatus
forall a. Maybe a
Prelude.Nothing,
         _DescribeTaskQueueResponse'versionsInfo :: Map Text TaskQueueVersionInfo
_DescribeTaskQueueResponse'versionsInfo = Map Text TaskQueueVersionInfo
forall k a. Map k a
Data.Map.empty,
         _DescribeTaskQueueResponse'_unknownFields :: FieldSet
_DescribeTaskQueueResponse'_unknownFields = []}
  parseMessage :: Parser DescribeTaskQueueResponse
parseMessage
    = let
        loop ::
          DescribeTaskQueueResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Taskqueue.V1.Message.PollerInfo
             -> Data.ProtoLens.Encoding.Bytes.Parser DescribeTaskQueueResponse
        loop :: DescribeTaskQueueResponse
-> Growing Vector RealWorld PollerInfo
-> Parser DescribeTaskQueueResponse
loop DescribeTaskQueueResponse
x Growing Vector RealWorld PollerInfo
mutable'pollers
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'pollers <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                          (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                             mutable'pollers)
                      (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'pollers") frozen'pollers x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser PollerInfo -> String -> Parser PollerInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"pollers"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'pollers y)
                                loop x v
                        Word64
18
                          -> do y <- Parser TaskQueueStatus -> String -> Parser TaskQueueStatus
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"task_queue_status"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"taskQueueStatus") y x)
                                  mutable'pollers
                        Word64
26
                          -> do !(entry :: DescribeTaskQueueResponse'VersionsInfoEntry) <- Parser DescribeTaskQueueResponse'VersionsInfoEntry
-> String -> Parser DescribeTaskQueueResponse'VersionsInfoEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                                             (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                                                 Data.ProtoLens.Encoding.Bytes.isolate
                                                                                                   (Prelude.fromIntegral
                                                                                                      len)
                                                                                                   Data.ProtoLens.parseMessage)
                                                                                             String
"versions_info"
                                (let
                                   key = FoldLike
  Text
  DescribeTaskQueueResponse'VersionsInfoEntry
  DescribeTaskQueueResponse'VersionsInfoEntry
  Text
  Text
-> DescribeTaskQueueResponse'VersionsInfoEntry -> 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") DescribeTaskQueueResponse'VersionsInfoEntry
entry
                                   value
                                     = FoldLike
  TaskQueueVersionInfo
  DescribeTaskQueueResponse'VersionsInfoEntry
  DescribeTaskQueueResponse'VersionsInfoEntry
  TaskQueueVersionInfo
  TaskQueueVersionInfo
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> TaskQueueVersionInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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") DescribeTaskQueueResponse'VersionsInfoEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"versionsInfo")
                                        (\ !Map Text TaskQueueVersionInfo
t -> Text
-> TaskQueueVersionInfo
-> Map Text TaskQueueVersionInfo
-> Map Text TaskQueueVersionInfo
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key TaskQueueVersionInfo
value Map Text TaskQueueVersionInfo
t) x)
                                     mutable'pollers)
                        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'pollers
      in
        Parser DescribeTaskQueueResponse
-> String -> Parser DescribeTaskQueueResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'pollers <- IO (Growing Vector RealWorld PollerInfo)
-> Parser (Growing Vector RealWorld PollerInfo)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                   IO (Growing Vector RealWorld PollerInfo)
IO (Growing Vector (PrimState IO) PollerInfo)
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'pollers)
          String
"DescribeTaskQueueResponse"
  buildMessage :: DescribeTaskQueueResponse -> Builder
buildMessage
    = \ DescribeTaskQueueResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((PollerInfo -> Builder) -> Vector PollerInfo -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ PollerInfo
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (PollerInfo -> ByteString) -> PollerInfo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           PollerInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage PollerInfo
_v))
                (FoldLike
  (Vector PollerInfo)
  DescribeTaskQueueResponse
  DescribeTaskQueueResponse
  (Vector PollerInfo)
  (Vector PollerInfo)
-> DescribeTaskQueueResponse -> Vector PollerInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'pollers") DescribeTaskQueueResponse
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe TaskQueueStatus)
  DescribeTaskQueueResponse
  DescribeTaskQueueResponse
  (Maybe TaskQueueStatus)
  (Maybe TaskQueueStatus)
-> DescribeTaskQueueResponse -> Maybe TaskQueueStatus
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'taskQueueStatus") DescribeTaskQueueResponse
_x
                 of
                   Maybe TaskQueueStatus
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just TaskQueueStatus
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (TaskQueueStatus -> ByteString) -> TaskQueueStatus -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             TaskQueueStatus -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueueStatus
_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, TaskQueueVersionInfo) -> Builder)
-> [(Text, TaskQueueVersionInfo)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                         (\ (Text, TaskQueueVersionInfo)
_v
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                                 ((ByteString -> Builder)
-> (DescribeTaskQueueResponse'VersionsInfoEntry -> ByteString)
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                    (\ ByteString
bs
                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                               (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                            (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                    DescribeTaskQueueResponse'VersionsInfoEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                    (Setter
  DescribeTaskQueueResponse'VersionsInfoEntry
  DescribeTaskQueueResponse'VersionsInfoEntry
  Text
  Text
-> Text
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry
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, TaskQueueVersionInfo) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, TaskQueueVersionInfo)
_v)
                                       (Setter
  DescribeTaskQueueResponse'VersionsInfoEntry
  DescribeTaskQueueResponse'VersionsInfoEntry
  TaskQueueVersionInfo
  TaskQueueVersionInfo
-> TaskQueueVersionInfo
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry
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, TaskQueueVersionInfo) -> TaskQueueVersionInfo
forall a b. (a, b) -> b
Prelude.snd (Text, TaskQueueVersionInfo)
_v)
                                          (DescribeTaskQueueResponse'VersionsInfoEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                             DescribeTaskQueueResponse'VersionsInfoEntry)))))
                         (Map Text TaskQueueVersionInfo -> [(Text, TaskQueueVersionInfo)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                            (FoldLike
  (Map Text TaskQueueVersionInfo)
  DescribeTaskQueueResponse
  DescribeTaskQueueResponse
  (Map Text TaskQueueVersionInfo)
  (Map Text TaskQueueVersionInfo)
-> DescribeTaskQueueResponse -> Map Text TaskQueueVersionInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"versionsInfo") DescribeTaskQueueResponse
_x))))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  DescribeTaskQueueResponse
  DescribeTaskQueueResponse
  FieldSet
  FieldSet
-> DescribeTaskQueueResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DescribeTaskQueueResponse
  DescribeTaskQueueResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DescribeTaskQueueResponse FieldSet
Data.ProtoLens.unknownFields DescribeTaskQueueResponse
_x))))
instance Control.DeepSeq.NFData DescribeTaskQueueResponse where
  rnf :: DescribeTaskQueueResponse -> ()
rnf
    = \ DescribeTaskQueueResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DescribeTaskQueueResponse -> FieldSet
_DescribeTaskQueueResponse'_unknownFields DescribeTaskQueueResponse
x__)
             (Vector PollerInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DescribeTaskQueueResponse -> Vector PollerInfo
_DescribeTaskQueueResponse'pollers DescribeTaskQueueResponse
x__)
                (Maybe TaskQueueStatus -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (DescribeTaskQueueResponse -> Maybe TaskQueueStatus
_DescribeTaskQueueResponse'taskQueueStatus DescribeTaskQueueResponse
x__)
                   (Map Text TaskQueueVersionInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (DescribeTaskQueueResponse -> Map Text TaskQueueVersionInfo
_DescribeTaskQueueResponse'versionsInfo DescribeTaskQueueResponse
x__) ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.key' @:: Lens' DescribeTaskQueueResponse'VersionsInfoEntry Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.value' @:: Lens' DescribeTaskQueueResponse'VersionsInfoEntry Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueVersionInfo@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'value' @:: Lens' DescribeTaskQueueResponse'VersionsInfoEntry (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueVersionInfo)@ -}
data DescribeTaskQueueResponse'VersionsInfoEntry
  = DescribeTaskQueueResponse'VersionsInfoEntry'_constructor {DescribeTaskQueueResponse'VersionsInfoEntry -> Text
_DescribeTaskQueueResponse'VersionsInfoEntry'key :: !Data.Text.Text,
                                                              DescribeTaskQueueResponse'VersionsInfoEntry
-> Maybe TaskQueueVersionInfo
_DescribeTaskQueueResponse'VersionsInfoEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueVersionInfo),
                                                              DescribeTaskQueueResponse'VersionsInfoEntry -> FieldSet
_DescribeTaskQueueResponse'VersionsInfoEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool
(DescribeTaskQueueResponse'VersionsInfoEntry
 -> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool)
-> (DescribeTaskQueueResponse'VersionsInfoEntry
    -> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool)
-> Eq DescribeTaskQueueResponse'VersionsInfoEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool
== :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool
$c/= :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool
/= :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool
Prelude.Eq, Eq DescribeTaskQueueResponse'VersionsInfoEntry
Eq DescribeTaskQueueResponse'VersionsInfoEntry =>
(DescribeTaskQueueResponse'VersionsInfoEntry
 -> DescribeTaskQueueResponse'VersionsInfoEntry -> Ordering)
-> (DescribeTaskQueueResponse'VersionsInfoEntry
    -> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool)
-> (DescribeTaskQueueResponse'VersionsInfoEntry
    -> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool)
-> (DescribeTaskQueueResponse'VersionsInfoEntry
    -> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool)
-> (DescribeTaskQueueResponse'VersionsInfoEntry
    -> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool)
-> (DescribeTaskQueueResponse'VersionsInfoEntry
    -> DescribeTaskQueueResponse'VersionsInfoEntry
    -> DescribeTaskQueueResponse'VersionsInfoEntry)
-> (DescribeTaskQueueResponse'VersionsInfoEntry
    -> DescribeTaskQueueResponse'VersionsInfoEntry
    -> DescribeTaskQueueResponse'VersionsInfoEntry)
-> Ord DescribeTaskQueueResponse'VersionsInfoEntry
DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool
DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Ordering
DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry
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 :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Ordering
compare :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Ordering
$c< :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool
< :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool
$c<= :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool
<= :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool
$c> :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool
> :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool
$c>= :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool
>= :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry -> Bool
$cmax :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry
max :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry
$cmin :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry
min :: DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> DescribeTaskQueueResponse'VersionsInfoEntry
Prelude.Ord)
instance Prelude.Show DescribeTaskQueueResponse'VersionsInfoEntry where
  showsPrec :: Int -> DescribeTaskQueueResponse'VersionsInfoEntry -> ShowS
showsPrec Int
_ DescribeTaskQueueResponse'VersionsInfoEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DescribeTaskQueueResponse'VersionsInfoEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DescribeTaskQueueResponse'VersionsInfoEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DescribeTaskQueueResponse'VersionsInfoEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> f DescribeTaskQueueResponse'VersionsInfoEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> DescribeTaskQueueResponse'VersionsInfoEntry
 -> f DescribeTaskQueueResponse'VersionsInfoEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> f DescribeTaskQueueResponse'VersionsInfoEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueResponse'VersionsInfoEntry -> Text)
-> (DescribeTaskQueueResponse'VersionsInfoEntry
    -> Text -> DescribeTaskQueueResponse'VersionsInfoEntry)
-> Lens' DescribeTaskQueueResponse'VersionsInfoEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueResponse'VersionsInfoEntry -> Text
_DescribeTaskQueueResponse'VersionsInfoEntry'key
           (\ DescribeTaskQueueResponse'VersionsInfoEntry
x__ Text
y__
              -> DescribeTaskQueueResponse'VersionsInfoEntry
x__ {_DescribeTaskQueueResponse'VersionsInfoEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeTaskQueueResponse'VersionsInfoEntry "value" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueVersionInfo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (TaskQueueVersionInfo -> f TaskQueueVersionInfo)
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> f DescribeTaskQueueResponse'VersionsInfoEntry
fieldOf Proxy# "value"
_
    = ((Maybe TaskQueueVersionInfo -> f (Maybe TaskQueueVersionInfo))
 -> DescribeTaskQueueResponse'VersionsInfoEntry
 -> f DescribeTaskQueueResponse'VersionsInfoEntry)
-> ((TaskQueueVersionInfo -> f TaskQueueVersionInfo)
    -> Maybe TaskQueueVersionInfo -> f (Maybe TaskQueueVersionInfo))
-> (TaskQueueVersionInfo -> f TaskQueueVersionInfo)
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> f DescribeTaskQueueResponse'VersionsInfoEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueResponse'VersionsInfoEntry
 -> Maybe TaskQueueVersionInfo)
-> (DescribeTaskQueueResponse'VersionsInfoEntry
    -> Maybe TaskQueueVersionInfo
    -> DescribeTaskQueueResponse'VersionsInfoEntry)
-> Lens
     DescribeTaskQueueResponse'VersionsInfoEntry
     DescribeTaskQueueResponse'VersionsInfoEntry
     (Maybe TaskQueueVersionInfo)
     (Maybe TaskQueueVersionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueResponse'VersionsInfoEntry
-> Maybe TaskQueueVersionInfo
_DescribeTaskQueueResponse'VersionsInfoEntry'value
           (\ DescribeTaskQueueResponse'VersionsInfoEntry
x__ Maybe TaskQueueVersionInfo
y__
              -> DescribeTaskQueueResponse'VersionsInfoEntry
x__ {_DescribeTaskQueueResponse'VersionsInfoEntry'value = y__}))
        (TaskQueueVersionInfo
-> Lens' (Maybe TaskQueueVersionInfo) TaskQueueVersionInfo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TaskQueueVersionInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeTaskQueueResponse'VersionsInfoEntry "maybe'value" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueVersionInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'value"
-> (Maybe TaskQueueVersionInfo -> f (Maybe TaskQueueVersionInfo))
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> f DescribeTaskQueueResponse'VersionsInfoEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe TaskQueueVersionInfo -> f (Maybe TaskQueueVersionInfo))
 -> DescribeTaskQueueResponse'VersionsInfoEntry
 -> f DescribeTaskQueueResponse'VersionsInfoEntry)
-> ((Maybe TaskQueueVersionInfo -> f (Maybe TaskQueueVersionInfo))
    -> Maybe TaskQueueVersionInfo -> f (Maybe TaskQueueVersionInfo))
-> (Maybe TaskQueueVersionInfo -> f (Maybe TaskQueueVersionInfo))
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> f DescribeTaskQueueResponse'VersionsInfoEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeTaskQueueResponse'VersionsInfoEntry
 -> Maybe TaskQueueVersionInfo)
-> (DescribeTaskQueueResponse'VersionsInfoEntry
    -> Maybe TaskQueueVersionInfo
    -> DescribeTaskQueueResponse'VersionsInfoEntry)
-> Lens
     DescribeTaskQueueResponse'VersionsInfoEntry
     DescribeTaskQueueResponse'VersionsInfoEntry
     (Maybe TaskQueueVersionInfo)
     (Maybe TaskQueueVersionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeTaskQueueResponse'VersionsInfoEntry
-> Maybe TaskQueueVersionInfo
_DescribeTaskQueueResponse'VersionsInfoEntry'value
           (\ DescribeTaskQueueResponse'VersionsInfoEntry
x__ Maybe TaskQueueVersionInfo
y__
              -> DescribeTaskQueueResponse'VersionsInfoEntry
x__ {_DescribeTaskQueueResponse'VersionsInfoEntry'value = y__}))
        (Maybe TaskQueueVersionInfo -> f (Maybe TaskQueueVersionInfo))
-> Maybe TaskQueueVersionInfo -> f (Maybe TaskQueueVersionInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DescribeTaskQueueResponse'VersionsInfoEntry where
  messageName :: Proxy DescribeTaskQueueResponse'VersionsInfoEntry -> Text
messageName Proxy DescribeTaskQueueResponse'VersionsInfoEntry
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DescribeTaskQueueResponse.VersionsInfoEntry"
  packedMessageDescriptor :: Proxy DescribeTaskQueueResponse'VersionsInfoEntry -> ByteString
packedMessageDescriptor Proxy DescribeTaskQueueResponse'VersionsInfoEntry
_
    = ByteString
"\n\
      \\DC1VersionsInfoEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2E\n\
      \\ENQvalue\CAN\STX \SOH(\v2/.temporal.api.taskqueue.v1.TaskQueueVersionInfoR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy DescribeTaskQueueResponse'VersionsInfoEntry -> ByteString
packedFileDescriptor Proxy DescribeTaskQueueResponse'VersionsInfoEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor DescribeTaskQueueResponse'VersionsInfoEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor DescribeTaskQueueResponse'VersionsInfoEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DescribeTaskQueueResponse'VersionsInfoEntry Text
-> FieldDescriptor DescribeTaskQueueResponse'VersionsInfoEntry
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' DescribeTaskQueueResponse'VersionsInfoEntry Text
-> FieldAccessor DescribeTaskQueueResponse'VersionsInfoEntry 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 DescribeTaskQueueResponse'VersionsInfoEntry
        value__field_descriptor :: FieldDescriptor DescribeTaskQueueResponse'VersionsInfoEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueueVersionInfo
-> FieldAccessor
     DescribeTaskQueueResponse'VersionsInfoEntry TaskQueueVersionInfo
-> FieldDescriptor DescribeTaskQueueResponse'VersionsInfoEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"value"
              (MessageOrGroup -> FieldTypeDescriptor TaskQueueVersionInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueVersionInfo)
              (Lens
  DescribeTaskQueueResponse'VersionsInfoEntry
  DescribeTaskQueueResponse'VersionsInfoEntry
  (Maybe TaskQueueVersionInfo)
  (Maybe TaskQueueVersionInfo)
-> FieldAccessor
     DescribeTaskQueueResponse'VersionsInfoEntry TaskQueueVersionInfo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.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 DescribeTaskQueueResponse'VersionsInfoEntry
      in
        [(Tag,
  FieldDescriptor DescribeTaskQueueResponse'VersionsInfoEntry)]
-> Map
     Tag (FieldDescriptor DescribeTaskQueueResponse'VersionsInfoEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DescribeTaskQueueResponse'VersionsInfoEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DescribeTaskQueueResponse'VersionsInfoEntry
value__field_descriptor)]
  unknownFields :: Lens' DescribeTaskQueueResponse'VersionsInfoEntry FieldSet
unknownFields
    = (DescribeTaskQueueResponse'VersionsInfoEntry -> FieldSet)
-> (DescribeTaskQueueResponse'VersionsInfoEntry
    -> FieldSet -> DescribeTaskQueueResponse'VersionsInfoEntry)
-> Lens' DescribeTaskQueueResponse'VersionsInfoEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DescribeTaskQueueResponse'VersionsInfoEntry -> FieldSet
_DescribeTaskQueueResponse'VersionsInfoEntry'_unknownFields
        (\ DescribeTaskQueueResponse'VersionsInfoEntry
x__ FieldSet
y__
           -> DescribeTaskQueueResponse'VersionsInfoEntry
x__
                {_DescribeTaskQueueResponse'VersionsInfoEntry'_unknownFields = y__})
  defMessage :: DescribeTaskQueueResponse'VersionsInfoEntry
defMessage
    = DescribeTaskQueueResponse'VersionsInfoEntry'_constructor
        {_DescribeTaskQueueResponse'VersionsInfoEntry'key :: Text
_DescribeTaskQueueResponse'VersionsInfoEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeTaskQueueResponse'VersionsInfoEntry'value :: Maybe TaskQueueVersionInfo
_DescribeTaskQueueResponse'VersionsInfoEntry'value = Maybe TaskQueueVersionInfo
forall a. Maybe a
Prelude.Nothing,
         _DescribeTaskQueueResponse'VersionsInfoEntry'_unknownFields :: FieldSet
_DescribeTaskQueueResponse'VersionsInfoEntry'_unknownFields = []}
  parseMessage :: Parser DescribeTaskQueueResponse'VersionsInfoEntry
parseMessage
    = let
        loop ::
          DescribeTaskQueueResponse'VersionsInfoEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser DescribeTaskQueueResponse'VersionsInfoEntry
        loop :: DescribeTaskQueueResponse'VersionsInfoEntry
-> Parser DescribeTaskQueueResponse'VersionsInfoEntry
loop DescribeTaskQueueResponse'VersionsInfoEntry
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 TaskQueueVersionInfo
-> String -> Parser TaskQueueVersionInfo
forall a. Parser a -> String -> Parser a
(Data.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 DescribeTaskQueueResponse'VersionsInfoEntry
-> String -> Parser DescribeTaskQueueResponse'VersionsInfoEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do DescribeTaskQueueResponse'VersionsInfoEntry
-> Parser DescribeTaskQueueResponse'VersionsInfoEntry
loop DescribeTaskQueueResponse'VersionsInfoEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"VersionsInfoEntry"
  buildMessage :: DescribeTaskQueueResponse'VersionsInfoEntry -> Builder
buildMessage
    = \ DescribeTaskQueueResponse'VersionsInfoEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  DescribeTaskQueueResponse'VersionsInfoEntry
  DescribeTaskQueueResponse'VersionsInfoEntry
  Text
  Text
-> DescribeTaskQueueResponse'VersionsInfoEntry -> 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") DescribeTaskQueueResponse'VersionsInfoEntry
_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 TaskQueueVersionInfo)
  DescribeTaskQueueResponse'VersionsInfoEntry
  DescribeTaskQueueResponse'VersionsInfoEntry
  (Maybe TaskQueueVersionInfo)
  (Maybe TaskQueueVersionInfo)
-> DescribeTaskQueueResponse'VersionsInfoEntry
-> Maybe TaskQueueVersionInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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") DescribeTaskQueueResponse'VersionsInfoEntry
_x
                 of
                   Maybe TaskQueueVersionInfo
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just TaskQueueVersionInfo
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (TaskQueueVersionInfo -> ByteString)
-> TaskQueueVersionInfo
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             TaskQueueVersionInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueueVersionInfo
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  DescribeTaskQueueResponse'VersionsInfoEntry
  DescribeTaskQueueResponse'VersionsInfoEntry
  FieldSet
  FieldSet
-> DescribeTaskQueueResponse'VersionsInfoEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DescribeTaskQueueResponse'VersionsInfoEntry
  DescribeTaskQueueResponse'VersionsInfoEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DescribeTaskQueueResponse'VersionsInfoEntry FieldSet
Data.ProtoLens.unknownFields DescribeTaskQueueResponse'VersionsInfoEntry
_x)))
instance Control.DeepSeq.NFData DescribeTaskQueueResponse'VersionsInfoEntry where
  rnf :: DescribeTaskQueueResponse'VersionsInfoEntry -> ()
rnf
    = \ DescribeTaskQueueResponse'VersionsInfoEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DescribeTaskQueueResponse'VersionsInfoEntry -> FieldSet
_DescribeTaskQueueResponse'VersionsInfoEntry'_unknownFields DescribeTaskQueueResponse'VersionsInfoEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DescribeTaskQueueResponse'VersionsInfoEntry -> Text
_DescribeTaskQueueResponse'VersionsInfoEntry'key DescribeTaskQueueResponse'VersionsInfoEntry
x__)
                (Maybe TaskQueueVersionInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (DescribeTaskQueueResponse'VersionsInfoEntry
-> Maybe TaskQueueVersionInfo
_DescribeTaskQueueResponse'VersionsInfoEntry'value DescribeTaskQueueResponse'VersionsInfoEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' DescribeWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.execution' @:: Lens' DescribeWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'execution' @:: Lens' DescribeWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@ -}
data DescribeWorkflowExecutionRequest
  = DescribeWorkflowExecutionRequest'_constructor {DescribeWorkflowExecutionRequest -> Text
_DescribeWorkflowExecutionRequest'namespace :: !Data.Text.Text,
                                                   DescribeWorkflowExecutionRequest -> Maybe WorkflowExecution
_DescribeWorkflowExecutionRequest'execution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                   DescribeWorkflowExecutionRequest -> FieldSet
_DescribeWorkflowExecutionRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Bool
(DescribeWorkflowExecutionRequest
 -> DescribeWorkflowExecutionRequest -> Bool)
-> (DescribeWorkflowExecutionRequest
    -> DescribeWorkflowExecutionRequest -> Bool)
-> Eq DescribeWorkflowExecutionRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Bool
== :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Bool
$c/= :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Bool
/= :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Bool
Prelude.Eq, Eq DescribeWorkflowExecutionRequest
Eq DescribeWorkflowExecutionRequest =>
(DescribeWorkflowExecutionRequest
 -> DescribeWorkflowExecutionRequest -> Ordering)
-> (DescribeWorkflowExecutionRequest
    -> DescribeWorkflowExecutionRequest -> Bool)
-> (DescribeWorkflowExecutionRequest
    -> DescribeWorkflowExecutionRequest -> Bool)
-> (DescribeWorkflowExecutionRequest
    -> DescribeWorkflowExecutionRequest -> Bool)
-> (DescribeWorkflowExecutionRequest
    -> DescribeWorkflowExecutionRequest -> Bool)
-> (DescribeWorkflowExecutionRequest
    -> DescribeWorkflowExecutionRequest
    -> DescribeWorkflowExecutionRequest)
-> (DescribeWorkflowExecutionRequest
    -> DescribeWorkflowExecutionRequest
    -> DescribeWorkflowExecutionRequest)
-> Ord DescribeWorkflowExecutionRequest
DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Bool
DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Ordering
DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest
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 :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Ordering
compare :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Ordering
$c< :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Bool
< :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Bool
$c<= :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Bool
<= :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Bool
$c> :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Bool
> :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Bool
$c>= :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Bool
>= :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest -> Bool
$cmax :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest
max :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest
$cmin :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest
min :: DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest
-> DescribeWorkflowExecutionRequest
Prelude.Ord)
instance Prelude.Show DescribeWorkflowExecutionRequest where
  showsPrec :: Int -> DescribeWorkflowExecutionRequest -> ShowS
showsPrec Int
_ DescribeWorkflowExecutionRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DescribeWorkflowExecutionRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DescribeWorkflowExecutionRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> DescribeWorkflowExecutionRequest
-> f DescribeWorkflowExecutionRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> DescribeWorkflowExecutionRequest
 -> f DescribeWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> DescribeWorkflowExecutionRequest
-> f DescribeWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionRequest -> Text)
-> (DescribeWorkflowExecutionRequest
    -> Text -> DescribeWorkflowExecutionRequest)
-> Lens
     DescribeWorkflowExecutionRequest
     DescribeWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionRequest -> Text
_DescribeWorkflowExecutionRequest'namespace
           (\ DescribeWorkflowExecutionRequest
x__ Text
y__
              -> DescribeWorkflowExecutionRequest
x__ {_DescribeWorkflowExecutionRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionRequest "execution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "execution"
-> (WorkflowExecution -> f WorkflowExecution)
-> DescribeWorkflowExecutionRequest
-> f DescribeWorkflowExecutionRequest
fieldOf Proxy# "execution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> DescribeWorkflowExecutionRequest
 -> f DescribeWorkflowExecutionRequest)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> DescribeWorkflowExecutionRequest
-> f DescribeWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionRequest -> Maybe WorkflowExecution)
-> (DescribeWorkflowExecutionRequest
    -> Maybe WorkflowExecution -> DescribeWorkflowExecutionRequest)
-> Lens
     DescribeWorkflowExecutionRequest
     DescribeWorkflowExecutionRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionRequest -> Maybe WorkflowExecution
_DescribeWorkflowExecutionRequest'execution
           (\ DescribeWorkflowExecutionRequest
x__ Maybe WorkflowExecution
y__
              -> DescribeWorkflowExecutionRequest
x__ {_DescribeWorkflowExecutionRequest'execution = y__}))
        (WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionRequest "maybe'execution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'execution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> DescribeWorkflowExecutionRequest
-> f DescribeWorkflowExecutionRequest
fieldOf Proxy# "maybe'execution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> DescribeWorkflowExecutionRequest
 -> f DescribeWorkflowExecutionRequest)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> DescribeWorkflowExecutionRequest
-> f DescribeWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionRequest -> Maybe WorkflowExecution)
-> (DescribeWorkflowExecutionRequest
    -> Maybe WorkflowExecution -> DescribeWorkflowExecutionRequest)
-> Lens
     DescribeWorkflowExecutionRequest
     DescribeWorkflowExecutionRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionRequest -> Maybe WorkflowExecution
_DescribeWorkflowExecutionRequest'execution
           (\ DescribeWorkflowExecutionRequest
x__ Maybe WorkflowExecution
y__
              -> DescribeWorkflowExecutionRequest
x__ {_DescribeWorkflowExecutionRequest'execution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DescribeWorkflowExecutionRequest where
  messageName :: Proxy DescribeWorkflowExecutionRequest -> Text
messageName Proxy DescribeWorkflowExecutionRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DescribeWorkflowExecutionRequest"
  packedMessageDescriptor :: Proxy DescribeWorkflowExecutionRequest -> ByteString
packedMessageDescriptor Proxy DescribeWorkflowExecutionRequest
_
    = ByteString
"\n\
      \ DescribeWorkflowExecutionRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2G\n\
      \\texecution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\texecution"
  packedFileDescriptor :: Proxy DescribeWorkflowExecutionRequest -> ByteString
packedFileDescriptor Proxy DescribeWorkflowExecutionRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DescribeWorkflowExecutionRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor DescribeWorkflowExecutionRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor DescribeWorkflowExecutionRequest Text
-> FieldDescriptor DescribeWorkflowExecutionRequest
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
     DescribeWorkflowExecutionRequest
     DescribeWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor DescribeWorkflowExecutionRequest 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 DescribeWorkflowExecutionRequest
        execution__field_descriptor :: FieldDescriptor DescribeWorkflowExecutionRequest
execution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor DescribeWorkflowExecutionRequest WorkflowExecution
-> FieldDescriptor DescribeWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"execution"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
              (Lens
  DescribeWorkflowExecutionRequest
  DescribeWorkflowExecutionRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor DescribeWorkflowExecutionRequest WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'execution")) ::
              Data.ProtoLens.FieldDescriptor DescribeWorkflowExecutionRequest
      in
        [(Tag, FieldDescriptor DescribeWorkflowExecutionRequest)]
-> Map Tag (FieldDescriptor DescribeWorkflowExecutionRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DescribeWorkflowExecutionRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DescribeWorkflowExecutionRequest
execution__field_descriptor)]
  unknownFields :: Lens' DescribeWorkflowExecutionRequest FieldSet
unknownFields
    = (DescribeWorkflowExecutionRequest -> FieldSet)
-> (DescribeWorkflowExecutionRequest
    -> FieldSet -> DescribeWorkflowExecutionRequest)
-> Lens' DescribeWorkflowExecutionRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DescribeWorkflowExecutionRequest -> FieldSet
_DescribeWorkflowExecutionRequest'_unknownFields
        (\ DescribeWorkflowExecutionRequest
x__ FieldSet
y__
           -> DescribeWorkflowExecutionRequest
x__ {_DescribeWorkflowExecutionRequest'_unknownFields = y__})
  defMessage :: DescribeWorkflowExecutionRequest
defMessage
    = DescribeWorkflowExecutionRequest'_constructor
        {_DescribeWorkflowExecutionRequest'namespace :: Text
_DescribeWorkflowExecutionRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _DescribeWorkflowExecutionRequest'execution :: Maybe WorkflowExecution
_DescribeWorkflowExecutionRequest'execution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _DescribeWorkflowExecutionRequest'_unknownFields :: FieldSet
_DescribeWorkflowExecutionRequest'_unknownFields = []}
  parseMessage :: Parser DescribeWorkflowExecutionRequest
parseMessage
    = let
        loop ::
          DescribeWorkflowExecutionRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser DescribeWorkflowExecutionRequest
        loop :: DescribeWorkflowExecutionRequest
-> Parser DescribeWorkflowExecutionRequest
loop DescribeWorkflowExecutionRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"execution"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"execution") 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 DescribeWorkflowExecutionRequest
-> String -> Parser DescribeWorkflowExecutionRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do DescribeWorkflowExecutionRequest
-> Parser DescribeWorkflowExecutionRequest
loop DescribeWorkflowExecutionRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"DescribeWorkflowExecutionRequest"
  buildMessage :: DescribeWorkflowExecutionRequest -> Builder
buildMessage
    = \ DescribeWorkflowExecutionRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  DescribeWorkflowExecutionRequest
  DescribeWorkflowExecutionRequest
  Text
  Text
-> DescribeWorkflowExecutionRequest -> 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") DescribeWorkflowExecutionRequest
_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 WorkflowExecution)
  DescribeWorkflowExecutionRequest
  DescribeWorkflowExecutionRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> DescribeWorkflowExecutionRequest -> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'execution") DescribeWorkflowExecutionRequest
_x
                 of
                   Maybe WorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just WorkflowExecution
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  DescribeWorkflowExecutionRequest
  DescribeWorkflowExecutionRequest
  FieldSet
  FieldSet
-> DescribeWorkflowExecutionRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DescribeWorkflowExecutionRequest
  DescribeWorkflowExecutionRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DescribeWorkflowExecutionRequest FieldSet
Data.ProtoLens.unknownFields DescribeWorkflowExecutionRequest
_x)))
instance Control.DeepSeq.NFData DescribeWorkflowExecutionRequest where
  rnf :: DescribeWorkflowExecutionRequest -> ()
rnf
    = \ DescribeWorkflowExecutionRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DescribeWorkflowExecutionRequest -> FieldSet
_DescribeWorkflowExecutionRequest'_unknownFields DescribeWorkflowExecutionRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DescribeWorkflowExecutionRequest -> Text
_DescribeWorkflowExecutionRequest'namespace DescribeWorkflowExecutionRequest
x__)
                (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (DescribeWorkflowExecutionRequest -> Maybe WorkflowExecution
_DescribeWorkflowExecutionRequest'execution DescribeWorkflowExecutionRequest
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.executionConfig' @:: Lens' DescribeWorkflowExecutionResponse Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionConfig@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'executionConfig' @:: Lens' DescribeWorkflowExecutionResponse (Prelude.Maybe Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionConfig)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowExecutionInfo' @:: Lens' DescribeWorkflowExecutionResponse Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowExecutionInfo' @:: Lens' DescribeWorkflowExecutionResponse (Prelude.Maybe Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.pendingActivities' @:: Lens' DescribeWorkflowExecutionResponse [Proto.Temporal.Api.Workflow.V1.Message.PendingActivityInfo]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'pendingActivities' @:: Lens' DescribeWorkflowExecutionResponse (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.PendingActivityInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.pendingChildren' @:: Lens' DescribeWorkflowExecutionResponse [Proto.Temporal.Api.Workflow.V1.Message.PendingChildExecutionInfo]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'pendingChildren' @:: Lens' DescribeWorkflowExecutionResponse (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.PendingChildExecutionInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.pendingWorkflowTask' @:: Lens' DescribeWorkflowExecutionResponse Proto.Temporal.Api.Workflow.V1.Message.PendingWorkflowTaskInfo@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'pendingWorkflowTask' @:: Lens' DescribeWorkflowExecutionResponse (Prelude.Maybe Proto.Temporal.Api.Workflow.V1.Message.PendingWorkflowTaskInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.callbacks' @:: Lens' DescribeWorkflowExecutionResponse [Proto.Temporal.Api.Workflow.V1.Message.CallbackInfo]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'callbacks' @:: Lens' DescribeWorkflowExecutionResponse (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.CallbackInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.pendingNexusOperations' @:: Lens' DescribeWorkflowExecutionResponse [Proto.Temporal.Api.Workflow.V1.Message.PendingNexusOperationInfo]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'pendingNexusOperations' @:: Lens' DescribeWorkflowExecutionResponse (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.PendingNexusOperationInfo)@ -}
data DescribeWorkflowExecutionResponse
  = DescribeWorkflowExecutionResponse'_constructor {DescribeWorkflowExecutionResponse -> Maybe WorkflowExecutionConfig
_DescribeWorkflowExecutionResponse'executionConfig :: !(Prelude.Maybe Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionConfig),
                                                    DescribeWorkflowExecutionResponse -> Maybe WorkflowExecutionInfo
_DescribeWorkflowExecutionResponse'workflowExecutionInfo :: !(Prelude.Maybe Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo),
                                                    DescribeWorkflowExecutionResponse -> Vector PendingActivityInfo
_DescribeWorkflowExecutionResponse'pendingActivities :: !(Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.PendingActivityInfo),
                                                    DescribeWorkflowExecutionResponse
-> Vector PendingChildExecutionInfo
_DescribeWorkflowExecutionResponse'pendingChildren :: !(Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.PendingChildExecutionInfo),
                                                    DescribeWorkflowExecutionResponse -> Maybe PendingWorkflowTaskInfo
_DescribeWorkflowExecutionResponse'pendingWorkflowTask :: !(Prelude.Maybe Proto.Temporal.Api.Workflow.V1.Message.PendingWorkflowTaskInfo),
                                                    DescribeWorkflowExecutionResponse -> Vector CallbackInfo
_DescribeWorkflowExecutionResponse'callbacks :: !(Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.CallbackInfo),
                                                    DescribeWorkflowExecutionResponse
-> Vector PendingNexusOperationInfo
_DescribeWorkflowExecutionResponse'pendingNexusOperations :: !(Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.PendingNexusOperationInfo),
                                                    DescribeWorkflowExecutionResponse -> FieldSet
_DescribeWorkflowExecutionResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Bool
(DescribeWorkflowExecutionResponse
 -> DescribeWorkflowExecutionResponse -> Bool)
-> (DescribeWorkflowExecutionResponse
    -> DescribeWorkflowExecutionResponse -> Bool)
-> Eq DescribeWorkflowExecutionResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Bool
== :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Bool
$c/= :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Bool
/= :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Bool
Prelude.Eq, Eq DescribeWorkflowExecutionResponse
Eq DescribeWorkflowExecutionResponse =>
(DescribeWorkflowExecutionResponse
 -> DescribeWorkflowExecutionResponse -> Ordering)
-> (DescribeWorkflowExecutionResponse
    -> DescribeWorkflowExecutionResponse -> Bool)
-> (DescribeWorkflowExecutionResponse
    -> DescribeWorkflowExecutionResponse -> Bool)
-> (DescribeWorkflowExecutionResponse
    -> DescribeWorkflowExecutionResponse -> Bool)
-> (DescribeWorkflowExecutionResponse
    -> DescribeWorkflowExecutionResponse -> Bool)
-> (DescribeWorkflowExecutionResponse
    -> DescribeWorkflowExecutionResponse
    -> DescribeWorkflowExecutionResponse)
-> (DescribeWorkflowExecutionResponse
    -> DescribeWorkflowExecutionResponse
    -> DescribeWorkflowExecutionResponse)
-> Ord DescribeWorkflowExecutionResponse
DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Bool
DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Ordering
DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse
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 :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Ordering
compare :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Ordering
$c< :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Bool
< :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Bool
$c<= :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Bool
<= :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Bool
$c> :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Bool
> :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Bool
$c>= :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Bool
>= :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse -> Bool
$cmax :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse
max :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse
$cmin :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse
min :: DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse
-> DescribeWorkflowExecutionResponse
Prelude.Ord)
instance Prelude.Show DescribeWorkflowExecutionResponse where
  showsPrec :: Int -> DescribeWorkflowExecutionResponse -> ShowS
showsPrec Int
_ DescribeWorkflowExecutionResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (DescribeWorkflowExecutionResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort DescribeWorkflowExecutionResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionResponse "executionConfig" Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionConfig where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "executionConfig"
-> (WorkflowExecutionConfig -> f WorkflowExecutionConfig)
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
fieldOf Proxy# "executionConfig"
_
    = ((Maybe WorkflowExecutionConfig
  -> f (Maybe WorkflowExecutionConfig))
 -> DescribeWorkflowExecutionResponse
 -> f DescribeWorkflowExecutionResponse)
-> ((WorkflowExecutionConfig -> f WorkflowExecutionConfig)
    -> Maybe WorkflowExecutionConfig
    -> f (Maybe WorkflowExecutionConfig))
-> (WorkflowExecutionConfig -> f WorkflowExecutionConfig)
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionResponse
 -> Maybe WorkflowExecutionConfig)
-> (DescribeWorkflowExecutionResponse
    -> Maybe WorkflowExecutionConfig
    -> DescribeWorkflowExecutionResponse)
-> Lens
     DescribeWorkflowExecutionResponse
     DescribeWorkflowExecutionResponse
     (Maybe WorkflowExecutionConfig)
     (Maybe WorkflowExecutionConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionResponse -> Maybe WorkflowExecutionConfig
_DescribeWorkflowExecutionResponse'executionConfig
           (\ DescribeWorkflowExecutionResponse
x__ Maybe WorkflowExecutionConfig
y__
              -> DescribeWorkflowExecutionResponse
x__ {_DescribeWorkflowExecutionResponse'executionConfig = y__}))
        (WorkflowExecutionConfig
-> Lens' (Maybe WorkflowExecutionConfig) WorkflowExecutionConfig
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionConfig
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionResponse "maybe'executionConfig" (Prelude.Maybe Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionConfig) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'executionConfig"
-> (Maybe WorkflowExecutionConfig
    -> f (Maybe WorkflowExecutionConfig))
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
fieldOf Proxy# "maybe'executionConfig"
_
    = ((Maybe WorkflowExecutionConfig
  -> f (Maybe WorkflowExecutionConfig))
 -> DescribeWorkflowExecutionResponse
 -> f DescribeWorkflowExecutionResponse)
-> ((Maybe WorkflowExecutionConfig
     -> f (Maybe WorkflowExecutionConfig))
    -> Maybe WorkflowExecutionConfig
    -> f (Maybe WorkflowExecutionConfig))
-> (Maybe WorkflowExecutionConfig
    -> f (Maybe WorkflowExecutionConfig))
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionResponse
 -> Maybe WorkflowExecutionConfig)
-> (DescribeWorkflowExecutionResponse
    -> Maybe WorkflowExecutionConfig
    -> DescribeWorkflowExecutionResponse)
-> Lens
     DescribeWorkflowExecutionResponse
     DescribeWorkflowExecutionResponse
     (Maybe WorkflowExecutionConfig)
     (Maybe WorkflowExecutionConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionResponse -> Maybe WorkflowExecutionConfig
_DescribeWorkflowExecutionResponse'executionConfig
           (\ DescribeWorkflowExecutionResponse
x__ Maybe WorkflowExecutionConfig
y__
              -> DescribeWorkflowExecutionResponse
x__ {_DescribeWorkflowExecutionResponse'executionConfig = y__}))
        (Maybe WorkflowExecutionConfig
 -> f (Maybe WorkflowExecutionConfig))
-> Maybe WorkflowExecutionConfig
-> f (Maybe WorkflowExecutionConfig)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionResponse "workflowExecutionInfo" Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionInfo"
-> (WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
fieldOf Proxy# "workflowExecutionInfo"
_
    = ((Maybe WorkflowExecutionInfo -> f (Maybe WorkflowExecutionInfo))
 -> DescribeWorkflowExecutionResponse
 -> f DescribeWorkflowExecutionResponse)
-> ((WorkflowExecutionInfo -> f WorkflowExecutionInfo)
    -> Maybe WorkflowExecutionInfo -> f (Maybe WorkflowExecutionInfo))
-> (WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionResponse -> Maybe WorkflowExecutionInfo)
-> (DescribeWorkflowExecutionResponse
    -> Maybe WorkflowExecutionInfo
    -> DescribeWorkflowExecutionResponse)
-> Lens
     DescribeWorkflowExecutionResponse
     DescribeWorkflowExecutionResponse
     (Maybe WorkflowExecutionInfo)
     (Maybe WorkflowExecutionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionResponse -> Maybe WorkflowExecutionInfo
_DescribeWorkflowExecutionResponse'workflowExecutionInfo
           (\ DescribeWorkflowExecutionResponse
x__ Maybe WorkflowExecutionInfo
y__
              -> DescribeWorkflowExecutionResponse
x__
                   {_DescribeWorkflowExecutionResponse'workflowExecutionInfo = y__}))
        (WorkflowExecutionInfo
-> Lens' (Maybe WorkflowExecutionInfo) WorkflowExecutionInfo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionResponse "maybe'workflowExecutionInfo" (Prelude.Maybe Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionInfo"
-> (Maybe WorkflowExecutionInfo -> f (Maybe WorkflowExecutionInfo))
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
fieldOf Proxy# "maybe'workflowExecutionInfo"
_
    = ((Maybe WorkflowExecutionInfo -> f (Maybe WorkflowExecutionInfo))
 -> DescribeWorkflowExecutionResponse
 -> f DescribeWorkflowExecutionResponse)
-> ((Maybe WorkflowExecutionInfo
     -> f (Maybe WorkflowExecutionInfo))
    -> Maybe WorkflowExecutionInfo -> f (Maybe WorkflowExecutionInfo))
-> (Maybe WorkflowExecutionInfo -> f (Maybe WorkflowExecutionInfo))
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionResponse -> Maybe WorkflowExecutionInfo)
-> (DescribeWorkflowExecutionResponse
    -> Maybe WorkflowExecutionInfo
    -> DescribeWorkflowExecutionResponse)
-> Lens
     DescribeWorkflowExecutionResponse
     DescribeWorkflowExecutionResponse
     (Maybe WorkflowExecutionInfo)
     (Maybe WorkflowExecutionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionResponse -> Maybe WorkflowExecutionInfo
_DescribeWorkflowExecutionResponse'workflowExecutionInfo
           (\ DescribeWorkflowExecutionResponse
x__ Maybe WorkflowExecutionInfo
y__
              -> DescribeWorkflowExecutionResponse
x__
                   {_DescribeWorkflowExecutionResponse'workflowExecutionInfo = y__}))
        (Maybe WorkflowExecutionInfo -> f (Maybe WorkflowExecutionInfo))
-> Maybe WorkflowExecutionInfo -> f (Maybe WorkflowExecutionInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionResponse "pendingActivities" [Proto.Temporal.Api.Workflow.V1.Message.PendingActivityInfo] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "pendingActivities"
-> ([PendingActivityInfo] -> f [PendingActivityInfo])
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
fieldOf Proxy# "pendingActivities"
_
    = ((Vector PendingActivityInfo -> f (Vector PendingActivityInfo))
 -> DescribeWorkflowExecutionResponse
 -> f DescribeWorkflowExecutionResponse)
-> (([PendingActivityInfo] -> f [PendingActivityInfo])
    -> Vector PendingActivityInfo -> f (Vector PendingActivityInfo))
-> ([PendingActivityInfo] -> f [PendingActivityInfo])
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionResponse -> Vector PendingActivityInfo)
-> (DescribeWorkflowExecutionResponse
    -> Vector PendingActivityInfo -> DescribeWorkflowExecutionResponse)
-> Lens
     DescribeWorkflowExecutionResponse
     DescribeWorkflowExecutionResponse
     (Vector PendingActivityInfo)
     (Vector PendingActivityInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionResponse -> Vector PendingActivityInfo
_DescribeWorkflowExecutionResponse'pendingActivities
           (\ DescribeWorkflowExecutionResponse
x__ Vector PendingActivityInfo
y__
              -> DescribeWorkflowExecutionResponse
x__
                   {_DescribeWorkflowExecutionResponse'pendingActivities = y__}))
        ((Vector PendingActivityInfo -> [PendingActivityInfo])
-> (Vector PendingActivityInfo
    -> [PendingActivityInfo] -> Vector PendingActivityInfo)
-> Lens
     (Vector PendingActivityInfo)
     (Vector PendingActivityInfo)
     [PendingActivityInfo]
     [PendingActivityInfo]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector PendingActivityInfo -> [PendingActivityInfo]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector PendingActivityInfo
_ [PendingActivityInfo]
y__ -> [PendingActivityInfo] -> Vector PendingActivityInfo
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [PendingActivityInfo]
y__))
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionResponse "vec'pendingActivities" (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.PendingActivityInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'pendingActivities"
-> (Vector PendingActivityInfo -> f (Vector PendingActivityInfo))
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
fieldOf Proxy# "vec'pendingActivities"
_
    = ((Vector PendingActivityInfo -> f (Vector PendingActivityInfo))
 -> DescribeWorkflowExecutionResponse
 -> f DescribeWorkflowExecutionResponse)
-> ((Vector PendingActivityInfo -> f (Vector PendingActivityInfo))
    -> Vector PendingActivityInfo -> f (Vector PendingActivityInfo))
-> (Vector PendingActivityInfo -> f (Vector PendingActivityInfo))
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionResponse -> Vector PendingActivityInfo)
-> (DescribeWorkflowExecutionResponse
    -> Vector PendingActivityInfo -> DescribeWorkflowExecutionResponse)
-> Lens
     DescribeWorkflowExecutionResponse
     DescribeWorkflowExecutionResponse
     (Vector PendingActivityInfo)
     (Vector PendingActivityInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionResponse -> Vector PendingActivityInfo
_DescribeWorkflowExecutionResponse'pendingActivities
           (\ DescribeWorkflowExecutionResponse
x__ Vector PendingActivityInfo
y__
              -> DescribeWorkflowExecutionResponse
x__
                   {_DescribeWorkflowExecutionResponse'pendingActivities = y__}))
        (Vector PendingActivityInfo -> f (Vector PendingActivityInfo))
-> Vector PendingActivityInfo -> f (Vector PendingActivityInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionResponse "pendingChildren" [Proto.Temporal.Api.Workflow.V1.Message.PendingChildExecutionInfo] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "pendingChildren"
-> ([PendingChildExecutionInfo] -> f [PendingChildExecutionInfo])
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
fieldOf Proxy# "pendingChildren"
_
    = ((Vector PendingChildExecutionInfo
  -> f (Vector PendingChildExecutionInfo))
 -> DescribeWorkflowExecutionResponse
 -> f DescribeWorkflowExecutionResponse)
-> (([PendingChildExecutionInfo] -> f [PendingChildExecutionInfo])
    -> Vector PendingChildExecutionInfo
    -> f (Vector PendingChildExecutionInfo))
-> ([PendingChildExecutionInfo] -> f [PendingChildExecutionInfo])
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionResponse
 -> Vector PendingChildExecutionInfo)
-> (DescribeWorkflowExecutionResponse
    -> Vector PendingChildExecutionInfo
    -> DescribeWorkflowExecutionResponse)
-> Lens
     DescribeWorkflowExecutionResponse
     DescribeWorkflowExecutionResponse
     (Vector PendingChildExecutionInfo)
     (Vector PendingChildExecutionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionResponse
-> Vector PendingChildExecutionInfo
_DescribeWorkflowExecutionResponse'pendingChildren
           (\ DescribeWorkflowExecutionResponse
x__ Vector PendingChildExecutionInfo
y__
              -> DescribeWorkflowExecutionResponse
x__ {_DescribeWorkflowExecutionResponse'pendingChildren = y__}))
        ((Vector PendingChildExecutionInfo -> [PendingChildExecutionInfo])
-> (Vector PendingChildExecutionInfo
    -> [PendingChildExecutionInfo] -> Vector PendingChildExecutionInfo)
-> Lens
     (Vector PendingChildExecutionInfo)
     (Vector PendingChildExecutionInfo)
     [PendingChildExecutionInfo]
     [PendingChildExecutionInfo]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector PendingChildExecutionInfo -> [PendingChildExecutionInfo]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector PendingChildExecutionInfo
_ [PendingChildExecutionInfo]
y__ -> [PendingChildExecutionInfo] -> Vector PendingChildExecutionInfo
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [PendingChildExecutionInfo]
y__))
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionResponse "vec'pendingChildren" (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.PendingChildExecutionInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'pendingChildren"
-> (Vector PendingChildExecutionInfo
    -> f (Vector PendingChildExecutionInfo))
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
fieldOf Proxy# "vec'pendingChildren"
_
    = ((Vector PendingChildExecutionInfo
  -> f (Vector PendingChildExecutionInfo))
 -> DescribeWorkflowExecutionResponse
 -> f DescribeWorkflowExecutionResponse)
-> ((Vector PendingChildExecutionInfo
     -> f (Vector PendingChildExecutionInfo))
    -> Vector PendingChildExecutionInfo
    -> f (Vector PendingChildExecutionInfo))
-> (Vector PendingChildExecutionInfo
    -> f (Vector PendingChildExecutionInfo))
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionResponse
 -> Vector PendingChildExecutionInfo)
-> (DescribeWorkflowExecutionResponse
    -> Vector PendingChildExecutionInfo
    -> DescribeWorkflowExecutionResponse)
-> Lens
     DescribeWorkflowExecutionResponse
     DescribeWorkflowExecutionResponse
     (Vector PendingChildExecutionInfo)
     (Vector PendingChildExecutionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionResponse
-> Vector PendingChildExecutionInfo
_DescribeWorkflowExecutionResponse'pendingChildren
           (\ DescribeWorkflowExecutionResponse
x__ Vector PendingChildExecutionInfo
y__
              -> DescribeWorkflowExecutionResponse
x__ {_DescribeWorkflowExecutionResponse'pendingChildren = y__}))
        (Vector PendingChildExecutionInfo
 -> f (Vector PendingChildExecutionInfo))
-> Vector PendingChildExecutionInfo
-> f (Vector PendingChildExecutionInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionResponse "pendingWorkflowTask" Proto.Temporal.Api.Workflow.V1.Message.PendingWorkflowTaskInfo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "pendingWorkflowTask"
-> (PendingWorkflowTaskInfo -> f PendingWorkflowTaskInfo)
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
fieldOf Proxy# "pendingWorkflowTask"
_
    = ((Maybe PendingWorkflowTaskInfo
  -> f (Maybe PendingWorkflowTaskInfo))
 -> DescribeWorkflowExecutionResponse
 -> f DescribeWorkflowExecutionResponse)
-> ((PendingWorkflowTaskInfo -> f PendingWorkflowTaskInfo)
    -> Maybe PendingWorkflowTaskInfo
    -> f (Maybe PendingWorkflowTaskInfo))
-> (PendingWorkflowTaskInfo -> f PendingWorkflowTaskInfo)
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionResponse
 -> Maybe PendingWorkflowTaskInfo)
-> (DescribeWorkflowExecutionResponse
    -> Maybe PendingWorkflowTaskInfo
    -> DescribeWorkflowExecutionResponse)
-> Lens
     DescribeWorkflowExecutionResponse
     DescribeWorkflowExecutionResponse
     (Maybe PendingWorkflowTaskInfo)
     (Maybe PendingWorkflowTaskInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionResponse -> Maybe PendingWorkflowTaskInfo
_DescribeWorkflowExecutionResponse'pendingWorkflowTask
           (\ DescribeWorkflowExecutionResponse
x__ Maybe PendingWorkflowTaskInfo
y__
              -> DescribeWorkflowExecutionResponse
x__
                   {_DescribeWorkflowExecutionResponse'pendingWorkflowTask = y__}))
        (PendingWorkflowTaskInfo
-> Lens' (Maybe PendingWorkflowTaskInfo) PendingWorkflowTaskInfo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens PendingWorkflowTaskInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionResponse "maybe'pendingWorkflowTask" (Prelude.Maybe Proto.Temporal.Api.Workflow.V1.Message.PendingWorkflowTaskInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'pendingWorkflowTask"
-> (Maybe PendingWorkflowTaskInfo
    -> f (Maybe PendingWorkflowTaskInfo))
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
fieldOf Proxy# "maybe'pendingWorkflowTask"
_
    = ((Maybe PendingWorkflowTaskInfo
  -> f (Maybe PendingWorkflowTaskInfo))
 -> DescribeWorkflowExecutionResponse
 -> f DescribeWorkflowExecutionResponse)
-> ((Maybe PendingWorkflowTaskInfo
     -> f (Maybe PendingWorkflowTaskInfo))
    -> Maybe PendingWorkflowTaskInfo
    -> f (Maybe PendingWorkflowTaskInfo))
-> (Maybe PendingWorkflowTaskInfo
    -> f (Maybe PendingWorkflowTaskInfo))
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionResponse
 -> Maybe PendingWorkflowTaskInfo)
-> (DescribeWorkflowExecutionResponse
    -> Maybe PendingWorkflowTaskInfo
    -> DescribeWorkflowExecutionResponse)
-> Lens
     DescribeWorkflowExecutionResponse
     DescribeWorkflowExecutionResponse
     (Maybe PendingWorkflowTaskInfo)
     (Maybe PendingWorkflowTaskInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionResponse -> Maybe PendingWorkflowTaskInfo
_DescribeWorkflowExecutionResponse'pendingWorkflowTask
           (\ DescribeWorkflowExecutionResponse
x__ Maybe PendingWorkflowTaskInfo
y__
              -> DescribeWorkflowExecutionResponse
x__
                   {_DescribeWorkflowExecutionResponse'pendingWorkflowTask = y__}))
        (Maybe PendingWorkflowTaskInfo
 -> f (Maybe PendingWorkflowTaskInfo))
-> Maybe PendingWorkflowTaskInfo
-> f (Maybe PendingWorkflowTaskInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionResponse "callbacks" [Proto.Temporal.Api.Workflow.V1.Message.CallbackInfo] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "callbacks"
-> ([CallbackInfo] -> f [CallbackInfo])
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
fieldOf Proxy# "callbacks"
_
    = ((Vector CallbackInfo -> f (Vector CallbackInfo))
 -> DescribeWorkflowExecutionResponse
 -> f DescribeWorkflowExecutionResponse)
-> (([CallbackInfo] -> f [CallbackInfo])
    -> Vector CallbackInfo -> f (Vector CallbackInfo))
-> ([CallbackInfo] -> f [CallbackInfo])
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionResponse -> Vector CallbackInfo)
-> (DescribeWorkflowExecutionResponse
    -> Vector CallbackInfo -> DescribeWorkflowExecutionResponse)
-> Lens
     DescribeWorkflowExecutionResponse
     DescribeWorkflowExecutionResponse
     (Vector CallbackInfo)
     (Vector CallbackInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionResponse -> Vector CallbackInfo
_DescribeWorkflowExecutionResponse'callbacks
           (\ DescribeWorkflowExecutionResponse
x__ Vector CallbackInfo
y__
              -> DescribeWorkflowExecutionResponse
x__ {_DescribeWorkflowExecutionResponse'callbacks = y__}))
        ((Vector CallbackInfo -> [CallbackInfo])
-> (Vector CallbackInfo -> [CallbackInfo] -> Vector CallbackInfo)
-> Lens
     (Vector CallbackInfo)
     (Vector CallbackInfo)
     [CallbackInfo]
     [CallbackInfo]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector CallbackInfo -> [CallbackInfo]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector CallbackInfo
_ [CallbackInfo]
y__ -> [CallbackInfo] -> Vector CallbackInfo
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [CallbackInfo]
y__))
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionResponse "vec'callbacks" (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.CallbackInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'callbacks"
-> (Vector CallbackInfo -> f (Vector CallbackInfo))
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
fieldOf Proxy# "vec'callbacks"
_
    = ((Vector CallbackInfo -> f (Vector CallbackInfo))
 -> DescribeWorkflowExecutionResponse
 -> f DescribeWorkflowExecutionResponse)
-> ((Vector CallbackInfo -> f (Vector CallbackInfo))
    -> Vector CallbackInfo -> f (Vector CallbackInfo))
-> (Vector CallbackInfo -> f (Vector CallbackInfo))
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionResponse -> Vector CallbackInfo)
-> (DescribeWorkflowExecutionResponse
    -> Vector CallbackInfo -> DescribeWorkflowExecutionResponse)
-> Lens
     DescribeWorkflowExecutionResponse
     DescribeWorkflowExecutionResponse
     (Vector CallbackInfo)
     (Vector CallbackInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionResponse -> Vector CallbackInfo
_DescribeWorkflowExecutionResponse'callbacks
           (\ DescribeWorkflowExecutionResponse
x__ Vector CallbackInfo
y__
              -> DescribeWorkflowExecutionResponse
x__ {_DescribeWorkflowExecutionResponse'callbacks = y__}))
        (Vector CallbackInfo -> f (Vector CallbackInfo))
-> Vector CallbackInfo -> f (Vector CallbackInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionResponse "pendingNexusOperations" [Proto.Temporal.Api.Workflow.V1.Message.PendingNexusOperationInfo] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "pendingNexusOperations"
-> ([PendingNexusOperationInfo] -> f [PendingNexusOperationInfo])
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
fieldOf Proxy# "pendingNexusOperations"
_
    = ((Vector PendingNexusOperationInfo
  -> f (Vector PendingNexusOperationInfo))
 -> DescribeWorkflowExecutionResponse
 -> f DescribeWorkflowExecutionResponse)
-> (([PendingNexusOperationInfo] -> f [PendingNexusOperationInfo])
    -> Vector PendingNexusOperationInfo
    -> f (Vector PendingNexusOperationInfo))
-> ([PendingNexusOperationInfo] -> f [PendingNexusOperationInfo])
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionResponse
 -> Vector PendingNexusOperationInfo)
-> (DescribeWorkflowExecutionResponse
    -> Vector PendingNexusOperationInfo
    -> DescribeWorkflowExecutionResponse)
-> Lens
     DescribeWorkflowExecutionResponse
     DescribeWorkflowExecutionResponse
     (Vector PendingNexusOperationInfo)
     (Vector PendingNexusOperationInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionResponse
-> Vector PendingNexusOperationInfo
_DescribeWorkflowExecutionResponse'pendingNexusOperations
           (\ DescribeWorkflowExecutionResponse
x__ Vector PendingNexusOperationInfo
y__
              -> DescribeWorkflowExecutionResponse
x__
                   {_DescribeWorkflowExecutionResponse'pendingNexusOperations = y__}))
        ((Vector PendingNexusOperationInfo -> [PendingNexusOperationInfo])
-> (Vector PendingNexusOperationInfo
    -> [PendingNexusOperationInfo] -> Vector PendingNexusOperationInfo)
-> Lens
     (Vector PendingNexusOperationInfo)
     (Vector PendingNexusOperationInfo)
     [PendingNexusOperationInfo]
     [PendingNexusOperationInfo]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector PendingNexusOperationInfo -> [PendingNexusOperationInfo]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector PendingNexusOperationInfo
_ [PendingNexusOperationInfo]
y__ -> [PendingNexusOperationInfo] -> Vector PendingNexusOperationInfo
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [PendingNexusOperationInfo]
y__))
instance Data.ProtoLens.Field.HasField DescribeWorkflowExecutionResponse "vec'pendingNexusOperations" (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.PendingNexusOperationInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'pendingNexusOperations"
-> (Vector PendingNexusOperationInfo
    -> f (Vector PendingNexusOperationInfo))
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
fieldOf Proxy# "vec'pendingNexusOperations"
_
    = ((Vector PendingNexusOperationInfo
  -> f (Vector PendingNexusOperationInfo))
 -> DescribeWorkflowExecutionResponse
 -> f DescribeWorkflowExecutionResponse)
-> ((Vector PendingNexusOperationInfo
     -> f (Vector PendingNexusOperationInfo))
    -> Vector PendingNexusOperationInfo
    -> f (Vector PendingNexusOperationInfo))
-> (Vector PendingNexusOperationInfo
    -> f (Vector PendingNexusOperationInfo))
-> DescribeWorkflowExecutionResponse
-> f DescribeWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((DescribeWorkflowExecutionResponse
 -> Vector PendingNexusOperationInfo)
-> (DescribeWorkflowExecutionResponse
    -> Vector PendingNexusOperationInfo
    -> DescribeWorkflowExecutionResponse)
-> Lens
     DescribeWorkflowExecutionResponse
     DescribeWorkflowExecutionResponse
     (Vector PendingNexusOperationInfo)
     (Vector PendingNexusOperationInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           DescribeWorkflowExecutionResponse
-> Vector PendingNexusOperationInfo
_DescribeWorkflowExecutionResponse'pendingNexusOperations
           (\ DescribeWorkflowExecutionResponse
x__ Vector PendingNexusOperationInfo
y__
              -> DescribeWorkflowExecutionResponse
x__
                   {_DescribeWorkflowExecutionResponse'pendingNexusOperations = y__}))
        (Vector PendingNexusOperationInfo
 -> f (Vector PendingNexusOperationInfo))
-> Vector PendingNexusOperationInfo
-> f (Vector PendingNexusOperationInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message DescribeWorkflowExecutionResponse where
  messageName :: Proxy DescribeWorkflowExecutionResponse -> Text
messageName Proxy DescribeWorkflowExecutionResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.DescribeWorkflowExecutionResponse"
  packedMessageDescriptor :: Proxy DescribeWorkflowExecutionResponse -> ByteString
packedMessageDescriptor Proxy DescribeWorkflowExecutionResponse
_
    = ByteString
"\n\
      \!DescribeWorkflowExecutionResponse\DC2\\\n\
      \\DLEexecution_config\CAN\SOH \SOH(\v21.temporal.api.workflow.v1.WorkflowExecutionConfigR\SIexecutionConfig\DC2g\n\
      \\ETBworkflow_execution_info\CAN\STX \SOH(\v2/.temporal.api.workflow.v1.WorkflowExecutionInfoR\NAKworkflowExecutionInfo\DC2\\\n\
      \\DC2pending_activities\CAN\ETX \ETX(\v2-.temporal.api.workflow.v1.PendingActivityInfoR\DC1pendingActivities\DC2^\n\
      \\DLEpending_children\CAN\EOT \ETX(\v23.temporal.api.workflow.v1.PendingChildExecutionInfoR\SIpendingChildren\DC2e\n\
      \\NAKpending_workflow_task\CAN\ENQ \SOH(\v21.temporal.api.workflow.v1.PendingWorkflowTaskInfoR\DC3pendingWorkflowTask\DC2D\n\
      \\tcallbacks\CAN\ACK \ETX(\v2&.temporal.api.workflow.v1.CallbackInfoR\tcallbacks\DC2m\n\
      \\CANpending_nexus_operations\CAN\a \ETX(\v23.temporal.api.workflow.v1.PendingNexusOperationInfoR\SYNpendingNexusOperations"
  packedFileDescriptor :: Proxy DescribeWorkflowExecutionResponse -> ByteString
packedFileDescriptor Proxy DescribeWorkflowExecutionResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor DescribeWorkflowExecutionResponse)
fieldsByTag
    = let
        executionConfig__field_descriptor :: FieldDescriptor DescribeWorkflowExecutionResponse
executionConfig__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionConfig
-> FieldAccessor
     DescribeWorkflowExecutionResponse WorkflowExecutionConfig
-> FieldDescriptor DescribeWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"execution_config"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecutionConfig
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionConfig)
              (Lens
  DescribeWorkflowExecutionResponse
  DescribeWorkflowExecutionResponse
  (Maybe WorkflowExecutionConfig)
  (Maybe WorkflowExecutionConfig)
-> FieldAccessor
     DescribeWorkflowExecutionResponse WorkflowExecutionConfig
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'executionConfig")) ::
              Data.ProtoLens.FieldDescriptor DescribeWorkflowExecutionResponse
        workflowExecutionInfo__field_descriptor :: FieldDescriptor DescribeWorkflowExecutionResponse
workflowExecutionInfo__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionInfo
-> FieldAccessor
     DescribeWorkflowExecutionResponse WorkflowExecutionInfo
-> FieldDescriptor DescribeWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_info"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecutionInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo)
              (Lens
  DescribeWorkflowExecutionResponse
  DescribeWorkflowExecutionResponse
  (Maybe WorkflowExecutionInfo)
  (Maybe WorkflowExecutionInfo)
-> FieldAccessor
     DescribeWorkflowExecutionResponse WorkflowExecutionInfo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecutionInfo")) ::
              Data.ProtoLens.FieldDescriptor DescribeWorkflowExecutionResponse
        pendingActivities__field_descriptor :: FieldDescriptor DescribeWorkflowExecutionResponse
pendingActivities__field_descriptor
          = String
-> FieldTypeDescriptor PendingActivityInfo
-> FieldAccessor
     DescribeWorkflowExecutionResponse PendingActivityInfo
-> FieldDescriptor DescribeWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"pending_activities"
              (MessageOrGroup -> FieldTypeDescriptor PendingActivityInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Workflow.V1.Message.PendingActivityInfo)
              (Packing
-> Lens' DescribeWorkflowExecutionResponse [PendingActivityInfo]
-> FieldAccessor
     DescribeWorkflowExecutionResponse PendingActivityInfo
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 @"pendingActivities")) ::
              Data.ProtoLens.FieldDescriptor DescribeWorkflowExecutionResponse
        pendingChildren__field_descriptor :: FieldDescriptor DescribeWorkflowExecutionResponse
pendingChildren__field_descriptor
          = String
-> FieldTypeDescriptor PendingChildExecutionInfo
-> FieldAccessor
     DescribeWorkflowExecutionResponse PendingChildExecutionInfo
-> FieldDescriptor DescribeWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"pending_children"
              (MessageOrGroup -> FieldTypeDescriptor PendingChildExecutionInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Workflow.V1.Message.PendingChildExecutionInfo)
              (Packing
-> Lens'
     DescribeWorkflowExecutionResponse [PendingChildExecutionInfo]
-> FieldAccessor
     DescribeWorkflowExecutionResponse PendingChildExecutionInfo
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 @"pendingChildren")) ::
              Data.ProtoLens.FieldDescriptor DescribeWorkflowExecutionResponse
        pendingWorkflowTask__field_descriptor :: FieldDescriptor DescribeWorkflowExecutionResponse
pendingWorkflowTask__field_descriptor
          = String
-> FieldTypeDescriptor PendingWorkflowTaskInfo
-> FieldAccessor
     DescribeWorkflowExecutionResponse PendingWorkflowTaskInfo
-> FieldDescriptor DescribeWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"pending_workflow_task"
              (MessageOrGroup -> FieldTypeDescriptor PendingWorkflowTaskInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Workflow.V1.Message.PendingWorkflowTaskInfo)
              (Lens
  DescribeWorkflowExecutionResponse
  DescribeWorkflowExecutionResponse
  (Maybe PendingWorkflowTaskInfo)
  (Maybe PendingWorkflowTaskInfo)
-> FieldAccessor
     DescribeWorkflowExecutionResponse PendingWorkflowTaskInfo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'pendingWorkflowTask")) ::
              Data.ProtoLens.FieldDescriptor DescribeWorkflowExecutionResponse
        callbacks__field_descriptor :: FieldDescriptor DescribeWorkflowExecutionResponse
callbacks__field_descriptor
          = String
-> FieldTypeDescriptor CallbackInfo
-> FieldAccessor DescribeWorkflowExecutionResponse CallbackInfo
-> FieldDescriptor DescribeWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"callbacks"
              (MessageOrGroup -> FieldTypeDescriptor CallbackInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Workflow.V1.Message.CallbackInfo)
              (Packing
-> Lens' DescribeWorkflowExecutionResponse [CallbackInfo]
-> FieldAccessor DescribeWorkflowExecutionResponse CallbackInfo
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 @"callbacks")) ::
              Data.ProtoLens.FieldDescriptor DescribeWorkflowExecutionResponse
        pendingNexusOperations__field_descriptor :: FieldDescriptor DescribeWorkflowExecutionResponse
pendingNexusOperations__field_descriptor
          = String
-> FieldTypeDescriptor PendingNexusOperationInfo
-> FieldAccessor
     DescribeWorkflowExecutionResponse PendingNexusOperationInfo
-> FieldDescriptor DescribeWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"pending_nexus_operations"
              (MessageOrGroup -> FieldTypeDescriptor PendingNexusOperationInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Workflow.V1.Message.PendingNexusOperationInfo)
              (Packing
-> Lens'
     DescribeWorkflowExecutionResponse [PendingNexusOperationInfo]
-> FieldAccessor
     DescribeWorkflowExecutionResponse PendingNexusOperationInfo
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 @"pendingNexusOperations")) ::
              Data.ProtoLens.FieldDescriptor DescribeWorkflowExecutionResponse
      in
        [(Tag, FieldDescriptor DescribeWorkflowExecutionResponse)]
-> Map Tag (FieldDescriptor DescribeWorkflowExecutionResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor DescribeWorkflowExecutionResponse
executionConfig__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor DescribeWorkflowExecutionResponse
workflowExecutionInfo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor DescribeWorkflowExecutionResponse
pendingActivities__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor DescribeWorkflowExecutionResponse
pendingChildren__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor DescribeWorkflowExecutionResponse
pendingWorkflowTask__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor DescribeWorkflowExecutionResponse
callbacks__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor DescribeWorkflowExecutionResponse
pendingNexusOperations__field_descriptor)]
  unknownFields :: Lens' DescribeWorkflowExecutionResponse FieldSet
unknownFields
    = (DescribeWorkflowExecutionResponse -> FieldSet)
-> (DescribeWorkflowExecutionResponse
    -> FieldSet -> DescribeWorkflowExecutionResponse)
-> Lens' DescribeWorkflowExecutionResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        DescribeWorkflowExecutionResponse -> FieldSet
_DescribeWorkflowExecutionResponse'_unknownFields
        (\ DescribeWorkflowExecutionResponse
x__ FieldSet
y__
           -> DescribeWorkflowExecutionResponse
x__ {_DescribeWorkflowExecutionResponse'_unknownFields = y__})
  defMessage :: DescribeWorkflowExecutionResponse
defMessage
    = DescribeWorkflowExecutionResponse'_constructor
        {_DescribeWorkflowExecutionResponse'executionConfig :: Maybe WorkflowExecutionConfig
_DescribeWorkflowExecutionResponse'executionConfig = Maybe WorkflowExecutionConfig
forall a. Maybe a
Prelude.Nothing,
         _DescribeWorkflowExecutionResponse'workflowExecutionInfo :: Maybe WorkflowExecutionInfo
_DescribeWorkflowExecutionResponse'workflowExecutionInfo = Maybe WorkflowExecutionInfo
forall a. Maybe a
Prelude.Nothing,
         _DescribeWorkflowExecutionResponse'pendingActivities :: Vector PendingActivityInfo
_DescribeWorkflowExecutionResponse'pendingActivities = Vector PendingActivityInfo
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _DescribeWorkflowExecutionResponse'pendingChildren :: Vector PendingChildExecutionInfo
_DescribeWorkflowExecutionResponse'pendingChildren = Vector PendingChildExecutionInfo
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _DescribeWorkflowExecutionResponse'pendingWorkflowTask :: Maybe PendingWorkflowTaskInfo
_DescribeWorkflowExecutionResponse'pendingWorkflowTask = Maybe PendingWorkflowTaskInfo
forall a. Maybe a
Prelude.Nothing,
         _DescribeWorkflowExecutionResponse'callbacks :: Vector CallbackInfo
_DescribeWorkflowExecutionResponse'callbacks = Vector CallbackInfo
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _DescribeWorkflowExecutionResponse'pendingNexusOperations :: Vector PendingNexusOperationInfo
_DescribeWorkflowExecutionResponse'pendingNexusOperations = Vector PendingNexusOperationInfo
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _DescribeWorkflowExecutionResponse'_unknownFields :: FieldSet
_DescribeWorkflowExecutionResponse'_unknownFields = []}
  parseMessage :: Parser DescribeWorkflowExecutionResponse
parseMessage
    = let
        loop ::
          DescribeWorkflowExecutionResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Workflow.V1.Message.CallbackInfo
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Workflow.V1.Message.PendingActivityInfo
                -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Workflow.V1.Message.PendingChildExecutionInfo
                   -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Workflow.V1.Message.PendingNexusOperationInfo
                      -> Data.ProtoLens.Encoding.Bytes.Parser DescribeWorkflowExecutionResponse
        loop :: DescribeWorkflowExecutionResponse
-> Growing Vector RealWorld CallbackInfo
-> Growing Vector RealWorld PendingActivityInfo
-> Growing Vector RealWorld PendingChildExecutionInfo
-> Growing Vector RealWorld PendingNexusOperationInfo
-> Parser DescribeWorkflowExecutionResponse
loop
          DescribeWorkflowExecutionResponse
x
          Growing Vector RealWorld CallbackInfo
mutable'callbacks
          Growing Vector RealWorld PendingActivityInfo
mutable'pendingActivities
          Growing Vector RealWorld PendingChildExecutionInfo
mutable'pendingChildren
          Growing Vector RealWorld PendingNexusOperationInfo
mutable'pendingNexusOperations
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'callbacks <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                            (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                               mutable'callbacks)
                      frozen'pendingActivities <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                    (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                       mutable'pendingActivities)
                      frozen'pendingChildren <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                  (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                     mutable'pendingChildren)
                      frozen'pendingNexusOperations <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                         (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                            mutable'pendingNexusOperations)
                      (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'callbacks") frozen'callbacks
                              (Lens.Family2.set
                                 (Data.ProtoLens.Field.field @"vec'pendingActivities")
                                 frozen'pendingActivities
                                 (Lens.Family2.set
                                    (Data.ProtoLens.Field.field @"vec'pendingChildren")
                                    frozen'pendingChildren
                                    (Lens.Family2.set
                                       (Data.ProtoLens.Field.field @"vec'pendingNexusOperations")
                                       frozen'pendingNexusOperations x)))))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser WorkflowExecutionConfig
-> String -> Parser WorkflowExecutionConfig
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"execution_config"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"executionConfig") y x)
                                  mutable'callbacks mutable'pendingActivities
                                  mutable'pendingChildren mutable'pendingNexusOperations
                        Word64
18
                          -> do y <- Parser WorkflowExecutionInfo
-> String -> Parser WorkflowExecutionInfo
forall a. Parser a -> String -> Parser a
(Data.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_info"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecutionInfo") y x)
                                  mutable'callbacks mutable'pendingActivities
                                  mutable'pendingChildren mutable'pendingNexusOperations
                        Word64
26
                          -> do !y <- Parser PendingActivityInfo -> String -> Parser PendingActivityInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"pending_activities"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'pendingActivities y)
                                loop
                                  x mutable'callbacks v mutable'pendingChildren
                                  mutable'pendingNexusOperations
                        Word64
34
                          -> do !y <- Parser PendingChildExecutionInfo
-> String -> Parser PendingChildExecutionInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"pending_children"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'pendingChildren y)
                                loop
                                  x mutable'callbacks mutable'pendingActivities v
                                  mutable'pendingNexusOperations
                        Word64
42
                          -> do y <- Parser PendingWorkflowTaskInfo
-> String -> Parser PendingWorkflowTaskInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"pending_workflow_task"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"pendingWorkflowTask") y x)
                                  mutable'callbacks mutable'pendingActivities
                                  mutable'pendingChildren mutable'pendingNexusOperations
                        Word64
50
                          -> do !y <- Parser CallbackInfo -> String -> Parser CallbackInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"callbacks"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'callbacks y)
                                loop
                                  x v mutable'pendingActivities mutable'pendingChildren
                                  mutable'pendingNexusOperations
                        Word64
58
                          -> do !y <- Parser PendingNexusOperationInfo
-> String -> Parser PendingNexusOperationInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"pending_nexus_operations"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'pendingNexusOperations y)
                                loop
                                  x mutable'callbacks mutable'pendingActivities
                                  mutable'pendingChildren v
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
                                  mutable'callbacks mutable'pendingActivities
                                  mutable'pendingChildren mutable'pendingNexusOperations
      in
        Parser DescribeWorkflowExecutionResponse
-> String -> Parser DescribeWorkflowExecutionResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'callbacks <- IO (Growing Vector RealWorld CallbackInfo)
-> Parser (Growing Vector RealWorld CallbackInfo)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                     IO (Growing Vector RealWorld CallbackInfo)
IO (Growing Vector (PrimState IO) CallbackInfo)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              mutable'pendingActivities <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             Data.ProtoLens.Encoding.Growing.new
              mutable'pendingChildren <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           Data.ProtoLens.Encoding.Growing.new
              mutable'pendingNexusOperations <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                  Data.ProtoLens.Encoding.Growing.new
              loop
                Data.ProtoLens.defMessage mutable'callbacks
                mutable'pendingActivities mutable'pendingChildren
                mutable'pendingNexusOperations)
          String
"DescribeWorkflowExecutionResponse"
  buildMessage :: DescribeWorkflowExecutionResponse -> Builder
buildMessage
    = \ DescribeWorkflowExecutionResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe WorkflowExecutionConfig)
  DescribeWorkflowExecutionResponse
  DescribeWorkflowExecutionResponse
  (Maybe WorkflowExecutionConfig)
  (Maybe WorkflowExecutionConfig)
-> DescribeWorkflowExecutionResponse
-> Maybe WorkflowExecutionConfig
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'executionConfig") DescribeWorkflowExecutionResponse
_x
              of
                Maybe WorkflowExecutionConfig
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just WorkflowExecutionConfig
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (WorkflowExecutionConfig -> ByteString)
-> WorkflowExecutionConfig
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          WorkflowExecutionConfig -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionConfig
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe WorkflowExecutionInfo)
  DescribeWorkflowExecutionResponse
  DescribeWorkflowExecutionResponse
  (Maybe WorkflowExecutionInfo)
  (Maybe WorkflowExecutionInfo)
-> DescribeWorkflowExecutionResponse -> Maybe WorkflowExecutionInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'workflowExecutionInfo") DescribeWorkflowExecutionResponse
_x
                 of
                   Maybe WorkflowExecutionInfo
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just WorkflowExecutionInfo
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (WorkflowExecutionInfo -> ByteString)
-> WorkflowExecutionInfo
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             WorkflowExecutionInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionInfo
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   ((PendingActivityInfo -> Builder)
-> Vector PendingActivityInfo -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                      (\ PendingActivityInfo
_v
                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                              ((ByteString -> Builder)
-> (PendingActivityInfo -> ByteString)
-> PendingActivityInfo
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                 (\ ByteString
bs
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                            (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                         (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                 PendingActivityInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage PendingActivityInfo
_v))
                      (FoldLike
  (Vector PendingActivityInfo)
  DescribeWorkflowExecutionResponse
  DescribeWorkflowExecutionResponse
  (Vector PendingActivityInfo)
  (Vector PendingActivityInfo)
-> DescribeWorkflowExecutionResponse -> Vector PendingActivityInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'pendingActivities") DescribeWorkflowExecutionResponse
_x))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      ((PendingChildExecutionInfo -> Builder)
-> Vector PendingChildExecutionInfo -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                         (\ PendingChildExecutionInfo
_v
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                 ((ByteString -> Builder)
-> (PendingChildExecutionInfo -> ByteString)
-> PendingChildExecutionInfo
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                    (\ ByteString
bs
                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                               (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                            (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                    PendingChildExecutionInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage PendingChildExecutionInfo
_v))
                         (FoldLike
  (Vector PendingChildExecutionInfo)
  DescribeWorkflowExecutionResponse
  DescribeWorkflowExecutionResponse
  (Vector PendingChildExecutionInfo)
  (Vector PendingChildExecutionInfo)
-> DescribeWorkflowExecutionResponse
-> Vector PendingChildExecutionInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'pendingChildren") DescribeWorkflowExecutionResponse
_x))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe PendingWorkflowTaskInfo)
  DescribeWorkflowExecutionResponse
  DescribeWorkflowExecutionResponse
  (Maybe PendingWorkflowTaskInfo)
  (Maybe PendingWorkflowTaskInfo)
-> DescribeWorkflowExecutionResponse
-> Maybe PendingWorkflowTaskInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'pendingWorkflowTask") DescribeWorkflowExecutionResponse
_x
                          of
                            Maybe PendingWorkflowTaskInfo
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just PendingWorkflowTaskInfo
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (PendingWorkflowTaskInfo -> ByteString)
-> PendingWorkflowTaskInfo
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      PendingWorkflowTaskInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage PendingWorkflowTaskInfo
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            ((CallbackInfo -> Builder) -> Vector CallbackInfo -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                               (\ CallbackInfo
_v
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                       ((ByteString -> Builder)
-> (CallbackInfo -> ByteString) -> CallbackInfo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                          (\ ByteString
bs
                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                        (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                          CallbackInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage CallbackInfo
_v))
                               (FoldLike
  (Vector CallbackInfo)
  DescribeWorkflowExecutionResponse
  DescribeWorkflowExecutionResponse
  (Vector CallbackInfo)
  (Vector CallbackInfo)
-> DescribeWorkflowExecutionResponse -> Vector CallbackInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'callbacks") DescribeWorkflowExecutionResponse
_x))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               ((PendingNexusOperationInfo -> Builder)
-> Vector PendingNexusOperationInfo -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                  (\ PendingNexusOperationInfo
_v
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                          ((ByteString -> Builder)
-> (PendingNexusOperationInfo -> ByteString)
-> PendingNexusOperationInfo
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                             (\ ByteString
bs
                                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                           (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                             PendingNexusOperationInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage PendingNexusOperationInfo
_v))
                                  (FoldLike
  (Vector PendingNexusOperationInfo)
  DescribeWorkflowExecutionResponse
  DescribeWorkflowExecutionResponse
  (Vector PendingNexusOperationInfo)
  (Vector PendingNexusOperationInfo)
-> DescribeWorkflowExecutionResponse
-> Vector PendingNexusOperationInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'pendingNexusOperations") DescribeWorkflowExecutionResponse
_x))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike
  FieldSet
  DescribeWorkflowExecutionResponse
  DescribeWorkflowExecutionResponse
  FieldSet
  FieldSet
-> DescribeWorkflowExecutionResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  DescribeWorkflowExecutionResponse
  DescribeWorkflowExecutionResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' DescribeWorkflowExecutionResponse FieldSet
Data.ProtoLens.unknownFields DescribeWorkflowExecutionResponse
_x))))))))
instance Control.DeepSeq.NFData DescribeWorkflowExecutionResponse where
  rnf :: DescribeWorkflowExecutionResponse -> ()
rnf
    = \ DescribeWorkflowExecutionResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (DescribeWorkflowExecutionResponse -> FieldSet
_DescribeWorkflowExecutionResponse'_unknownFields DescribeWorkflowExecutionResponse
x__)
             (Maybe WorkflowExecutionConfig -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (DescribeWorkflowExecutionResponse -> Maybe WorkflowExecutionConfig
_DescribeWorkflowExecutionResponse'executionConfig DescribeWorkflowExecutionResponse
x__)
                (Maybe WorkflowExecutionInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (DescribeWorkflowExecutionResponse -> Maybe WorkflowExecutionInfo
_DescribeWorkflowExecutionResponse'workflowExecutionInfo DescribeWorkflowExecutionResponse
x__)
                   (Vector PendingActivityInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (DescribeWorkflowExecutionResponse -> Vector PendingActivityInfo
_DescribeWorkflowExecutionResponse'pendingActivities DescribeWorkflowExecutionResponse
x__)
                      (Vector PendingChildExecutionInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (DescribeWorkflowExecutionResponse
-> Vector PendingChildExecutionInfo
_DescribeWorkflowExecutionResponse'pendingChildren DescribeWorkflowExecutionResponse
x__)
                         (Maybe PendingWorkflowTaskInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (DescribeWorkflowExecutionResponse -> Maybe PendingWorkflowTaskInfo
_DescribeWorkflowExecutionResponse'pendingWorkflowTask DescribeWorkflowExecutionResponse
x__)
                            (Vector CallbackInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (DescribeWorkflowExecutionResponse -> Vector CallbackInfo
_DescribeWorkflowExecutionResponse'callbacks DescribeWorkflowExecutionResponse
x__)
                               (Vector PendingNexusOperationInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (DescribeWorkflowExecutionResponse
-> Vector PendingNexusOperationInfo
_DescribeWorkflowExecutionResponse'pendingNexusOperations DescribeWorkflowExecutionResponse
x__)
                                  ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' ExecuteMultiOperationRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.operations' @:: Lens' ExecuteMultiOperationRequest [ExecuteMultiOperationRequest'Operation]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'operations' @:: Lens' ExecuteMultiOperationRequest (Data.Vector.Vector ExecuteMultiOperationRequest'Operation)@ -}
data ExecuteMultiOperationRequest
  = ExecuteMultiOperationRequest'_constructor {ExecuteMultiOperationRequest -> Text
_ExecuteMultiOperationRequest'namespace :: !Data.Text.Text,
                                               ExecuteMultiOperationRequest
-> Vector ExecuteMultiOperationRequest'Operation
_ExecuteMultiOperationRequest'operations :: !(Data.Vector.Vector ExecuteMultiOperationRequest'Operation),
                                               ExecuteMultiOperationRequest -> FieldSet
_ExecuteMultiOperationRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Bool
(ExecuteMultiOperationRequest
 -> ExecuteMultiOperationRequest -> Bool)
-> (ExecuteMultiOperationRequest
    -> ExecuteMultiOperationRequest -> Bool)
-> Eq ExecuteMultiOperationRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Bool
== :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Bool
$c/= :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Bool
/= :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Bool
Prelude.Eq, Eq ExecuteMultiOperationRequest
Eq ExecuteMultiOperationRequest =>
(ExecuteMultiOperationRequest
 -> ExecuteMultiOperationRequest -> Ordering)
-> (ExecuteMultiOperationRequest
    -> ExecuteMultiOperationRequest -> Bool)
-> (ExecuteMultiOperationRequest
    -> ExecuteMultiOperationRequest -> Bool)
-> (ExecuteMultiOperationRequest
    -> ExecuteMultiOperationRequest -> Bool)
-> (ExecuteMultiOperationRequest
    -> ExecuteMultiOperationRequest -> Bool)
-> (ExecuteMultiOperationRequest
    -> ExecuteMultiOperationRequest -> ExecuteMultiOperationRequest)
-> (ExecuteMultiOperationRequest
    -> ExecuteMultiOperationRequest -> ExecuteMultiOperationRequest)
-> Ord ExecuteMultiOperationRequest
ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Bool
ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Ordering
ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> ExecuteMultiOperationRequest
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 :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Ordering
compare :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Ordering
$c< :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Bool
< :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Bool
$c<= :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Bool
<= :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Bool
$c> :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Bool
> :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Bool
$c>= :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Bool
>= :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> Bool
$cmax :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> ExecuteMultiOperationRequest
max :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> ExecuteMultiOperationRequest
$cmin :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> ExecuteMultiOperationRequest
min :: ExecuteMultiOperationRequest
-> ExecuteMultiOperationRequest -> ExecuteMultiOperationRequest
Prelude.Ord)
instance Prelude.Show ExecuteMultiOperationRequest where
  showsPrec :: Int -> ExecuteMultiOperationRequest -> ShowS
showsPrec Int
_ ExecuteMultiOperationRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ExecuteMultiOperationRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ExecuteMultiOperationRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ExecuteMultiOperationRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ExecuteMultiOperationRequest
-> f ExecuteMultiOperationRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ExecuteMultiOperationRequest -> f ExecuteMultiOperationRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ExecuteMultiOperationRequest
-> f ExecuteMultiOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExecuteMultiOperationRequest -> Text)
-> (ExecuteMultiOperationRequest
    -> Text -> ExecuteMultiOperationRequest)
-> Lens
     ExecuteMultiOperationRequest ExecuteMultiOperationRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExecuteMultiOperationRequest -> Text
_ExecuteMultiOperationRequest'namespace
           (\ ExecuteMultiOperationRequest
x__ Text
y__ -> ExecuteMultiOperationRequest
x__ {_ExecuteMultiOperationRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExecuteMultiOperationRequest "operations" [ExecuteMultiOperationRequest'Operation] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "operations"
-> ([ExecuteMultiOperationRequest'Operation]
    -> f [ExecuteMultiOperationRequest'Operation])
-> ExecuteMultiOperationRequest
-> f ExecuteMultiOperationRequest
fieldOf Proxy# "operations"
_
    = ((Vector ExecuteMultiOperationRequest'Operation
  -> f (Vector ExecuteMultiOperationRequest'Operation))
 -> ExecuteMultiOperationRequest -> f ExecuteMultiOperationRequest)
-> (([ExecuteMultiOperationRequest'Operation]
     -> f [ExecuteMultiOperationRequest'Operation])
    -> Vector ExecuteMultiOperationRequest'Operation
    -> f (Vector ExecuteMultiOperationRequest'Operation))
-> ([ExecuteMultiOperationRequest'Operation]
    -> f [ExecuteMultiOperationRequest'Operation])
-> ExecuteMultiOperationRequest
-> f ExecuteMultiOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExecuteMultiOperationRequest
 -> Vector ExecuteMultiOperationRequest'Operation)
-> (ExecuteMultiOperationRequest
    -> Vector ExecuteMultiOperationRequest'Operation
    -> ExecuteMultiOperationRequest)
-> Lens
     ExecuteMultiOperationRequest
     ExecuteMultiOperationRequest
     (Vector ExecuteMultiOperationRequest'Operation)
     (Vector ExecuteMultiOperationRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExecuteMultiOperationRequest
-> Vector ExecuteMultiOperationRequest'Operation
_ExecuteMultiOperationRequest'operations
           (\ ExecuteMultiOperationRequest
x__ Vector ExecuteMultiOperationRequest'Operation
y__
              -> ExecuteMultiOperationRequest
x__ {_ExecuteMultiOperationRequest'operations = y__}))
        ((Vector ExecuteMultiOperationRequest'Operation
 -> [ExecuteMultiOperationRequest'Operation])
-> (Vector ExecuteMultiOperationRequest'Operation
    -> [ExecuteMultiOperationRequest'Operation]
    -> Vector ExecuteMultiOperationRequest'Operation)
-> Lens
     (Vector ExecuteMultiOperationRequest'Operation)
     (Vector ExecuteMultiOperationRequest'Operation)
     [ExecuteMultiOperationRequest'Operation]
     [ExecuteMultiOperationRequest'Operation]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector ExecuteMultiOperationRequest'Operation
-> [ExecuteMultiOperationRequest'Operation]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector ExecuteMultiOperationRequest'Operation
_ [ExecuteMultiOperationRequest'Operation]
y__ -> [ExecuteMultiOperationRequest'Operation]
-> Vector ExecuteMultiOperationRequest'Operation
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [ExecuteMultiOperationRequest'Operation]
y__))
instance Data.ProtoLens.Field.HasField ExecuteMultiOperationRequest "vec'operations" (Data.Vector.Vector ExecuteMultiOperationRequest'Operation) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'operations"
-> (Vector ExecuteMultiOperationRequest'Operation
    -> f (Vector ExecuteMultiOperationRequest'Operation))
-> ExecuteMultiOperationRequest
-> f ExecuteMultiOperationRequest
fieldOf Proxy# "vec'operations"
_
    = ((Vector ExecuteMultiOperationRequest'Operation
  -> f (Vector ExecuteMultiOperationRequest'Operation))
 -> ExecuteMultiOperationRequest -> f ExecuteMultiOperationRequest)
-> ((Vector ExecuteMultiOperationRequest'Operation
     -> f (Vector ExecuteMultiOperationRequest'Operation))
    -> Vector ExecuteMultiOperationRequest'Operation
    -> f (Vector ExecuteMultiOperationRequest'Operation))
-> (Vector ExecuteMultiOperationRequest'Operation
    -> f (Vector ExecuteMultiOperationRequest'Operation))
-> ExecuteMultiOperationRequest
-> f ExecuteMultiOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExecuteMultiOperationRequest
 -> Vector ExecuteMultiOperationRequest'Operation)
-> (ExecuteMultiOperationRequest
    -> Vector ExecuteMultiOperationRequest'Operation
    -> ExecuteMultiOperationRequest)
-> Lens
     ExecuteMultiOperationRequest
     ExecuteMultiOperationRequest
     (Vector ExecuteMultiOperationRequest'Operation)
     (Vector ExecuteMultiOperationRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExecuteMultiOperationRequest
-> Vector ExecuteMultiOperationRequest'Operation
_ExecuteMultiOperationRequest'operations
           (\ ExecuteMultiOperationRequest
x__ Vector ExecuteMultiOperationRequest'Operation
y__
              -> ExecuteMultiOperationRequest
x__ {_ExecuteMultiOperationRequest'operations = y__}))
        (Vector ExecuteMultiOperationRequest'Operation
 -> f (Vector ExecuteMultiOperationRequest'Operation))
-> Vector ExecuteMultiOperationRequest'Operation
-> f (Vector ExecuteMultiOperationRequest'Operation)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ExecuteMultiOperationRequest where
  messageName :: Proxy ExecuteMultiOperationRequest -> Text
messageName Proxy ExecuteMultiOperationRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ExecuteMultiOperationRequest"
  packedMessageDescriptor :: Proxy ExecuteMultiOperationRequest -> ByteString
packedMessageDescriptor Proxy ExecuteMultiOperationRequest
_
    = ByteString
"\n\
      \\FSExecuteMultiOperationRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2g\n\
      \\n\
      \operations\CAN\STX \ETX(\v2G.temporal.api.workflowservice.v1.ExecuteMultiOperationRequest.OperationR\n\
      \operations\SUB\237\SOH\n\
      \\tOperation\DC2g\n\
      \\SOstart_workflow\CAN\SOH \SOH(\v2>.temporal.api.workflowservice.v1.StartWorkflowExecutionRequestH\NULR\rstartWorkflow\DC2j\n\
      \\SIupdate_workflow\CAN\STX \SOH(\v2?.temporal.api.workflowservice.v1.UpdateWorkflowExecutionRequestH\NULR\SOupdateWorkflowB\v\n\
      \\toperation"
  packedFileDescriptor :: Proxy ExecuteMultiOperationRequest -> ByteString
packedFileDescriptor Proxy ExecuteMultiOperationRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ExecuteMultiOperationRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor ExecuteMultiOperationRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ExecuteMultiOperationRequest Text
-> FieldDescriptor ExecuteMultiOperationRequest
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
     ExecuteMultiOperationRequest ExecuteMultiOperationRequest Text Text
-> FieldAccessor ExecuteMultiOperationRequest 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 ExecuteMultiOperationRequest
        operations__field_descriptor :: FieldDescriptor ExecuteMultiOperationRequest
operations__field_descriptor
          = String
-> FieldTypeDescriptor ExecuteMultiOperationRequest'Operation
-> FieldAccessor
     ExecuteMultiOperationRequest ExecuteMultiOperationRequest'Operation
-> FieldDescriptor ExecuteMultiOperationRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"operations"
              (MessageOrGroup
-> FieldTypeDescriptor ExecuteMultiOperationRequest'Operation
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ExecuteMultiOperationRequest'Operation)
              (Packing
-> Lens'
     ExecuteMultiOperationRequest
     [ExecuteMultiOperationRequest'Operation]
-> FieldAccessor
     ExecuteMultiOperationRequest ExecuteMultiOperationRequest'Operation
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 @"operations")) ::
              Data.ProtoLens.FieldDescriptor ExecuteMultiOperationRequest
      in
        [(Tag, FieldDescriptor ExecuteMultiOperationRequest)]
-> Map Tag (FieldDescriptor ExecuteMultiOperationRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ExecuteMultiOperationRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ExecuteMultiOperationRequest
operations__field_descriptor)]
  unknownFields :: Lens' ExecuteMultiOperationRequest FieldSet
unknownFields
    = (ExecuteMultiOperationRequest -> FieldSet)
-> (ExecuteMultiOperationRequest
    -> FieldSet -> ExecuteMultiOperationRequest)
-> Lens' ExecuteMultiOperationRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ExecuteMultiOperationRequest -> FieldSet
_ExecuteMultiOperationRequest'_unknownFields
        (\ ExecuteMultiOperationRequest
x__ FieldSet
y__
           -> ExecuteMultiOperationRequest
x__ {_ExecuteMultiOperationRequest'_unknownFields = y__})
  defMessage :: ExecuteMultiOperationRequest
defMessage
    = ExecuteMultiOperationRequest'_constructor
        {_ExecuteMultiOperationRequest'namespace :: Text
_ExecuteMultiOperationRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExecuteMultiOperationRequest'operations :: Vector ExecuteMultiOperationRequest'Operation
_ExecuteMultiOperationRequest'operations = Vector ExecuteMultiOperationRequest'Operation
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ExecuteMultiOperationRequest'_unknownFields :: FieldSet
_ExecuteMultiOperationRequest'_unknownFields = []}
  parseMessage :: Parser ExecuteMultiOperationRequest
parseMessage
    = let
        loop ::
          ExecuteMultiOperationRequest
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ExecuteMultiOperationRequest'Operation
             -> Data.ProtoLens.Encoding.Bytes.Parser ExecuteMultiOperationRequest
        loop :: ExecuteMultiOperationRequest
-> Growing Vector RealWorld ExecuteMultiOperationRequest'Operation
-> Parser ExecuteMultiOperationRequest
loop ExecuteMultiOperationRequest
x Growing Vector RealWorld ExecuteMultiOperationRequest'Operation
mutable'operations
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'operations <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                mutable'operations)
                      (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'operations") frozen'operations
                              x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                                  mutable'operations
                        Word64
18
                          -> do !y <- Parser ExecuteMultiOperationRequest'Operation
-> String -> Parser ExecuteMultiOperationRequest'Operation
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"operations"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'operations y)
                                loop x v
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
                                  mutable'operations
      in
        Parser ExecuteMultiOperationRequest
-> String -> Parser ExecuteMultiOperationRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'operations <- IO
  (Growing Vector RealWorld ExecuteMultiOperationRequest'Operation)
-> Parser
     (Growing Vector RealWorld ExecuteMultiOperationRequest'Operation)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO
  (Growing Vector RealWorld ExecuteMultiOperationRequest'Operation)
IO
  (Growing
     Vector (PrimState IO) ExecuteMultiOperationRequest'Operation)
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'operations)
          String
"ExecuteMultiOperationRequest"
  buildMessage :: ExecuteMultiOperationRequest -> Builder
buildMessage
    = \ ExecuteMultiOperationRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ExecuteMultiOperationRequest
  ExecuteMultiOperationRequest
  Text
  Text
-> ExecuteMultiOperationRequest -> 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") ExecuteMultiOperationRequest
_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.<>)
                ((ExecuteMultiOperationRequest'Operation -> Builder)
-> Vector ExecuteMultiOperationRequest'Operation -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                   (\ ExecuteMultiOperationRequest'Operation
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                           ((ByteString -> Builder)
-> (ExecuteMultiOperationRequest'Operation -> ByteString)
-> ExecuteMultiOperationRequest'Operation
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ ByteString
bs
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                              ExecuteMultiOperationRequest'Operation -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ExecuteMultiOperationRequest'Operation
_v))
                   (FoldLike
  (Vector ExecuteMultiOperationRequest'Operation)
  ExecuteMultiOperationRequest
  ExecuteMultiOperationRequest
  (Vector ExecuteMultiOperationRequest'Operation)
  (Vector ExecuteMultiOperationRequest'Operation)
-> ExecuteMultiOperationRequest
-> Vector ExecuteMultiOperationRequest'Operation
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'operations") ExecuteMultiOperationRequest
_x))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ExecuteMultiOperationRequest
  ExecuteMultiOperationRequest
  FieldSet
  FieldSet
-> ExecuteMultiOperationRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ExecuteMultiOperationRequest
  ExecuteMultiOperationRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ExecuteMultiOperationRequest FieldSet
Data.ProtoLens.unknownFields ExecuteMultiOperationRequest
_x)))
instance Control.DeepSeq.NFData ExecuteMultiOperationRequest where
  rnf :: ExecuteMultiOperationRequest -> ()
rnf
    = \ ExecuteMultiOperationRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ExecuteMultiOperationRequest -> FieldSet
_ExecuteMultiOperationRequest'_unknownFields ExecuteMultiOperationRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ExecuteMultiOperationRequest -> Text
_ExecuteMultiOperationRequest'namespace ExecuteMultiOperationRequest
x__)
                (Vector ExecuteMultiOperationRequest'Operation -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ExecuteMultiOperationRequest
-> Vector ExecuteMultiOperationRequest'Operation
_ExecuteMultiOperationRequest'operations ExecuteMultiOperationRequest
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'operation' @:: Lens' ExecuteMultiOperationRequest'Operation (Prelude.Maybe ExecuteMultiOperationRequest'Operation'Operation)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'startWorkflow' @:: Lens' ExecuteMultiOperationRequest'Operation (Prelude.Maybe StartWorkflowExecutionRequest)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.startWorkflow' @:: Lens' ExecuteMultiOperationRequest'Operation StartWorkflowExecutionRequest@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'updateWorkflow' @:: Lens' ExecuteMultiOperationRequest'Operation (Prelude.Maybe UpdateWorkflowExecutionRequest)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.updateWorkflow' @:: Lens' ExecuteMultiOperationRequest'Operation UpdateWorkflowExecutionRequest@ -}
data ExecuteMultiOperationRequest'Operation
  = ExecuteMultiOperationRequest'Operation'_constructor {ExecuteMultiOperationRequest'Operation
-> Maybe ExecuteMultiOperationRequest'Operation'Operation
_ExecuteMultiOperationRequest'Operation'operation :: !(Prelude.Maybe ExecuteMultiOperationRequest'Operation'Operation),
                                                         ExecuteMultiOperationRequest'Operation -> FieldSet
_ExecuteMultiOperationRequest'Operation'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Bool
(ExecuteMultiOperationRequest'Operation
 -> ExecuteMultiOperationRequest'Operation -> Bool)
-> (ExecuteMultiOperationRequest'Operation
    -> ExecuteMultiOperationRequest'Operation -> Bool)
-> Eq ExecuteMultiOperationRequest'Operation
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Bool
== :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Bool
$c/= :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Bool
/= :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Bool
Prelude.Eq, Eq ExecuteMultiOperationRequest'Operation
Eq ExecuteMultiOperationRequest'Operation =>
(ExecuteMultiOperationRequest'Operation
 -> ExecuteMultiOperationRequest'Operation -> Ordering)
-> (ExecuteMultiOperationRequest'Operation
    -> ExecuteMultiOperationRequest'Operation -> Bool)
-> (ExecuteMultiOperationRequest'Operation
    -> ExecuteMultiOperationRequest'Operation -> Bool)
-> (ExecuteMultiOperationRequest'Operation
    -> ExecuteMultiOperationRequest'Operation -> Bool)
-> (ExecuteMultiOperationRequest'Operation
    -> ExecuteMultiOperationRequest'Operation -> Bool)
-> (ExecuteMultiOperationRequest'Operation
    -> ExecuteMultiOperationRequest'Operation
    -> ExecuteMultiOperationRequest'Operation)
-> (ExecuteMultiOperationRequest'Operation
    -> ExecuteMultiOperationRequest'Operation
    -> ExecuteMultiOperationRequest'Operation)
-> Ord ExecuteMultiOperationRequest'Operation
ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Bool
ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Ordering
ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation
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 :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Ordering
compare :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Ordering
$c< :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Bool
< :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Bool
$c<= :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Bool
<= :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Bool
$c> :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Bool
> :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Bool
$c>= :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Bool
>= :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation -> Bool
$cmax :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation
max :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation
$cmin :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation
min :: ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation
-> ExecuteMultiOperationRequest'Operation
Prelude.Ord)
instance Prelude.Show ExecuteMultiOperationRequest'Operation where
  showsPrec :: Int -> ExecuteMultiOperationRequest'Operation -> ShowS
showsPrec Int
_ ExecuteMultiOperationRequest'Operation
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ExecuteMultiOperationRequest'Operation -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ExecuteMultiOperationRequest'Operation
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data ExecuteMultiOperationRequest'Operation'Operation
  = ExecuteMultiOperationRequest'Operation'StartWorkflow !StartWorkflowExecutionRequest |
    ExecuteMultiOperationRequest'Operation'UpdateWorkflow !UpdateWorkflowExecutionRequest
  deriving stock (Int -> ExecuteMultiOperationRequest'Operation'Operation -> ShowS
[ExecuteMultiOperationRequest'Operation'Operation] -> ShowS
ExecuteMultiOperationRequest'Operation'Operation -> String
(Int -> ExecuteMultiOperationRequest'Operation'Operation -> ShowS)
-> (ExecuteMultiOperationRequest'Operation'Operation -> String)
-> ([ExecuteMultiOperationRequest'Operation'Operation] -> ShowS)
-> Show ExecuteMultiOperationRequest'Operation'Operation
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ExecuteMultiOperationRequest'Operation'Operation -> ShowS
showsPrec :: Int -> ExecuteMultiOperationRequest'Operation'Operation -> ShowS
$cshow :: ExecuteMultiOperationRequest'Operation'Operation -> String
show :: ExecuteMultiOperationRequest'Operation'Operation -> String
$cshowList :: [ExecuteMultiOperationRequest'Operation'Operation] -> ShowS
showList :: [ExecuteMultiOperationRequest'Operation'Operation] -> ShowS
Prelude.Show, ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Bool
(ExecuteMultiOperationRequest'Operation'Operation
 -> ExecuteMultiOperationRequest'Operation'Operation -> Bool)
-> (ExecuteMultiOperationRequest'Operation'Operation
    -> ExecuteMultiOperationRequest'Operation'Operation -> Bool)
-> Eq ExecuteMultiOperationRequest'Operation'Operation
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Bool
== :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Bool
$c/= :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Bool
/= :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Bool
Prelude.Eq, Eq ExecuteMultiOperationRequest'Operation'Operation
Eq ExecuteMultiOperationRequest'Operation'Operation =>
(ExecuteMultiOperationRequest'Operation'Operation
 -> ExecuteMultiOperationRequest'Operation'Operation -> Ordering)
-> (ExecuteMultiOperationRequest'Operation'Operation
    -> ExecuteMultiOperationRequest'Operation'Operation -> Bool)
-> (ExecuteMultiOperationRequest'Operation'Operation
    -> ExecuteMultiOperationRequest'Operation'Operation -> Bool)
-> (ExecuteMultiOperationRequest'Operation'Operation
    -> ExecuteMultiOperationRequest'Operation'Operation -> Bool)
-> (ExecuteMultiOperationRequest'Operation'Operation
    -> ExecuteMultiOperationRequest'Operation'Operation -> Bool)
-> (ExecuteMultiOperationRequest'Operation'Operation
    -> ExecuteMultiOperationRequest'Operation'Operation
    -> ExecuteMultiOperationRequest'Operation'Operation)
-> (ExecuteMultiOperationRequest'Operation'Operation
    -> ExecuteMultiOperationRequest'Operation'Operation
    -> ExecuteMultiOperationRequest'Operation'Operation)
-> Ord ExecuteMultiOperationRequest'Operation'Operation
ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Bool
ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Ordering
ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation
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 :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Ordering
compare :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Ordering
$c< :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Bool
< :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Bool
$c<= :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Bool
<= :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Bool
$c> :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Bool
> :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Bool
$c>= :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Bool
>= :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation -> Bool
$cmax :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation
max :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation
$cmin :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation
min :: ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation
-> ExecuteMultiOperationRequest'Operation'Operation
Prelude.Ord)
instance Data.ProtoLens.Field.HasField ExecuteMultiOperationRequest'Operation "maybe'operation" (Prelude.Maybe ExecuteMultiOperationRequest'Operation'Operation) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'operation"
-> (Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
-> ExecuteMultiOperationRequest'Operation
-> f ExecuteMultiOperationRequest'Operation
fieldOf Proxy# "maybe'operation"
_
    = ((Maybe ExecuteMultiOperationRequest'Operation'Operation
  -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
 -> ExecuteMultiOperationRequest'Operation
 -> f ExecuteMultiOperationRequest'Operation)
-> ((Maybe ExecuteMultiOperationRequest'Operation'Operation
     -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
    -> Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
-> (Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
-> ExecuteMultiOperationRequest'Operation
-> f ExecuteMultiOperationRequest'Operation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExecuteMultiOperationRequest'Operation
 -> Maybe ExecuteMultiOperationRequest'Operation'Operation)
-> (ExecuteMultiOperationRequest'Operation
    -> Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> ExecuteMultiOperationRequest'Operation)
-> Lens
     ExecuteMultiOperationRequest'Operation
     ExecuteMultiOperationRequest'Operation
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExecuteMultiOperationRequest'Operation
-> Maybe ExecuteMultiOperationRequest'Operation'Operation
_ExecuteMultiOperationRequest'Operation'operation
           (\ ExecuteMultiOperationRequest'Operation
x__ Maybe ExecuteMultiOperationRequest'Operation'Operation
y__
              -> ExecuteMultiOperationRequest'Operation
x__ {_ExecuteMultiOperationRequest'Operation'operation = y__}))
        (Maybe ExecuteMultiOperationRequest'Operation'Operation
 -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
-> Maybe ExecuteMultiOperationRequest'Operation'Operation
-> f (Maybe ExecuteMultiOperationRequest'Operation'Operation)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExecuteMultiOperationRequest'Operation "maybe'startWorkflow" (Prelude.Maybe StartWorkflowExecutionRequest) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startWorkflow"
-> (Maybe StartWorkflowExecutionRequest
    -> f (Maybe StartWorkflowExecutionRequest))
-> ExecuteMultiOperationRequest'Operation
-> f ExecuteMultiOperationRequest'Operation
fieldOf Proxy# "maybe'startWorkflow"
_
    = ((Maybe ExecuteMultiOperationRequest'Operation'Operation
  -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
 -> ExecuteMultiOperationRequest'Operation
 -> f ExecuteMultiOperationRequest'Operation)
-> ((Maybe StartWorkflowExecutionRequest
     -> f (Maybe StartWorkflowExecutionRequest))
    -> Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
-> (Maybe StartWorkflowExecutionRequest
    -> f (Maybe StartWorkflowExecutionRequest))
-> ExecuteMultiOperationRequest'Operation
-> f ExecuteMultiOperationRequest'Operation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExecuteMultiOperationRequest'Operation
 -> Maybe ExecuteMultiOperationRequest'Operation'Operation)
-> (ExecuteMultiOperationRequest'Operation
    -> Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> ExecuteMultiOperationRequest'Operation)
-> Lens
     ExecuteMultiOperationRequest'Operation
     ExecuteMultiOperationRequest'Operation
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExecuteMultiOperationRequest'Operation
-> Maybe ExecuteMultiOperationRequest'Operation'Operation
_ExecuteMultiOperationRequest'Operation'operation
           (\ ExecuteMultiOperationRequest'Operation
x__ Maybe ExecuteMultiOperationRequest'Operation'Operation
y__
              -> ExecuteMultiOperationRequest'Operation
x__ {_ExecuteMultiOperationRequest'Operation'operation = y__}))
        ((Maybe ExecuteMultiOperationRequest'Operation'Operation
 -> Maybe StartWorkflowExecutionRequest)
-> (Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> Maybe StartWorkflowExecutionRequest
    -> Maybe ExecuteMultiOperationRequest'Operation'Operation)
-> Lens
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
     (Maybe StartWorkflowExecutionRequest)
     (Maybe StartWorkflowExecutionRequest)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe ExecuteMultiOperationRequest'Operation'Operation
x__
              -> case Maybe ExecuteMultiOperationRequest'Operation'Operation
x__ of
                   (Prelude.Just (ExecuteMultiOperationRequest'Operation'StartWorkflow StartWorkflowExecutionRequest
x__val))
                     -> StartWorkflowExecutionRequest
-> Maybe StartWorkflowExecutionRequest
forall a. a -> Maybe a
Prelude.Just StartWorkflowExecutionRequest
x__val
                   Maybe ExecuteMultiOperationRequest'Operation'Operation
_otherwise -> Maybe StartWorkflowExecutionRequest
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe ExecuteMultiOperationRequest'Operation'Operation
_ Maybe StartWorkflowExecutionRequest
y__
              -> (StartWorkflowExecutionRequest
 -> ExecuteMultiOperationRequest'Operation'Operation)
-> Maybe StartWorkflowExecutionRequest
-> Maybe ExecuteMultiOperationRequest'Operation'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   StartWorkflowExecutionRequest
-> ExecuteMultiOperationRequest'Operation'Operation
ExecuteMultiOperationRequest'Operation'StartWorkflow Maybe StartWorkflowExecutionRequest
y__))
instance Data.ProtoLens.Field.HasField ExecuteMultiOperationRequest'Operation "startWorkflow" StartWorkflowExecutionRequest where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startWorkflow"
-> (StartWorkflowExecutionRequest
    -> f StartWorkflowExecutionRequest)
-> ExecuteMultiOperationRequest'Operation
-> f ExecuteMultiOperationRequest'Operation
fieldOf Proxy# "startWorkflow"
_
    = ((Maybe ExecuteMultiOperationRequest'Operation'Operation
  -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
 -> ExecuteMultiOperationRequest'Operation
 -> f ExecuteMultiOperationRequest'Operation)
-> ((StartWorkflowExecutionRequest
     -> f StartWorkflowExecutionRequest)
    -> Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
-> (StartWorkflowExecutionRequest
    -> f StartWorkflowExecutionRequest)
-> ExecuteMultiOperationRequest'Operation
-> f ExecuteMultiOperationRequest'Operation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExecuteMultiOperationRequest'Operation
 -> Maybe ExecuteMultiOperationRequest'Operation'Operation)
-> (ExecuteMultiOperationRequest'Operation
    -> Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> ExecuteMultiOperationRequest'Operation)
-> Lens
     ExecuteMultiOperationRequest'Operation
     ExecuteMultiOperationRequest'Operation
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExecuteMultiOperationRequest'Operation
-> Maybe ExecuteMultiOperationRequest'Operation'Operation
_ExecuteMultiOperationRequest'Operation'operation
           (\ ExecuteMultiOperationRequest'Operation
x__ Maybe ExecuteMultiOperationRequest'Operation'Operation
y__
              -> ExecuteMultiOperationRequest'Operation
x__ {_ExecuteMultiOperationRequest'Operation'operation = y__}))
        (((Maybe StartWorkflowExecutionRequest
  -> f (Maybe StartWorkflowExecutionRequest))
 -> Maybe ExecuteMultiOperationRequest'Operation'Operation
 -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
-> ((StartWorkflowExecutionRequest
     -> f StartWorkflowExecutionRequest)
    -> Maybe StartWorkflowExecutionRequest
    -> f (Maybe StartWorkflowExecutionRequest))
-> (StartWorkflowExecutionRequest
    -> f StartWorkflowExecutionRequest)
-> Maybe ExecuteMultiOperationRequest'Operation'Operation
-> f (Maybe ExecuteMultiOperationRequest'Operation'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe ExecuteMultiOperationRequest'Operation'Operation
 -> Maybe StartWorkflowExecutionRequest)
-> (Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> Maybe StartWorkflowExecutionRequest
    -> Maybe ExecuteMultiOperationRequest'Operation'Operation)
-> Lens
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
     (Maybe StartWorkflowExecutionRequest)
     (Maybe StartWorkflowExecutionRequest)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe ExecuteMultiOperationRequest'Operation'Operation
x__
                 -> case Maybe ExecuteMultiOperationRequest'Operation'Operation
x__ of
                      (Prelude.Just (ExecuteMultiOperationRequest'Operation'StartWorkflow StartWorkflowExecutionRequest
x__val))
                        -> StartWorkflowExecutionRequest
-> Maybe StartWorkflowExecutionRequest
forall a. a -> Maybe a
Prelude.Just StartWorkflowExecutionRequest
x__val
                      Maybe ExecuteMultiOperationRequest'Operation'Operation
_otherwise -> Maybe StartWorkflowExecutionRequest
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe ExecuteMultiOperationRequest'Operation'Operation
_ Maybe StartWorkflowExecutionRequest
y__
                 -> (StartWorkflowExecutionRequest
 -> ExecuteMultiOperationRequest'Operation'Operation)
-> Maybe StartWorkflowExecutionRequest
-> Maybe ExecuteMultiOperationRequest'Operation'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      StartWorkflowExecutionRequest
-> ExecuteMultiOperationRequest'Operation'Operation
ExecuteMultiOperationRequest'Operation'StartWorkflow Maybe StartWorkflowExecutionRequest
y__))
           (StartWorkflowExecutionRequest
-> Lens'
     (Maybe StartWorkflowExecutionRequest) StartWorkflowExecutionRequest
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens StartWorkflowExecutionRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField ExecuteMultiOperationRequest'Operation "maybe'updateWorkflow" (Prelude.Maybe UpdateWorkflowExecutionRequest) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'updateWorkflow"
-> (Maybe UpdateWorkflowExecutionRequest
    -> f (Maybe UpdateWorkflowExecutionRequest))
-> ExecuteMultiOperationRequest'Operation
-> f ExecuteMultiOperationRequest'Operation
fieldOf Proxy# "maybe'updateWorkflow"
_
    = ((Maybe ExecuteMultiOperationRequest'Operation'Operation
  -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
 -> ExecuteMultiOperationRequest'Operation
 -> f ExecuteMultiOperationRequest'Operation)
-> ((Maybe UpdateWorkflowExecutionRequest
     -> f (Maybe UpdateWorkflowExecutionRequest))
    -> Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
-> (Maybe UpdateWorkflowExecutionRequest
    -> f (Maybe UpdateWorkflowExecutionRequest))
-> ExecuteMultiOperationRequest'Operation
-> f ExecuteMultiOperationRequest'Operation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExecuteMultiOperationRequest'Operation
 -> Maybe ExecuteMultiOperationRequest'Operation'Operation)
-> (ExecuteMultiOperationRequest'Operation
    -> Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> ExecuteMultiOperationRequest'Operation)
-> Lens
     ExecuteMultiOperationRequest'Operation
     ExecuteMultiOperationRequest'Operation
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExecuteMultiOperationRequest'Operation
-> Maybe ExecuteMultiOperationRequest'Operation'Operation
_ExecuteMultiOperationRequest'Operation'operation
           (\ ExecuteMultiOperationRequest'Operation
x__ Maybe ExecuteMultiOperationRequest'Operation'Operation
y__
              -> ExecuteMultiOperationRequest'Operation
x__ {_ExecuteMultiOperationRequest'Operation'operation = y__}))
        ((Maybe ExecuteMultiOperationRequest'Operation'Operation
 -> Maybe UpdateWorkflowExecutionRequest)
-> (Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> Maybe UpdateWorkflowExecutionRequest
    -> Maybe ExecuteMultiOperationRequest'Operation'Operation)
-> Lens
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
     (Maybe UpdateWorkflowExecutionRequest)
     (Maybe UpdateWorkflowExecutionRequest)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe ExecuteMultiOperationRequest'Operation'Operation
x__
              -> case Maybe ExecuteMultiOperationRequest'Operation'Operation
x__ of
                   (Prelude.Just (ExecuteMultiOperationRequest'Operation'UpdateWorkflow UpdateWorkflowExecutionRequest
x__val))
                     -> UpdateWorkflowExecutionRequest
-> Maybe UpdateWorkflowExecutionRequest
forall a. a -> Maybe a
Prelude.Just UpdateWorkflowExecutionRequest
x__val
                   Maybe ExecuteMultiOperationRequest'Operation'Operation
_otherwise -> Maybe UpdateWorkflowExecutionRequest
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe ExecuteMultiOperationRequest'Operation'Operation
_ Maybe UpdateWorkflowExecutionRequest
y__
              -> (UpdateWorkflowExecutionRequest
 -> ExecuteMultiOperationRequest'Operation'Operation)
-> Maybe UpdateWorkflowExecutionRequest
-> Maybe ExecuteMultiOperationRequest'Operation'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   UpdateWorkflowExecutionRequest
-> ExecuteMultiOperationRequest'Operation'Operation
ExecuteMultiOperationRequest'Operation'UpdateWorkflow Maybe UpdateWorkflowExecutionRequest
y__))
instance Data.ProtoLens.Field.HasField ExecuteMultiOperationRequest'Operation "updateWorkflow" UpdateWorkflowExecutionRequest where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "updateWorkflow"
-> (UpdateWorkflowExecutionRequest
    -> f UpdateWorkflowExecutionRequest)
-> ExecuteMultiOperationRequest'Operation
-> f ExecuteMultiOperationRequest'Operation
fieldOf Proxy# "updateWorkflow"
_
    = ((Maybe ExecuteMultiOperationRequest'Operation'Operation
  -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
 -> ExecuteMultiOperationRequest'Operation
 -> f ExecuteMultiOperationRequest'Operation)
-> ((UpdateWorkflowExecutionRequest
     -> f UpdateWorkflowExecutionRequest)
    -> Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
-> (UpdateWorkflowExecutionRequest
    -> f UpdateWorkflowExecutionRequest)
-> ExecuteMultiOperationRequest'Operation
-> f ExecuteMultiOperationRequest'Operation
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExecuteMultiOperationRequest'Operation
 -> Maybe ExecuteMultiOperationRequest'Operation'Operation)
-> (ExecuteMultiOperationRequest'Operation
    -> Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> ExecuteMultiOperationRequest'Operation)
-> Lens
     ExecuteMultiOperationRequest'Operation
     ExecuteMultiOperationRequest'Operation
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExecuteMultiOperationRequest'Operation
-> Maybe ExecuteMultiOperationRequest'Operation'Operation
_ExecuteMultiOperationRequest'Operation'operation
           (\ ExecuteMultiOperationRequest'Operation
x__ Maybe ExecuteMultiOperationRequest'Operation'Operation
y__
              -> ExecuteMultiOperationRequest'Operation
x__ {_ExecuteMultiOperationRequest'Operation'operation = y__}))
        (((Maybe UpdateWorkflowExecutionRequest
  -> f (Maybe UpdateWorkflowExecutionRequest))
 -> Maybe ExecuteMultiOperationRequest'Operation'Operation
 -> f (Maybe ExecuteMultiOperationRequest'Operation'Operation))
-> ((UpdateWorkflowExecutionRequest
     -> f UpdateWorkflowExecutionRequest)
    -> Maybe UpdateWorkflowExecutionRequest
    -> f (Maybe UpdateWorkflowExecutionRequest))
-> (UpdateWorkflowExecutionRequest
    -> f UpdateWorkflowExecutionRequest)
-> Maybe ExecuteMultiOperationRequest'Operation'Operation
-> f (Maybe ExecuteMultiOperationRequest'Operation'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe ExecuteMultiOperationRequest'Operation'Operation
 -> Maybe UpdateWorkflowExecutionRequest)
-> (Maybe ExecuteMultiOperationRequest'Operation'Operation
    -> Maybe UpdateWorkflowExecutionRequest
    -> Maybe ExecuteMultiOperationRequest'Operation'Operation)
-> Lens
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
     (Maybe ExecuteMultiOperationRequest'Operation'Operation)
     (Maybe UpdateWorkflowExecutionRequest)
     (Maybe UpdateWorkflowExecutionRequest)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe ExecuteMultiOperationRequest'Operation'Operation
x__
                 -> case Maybe ExecuteMultiOperationRequest'Operation'Operation
x__ of
                      (Prelude.Just (ExecuteMultiOperationRequest'Operation'UpdateWorkflow UpdateWorkflowExecutionRequest
x__val))
                        -> UpdateWorkflowExecutionRequest
-> Maybe UpdateWorkflowExecutionRequest
forall a. a -> Maybe a
Prelude.Just UpdateWorkflowExecutionRequest
x__val
                      Maybe ExecuteMultiOperationRequest'Operation'Operation
_otherwise -> Maybe UpdateWorkflowExecutionRequest
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe ExecuteMultiOperationRequest'Operation'Operation
_ Maybe UpdateWorkflowExecutionRequest
y__
                 -> (UpdateWorkflowExecutionRequest
 -> ExecuteMultiOperationRequest'Operation'Operation)
-> Maybe UpdateWorkflowExecutionRequest
-> Maybe ExecuteMultiOperationRequest'Operation'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      UpdateWorkflowExecutionRequest
-> ExecuteMultiOperationRequest'Operation'Operation
ExecuteMultiOperationRequest'Operation'UpdateWorkflow Maybe UpdateWorkflowExecutionRequest
y__))
           (UpdateWorkflowExecutionRequest
-> Lens'
     (Maybe UpdateWorkflowExecutionRequest)
     UpdateWorkflowExecutionRequest
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateWorkflowExecutionRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message ExecuteMultiOperationRequest'Operation where
  messageName :: Proxy ExecuteMultiOperationRequest'Operation -> Text
messageName Proxy ExecuteMultiOperationRequest'Operation
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ExecuteMultiOperationRequest.Operation"
  packedMessageDescriptor :: Proxy ExecuteMultiOperationRequest'Operation -> ByteString
packedMessageDescriptor Proxy ExecuteMultiOperationRequest'Operation
_
    = ByteString
"\n\
      \\tOperation\DC2g\n\
      \\SOstart_workflow\CAN\SOH \SOH(\v2>.temporal.api.workflowservice.v1.StartWorkflowExecutionRequestH\NULR\rstartWorkflow\DC2j\n\
      \\SIupdate_workflow\CAN\STX \SOH(\v2?.temporal.api.workflowservice.v1.UpdateWorkflowExecutionRequestH\NULR\SOupdateWorkflowB\v\n\
      \\toperation"
  packedFileDescriptor :: Proxy ExecuteMultiOperationRequest'Operation -> ByteString
packedFileDescriptor Proxy ExecuteMultiOperationRequest'Operation
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ExecuteMultiOperationRequest'Operation)
fieldsByTag
    = let
        startWorkflow__field_descriptor :: FieldDescriptor ExecuteMultiOperationRequest'Operation
startWorkflow__field_descriptor
          = String
-> FieldTypeDescriptor StartWorkflowExecutionRequest
-> FieldAccessor
     ExecuteMultiOperationRequest'Operation
     StartWorkflowExecutionRequest
-> FieldDescriptor ExecuteMultiOperationRequest'Operation
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_workflow"
              (MessageOrGroup -> FieldTypeDescriptor StartWorkflowExecutionRequest
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor StartWorkflowExecutionRequest)
              (Lens'
  ExecuteMultiOperationRequest'Operation
  (Maybe StartWorkflowExecutionRequest)
-> FieldAccessor
     ExecuteMultiOperationRequest'Operation
     StartWorkflowExecutionRequest
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startWorkflow")) ::
              Data.ProtoLens.FieldDescriptor ExecuteMultiOperationRequest'Operation
        updateWorkflow__field_descriptor :: FieldDescriptor ExecuteMultiOperationRequest'Operation
updateWorkflow__field_descriptor
          = String
-> FieldTypeDescriptor UpdateWorkflowExecutionRequest
-> FieldAccessor
     ExecuteMultiOperationRequest'Operation
     UpdateWorkflowExecutionRequest
-> FieldDescriptor ExecuteMultiOperationRequest'Operation
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"update_workflow"
              (MessageOrGroup
-> FieldTypeDescriptor UpdateWorkflowExecutionRequest
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpdateWorkflowExecutionRequest)
              (Lens'
  ExecuteMultiOperationRequest'Operation
  (Maybe UpdateWorkflowExecutionRequest)
-> FieldAccessor
     ExecuteMultiOperationRequest'Operation
     UpdateWorkflowExecutionRequest
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'updateWorkflow")) ::
              Data.ProtoLens.FieldDescriptor ExecuteMultiOperationRequest'Operation
      in
        [(Tag, FieldDescriptor ExecuteMultiOperationRequest'Operation)]
-> Map Tag (FieldDescriptor ExecuteMultiOperationRequest'Operation)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ExecuteMultiOperationRequest'Operation
startWorkflow__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ExecuteMultiOperationRequest'Operation
updateWorkflow__field_descriptor)]
  unknownFields :: Lens' ExecuteMultiOperationRequest'Operation FieldSet
unknownFields
    = (ExecuteMultiOperationRequest'Operation -> FieldSet)
-> (ExecuteMultiOperationRequest'Operation
    -> FieldSet -> ExecuteMultiOperationRequest'Operation)
-> Lens' ExecuteMultiOperationRequest'Operation FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ExecuteMultiOperationRequest'Operation -> FieldSet
_ExecuteMultiOperationRequest'Operation'_unknownFields
        (\ ExecuteMultiOperationRequest'Operation
x__ FieldSet
y__
           -> ExecuteMultiOperationRequest'Operation
x__
                {_ExecuteMultiOperationRequest'Operation'_unknownFields = y__})
  defMessage :: ExecuteMultiOperationRequest'Operation
defMessage
    = ExecuteMultiOperationRequest'Operation'_constructor
        {_ExecuteMultiOperationRequest'Operation'operation :: Maybe ExecuteMultiOperationRequest'Operation'Operation
_ExecuteMultiOperationRequest'Operation'operation = Maybe ExecuteMultiOperationRequest'Operation'Operation
forall a. Maybe a
Prelude.Nothing,
         _ExecuteMultiOperationRequest'Operation'_unknownFields :: FieldSet
_ExecuteMultiOperationRequest'Operation'_unknownFields = []}
  parseMessage :: Parser ExecuteMultiOperationRequest'Operation
parseMessage
    = let
        loop ::
          ExecuteMultiOperationRequest'Operation
          -> Data.ProtoLens.Encoding.Bytes.Parser ExecuteMultiOperationRequest'Operation
        loop :: ExecuteMultiOperationRequest'Operation
-> Parser ExecuteMultiOperationRequest'Operation
loop ExecuteMultiOperationRequest'Operation
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 StartWorkflowExecutionRequest
-> String -> Parser StartWorkflowExecutionRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"start_workflow"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startWorkflow") y x)
                        Word64
18
                          -> do y <- Parser UpdateWorkflowExecutionRequest
-> String -> Parser UpdateWorkflowExecutionRequest
forall a. Parser a -> String -> Parser a
(Data.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_workflow"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"updateWorkflow") 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 ExecuteMultiOperationRequest'Operation
-> String -> Parser ExecuteMultiOperationRequest'Operation
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ExecuteMultiOperationRequest'Operation
-> Parser ExecuteMultiOperationRequest'Operation
loop ExecuteMultiOperationRequest'Operation
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"Operation"
  buildMessage :: ExecuteMultiOperationRequest'Operation -> Builder
buildMessage
    = \ ExecuteMultiOperationRequest'Operation
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe ExecuteMultiOperationRequest'Operation'Operation)
  ExecuteMultiOperationRequest'Operation
  ExecuteMultiOperationRequest'Operation
  (Maybe ExecuteMultiOperationRequest'Operation'Operation)
  (Maybe ExecuteMultiOperationRequest'Operation'Operation)
-> ExecuteMultiOperationRequest'Operation
-> Maybe ExecuteMultiOperationRequest'Operation'Operation
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'operation") ExecuteMultiOperationRequest'Operation
_x
              of
                Maybe ExecuteMultiOperationRequest'Operation'Operation
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just (ExecuteMultiOperationRequest'Operation'StartWorkflow StartWorkflowExecutionRequest
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (StartWorkflowExecutionRequest -> ByteString)
-> StartWorkflowExecutionRequest
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          StartWorkflowExecutionRequest -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage StartWorkflowExecutionRequest
v)
                (Prelude.Just (ExecuteMultiOperationRequest'Operation'UpdateWorkflow UpdateWorkflowExecutionRequest
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                       ((ByteString -> Builder)
-> (UpdateWorkflowExecutionRequest -> ByteString)
-> UpdateWorkflowExecutionRequest
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          UpdateWorkflowExecutionRequest -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateWorkflowExecutionRequest
v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  ExecuteMultiOperationRequest'Operation
  ExecuteMultiOperationRequest'Operation
  FieldSet
  FieldSet
-> ExecuteMultiOperationRequest'Operation -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ExecuteMultiOperationRequest'Operation
  ExecuteMultiOperationRequest'Operation
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ExecuteMultiOperationRequest'Operation FieldSet
Data.ProtoLens.unknownFields ExecuteMultiOperationRequest'Operation
_x))
instance Control.DeepSeq.NFData ExecuteMultiOperationRequest'Operation where
  rnf :: ExecuteMultiOperationRequest'Operation -> ()
rnf
    = \ ExecuteMultiOperationRequest'Operation
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ExecuteMultiOperationRequest'Operation -> FieldSet
_ExecuteMultiOperationRequest'Operation'_unknownFields ExecuteMultiOperationRequest'Operation
x__)
             (Maybe ExecuteMultiOperationRequest'Operation'Operation -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ExecuteMultiOperationRequest'Operation
-> Maybe ExecuteMultiOperationRequest'Operation'Operation
_ExecuteMultiOperationRequest'Operation'operation ExecuteMultiOperationRequest'Operation
x__) ())
instance Control.DeepSeq.NFData ExecuteMultiOperationRequest'Operation'Operation where
  rnf :: ExecuteMultiOperationRequest'Operation'Operation -> ()
rnf (ExecuteMultiOperationRequest'Operation'StartWorkflow StartWorkflowExecutionRequest
x__)
    = StartWorkflowExecutionRequest -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf StartWorkflowExecutionRequest
x__
  rnf (ExecuteMultiOperationRequest'Operation'UpdateWorkflow UpdateWorkflowExecutionRequest
x__)
    = UpdateWorkflowExecutionRequest -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf UpdateWorkflowExecutionRequest
x__
_ExecuteMultiOperationRequest'Operation'StartWorkflow ::
  Data.ProtoLens.Prism.Prism' ExecuteMultiOperationRequest'Operation'Operation StartWorkflowExecutionRequest
_ExecuteMultiOperationRequest'Operation'StartWorkflow :: Prism'
  ExecuteMultiOperationRequest'Operation'Operation
  StartWorkflowExecutionRequest
_ExecuteMultiOperationRequest'Operation'StartWorkflow
  = (StartWorkflowExecutionRequest
 -> ExecuteMultiOperationRequest'Operation'Operation)
-> (ExecuteMultiOperationRequest'Operation'Operation
    -> Maybe StartWorkflowExecutionRequest)
-> Prism'
     ExecuteMultiOperationRequest'Operation'Operation
     StartWorkflowExecutionRequest
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      StartWorkflowExecutionRequest
-> ExecuteMultiOperationRequest'Operation'Operation
ExecuteMultiOperationRequest'Operation'StartWorkflow
      (\ ExecuteMultiOperationRequest'Operation'Operation
p__
         -> case ExecuteMultiOperationRequest'Operation'Operation
p__ of
              (ExecuteMultiOperationRequest'Operation'StartWorkflow StartWorkflowExecutionRequest
p__val)
                -> StartWorkflowExecutionRequest
-> Maybe StartWorkflowExecutionRequest
forall a. a -> Maybe a
Prelude.Just StartWorkflowExecutionRequest
p__val
              ExecuteMultiOperationRequest'Operation'Operation
_otherwise -> Maybe StartWorkflowExecutionRequest
forall a. Maybe a
Prelude.Nothing)
_ExecuteMultiOperationRequest'Operation'UpdateWorkflow ::
  Data.ProtoLens.Prism.Prism' ExecuteMultiOperationRequest'Operation'Operation UpdateWorkflowExecutionRequest
_ExecuteMultiOperationRequest'Operation'UpdateWorkflow :: Prism'
  ExecuteMultiOperationRequest'Operation'Operation
  UpdateWorkflowExecutionRequest
_ExecuteMultiOperationRequest'Operation'UpdateWorkflow
  = (UpdateWorkflowExecutionRequest
 -> ExecuteMultiOperationRequest'Operation'Operation)
-> (ExecuteMultiOperationRequest'Operation'Operation
    -> Maybe UpdateWorkflowExecutionRequest)
-> Prism'
     ExecuteMultiOperationRequest'Operation'Operation
     UpdateWorkflowExecutionRequest
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      UpdateWorkflowExecutionRequest
-> ExecuteMultiOperationRequest'Operation'Operation
ExecuteMultiOperationRequest'Operation'UpdateWorkflow
      (\ ExecuteMultiOperationRequest'Operation'Operation
p__
         -> case ExecuteMultiOperationRequest'Operation'Operation
p__ of
              (ExecuteMultiOperationRequest'Operation'UpdateWorkflow UpdateWorkflowExecutionRequest
p__val)
                -> UpdateWorkflowExecutionRequest
-> Maybe UpdateWorkflowExecutionRequest
forall a. a -> Maybe a
Prelude.Just UpdateWorkflowExecutionRequest
p__val
              ExecuteMultiOperationRequest'Operation'Operation
_otherwise -> Maybe UpdateWorkflowExecutionRequest
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.responses' @:: Lens' ExecuteMultiOperationResponse [ExecuteMultiOperationResponse'Response]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'responses' @:: Lens' ExecuteMultiOperationResponse (Data.Vector.Vector ExecuteMultiOperationResponse'Response)@ -}
data ExecuteMultiOperationResponse
  = ExecuteMultiOperationResponse'_constructor {ExecuteMultiOperationResponse
-> Vector ExecuteMultiOperationResponse'Response
_ExecuteMultiOperationResponse'responses :: !(Data.Vector.Vector ExecuteMultiOperationResponse'Response),
                                                ExecuteMultiOperationResponse -> FieldSet
_ExecuteMultiOperationResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Bool
(ExecuteMultiOperationResponse
 -> ExecuteMultiOperationResponse -> Bool)
-> (ExecuteMultiOperationResponse
    -> ExecuteMultiOperationResponse -> Bool)
-> Eq ExecuteMultiOperationResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Bool
== :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Bool
$c/= :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Bool
/= :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Bool
Prelude.Eq, Eq ExecuteMultiOperationResponse
Eq ExecuteMultiOperationResponse =>
(ExecuteMultiOperationResponse
 -> ExecuteMultiOperationResponse -> Ordering)
-> (ExecuteMultiOperationResponse
    -> ExecuteMultiOperationResponse -> Bool)
-> (ExecuteMultiOperationResponse
    -> ExecuteMultiOperationResponse -> Bool)
-> (ExecuteMultiOperationResponse
    -> ExecuteMultiOperationResponse -> Bool)
-> (ExecuteMultiOperationResponse
    -> ExecuteMultiOperationResponse -> Bool)
-> (ExecuteMultiOperationResponse
    -> ExecuteMultiOperationResponse -> ExecuteMultiOperationResponse)
-> (ExecuteMultiOperationResponse
    -> ExecuteMultiOperationResponse -> ExecuteMultiOperationResponse)
-> Ord ExecuteMultiOperationResponse
ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Bool
ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Ordering
ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> ExecuteMultiOperationResponse
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 :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Ordering
compare :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Ordering
$c< :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Bool
< :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Bool
$c<= :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Bool
<= :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Bool
$c> :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Bool
> :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Bool
$c>= :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Bool
>= :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> Bool
$cmax :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> ExecuteMultiOperationResponse
max :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> ExecuteMultiOperationResponse
$cmin :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> ExecuteMultiOperationResponse
min :: ExecuteMultiOperationResponse
-> ExecuteMultiOperationResponse -> ExecuteMultiOperationResponse
Prelude.Ord)
instance Prelude.Show ExecuteMultiOperationResponse where
  showsPrec :: Int -> ExecuteMultiOperationResponse -> ShowS
showsPrec Int
_ ExecuteMultiOperationResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ExecuteMultiOperationResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ExecuteMultiOperationResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ExecuteMultiOperationResponse "responses" [ExecuteMultiOperationResponse'Response] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "responses"
-> ([ExecuteMultiOperationResponse'Response]
    -> f [ExecuteMultiOperationResponse'Response])
-> ExecuteMultiOperationResponse
-> f ExecuteMultiOperationResponse
fieldOf Proxy# "responses"
_
    = ((Vector ExecuteMultiOperationResponse'Response
  -> f (Vector ExecuteMultiOperationResponse'Response))
 -> ExecuteMultiOperationResponse
 -> f ExecuteMultiOperationResponse)
-> (([ExecuteMultiOperationResponse'Response]
     -> f [ExecuteMultiOperationResponse'Response])
    -> Vector ExecuteMultiOperationResponse'Response
    -> f (Vector ExecuteMultiOperationResponse'Response))
-> ([ExecuteMultiOperationResponse'Response]
    -> f [ExecuteMultiOperationResponse'Response])
-> ExecuteMultiOperationResponse
-> f ExecuteMultiOperationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExecuteMultiOperationResponse
 -> Vector ExecuteMultiOperationResponse'Response)
-> (ExecuteMultiOperationResponse
    -> Vector ExecuteMultiOperationResponse'Response
    -> ExecuteMultiOperationResponse)
-> Lens
     ExecuteMultiOperationResponse
     ExecuteMultiOperationResponse
     (Vector ExecuteMultiOperationResponse'Response)
     (Vector ExecuteMultiOperationResponse'Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExecuteMultiOperationResponse
-> Vector ExecuteMultiOperationResponse'Response
_ExecuteMultiOperationResponse'responses
           (\ ExecuteMultiOperationResponse
x__ Vector ExecuteMultiOperationResponse'Response
y__
              -> ExecuteMultiOperationResponse
x__ {_ExecuteMultiOperationResponse'responses = y__}))
        ((Vector ExecuteMultiOperationResponse'Response
 -> [ExecuteMultiOperationResponse'Response])
-> (Vector ExecuteMultiOperationResponse'Response
    -> [ExecuteMultiOperationResponse'Response]
    -> Vector ExecuteMultiOperationResponse'Response)
-> Lens
     (Vector ExecuteMultiOperationResponse'Response)
     (Vector ExecuteMultiOperationResponse'Response)
     [ExecuteMultiOperationResponse'Response]
     [ExecuteMultiOperationResponse'Response]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector ExecuteMultiOperationResponse'Response
-> [ExecuteMultiOperationResponse'Response]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector ExecuteMultiOperationResponse'Response
_ [ExecuteMultiOperationResponse'Response]
y__ -> [ExecuteMultiOperationResponse'Response]
-> Vector ExecuteMultiOperationResponse'Response
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [ExecuteMultiOperationResponse'Response]
y__))
instance Data.ProtoLens.Field.HasField ExecuteMultiOperationResponse "vec'responses" (Data.Vector.Vector ExecuteMultiOperationResponse'Response) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'responses"
-> (Vector ExecuteMultiOperationResponse'Response
    -> f (Vector ExecuteMultiOperationResponse'Response))
-> ExecuteMultiOperationResponse
-> f ExecuteMultiOperationResponse
fieldOf Proxy# "vec'responses"
_
    = ((Vector ExecuteMultiOperationResponse'Response
  -> f (Vector ExecuteMultiOperationResponse'Response))
 -> ExecuteMultiOperationResponse
 -> f ExecuteMultiOperationResponse)
-> ((Vector ExecuteMultiOperationResponse'Response
     -> f (Vector ExecuteMultiOperationResponse'Response))
    -> Vector ExecuteMultiOperationResponse'Response
    -> f (Vector ExecuteMultiOperationResponse'Response))
-> (Vector ExecuteMultiOperationResponse'Response
    -> f (Vector ExecuteMultiOperationResponse'Response))
-> ExecuteMultiOperationResponse
-> f ExecuteMultiOperationResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExecuteMultiOperationResponse
 -> Vector ExecuteMultiOperationResponse'Response)
-> (ExecuteMultiOperationResponse
    -> Vector ExecuteMultiOperationResponse'Response
    -> ExecuteMultiOperationResponse)
-> Lens
     ExecuteMultiOperationResponse
     ExecuteMultiOperationResponse
     (Vector ExecuteMultiOperationResponse'Response)
     (Vector ExecuteMultiOperationResponse'Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExecuteMultiOperationResponse
-> Vector ExecuteMultiOperationResponse'Response
_ExecuteMultiOperationResponse'responses
           (\ ExecuteMultiOperationResponse
x__ Vector ExecuteMultiOperationResponse'Response
y__
              -> ExecuteMultiOperationResponse
x__ {_ExecuteMultiOperationResponse'responses = y__}))
        (Vector ExecuteMultiOperationResponse'Response
 -> f (Vector ExecuteMultiOperationResponse'Response))
-> Vector ExecuteMultiOperationResponse'Response
-> f (Vector ExecuteMultiOperationResponse'Response)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ExecuteMultiOperationResponse where
  messageName :: Proxy ExecuteMultiOperationResponse -> Text
messageName Proxy ExecuteMultiOperationResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ExecuteMultiOperationResponse"
  packedMessageDescriptor :: Proxy ExecuteMultiOperationResponse -> ByteString
packedMessageDescriptor Proxy ExecuteMultiOperationResponse
_
    = ByteString
"\n\
      \\GSExecuteMultiOperationResponse\DC2e\n\
      \\tresponses\CAN\SOH \ETX(\v2G.temporal.api.workflowservice.v1.ExecuteMultiOperationResponse.ResponseR\tresponses\SUB\237\SOH\n\
      \\bResponse\DC2h\n\
      \\SOstart_workflow\CAN\SOH \SOH(\v2?.temporal.api.workflowservice.v1.StartWorkflowExecutionResponseH\NULR\rstartWorkflow\DC2k\n\
      \\SIupdate_workflow\CAN\STX \SOH(\v2@.temporal.api.workflowservice.v1.UpdateWorkflowExecutionResponseH\NULR\SOupdateWorkflowB\n\
      \\n\
      \\bresponse"
  packedFileDescriptor :: Proxy ExecuteMultiOperationResponse -> ByteString
packedFileDescriptor Proxy ExecuteMultiOperationResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ExecuteMultiOperationResponse)
fieldsByTag
    = let
        responses__field_descriptor :: FieldDescriptor ExecuteMultiOperationResponse
responses__field_descriptor
          = String
-> FieldTypeDescriptor ExecuteMultiOperationResponse'Response
-> FieldAccessor
     ExecuteMultiOperationResponse
     ExecuteMultiOperationResponse'Response
-> FieldDescriptor ExecuteMultiOperationResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"responses"
              (MessageOrGroup
-> FieldTypeDescriptor ExecuteMultiOperationResponse'Response
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ExecuteMultiOperationResponse'Response)
              (Packing
-> Lens'
     ExecuteMultiOperationResponse
     [ExecuteMultiOperationResponse'Response]
-> FieldAccessor
     ExecuteMultiOperationResponse
     ExecuteMultiOperationResponse'Response
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 @"responses")) ::
              Data.ProtoLens.FieldDescriptor ExecuteMultiOperationResponse
      in
        [(Tag, FieldDescriptor ExecuteMultiOperationResponse)]
-> Map Tag (FieldDescriptor ExecuteMultiOperationResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ExecuteMultiOperationResponse
responses__field_descriptor)]
  unknownFields :: Lens' ExecuteMultiOperationResponse FieldSet
unknownFields
    = (ExecuteMultiOperationResponse -> FieldSet)
-> (ExecuteMultiOperationResponse
    -> FieldSet -> ExecuteMultiOperationResponse)
-> Lens' ExecuteMultiOperationResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ExecuteMultiOperationResponse -> FieldSet
_ExecuteMultiOperationResponse'_unknownFields
        (\ ExecuteMultiOperationResponse
x__ FieldSet
y__
           -> ExecuteMultiOperationResponse
x__ {_ExecuteMultiOperationResponse'_unknownFields = y__})
  defMessage :: ExecuteMultiOperationResponse
defMessage
    = ExecuteMultiOperationResponse'_constructor
        {_ExecuteMultiOperationResponse'responses :: Vector ExecuteMultiOperationResponse'Response
_ExecuteMultiOperationResponse'responses = Vector ExecuteMultiOperationResponse'Response
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ExecuteMultiOperationResponse'_unknownFields :: FieldSet
_ExecuteMultiOperationResponse'_unknownFields = []}
  parseMessage :: Parser ExecuteMultiOperationResponse
parseMessage
    = let
        loop ::
          ExecuteMultiOperationResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ExecuteMultiOperationResponse'Response
             -> Data.ProtoLens.Encoding.Bytes.Parser ExecuteMultiOperationResponse
        loop :: ExecuteMultiOperationResponse
-> Growing Vector RealWorld ExecuteMultiOperationResponse'Response
-> Parser ExecuteMultiOperationResponse
loop ExecuteMultiOperationResponse
x Growing Vector RealWorld ExecuteMultiOperationResponse'Response
mutable'responses
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'responses <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                            (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                               mutable'responses)
                      (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'responses") frozen'responses x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser ExecuteMultiOperationResponse'Response
-> String -> Parser ExecuteMultiOperationResponse'Response
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"responses"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'responses y)
                                loop x v
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
                                  mutable'responses
      in
        Parser ExecuteMultiOperationResponse
-> String -> Parser ExecuteMultiOperationResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'responses <- IO
  (Growing Vector RealWorld ExecuteMultiOperationResponse'Response)
-> Parser
     (Growing Vector RealWorld ExecuteMultiOperationResponse'Response)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                     IO
  (Growing Vector RealWorld ExecuteMultiOperationResponse'Response)
IO
  (Growing
     Vector (PrimState IO) ExecuteMultiOperationResponse'Response)
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'responses)
          String
"ExecuteMultiOperationResponse"
  buildMessage :: ExecuteMultiOperationResponse -> Builder
buildMessage
    = \ ExecuteMultiOperationResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((ExecuteMultiOperationResponse'Response -> Builder)
-> Vector ExecuteMultiOperationResponse'Response -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ ExecuteMultiOperationResponse'Response
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (ExecuteMultiOperationResponse'Response -> ByteString)
-> ExecuteMultiOperationResponse'Response
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           ExecuteMultiOperationResponse'Response -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ExecuteMultiOperationResponse'Response
_v))
                (FoldLike
  (Vector ExecuteMultiOperationResponse'Response)
  ExecuteMultiOperationResponse
  ExecuteMultiOperationResponse
  (Vector ExecuteMultiOperationResponse'Response)
  (Vector ExecuteMultiOperationResponse'Response)
-> ExecuteMultiOperationResponse
-> Vector ExecuteMultiOperationResponse'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 @"vec'responses") ExecuteMultiOperationResponse
_x))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  ExecuteMultiOperationResponse
  ExecuteMultiOperationResponse
  FieldSet
  FieldSet
-> ExecuteMultiOperationResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ExecuteMultiOperationResponse
  ExecuteMultiOperationResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ExecuteMultiOperationResponse FieldSet
Data.ProtoLens.unknownFields ExecuteMultiOperationResponse
_x))
instance Control.DeepSeq.NFData ExecuteMultiOperationResponse where
  rnf :: ExecuteMultiOperationResponse -> ()
rnf
    = \ ExecuteMultiOperationResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ExecuteMultiOperationResponse -> FieldSet
_ExecuteMultiOperationResponse'_unknownFields ExecuteMultiOperationResponse
x__)
             (Vector ExecuteMultiOperationResponse'Response -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ExecuteMultiOperationResponse
-> Vector ExecuteMultiOperationResponse'Response
_ExecuteMultiOperationResponse'responses ExecuteMultiOperationResponse
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'response' @:: Lens' ExecuteMultiOperationResponse'Response (Prelude.Maybe ExecuteMultiOperationResponse'Response'Response)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'startWorkflow' @:: Lens' ExecuteMultiOperationResponse'Response (Prelude.Maybe StartWorkflowExecutionResponse)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.startWorkflow' @:: Lens' ExecuteMultiOperationResponse'Response StartWorkflowExecutionResponse@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'updateWorkflow' @:: Lens' ExecuteMultiOperationResponse'Response (Prelude.Maybe UpdateWorkflowExecutionResponse)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.updateWorkflow' @:: Lens' ExecuteMultiOperationResponse'Response UpdateWorkflowExecutionResponse@ -}
data ExecuteMultiOperationResponse'Response
  = ExecuteMultiOperationResponse'Response'_constructor {ExecuteMultiOperationResponse'Response
-> Maybe ExecuteMultiOperationResponse'Response'Response
_ExecuteMultiOperationResponse'Response'response :: !(Prelude.Maybe ExecuteMultiOperationResponse'Response'Response),
                                                         ExecuteMultiOperationResponse'Response -> FieldSet
_ExecuteMultiOperationResponse'Response'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Bool
(ExecuteMultiOperationResponse'Response
 -> ExecuteMultiOperationResponse'Response -> Bool)
-> (ExecuteMultiOperationResponse'Response
    -> ExecuteMultiOperationResponse'Response -> Bool)
-> Eq ExecuteMultiOperationResponse'Response
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Bool
== :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Bool
$c/= :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Bool
/= :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Bool
Prelude.Eq, Eq ExecuteMultiOperationResponse'Response
Eq ExecuteMultiOperationResponse'Response =>
(ExecuteMultiOperationResponse'Response
 -> ExecuteMultiOperationResponse'Response -> Ordering)
-> (ExecuteMultiOperationResponse'Response
    -> ExecuteMultiOperationResponse'Response -> Bool)
-> (ExecuteMultiOperationResponse'Response
    -> ExecuteMultiOperationResponse'Response -> Bool)
-> (ExecuteMultiOperationResponse'Response
    -> ExecuteMultiOperationResponse'Response -> Bool)
-> (ExecuteMultiOperationResponse'Response
    -> ExecuteMultiOperationResponse'Response -> Bool)
-> (ExecuteMultiOperationResponse'Response
    -> ExecuteMultiOperationResponse'Response
    -> ExecuteMultiOperationResponse'Response)
-> (ExecuteMultiOperationResponse'Response
    -> ExecuteMultiOperationResponse'Response
    -> ExecuteMultiOperationResponse'Response)
-> Ord ExecuteMultiOperationResponse'Response
ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Bool
ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Ordering
ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'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 :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Ordering
compare :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Ordering
$c< :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Bool
< :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Bool
$c<= :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Bool
<= :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Bool
$c> :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Bool
> :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Bool
$c>= :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Bool
>= :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response -> Bool
$cmax :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response
max :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response
$cmin :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response
min :: ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response
-> ExecuteMultiOperationResponse'Response
Prelude.Ord)
instance Prelude.Show ExecuteMultiOperationResponse'Response where
  showsPrec :: Int -> ExecuteMultiOperationResponse'Response -> ShowS
showsPrec Int
_ ExecuteMultiOperationResponse'Response
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ExecuteMultiOperationResponse'Response -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ExecuteMultiOperationResponse'Response
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data ExecuteMultiOperationResponse'Response'Response
  = ExecuteMultiOperationResponse'Response'StartWorkflow !StartWorkflowExecutionResponse |
    ExecuteMultiOperationResponse'Response'UpdateWorkflow !UpdateWorkflowExecutionResponse
  deriving stock (Int -> ExecuteMultiOperationResponse'Response'Response -> ShowS
[ExecuteMultiOperationResponse'Response'Response] -> ShowS
ExecuteMultiOperationResponse'Response'Response -> String
(Int -> ExecuteMultiOperationResponse'Response'Response -> ShowS)
-> (ExecuteMultiOperationResponse'Response'Response -> String)
-> ([ExecuteMultiOperationResponse'Response'Response] -> ShowS)
-> Show ExecuteMultiOperationResponse'Response'Response
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ExecuteMultiOperationResponse'Response'Response -> ShowS
showsPrec :: Int -> ExecuteMultiOperationResponse'Response'Response -> ShowS
$cshow :: ExecuteMultiOperationResponse'Response'Response -> String
show :: ExecuteMultiOperationResponse'Response'Response -> String
$cshowList :: [ExecuteMultiOperationResponse'Response'Response] -> ShowS
showList :: [ExecuteMultiOperationResponse'Response'Response] -> ShowS
Prelude.Show, ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Bool
(ExecuteMultiOperationResponse'Response'Response
 -> ExecuteMultiOperationResponse'Response'Response -> Bool)
-> (ExecuteMultiOperationResponse'Response'Response
    -> ExecuteMultiOperationResponse'Response'Response -> Bool)
-> Eq ExecuteMultiOperationResponse'Response'Response
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Bool
== :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Bool
$c/= :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Bool
/= :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Bool
Prelude.Eq, Eq ExecuteMultiOperationResponse'Response'Response
Eq ExecuteMultiOperationResponse'Response'Response =>
(ExecuteMultiOperationResponse'Response'Response
 -> ExecuteMultiOperationResponse'Response'Response -> Ordering)
-> (ExecuteMultiOperationResponse'Response'Response
    -> ExecuteMultiOperationResponse'Response'Response -> Bool)
-> (ExecuteMultiOperationResponse'Response'Response
    -> ExecuteMultiOperationResponse'Response'Response -> Bool)
-> (ExecuteMultiOperationResponse'Response'Response
    -> ExecuteMultiOperationResponse'Response'Response -> Bool)
-> (ExecuteMultiOperationResponse'Response'Response
    -> ExecuteMultiOperationResponse'Response'Response -> Bool)
-> (ExecuteMultiOperationResponse'Response'Response
    -> ExecuteMultiOperationResponse'Response'Response
    -> ExecuteMultiOperationResponse'Response'Response)
-> (ExecuteMultiOperationResponse'Response'Response
    -> ExecuteMultiOperationResponse'Response'Response
    -> ExecuteMultiOperationResponse'Response'Response)
-> Ord ExecuteMultiOperationResponse'Response'Response
ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Bool
ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Ordering
ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'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 :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Ordering
compare :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Ordering
$c< :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Bool
< :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Bool
$c<= :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Bool
<= :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Bool
$c> :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Bool
> :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Bool
$c>= :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Bool
>= :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response -> Bool
$cmax :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response
max :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response
$cmin :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response
min :: ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response
-> ExecuteMultiOperationResponse'Response'Response
Prelude.Ord)
instance Data.ProtoLens.Field.HasField ExecuteMultiOperationResponse'Response "maybe'response" (Prelude.Maybe ExecuteMultiOperationResponse'Response'Response) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'response"
-> (Maybe ExecuteMultiOperationResponse'Response'Response
    -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
-> ExecuteMultiOperationResponse'Response
-> f ExecuteMultiOperationResponse'Response
fieldOf Proxy# "maybe'response"
_
    = ((Maybe ExecuteMultiOperationResponse'Response'Response
  -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
 -> ExecuteMultiOperationResponse'Response
 -> f ExecuteMultiOperationResponse'Response)
-> ((Maybe ExecuteMultiOperationResponse'Response'Response
     -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
    -> Maybe ExecuteMultiOperationResponse'Response'Response
    -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
-> (Maybe ExecuteMultiOperationResponse'Response'Response
    -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
-> ExecuteMultiOperationResponse'Response
-> f ExecuteMultiOperationResponse'Response
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExecuteMultiOperationResponse'Response
 -> Maybe ExecuteMultiOperationResponse'Response'Response)
-> (ExecuteMultiOperationResponse'Response
    -> Maybe ExecuteMultiOperationResponse'Response'Response
    -> ExecuteMultiOperationResponse'Response)
-> Lens
     ExecuteMultiOperationResponse'Response
     ExecuteMultiOperationResponse'Response
     (Maybe ExecuteMultiOperationResponse'Response'Response)
     (Maybe ExecuteMultiOperationResponse'Response'Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExecuteMultiOperationResponse'Response
-> Maybe ExecuteMultiOperationResponse'Response'Response
_ExecuteMultiOperationResponse'Response'response
           (\ ExecuteMultiOperationResponse'Response
x__ Maybe ExecuteMultiOperationResponse'Response'Response
y__
              -> ExecuteMultiOperationResponse'Response
x__ {_ExecuteMultiOperationResponse'Response'response = y__}))
        (Maybe ExecuteMultiOperationResponse'Response'Response
 -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
-> Maybe ExecuteMultiOperationResponse'Response'Response
-> f (Maybe ExecuteMultiOperationResponse'Response'Response)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExecuteMultiOperationResponse'Response "maybe'startWorkflow" (Prelude.Maybe StartWorkflowExecutionResponse) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startWorkflow"
-> (Maybe StartWorkflowExecutionResponse
    -> f (Maybe StartWorkflowExecutionResponse))
-> ExecuteMultiOperationResponse'Response
-> f ExecuteMultiOperationResponse'Response
fieldOf Proxy# "maybe'startWorkflow"
_
    = ((Maybe ExecuteMultiOperationResponse'Response'Response
  -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
 -> ExecuteMultiOperationResponse'Response
 -> f ExecuteMultiOperationResponse'Response)
-> ((Maybe StartWorkflowExecutionResponse
     -> f (Maybe StartWorkflowExecutionResponse))
    -> Maybe ExecuteMultiOperationResponse'Response'Response
    -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
-> (Maybe StartWorkflowExecutionResponse
    -> f (Maybe StartWorkflowExecutionResponse))
-> ExecuteMultiOperationResponse'Response
-> f ExecuteMultiOperationResponse'Response
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExecuteMultiOperationResponse'Response
 -> Maybe ExecuteMultiOperationResponse'Response'Response)
-> (ExecuteMultiOperationResponse'Response
    -> Maybe ExecuteMultiOperationResponse'Response'Response
    -> ExecuteMultiOperationResponse'Response)
-> Lens
     ExecuteMultiOperationResponse'Response
     ExecuteMultiOperationResponse'Response
     (Maybe ExecuteMultiOperationResponse'Response'Response)
     (Maybe ExecuteMultiOperationResponse'Response'Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExecuteMultiOperationResponse'Response
-> Maybe ExecuteMultiOperationResponse'Response'Response
_ExecuteMultiOperationResponse'Response'response
           (\ ExecuteMultiOperationResponse'Response
x__ Maybe ExecuteMultiOperationResponse'Response'Response
y__
              -> ExecuteMultiOperationResponse'Response
x__ {_ExecuteMultiOperationResponse'Response'response = y__}))
        ((Maybe ExecuteMultiOperationResponse'Response'Response
 -> Maybe StartWorkflowExecutionResponse)
-> (Maybe ExecuteMultiOperationResponse'Response'Response
    -> Maybe StartWorkflowExecutionResponse
    -> Maybe ExecuteMultiOperationResponse'Response'Response)
-> Lens
     (Maybe ExecuteMultiOperationResponse'Response'Response)
     (Maybe ExecuteMultiOperationResponse'Response'Response)
     (Maybe StartWorkflowExecutionResponse)
     (Maybe StartWorkflowExecutionResponse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe ExecuteMultiOperationResponse'Response'Response
x__
              -> case Maybe ExecuteMultiOperationResponse'Response'Response
x__ of
                   (Prelude.Just (ExecuteMultiOperationResponse'Response'StartWorkflow StartWorkflowExecutionResponse
x__val))
                     -> StartWorkflowExecutionResponse
-> Maybe StartWorkflowExecutionResponse
forall a. a -> Maybe a
Prelude.Just StartWorkflowExecutionResponse
x__val
                   Maybe ExecuteMultiOperationResponse'Response'Response
_otherwise -> Maybe StartWorkflowExecutionResponse
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe ExecuteMultiOperationResponse'Response'Response
_ Maybe StartWorkflowExecutionResponse
y__
              -> (StartWorkflowExecutionResponse
 -> ExecuteMultiOperationResponse'Response'Response)
-> Maybe StartWorkflowExecutionResponse
-> Maybe ExecuteMultiOperationResponse'Response'Response
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   StartWorkflowExecutionResponse
-> ExecuteMultiOperationResponse'Response'Response
ExecuteMultiOperationResponse'Response'StartWorkflow Maybe StartWorkflowExecutionResponse
y__))
instance Data.ProtoLens.Field.HasField ExecuteMultiOperationResponse'Response "startWorkflow" StartWorkflowExecutionResponse where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startWorkflow"
-> (StartWorkflowExecutionResponse
    -> f StartWorkflowExecutionResponse)
-> ExecuteMultiOperationResponse'Response
-> f ExecuteMultiOperationResponse'Response
fieldOf Proxy# "startWorkflow"
_
    = ((Maybe ExecuteMultiOperationResponse'Response'Response
  -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
 -> ExecuteMultiOperationResponse'Response
 -> f ExecuteMultiOperationResponse'Response)
-> ((StartWorkflowExecutionResponse
     -> f StartWorkflowExecutionResponse)
    -> Maybe ExecuteMultiOperationResponse'Response'Response
    -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
-> (StartWorkflowExecutionResponse
    -> f StartWorkflowExecutionResponse)
-> ExecuteMultiOperationResponse'Response
-> f ExecuteMultiOperationResponse'Response
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExecuteMultiOperationResponse'Response
 -> Maybe ExecuteMultiOperationResponse'Response'Response)
-> (ExecuteMultiOperationResponse'Response
    -> Maybe ExecuteMultiOperationResponse'Response'Response
    -> ExecuteMultiOperationResponse'Response)
-> Lens
     ExecuteMultiOperationResponse'Response
     ExecuteMultiOperationResponse'Response
     (Maybe ExecuteMultiOperationResponse'Response'Response)
     (Maybe ExecuteMultiOperationResponse'Response'Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExecuteMultiOperationResponse'Response
-> Maybe ExecuteMultiOperationResponse'Response'Response
_ExecuteMultiOperationResponse'Response'response
           (\ ExecuteMultiOperationResponse'Response
x__ Maybe ExecuteMultiOperationResponse'Response'Response
y__
              -> ExecuteMultiOperationResponse'Response
x__ {_ExecuteMultiOperationResponse'Response'response = y__}))
        (((Maybe StartWorkflowExecutionResponse
  -> f (Maybe StartWorkflowExecutionResponse))
 -> Maybe ExecuteMultiOperationResponse'Response'Response
 -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
-> ((StartWorkflowExecutionResponse
     -> f StartWorkflowExecutionResponse)
    -> Maybe StartWorkflowExecutionResponse
    -> f (Maybe StartWorkflowExecutionResponse))
-> (StartWorkflowExecutionResponse
    -> f StartWorkflowExecutionResponse)
-> Maybe ExecuteMultiOperationResponse'Response'Response
-> f (Maybe ExecuteMultiOperationResponse'Response'Response)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe ExecuteMultiOperationResponse'Response'Response
 -> Maybe StartWorkflowExecutionResponse)
-> (Maybe ExecuteMultiOperationResponse'Response'Response
    -> Maybe StartWorkflowExecutionResponse
    -> Maybe ExecuteMultiOperationResponse'Response'Response)
-> Lens
     (Maybe ExecuteMultiOperationResponse'Response'Response)
     (Maybe ExecuteMultiOperationResponse'Response'Response)
     (Maybe StartWorkflowExecutionResponse)
     (Maybe StartWorkflowExecutionResponse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe ExecuteMultiOperationResponse'Response'Response
x__
                 -> case Maybe ExecuteMultiOperationResponse'Response'Response
x__ of
                      (Prelude.Just (ExecuteMultiOperationResponse'Response'StartWorkflow StartWorkflowExecutionResponse
x__val))
                        -> StartWorkflowExecutionResponse
-> Maybe StartWorkflowExecutionResponse
forall a. a -> Maybe a
Prelude.Just StartWorkflowExecutionResponse
x__val
                      Maybe ExecuteMultiOperationResponse'Response'Response
_otherwise -> Maybe StartWorkflowExecutionResponse
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe ExecuteMultiOperationResponse'Response'Response
_ Maybe StartWorkflowExecutionResponse
y__
                 -> (StartWorkflowExecutionResponse
 -> ExecuteMultiOperationResponse'Response'Response)
-> Maybe StartWorkflowExecutionResponse
-> Maybe ExecuteMultiOperationResponse'Response'Response
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      StartWorkflowExecutionResponse
-> ExecuteMultiOperationResponse'Response'Response
ExecuteMultiOperationResponse'Response'StartWorkflow Maybe StartWorkflowExecutionResponse
y__))
           (StartWorkflowExecutionResponse
-> Lens'
     (Maybe StartWorkflowExecutionResponse)
     StartWorkflowExecutionResponse
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens StartWorkflowExecutionResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField ExecuteMultiOperationResponse'Response "maybe'updateWorkflow" (Prelude.Maybe UpdateWorkflowExecutionResponse) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'updateWorkflow"
-> (Maybe UpdateWorkflowExecutionResponse
    -> f (Maybe UpdateWorkflowExecutionResponse))
-> ExecuteMultiOperationResponse'Response
-> f ExecuteMultiOperationResponse'Response
fieldOf Proxy# "maybe'updateWorkflow"
_
    = ((Maybe ExecuteMultiOperationResponse'Response'Response
  -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
 -> ExecuteMultiOperationResponse'Response
 -> f ExecuteMultiOperationResponse'Response)
-> ((Maybe UpdateWorkflowExecutionResponse
     -> f (Maybe UpdateWorkflowExecutionResponse))
    -> Maybe ExecuteMultiOperationResponse'Response'Response
    -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
-> (Maybe UpdateWorkflowExecutionResponse
    -> f (Maybe UpdateWorkflowExecutionResponse))
-> ExecuteMultiOperationResponse'Response
-> f ExecuteMultiOperationResponse'Response
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExecuteMultiOperationResponse'Response
 -> Maybe ExecuteMultiOperationResponse'Response'Response)
-> (ExecuteMultiOperationResponse'Response
    -> Maybe ExecuteMultiOperationResponse'Response'Response
    -> ExecuteMultiOperationResponse'Response)
-> Lens
     ExecuteMultiOperationResponse'Response
     ExecuteMultiOperationResponse'Response
     (Maybe ExecuteMultiOperationResponse'Response'Response)
     (Maybe ExecuteMultiOperationResponse'Response'Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExecuteMultiOperationResponse'Response
-> Maybe ExecuteMultiOperationResponse'Response'Response
_ExecuteMultiOperationResponse'Response'response
           (\ ExecuteMultiOperationResponse'Response
x__ Maybe ExecuteMultiOperationResponse'Response'Response
y__
              -> ExecuteMultiOperationResponse'Response
x__ {_ExecuteMultiOperationResponse'Response'response = y__}))
        ((Maybe ExecuteMultiOperationResponse'Response'Response
 -> Maybe UpdateWorkflowExecutionResponse)
-> (Maybe ExecuteMultiOperationResponse'Response'Response
    -> Maybe UpdateWorkflowExecutionResponse
    -> Maybe ExecuteMultiOperationResponse'Response'Response)
-> Lens
     (Maybe ExecuteMultiOperationResponse'Response'Response)
     (Maybe ExecuteMultiOperationResponse'Response'Response)
     (Maybe UpdateWorkflowExecutionResponse)
     (Maybe UpdateWorkflowExecutionResponse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe ExecuteMultiOperationResponse'Response'Response
x__
              -> case Maybe ExecuteMultiOperationResponse'Response'Response
x__ of
                   (Prelude.Just (ExecuteMultiOperationResponse'Response'UpdateWorkflow UpdateWorkflowExecutionResponse
x__val))
                     -> UpdateWorkflowExecutionResponse
-> Maybe UpdateWorkflowExecutionResponse
forall a. a -> Maybe a
Prelude.Just UpdateWorkflowExecutionResponse
x__val
                   Maybe ExecuteMultiOperationResponse'Response'Response
_otherwise -> Maybe UpdateWorkflowExecutionResponse
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe ExecuteMultiOperationResponse'Response'Response
_ Maybe UpdateWorkflowExecutionResponse
y__
              -> (UpdateWorkflowExecutionResponse
 -> ExecuteMultiOperationResponse'Response'Response)
-> Maybe UpdateWorkflowExecutionResponse
-> Maybe ExecuteMultiOperationResponse'Response'Response
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   UpdateWorkflowExecutionResponse
-> ExecuteMultiOperationResponse'Response'Response
ExecuteMultiOperationResponse'Response'UpdateWorkflow Maybe UpdateWorkflowExecutionResponse
y__))
instance Data.ProtoLens.Field.HasField ExecuteMultiOperationResponse'Response "updateWorkflow" UpdateWorkflowExecutionResponse where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "updateWorkflow"
-> (UpdateWorkflowExecutionResponse
    -> f UpdateWorkflowExecutionResponse)
-> ExecuteMultiOperationResponse'Response
-> f ExecuteMultiOperationResponse'Response
fieldOf Proxy# "updateWorkflow"
_
    = ((Maybe ExecuteMultiOperationResponse'Response'Response
  -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
 -> ExecuteMultiOperationResponse'Response
 -> f ExecuteMultiOperationResponse'Response)
-> ((UpdateWorkflowExecutionResponse
     -> f UpdateWorkflowExecutionResponse)
    -> Maybe ExecuteMultiOperationResponse'Response'Response
    -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
-> (UpdateWorkflowExecutionResponse
    -> f UpdateWorkflowExecutionResponse)
-> ExecuteMultiOperationResponse'Response
-> f ExecuteMultiOperationResponse'Response
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExecuteMultiOperationResponse'Response
 -> Maybe ExecuteMultiOperationResponse'Response'Response)
-> (ExecuteMultiOperationResponse'Response
    -> Maybe ExecuteMultiOperationResponse'Response'Response
    -> ExecuteMultiOperationResponse'Response)
-> Lens
     ExecuteMultiOperationResponse'Response
     ExecuteMultiOperationResponse'Response
     (Maybe ExecuteMultiOperationResponse'Response'Response)
     (Maybe ExecuteMultiOperationResponse'Response'Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExecuteMultiOperationResponse'Response
-> Maybe ExecuteMultiOperationResponse'Response'Response
_ExecuteMultiOperationResponse'Response'response
           (\ ExecuteMultiOperationResponse'Response
x__ Maybe ExecuteMultiOperationResponse'Response'Response
y__
              -> ExecuteMultiOperationResponse'Response
x__ {_ExecuteMultiOperationResponse'Response'response = y__}))
        (((Maybe UpdateWorkflowExecutionResponse
  -> f (Maybe UpdateWorkflowExecutionResponse))
 -> Maybe ExecuteMultiOperationResponse'Response'Response
 -> f (Maybe ExecuteMultiOperationResponse'Response'Response))
-> ((UpdateWorkflowExecutionResponse
     -> f UpdateWorkflowExecutionResponse)
    -> Maybe UpdateWorkflowExecutionResponse
    -> f (Maybe UpdateWorkflowExecutionResponse))
-> (UpdateWorkflowExecutionResponse
    -> f UpdateWorkflowExecutionResponse)
-> Maybe ExecuteMultiOperationResponse'Response'Response
-> f (Maybe ExecuteMultiOperationResponse'Response'Response)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe ExecuteMultiOperationResponse'Response'Response
 -> Maybe UpdateWorkflowExecutionResponse)
-> (Maybe ExecuteMultiOperationResponse'Response'Response
    -> Maybe UpdateWorkflowExecutionResponse
    -> Maybe ExecuteMultiOperationResponse'Response'Response)
-> Lens
     (Maybe ExecuteMultiOperationResponse'Response'Response)
     (Maybe ExecuteMultiOperationResponse'Response'Response)
     (Maybe UpdateWorkflowExecutionResponse)
     (Maybe UpdateWorkflowExecutionResponse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe ExecuteMultiOperationResponse'Response'Response
x__
                 -> case Maybe ExecuteMultiOperationResponse'Response'Response
x__ of
                      (Prelude.Just (ExecuteMultiOperationResponse'Response'UpdateWorkflow UpdateWorkflowExecutionResponse
x__val))
                        -> UpdateWorkflowExecutionResponse
-> Maybe UpdateWorkflowExecutionResponse
forall a. a -> Maybe a
Prelude.Just UpdateWorkflowExecutionResponse
x__val
                      Maybe ExecuteMultiOperationResponse'Response'Response
_otherwise -> Maybe UpdateWorkflowExecutionResponse
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe ExecuteMultiOperationResponse'Response'Response
_ Maybe UpdateWorkflowExecutionResponse
y__
                 -> (UpdateWorkflowExecutionResponse
 -> ExecuteMultiOperationResponse'Response'Response)
-> Maybe UpdateWorkflowExecutionResponse
-> Maybe ExecuteMultiOperationResponse'Response'Response
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      UpdateWorkflowExecutionResponse
-> ExecuteMultiOperationResponse'Response'Response
ExecuteMultiOperationResponse'Response'UpdateWorkflow Maybe UpdateWorkflowExecutionResponse
y__))
           (UpdateWorkflowExecutionResponse
-> Lens'
     (Maybe UpdateWorkflowExecutionResponse)
     UpdateWorkflowExecutionResponse
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateWorkflowExecutionResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message ExecuteMultiOperationResponse'Response where
  messageName :: Proxy ExecuteMultiOperationResponse'Response -> Text
messageName Proxy ExecuteMultiOperationResponse'Response
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ExecuteMultiOperationResponse.Response"
  packedMessageDescriptor :: Proxy ExecuteMultiOperationResponse'Response -> ByteString
packedMessageDescriptor Proxy ExecuteMultiOperationResponse'Response
_
    = ByteString
"\n\
      \\bResponse\DC2h\n\
      \\SOstart_workflow\CAN\SOH \SOH(\v2?.temporal.api.workflowservice.v1.StartWorkflowExecutionResponseH\NULR\rstartWorkflow\DC2k\n\
      \\SIupdate_workflow\CAN\STX \SOH(\v2@.temporal.api.workflowservice.v1.UpdateWorkflowExecutionResponseH\NULR\SOupdateWorkflowB\n\
      \\n\
      \\bresponse"
  packedFileDescriptor :: Proxy ExecuteMultiOperationResponse'Response -> ByteString
packedFileDescriptor Proxy ExecuteMultiOperationResponse'Response
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ExecuteMultiOperationResponse'Response)
fieldsByTag
    = let
        startWorkflow__field_descriptor :: FieldDescriptor ExecuteMultiOperationResponse'Response
startWorkflow__field_descriptor
          = String
-> FieldTypeDescriptor StartWorkflowExecutionResponse
-> FieldAccessor
     ExecuteMultiOperationResponse'Response
     StartWorkflowExecutionResponse
-> FieldDescriptor ExecuteMultiOperationResponse'Response
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_workflow"
              (MessageOrGroup
-> FieldTypeDescriptor StartWorkflowExecutionResponse
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor StartWorkflowExecutionResponse)
              (Lens'
  ExecuteMultiOperationResponse'Response
  (Maybe StartWorkflowExecutionResponse)
-> FieldAccessor
     ExecuteMultiOperationResponse'Response
     StartWorkflowExecutionResponse
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startWorkflow")) ::
              Data.ProtoLens.FieldDescriptor ExecuteMultiOperationResponse'Response
        updateWorkflow__field_descriptor :: FieldDescriptor ExecuteMultiOperationResponse'Response
updateWorkflow__field_descriptor
          = String
-> FieldTypeDescriptor UpdateWorkflowExecutionResponse
-> FieldAccessor
     ExecuteMultiOperationResponse'Response
     UpdateWorkflowExecutionResponse
-> FieldDescriptor ExecuteMultiOperationResponse'Response
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"update_workflow"
              (MessageOrGroup
-> FieldTypeDescriptor UpdateWorkflowExecutionResponse
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpdateWorkflowExecutionResponse)
              (Lens'
  ExecuteMultiOperationResponse'Response
  (Maybe UpdateWorkflowExecutionResponse)
-> FieldAccessor
     ExecuteMultiOperationResponse'Response
     UpdateWorkflowExecutionResponse
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'updateWorkflow")) ::
              Data.ProtoLens.FieldDescriptor ExecuteMultiOperationResponse'Response
      in
        [(Tag, FieldDescriptor ExecuteMultiOperationResponse'Response)]
-> Map Tag (FieldDescriptor ExecuteMultiOperationResponse'Response)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ExecuteMultiOperationResponse'Response
startWorkflow__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ExecuteMultiOperationResponse'Response
updateWorkflow__field_descriptor)]
  unknownFields :: Lens' ExecuteMultiOperationResponse'Response FieldSet
unknownFields
    = (ExecuteMultiOperationResponse'Response -> FieldSet)
-> (ExecuteMultiOperationResponse'Response
    -> FieldSet -> ExecuteMultiOperationResponse'Response)
-> Lens' ExecuteMultiOperationResponse'Response FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ExecuteMultiOperationResponse'Response -> FieldSet
_ExecuteMultiOperationResponse'Response'_unknownFields
        (\ ExecuteMultiOperationResponse'Response
x__ FieldSet
y__
           -> ExecuteMultiOperationResponse'Response
x__
                {_ExecuteMultiOperationResponse'Response'_unknownFields = y__})
  defMessage :: ExecuteMultiOperationResponse'Response
defMessage
    = ExecuteMultiOperationResponse'Response'_constructor
        {_ExecuteMultiOperationResponse'Response'response :: Maybe ExecuteMultiOperationResponse'Response'Response
_ExecuteMultiOperationResponse'Response'response = Maybe ExecuteMultiOperationResponse'Response'Response
forall a. Maybe a
Prelude.Nothing,
         _ExecuteMultiOperationResponse'Response'_unknownFields :: FieldSet
_ExecuteMultiOperationResponse'Response'_unknownFields = []}
  parseMessage :: Parser ExecuteMultiOperationResponse'Response
parseMessage
    = let
        loop ::
          ExecuteMultiOperationResponse'Response
          -> Data.ProtoLens.Encoding.Bytes.Parser ExecuteMultiOperationResponse'Response
        loop :: ExecuteMultiOperationResponse'Response
-> Parser ExecuteMultiOperationResponse'Response
loop ExecuteMultiOperationResponse'Response
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 StartWorkflowExecutionResponse
-> String -> Parser StartWorkflowExecutionResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"start_workflow"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startWorkflow") y x)
                        Word64
18
                          -> do y <- Parser UpdateWorkflowExecutionResponse
-> String -> Parser UpdateWorkflowExecutionResponse
forall a. Parser a -> String -> Parser a
(Data.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_workflow"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"updateWorkflow") 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 ExecuteMultiOperationResponse'Response
-> String -> Parser ExecuteMultiOperationResponse'Response
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ExecuteMultiOperationResponse'Response
-> Parser ExecuteMultiOperationResponse'Response
loop ExecuteMultiOperationResponse'Response
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"Response"
  buildMessage :: ExecuteMultiOperationResponse'Response -> Builder
buildMessage
    = \ ExecuteMultiOperationResponse'Response
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe ExecuteMultiOperationResponse'Response'Response)
  ExecuteMultiOperationResponse'Response
  ExecuteMultiOperationResponse'Response
  (Maybe ExecuteMultiOperationResponse'Response'Response)
  (Maybe ExecuteMultiOperationResponse'Response'Response)
-> ExecuteMultiOperationResponse'Response
-> Maybe ExecuteMultiOperationResponse'Response'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") ExecuteMultiOperationResponse'Response
_x
              of
                Maybe ExecuteMultiOperationResponse'Response'Response
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just (ExecuteMultiOperationResponse'Response'StartWorkflow StartWorkflowExecutionResponse
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (StartWorkflowExecutionResponse -> ByteString)
-> StartWorkflowExecutionResponse
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          StartWorkflowExecutionResponse -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage StartWorkflowExecutionResponse
v)
                (Prelude.Just (ExecuteMultiOperationResponse'Response'UpdateWorkflow UpdateWorkflowExecutionResponse
v))
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                       ((ByteString -> Builder)
-> (UpdateWorkflowExecutionResponse -> ByteString)
-> UpdateWorkflowExecutionResponse
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          UpdateWorkflowExecutionResponse -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateWorkflowExecutionResponse
v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  ExecuteMultiOperationResponse'Response
  ExecuteMultiOperationResponse'Response
  FieldSet
  FieldSet
-> ExecuteMultiOperationResponse'Response -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ExecuteMultiOperationResponse'Response
  ExecuteMultiOperationResponse'Response
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ExecuteMultiOperationResponse'Response FieldSet
Data.ProtoLens.unknownFields ExecuteMultiOperationResponse'Response
_x))
instance Control.DeepSeq.NFData ExecuteMultiOperationResponse'Response where
  rnf :: ExecuteMultiOperationResponse'Response -> ()
rnf
    = \ ExecuteMultiOperationResponse'Response
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ExecuteMultiOperationResponse'Response -> FieldSet
_ExecuteMultiOperationResponse'Response'_unknownFields ExecuteMultiOperationResponse'Response
x__)
             (Maybe ExecuteMultiOperationResponse'Response'Response -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ExecuteMultiOperationResponse'Response
-> Maybe ExecuteMultiOperationResponse'Response'Response
_ExecuteMultiOperationResponse'Response'response ExecuteMultiOperationResponse'Response
x__) ())
instance Control.DeepSeq.NFData ExecuteMultiOperationResponse'Response'Response where
  rnf :: ExecuteMultiOperationResponse'Response'Response -> ()
rnf (ExecuteMultiOperationResponse'Response'StartWorkflow StartWorkflowExecutionResponse
x__)
    = StartWorkflowExecutionResponse -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf StartWorkflowExecutionResponse
x__
  rnf (ExecuteMultiOperationResponse'Response'UpdateWorkflow UpdateWorkflowExecutionResponse
x__)
    = UpdateWorkflowExecutionResponse -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf UpdateWorkflowExecutionResponse
x__
_ExecuteMultiOperationResponse'Response'StartWorkflow ::
  Data.ProtoLens.Prism.Prism' ExecuteMultiOperationResponse'Response'Response StartWorkflowExecutionResponse
_ExecuteMultiOperationResponse'Response'StartWorkflow :: Prism'
  ExecuteMultiOperationResponse'Response'Response
  StartWorkflowExecutionResponse
_ExecuteMultiOperationResponse'Response'StartWorkflow
  = (StartWorkflowExecutionResponse
 -> ExecuteMultiOperationResponse'Response'Response)
-> (ExecuteMultiOperationResponse'Response'Response
    -> Maybe StartWorkflowExecutionResponse)
-> Prism'
     ExecuteMultiOperationResponse'Response'Response
     StartWorkflowExecutionResponse
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      StartWorkflowExecutionResponse
-> ExecuteMultiOperationResponse'Response'Response
ExecuteMultiOperationResponse'Response'StartWorkflow
      (\ ExecuteMultiOperationResponse'Response'Response
p__
         -> case ExecuteMultiOperationResponse'Response'Response
p__ of
              (ExecuteMultiOperationResponse'Response'StartWorkflow StartWorkflowExecutionResponse
p__val)
                -> StartWorkflowExecutionResponse
-> Maybe StartWorkflowExecutionResponse
forall a. a -> Maybe a
Prelude.Just StartWorkflowExecutionResponse
p__val
              ExecuteMultiOperationResponse'Response'Response
_otherwise -> Maybe StartWorkflowExecutionResponse
forall a. Maybe a
Prelude.Nothing)
_ExecuteMultiOperationResponse'Response'UpdateWorkflow ::
  Data.ProtoLens.Prism.Prism' ExecuteMultiOperationResponse'Response'Response UpdateWorkflowExecutionResponse
_ExecuteMultiOperationResponse'Response'UpdateWorkflow :: Prism'
  ExecuteMultiOperationResponse'Response'Response
  UpdateWorkflowExecutionResponse
_ExecuteMultiOperationResponse'Response'UpdateWorkflow
  = (UpdateWorkflowExecutionResponse
 -> ExecuteMultiOperationResponse'Response'Response)
-> (ExecuteMultiOperationResponse'Response'Response
    -> Maybe UpdateWorkflowExecutionResponse)
-> Prism'
     ExecuteMultiOperationResponse'Response'Response
     UpdateWorkflowExecutionResponse
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      UpdateWorkflowExecutionResponse
-> ExecuteMultiOperationResponse'Response'Response
ExecuteMultiOperationResponse'Response'UpdateWorkflow
      (\ ExecuteMultiOperationResponse'Response'Response
p__
         -> case ExecuteMultiOperationResponse'Response'Response
p__ of
              (ExecuteMultiOperationResponse'Response'UpdateWorkflow UpdateWorkflowExecutionResponse
p__val)
                -> UpdateWorkflowExecutionResponse
-> Maybe UpdateWorkflowExecutionResponse
forall a. a -> Maybe a
Prelude.Just UpdateWorkflowExecutionResponse
p__val
              ExecuteMultiOperationResponse'Response'Response
_otherwise -> Maybe UpdateWorkflowExecutionResponse
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
      -}
data GetClusterInfoRequest
  = GetClusterInfoRequest'_constructor {GetClusterInfoRequest -> FieldSet
_GetClusterInfoRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetClusterInfoRequest -> GetClusterInfoRequest -> Bool
(GetClusterInfoRequest -> GetClusterInfoRequest -> Bool)
-> (GetClusterInfoRequest -> GetClusterInfoRequest -> Bool)
-> Eq GetClusterInfoRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetClusterInfoRequest -> GetClusterInfoRequest -> Bool
== :: GetClusterInfoRequest -> GetClusterInfoRequest -> Bool
$c/= :: GetClusterInfoRequest -> GetClusterInfoRequest -> Bool
/= :: GetClusterInfoRequest -> GetClusterInfoRequest -> Bool
Prelude.Eq, Eq GetClusterInfoRequest
Eq GetClusterInfoRequest =>
(GetClusterInfoRequest -> GetClusterInfoRequest -> Ordering)
-> (GetClusterInfoRequest -> GetClusterInfoRequest -> Bool)
-> (GetClusterInfoRequest -> GetClusterInfoRequest -> Bool)
-> (GetClusterInfoRequest -> GetClusterInfoRequest -> Bool)
-> (GetClusterInfoRequest -> GetClusterInfoRequest -> Bool)
-> (GetClusterInfoRequest
    -> GetClusterInfoRequest -> GetClusterInfoRequest)
-> (GetClusterInfoRequest
    -> GetClusterInfoRequest -> GetClusterInfoRequest)
-> Ord GetClusterInfoRequest
GetClusterInfoRequest -> GetClusterInfoRequest -> Bool
GetClusterInfoRequest -> GetClusterInfoRequest -> Ordering
GetClusterInfoRequest
-> GetClusterInfoRequest -> GetClusterInfoRequest
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 :: GetClusterInfoRequest -> GetClusterInfoRequest -> Ordering
compare :: GetClusterInfoRequest -> GetClusterInfoRequest -> Ordering
$c< :: GetClusterInfoRequest -> GetClusterInfoRequest -> Bool
< :: GetClusterInfoRequest -> GetClusterInfoRequest -> Bool
$c<= :: GetClusterInfoRequest -> GetClusterInfoRequest -> Bool
<= :: GetClusterInfoRequest -> GetClusterInfoRequest -> Bool
$c> :: GetClusterInfoRequest -> GetClusterInfoRequest -> Bool
> :: GetClusterInfoRequest -> GetClusterInfoRequest -> Bool
$c>= :: GetClusterInfoRequest -> GetClusterInfoRequest -> Bool
>= :: GetClusterInfoRequest -> GetClusterInfoRequest -> Bool
$cmax :: GetClusterInfoRequest
-> GetClusterInfoRequest -> GetClusterInfoRequest
max :: GetClusterInfoRequest
-> GetClusterInfoRequest -> GetClusterInfoRequest
$cmin :: GetClusterInfoRequest
-> GetClusterInfoRequest -> GetClusterInfoRequest
min :: GetClusterInfoRequest
-> GetClusterInfoRequest -> GetClusterInfoRequest
Prelude.Ord)
instance Prelude.Show GetClusterInfoRequest where
  showsPrec :: Int -> GetClusterInfoRequest -> ShowS
showsPrec Int
_ GetClusterInfoRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetClusterInfoRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetClusterInfoRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message GetClusterInfoRequest where
  messageName :: Proxy GetClusterInfoRequest -> Text
messageName Proxy GetClusterInfoRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetClusterInfoRequest"
  packedMessageDescriptor :: Proxy GetClusterInfoRequest -> ByteString
packedMessageDescriptor Proxy GetClusterInfoRequest
_
    = ByteString
"\n\
      \\NAKGetClusterInfoRequest"
  packedFileDescriptor :: Proxy GetClusterInfoRequest -> ByteString
packedFileDescriptor Proxy GetClusterInfoRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetClusterInfoRequest)
fieldsByTag = let in [(Tag, FieldDescriptor GetClusterInfoRequest)]
-> Map Tag (FieldDescriptor GetClusterInfoRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' GetClusterInfoRequest FieldSet
unknownFields
    = (GetClusterInfoRequest -> FieldSet)
-> (GetClusterInfoRequest -> FieldSet -> GetClusterInfoRequest)
-> Lens' GetClusterInfoRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetClusterInfoRequest -> FieldSet
_GetClusterInfoRequest'_unknownFields
        (\ GetClusterInfoRequest
x__ FieldSet
y__ -> GetClusterInfoRequest
x__ {_GetClusterInfoRequest'_unknownFields = y__})
  defMessage :: GetClusterInfoRequest
defMessage
    = GetClusterInfoRequest'_constructor
        {_GetClusterInfoRequest'_unknownFields :: FieldSet
_GetClusterInfoRequest'_unknownFields = []}
  parseMessage :: Parser GetClusterInfoRequest
parseMessage
    = let
        loop ::
          GetClusterInfoRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser GetClusterInfoRequest
        loop :: GetClusterInfoRequest -> Parser GetClusterInfoRequest
loop GetClusterInfoRequest
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 GetClusterInfoRequest
-> String -> Parser GetClusterInfoRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GetClusterInfoRequest -> Parser GetClusterInfoRequest
loop GetClusterInfoRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"GetClusterInfoRequest"
  buildMessage :: GetClusterInfoRequest -> Builder
buildMessage
    = \ GetClusterInfoRequest
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  GetClusterInfoRequest
  GetClusterInfoRequest
  FieldSet
  FieldSet
-> GetClusterInfoRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetClusterInfoRequest
  GetClusterInfoRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetClusterInfoRequest FieldSet
Data.ProtoLens.unknownFields GetClusterInfoRequest
_x)
instance Control.DeepSeq.NFData GetClusterInfoRequest where
  rnf :: GetClusterInfoRequest -> ()
rnf
    = \ GetClusterInfoRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetClusterInfoRequest -> FieldSet
_GetClusterInfoRequest'_unknownFields GetClusterInfoRequest
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.supportedClients' @:: Lens' GetClusterInfoResponse (Data.Map.Map Data.Text.Text Data.Text.Text)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.serverVersion' @:: Lens' GetClusterInfoResponse Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.clusterId' @:: Lens' GetClusterInfoResponse Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.versionInfo' @:: Lens' GetClusterInfoResponse Proto.Temporal.Api.Version.V1.Message.VersionInfo@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'versionInfo' @:: Lens' GetClusterInfoResponse (Prelude.Maybe Proto.Temporal.Api.Version.V1.Message.VersionInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.clusterName' @:: Lens' GetClusterInfoResponse Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.historyShardCount' @:: Lens' GetClusterInfoResponse Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.persistenceStore' @:: Lens' GetClusterInfoResponse Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.visibilityStore' @:: Lens' GetClusterInfoResponse Data.Text.Text@ -}
data GetClusterInfoResponse
  = GetClusterInfoResponse'_constructor {GetClusterInfoResponse -> Map Text Text
_GetClusterInfoResponse'supportedClients :: !(Data.Map.Map Data.Text.Text Data.Text.Text),
                                         GetClusterInfoResponse -> Text
_GetClusterInfoResponse'serverVersion :: !Data.Text.Text,
                                         GetClusterInfoResponse -> Text
_GetClusterInfoResponse'clusterId :: !Data.Text.Text,
                                         GetClusterInfoResponse -> Maybe VersionInfo
_GetClusterInfoResponse'versionInfo :: !(Prelude.Maybe Proto.Temporal.Api.Version.V1.Message.VersionInfo),
                                         GetClusterInfoResponse -> Text
_GetClusterInfoResponse'clusterName :: !Data.Text.Text,
                                         GetClusterInfoResponse -> Int32
_GetClusterInfoResponse'historyShardCount :: !Data.Int.Int32,
                                         GetClusterInfoResponse -> Text
_GetClusterInfoResponse'persistenceStore :: !Data.Text.Text,
                                         GetClusterInfoResponse -> Text
_GetClusterInfoResponse'visibilityStore :: !Data.Text.Text,
                                         GetClusterInfoResponse -> FieldSet
_GetClusterInfoResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetClusterInfoResponse -> GetClusterInfoResponse -> Bool
(GetClusterInfoResponse -> GetClusterInfoResponse -> Bool)
-> (GetClusterInfoResponse -> GetClusterInfoResponse -> Bool)
-> Eq GetClusterInfoResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetClusterInfoResponse -> GetClusterInfoResponse -> Bool
== :: GetClusterInfoResponse -> GetClusterInfoResponse -> Bool
$c/= :: GetClusterInfoResponse -> GetClusterInfoResponse -> Bool
/= :: GetClusterInfoResponse -> GetClusterInfoResponse -> Bool
Prelude.Eq, Eq GetClusterInfoResponse
Eq GetClusterInfoResponse =>
(GetClusterInfoResponse -> GetClusterInfoResponse -> Ordering)
-> (GetClusterInfoResponse -> GetClusterInfoResponse -> Bool)
-> (GetClusterInfoResponse -> GetClusterInfoResponse -> Bool)
-> (GetClusterInfoResponse -> GetClusterInfoResponse -> Bool)
-> (GetClusterInfoResponse -> GetClusterInfoResponse -> Bool)
-> (GetClusterInfoResponse
    -> GetClusterInfoResponse -> GetClusterInfoResponse)
-> (GetClusterInfoResponse
    -> GetClusterInfoResponse -> GetClusterInfoResponse)
-> Ord GetClusterInfoResponse
GetClusterInfoResponse -> GetClusterInfoResponse -> Bool
GetClusterInfoResponse -> GetClusterInfoResponse -> Ordering
GetClusterInfoResponse
-> GetClusterInfoResponse -> GetClusterInfoResponse
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 :: GetClusterInfoResponse -> GetClusterInfoResponse -> Ordering
compare :: GetClusterInfoResponse -> GetClusterInfoResponse -> Ordering
$c< :: GetClusterInfoResponse -> GetClusterInfoResponse -> Bool
< :: GetClusterInfoResponse -> GetClusterInfoResponse -> Bool
$c<= :: GetClusterInfoResponse -> GetClusterInfoResponse -> Bool
<= :: GetClusterInfoResponse -> GetClusterInfoResponse -> Bool
$c> :: GetClusterInfoResponse -> GetClusterInfoResponse -> Bool
> :: GetClusterInfoResponse -> GetClusterInfoResponse -> Bool
$c>= :: GetClusterInfoResponse -> GetClusterInfoResponse -> Bool
>= :: GetClusterInfoResponse -> GetClusterInfoResponse -> Bool
$cmax :: GetClusterInfoResponse
-> GetClusterInfoResponse -> GetClusterInfoResponse
max :: GetClusterInfoResponse
-> GetClusterInfoResponse -> GetClusterInfoResponse
$cmin :: GetClusterInfoResponse
-> GetClusterInfoResponse -> GetClusterInfoResponse
min :: GetClusterInfoResponse
-> GetClusterInfoResponse -> GetClusterInfoResponse
Prelude.Ord)
instance Prelude.Show GetClusterInfoResponse where
  showsPrec :: Int -> GetClusterInfoResponse -> ShowS
showsPrec Int
_ GetClusterInfoResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetClusterInfoResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetClusterInfoResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetClusterInfoResponse "supportedClients" (Data.Map.Map Data.Text.Text Data.Text.Text) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "supportedClients"
-> (Map Text Text -> f (Map Text Text))
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
fieldOf Proxy# "supportedClients"
_
    = ((Map Text Text -> f (Map Text Text))
 -> GetClusterInfoResponse -> f GetClusterInfoResponse)
-> ((Map Text Text -> f (Map Text Text))
    -> Map Text Text -> f (Map Text Text))
-> (Map Text Text -> f (Map Text Text))
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetClusterInfoResponse -> Map Text Text)
-> (GetClusterInfoResponse
    -> Map Text Text -> GetClusterInfoResponse)
-> Lens
     GetClusterInfoResponse
     GetClusterInfoResponse
     (Map Text Text)
     (Map Text Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetClusterInfoResponse -> Map Text Text
_GetClusterInfoResponse'supportedClients
           (\ GetClusterInfoResponse
x__ Map Text Text
y__
              -> GetClusterInfoResponse
x__ {_GetClusterInfoResponse'supportedClients = y__}))
        (Map Text Text -> f (Map Text Text))
-> Map Text Text -> f (Map Text Text)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetClusterInfoResponse "serverVersion" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "serverVersion"
-> (Text -> f Text)
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
fieldOf Proxy# "serverVersion"
_
    = ((Text -> f Text)
 -> GetClusterInfoResponse -> f GetClusterInfoResponse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetClusterInfoResponse -> Text)
-> (GetClusterInfoResponse -> Text -> GetClusterInfoResponse)
-> Lens GetClusterInfoResponse GetClusterInfoResponse Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetClusterInfoResponse -> Text
_GetClusterInfoResponse'serverVersion
           (\ GetClusterInfoResponse
x__ Text
y__ -> GetClusterInfoResponse
x__ {_GetClusterInfoResponse'serverVersion = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetClusterInfoResponse "clusterId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "clusterId"
-> (Text -> f Text)
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
fieldOf Proxy# "clusterId"
_
    = ((Text -> f Text)
 -> GetClusterInfoResponse -> f GetClusterInfoResponse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetClusterInfoResponse -> Text)
-> (GetClusterInfoResponse -> Text -> GetClusterInfoResponse)
-> Lens GetClusterInfoResponse GetClusterInfoResponse Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetClusterInfoResponse -> Text
_GetClusterInfoResponse'clusterId
           (\ GetClusterInfoResponse
x__ Text
y__ -> GetClusterInfoResponse
x__ {_GetClusterInfoResponse'clusterId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetClusterInfoResponse "versionInfo" Proto.Temporal.Api.Version.V1.Message.VersionInfo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "versionInfo"
-> (VersionInfo -> f VersionInfo)
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
fieldOf Proxy# "versionInfo"
_
    = ((Maybe VersionInfo -> f (Maybe VersionInfo))
 -> GetClusterInfoResponse -> f GetClusterInfoResponse)
-> ((VersionInfo -> f VersionInfo)
    -> Maybe VersionInfo -> f (Maybe VersionInfo))
-> (VersionInfo -> f VersionInfo)
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetClusterInfoResponse -> Maybe VersionInfo)
-> (GetClusterInfoResponse
    -> Maybe VersionInfo -> GetClusterInfoResponse)
-> Lens
     GetClusterInfoResponse
     GetClusterInfoResponse
     (Maybe VersionInfo)
     (Maybe VersionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetClusterInfoResponse -> Maybe VersionInfo
_GetClusterInfoResponse'versionInfo
           (\ GetClusterInfoResponse
x__ Maybe VersionInfo
y__ -> GetClusterInfoResponse
x__ {_GetClusterInfoResponse'versionInfo = y__}))
        (VersionInfo -> Lens' (Maybe VersionInfo) VersionInfo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens VersionInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField GetClusterInfoResponse "maybe'versionInfo" (Prelude.Maybe Proto.Temporal.Api.Version.V1.Message.VersionInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'versionInfo"
-> (Maybe VersionInfo -> f (Maybe VersionInfo))
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
fieldOf Proxy# "maybe'versionInfo"
_
    = ((Maybe VersionInfo -> f (Maybe VersionInfo))
 -> GetClusterInfoResponse -> f GetClusterInfoResponse)
-> ((Maybe VersionInfo -> f (Maybe VersionInfo))
    -> Maybe VersionInfo -> f (Maybe VersionInfo))
-> (Maybe VersionInfo -> f (Maybe VersionInfo))
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetClusterInfoResponse -> Maybe VersionInfo)
-> (GetClusterInfoResponse
    -> Maybe VersionInfo -> GetClusterInfoResponse)
-> Lens
     GetClusterInfoResponse
     GetClusterInfoResponse
     (Maybe VersionInfo)
     (Maybe VersionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetClusterInfoResponse -> Maybe VersionInfo
_GetClusterInfoResponse'versionInfo
           (\ GetClusterInfoResponse
x__ Maybe VersionInfo
y__ -> GetClusterInfoResponse
x__ {_GetClusterInfoResponse'versionInfo = y__}))
        (Maybe VersionInfo -> f (Maybe VersionInfo))
-> Maybe VersionInfo -> f (Maybe VersionInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetClusterInfoResponse "clusterName" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "clusterName"
-> (Text -> f Text)
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
fieldOf Proxy# "clusterName"
_
    = ((Text -> f Text)
 -> GetClusterInfoResponse -> f GetClusterInfoResponse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetClusterInfoResponse -> Text)
-> (GetClusterInfoResponse -> Text -> GetClusterInfoResponse)
-> Lens GetClusterInfoResponse GetClusterInfoResponse Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetClusterInfoResponse -> Text
_GetClusterInfoResponse'clusterName
           (\ GetClusterInfoResponse
x__ Text
y__ -> GetClusterInfoResponse
x__ {_GetClusterInfoResponse'clusterName = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetClusterInfoResponse "historyShardCount" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "historyShardCount"
-> (Int32 -> f Int32)
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
fieldOf Proxy# "historyShardCount"
_
    = ((Int32 -> f Int32)
 -> GetClusterInfoResponse -> f GetClusterInfoResponse)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetClusterInfoResponse -> Int32)
-> (GetClusterInfoResponse -> Int32 -> GetClusterInfoResponse)
-> Lens GetClusterInfoResponse GetClusterInfoResponse Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetClusterInfoResponse -> Int32
_GetClusterInfoResponse'historyShardCount
           (\ GetClusterInfoResponse
x__ Int32
y__
              -> GetClusterInfoResponse
x__ {_GetClusterInfoResponse'historyShardCount = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetClusterInfoResponse "persistenceStore" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "persistenceStore"
-> (Text -> f Text)
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
fieldOf Proxy# "persistenceStore"
_
    = ((Text -> f Text)
 -> GetClusterInfoResponse -> f GetClusterInfoResponse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetClusterInfoResponse -> Text)
-> (GetClusterInfoResponse -> Text -> GetClusterInfoResponse)
-> Lens GetClusterInfoResponse GetClusterInfoResponse Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetClusterInfoResponse -> Text
_GetClusterInfoResponse'persistenceStore
           (\ GetClusterInfoResponse
x__ Text
y__
              -> GetClusterInfoResponse
x__ {_GetClusterInfoResponse'persistenceStore = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetClusterInfoResponse "visibilityStore" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "visibilityStore"
-> (Text -> f Text)
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
fieldOf Proxy# "visibilityStore"
_
    = ((Text -> f Text)
 -> GetClusterInfoResponse -> f GetClusterInfoResponse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetClusterInfoResponse
-> f GetClusterInfoResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetClusterInfoResponse -> Text)
-> (GetClusterInfoResponse -> Text -> GetClusterInfoResponse)
-> Lens GetClusterInfoResponse GetClusterInfoResponse Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetClusterInfoResponse -> Text
_GetClusterInfoResponse'visibilityStore
           (\ GetClusterInfoResponse
x__ Text
y__ -> GetClusterInfoResponse
x__ {_GetClusterInfoResponse'visibilityStore = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetClusterInfoResponse where
  messageName :: Proxy GetClusterInfoResponse -> Text
messageName Proxy GetClusterInfoResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetClusterInfoResponse"
  packedMessageDescriptor :: Proxy GetClusterInfoResponse -> ByteString
packedMessageDescriptor Proxy GetClusterInfoResponse
_
    = ByteString
"\n\
      \\SYNGetClusterInfoResponse\DC2z\n\
      \\DC1supported_clients\CAN\SOH \ETX(\v2M.temporal.api.workflowservice.v1.GetClusterInfoResponse.SupportedClientsEntryR\DLEsupportedClients\DC2%\n\
      \\SOserver_version\CAN\STX \SOH(\tR\rserverVersion\DC2\GS\n\
      \\n\
      \cluster_id\CAN\ETX \SOH(\tR\tclusterId\DC2G\n\
      \\fversion_info\CAN\EOT \SOH(\v2$.temporal.api.version.v1.VersionInfoR\vversionInfo\DC2!\n\
      \\fcluster_name\CAN\ENQ \SOH(\tR\vclusterName\DC2.\n\
      \\DC3history_shard_count\CAN\ACK \SOH(\ENQR\DC1historyShardCount\DC2+\n\
      \\DC1persistence_store\CAN\a \SOH(\tR\DLEpersistenceStore\DC2)\n\
      \\DLEvisibility_store\CAN\b \SOH(\tR\SIvisibilityStore\SUBC\n\
      \\NAKSupportedClientsEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy GetClusterInfoResponse -> ByteString
packedFileDescriptor Proxy GetClusterInfoResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetClusterInfoResponse)
fieldsByTag
    = let
        supportedClients__field_descriptor :: FieldDescriptor GetClusterInfoResponse
supportedClients__field_descriptor
          = String
-> FieldTypeDescriptor GetClusterInfoResponse'SupportedClientsEntry
-> FieldAccessor
     GetClusterInfoResponse GetClusterInfoResponse'SupportedClientsEntry
-> FieldDescriptor GetClusterInfoResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"supported_clients"
              (MessageOrGroup
-> FieldTypeDescriptor GetClusterInfoResponse'SupportedClientsEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor GetClusterInfoResponse'SupportedClientsEntry)
              (Lens' GetClusterInfoResponse'SupportedClientsEntry Text
-> Lens' GetClusterInfoResponse'SupportedClientsEntry Text
-> Lens
     GetClusterInfoResponse
     GetClusterInfoResponse
     (Map Text Text)
     (Map Text Text)
-> FieldAccessor
     GetClusterInfoResponse GetClusterInfoResponse'SupportedClientsEntry
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 @"supportedClients")) ::
              Data.ProtoLens.FieldDescriptor GetClusterInfoResponse
        serverVersion__field_descriptor :: FieldDescriptor GetClusterInfoResponse
serverVersion__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetClusterInfoResponse Text
-> FieldDescriptor GetClusterInfoResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"server_version"
              (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 GetClusterInfoResponse GetClusterInfoResponse Text Text
-> FieldAccessor GetClusterInfoResponse 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 @"serverVersion")) ::
              Data.ProtoLens.FieldDescriptor GetClusterInfoResponse
        clusterId__field_descriptor :: FieldDescriptor GetClusterInfoResponse
clusterId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetClusterInfoResponse Text
-> FieldDescriptor GetClusterInfoResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cluster_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 GetClusterInfoResponse GetClusterInfoResponse Text Text
-> FieldAccessor GetClusterInfoResponse 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 @"clusterId")) ::
              Data.ProtoLens.FieldDescriptor GetClusterInfoResponse
        versionInfo__field_descriptor :: FieldDescriptor GetClusterInfoResponse
versionInfo__field_descriptor
          = String
-> FieldTypeDescriptor VersionInfo
-> FieldAccessor GetClusterInfoResponse VersionInfo
-> FieldDescriptor GetClusterInfoResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"version_info"
              (MessageOrGroup -> FieldTypeDescriptor VersionInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Version.V1.Message.VersionInfo)
              (Lens
  GetClusterInfoResponse
  GetClusterInfoResponse
  (Maybe VersionInfo)
  (Maybe VersionInfo)
-> FieldAccessor GetClusterInfoResponse VersionInfo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'versionInfo")) ::
              Data.ProtoLens.FieldDescriptor GetClusterInfoResponse
        clusterName__field_descriptor :: FieldDescriptor GetClusterInfoResponse
clusterName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetClusterInfoResponse Text
-> FieldDescriptor GetClusterInfoResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cluster_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 GetClusterInfoResponse GetClusterInfoResponse Text Text
-> FieldAccessor GetClusterInfoResponse 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 @"clusterName")) ::
              Data.ProtoLens.FieldDescriptor GetClusterInfoResponse
        historyShardCount__field_descriptor :: FieldDescriptor GetClusterInfoResponse
historyShardCount__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor GetClusterInfoResponse Int32
-> FieldDescriptor GetClusterInfoResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"history_shard_count"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens GetClusterInfoResponse GetClusterInfoResponse Int32 Int32
-> FieldAccessor GetClusterInfoResponse Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"historyShardCount")) ::
              Data.ProtoLens.FieldDescriptor GetClusterInfoResponse
        persistenceStore__field_descriptor :: FieldDescriptor GetClusterInfoResponse
persistenceStore__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetClusterInfoResponse Text
-> FieldDescriptor GetClusterInfoResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"persistence_store"
              (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 GetClusterInfoResponse GetClusterInfoResponse Text Text
-> FieldAccessor GetClusterInfoResponse 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 @"persistenceStore")) ::
              Data.ProtoLens.FieldDescriptor GetClusterInfoResponse
        visibilityStore__field_descriptor :: FieldDescriptor GetClusterInfoResponse
visibilityStore__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetClusterInfoResponse Text
-> FieldDescriptor GetClusterInfoResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"visibility_store"
              (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 GetClusterInfoResponse GetClusterInfoResponse Text Text
-> FieldAccessor GetClusterInfoResponse 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 @"visibilityStore")) ::
              Data.ProtoLens.FieldDescriptor GetClusterInfoResponse
      in
        [(Tag, FieldDescriptor GetClusterInfoResponse)]
-> Map Tag (FieldDescriptor GetClusterInfoResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetClusterInfoResponse
supportedClients__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor GetClusterInfoResponse
serverVersion__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor GetClusterInfoResponse
clusterId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor GetClusterInfoResponse
versionInfo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor GetClusterInfoResponse
clusterName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor GetClusterInfoResponse
historyShardCount__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor GetClusterInfoResponse
persistenceStore__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor GetClusterInfoResponse
visibilityStore__field_descriptor)]
  unknownFields :: Lens' GetClusterInfoResponse FieldSet
unknownFields
    = (GetClusterInfoResponse -> FieldSet)
-> (GetClusterInfoResponse -> FieldSet -> GetClusterInfoResponse)
-> Lens' GetClusterInfoResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetClusterInfoResponse -> FieldSet
_GetClusterInfoResponse'_unknownFields
        (\ GetClusterInfoResponse
x__ FieldSet
y__ -> GetClusterInfoResponse
x__ {_GetClusterInfoResponse'_unknownFields = y__})
  defMessage :: GetClusterInfoResponse
defMessage
    = GetClusterInfoResponse'_constructor
        {_GetClusterInfoResponse'supportedClients :: Map Text Text
_GetClusterInfoResponse'supportedClients = Map Text Text
forall k a. Map k a
Data.Map.empty,
         _GetClusterInfoResponse'serverVersion :: Text
_GetClusterInfoResponse'serverVersion = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetClusterInfoResponse'clusterId :: Text
_GetClusterInfoResponse'clusterId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetClusterInfoResponse'versionInfo :: Maybe VersionInfo
_GetClusterInfoResponse'versionInfo = Maybe VersionInfo
forall a. Maybe a
Prelude.Nothing,
         _GetClusterInfoResponse'clusterName :: Text
_GetClusterInfoResponse'clusterName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetClusterInfoResponse'historyShardCount :: Int32
_GetClusterInfoResponse'historyShardCount = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetClusterInfoResponse'persistenceStore :: Text
_GetClusterInfoResponse'persistenceStore = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetClusterInfoResponse'visibilityStore :: Text
_GetClusterInfoResponse'visibilityStore = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetClusterInfoResponse'_unknownFields :: FieldSet
_GetClusterInfoResponse'_unknownFields = []}
  parseMessage :: Parser GetClusterInfoResponse
parseMessage
    = let
        loop ::
          GetClusterInfoResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser GetClusterInfoResponse
        loop :: GetClusterInfoResponse -> Parser GetClusterInfoResponse
loop GetClusterInfoResponse
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 :: GetClusterInfoResponse'SupportedClientsEntry) <- Parser GetClusterInfoResponse'SupportedClientsEntry
-> String -> Parser GetClusterInfoResponse'SupportedClientsEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                                              (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                                                  Data.ProtoLens.Encoding.Bytes.isolate
                                                                                                    (Prelude.fromIntegral
                                                                                                       len)
                                                                                                    Data.ProtoLens.parseMessage)
                                                                                              String
"supported_clients"
                                (let
                                   key = FoldLike
  Text
  GetClusterInfoResponse'SupportedClientsEntry
  GetClusterInfoResponse'SupportedClientsEntry
  Text
  Text
-> GetClusterInfoResponse'SupportedClientsEntry -> 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") GetClusterInfoResponse'SupportedClientsEntry
entry
                                   value
                                     = FoldLike
  Text
  GetClusterInfoResponse'SupportedClientsEntry
  GetClusterInfoResponse'SupportedClientsEntry
  Text
  Text
-> GetClusterInfoResponse'SupportedClientsEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") GetClusterInfoResponse'SupportedClientsEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"supportedClients")
                                        (\ !Map Text Text
t -> Text -> Text -> Map Text Text -> Map Text Text
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key Text
value Map Text Text
t) x))
                        Word64
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
"server_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"serverVersion") 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
"cluster_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"clusterId") y x)
                        Word64
34
                          -> do y <- Parser VersionInfo -> String -> Parser VersionInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"version_info"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"versionInfo") y x)
                        Word64
42
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"cluster_name"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"clusterName") y x)
                        Word64
48
                          -> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"history_shard_count"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"historyShardCount") y x)
                        Word64
58
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"persistence_store"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"persistenceStore") y x)
                        Word64
66
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"visibility_store"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"visibilityStore") 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 GetClusterInfoResponse
-> String -> Parser GetClusterInfoResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GetClusterInfoResponse -> Parser GetClusterInfoResponse
loop GetClusterInfoResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"GetClusterInfoResponse"
  buildMessage :: GetClusterInfoResponse -> Builder
buildMessage
    = \ GetClusterInfoResponse
_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, Text) -> Builder) -> [(Text, Text)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                   (\ (Text, Text)
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                           ((ByteString -> Builder)
-> (GetClusterInfoResponse'SupportedClientsEntry -> ByteString)
-> GetClusterInfoResponse'SupportedClientsEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ ByteString
bs
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                              GetClusterInfoResponse'SupportedClientsEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                              (Setter
  GetClusterInfoResponse'SupportedClientsEntry
  GetClusterInfoResponse'SupportedClientsEntry
  Text
  Text
-> Text
-> GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") ((Text, Text) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, Text)
_v)
                                 (Setter
  GetClusterInfoResponse'SupportedClientsEntry
  GetClusterInfoResponse'SupportedClientsEntry
  Text
  Text
-> Text
-> GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                    (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") ((Text, Text) -> Text
forall a b. (a, b) -> b
Prelude.snd (Text, Text)
_v)
                                    (GetClusterInfoResponse'SupportedClientsEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                       GetClusterInfoResponse'SupportedClientsEntry)))))
                   (Map Text Text -> [(Text, Text)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                      (FoldLike
  (Map Text Text)
  GetClusterInfoResponse
  GetClusterInfoResponse
  (Map Text Text)
  (Map Text Text)
-> GetClusterInfoResponse -> Map Text Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"supportedClients") GetClusterInfoResponse
_x))))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Text
_v
                     = FoldLike
  Text GetClusterInfoResponse GetClusterInfoResponse Text Text
-> GetClusterInfoResponse -> 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 @"serverVersion") GetClusterInfoResponse
_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 GetClusterInfoResponse GetClusterInfoResponse Text Text
-> GetClusterInfoResponse -> 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 @"clusterId") GetClusterInfoResponse
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe VersionInfo)
  GetClusterInfoResponse
  GetClusterInfoResponse
  (Maybe VersionInfo)
  (Maybe VersionInfo)
-> GetClusterInfoResponse -> Maybe VersionInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'versionInfo") GetClusterInfoResponse
_x
                       of
                         Maybe VersionInfo
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just VersionInfo
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (VersionInfo -> ByteString) -> VersionInfo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   VersionInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage VersionInfo
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Text
_v
                              = FoldLike
  Text GetClusterInfoResponse GetClusterInfoResponse Text Text
-> GetClusterInfoResponse -> 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 @"clusterName") GetClusterInfoResponse
_x
                          in
                            if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                  ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     (\ ByteString
bs
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                     Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Int32
_v
                                 = FoldLike
  Int32 GetClusterInfoResponse GetClusterInfoResponse Int32 Int32
-> GetClusterInfoResponse -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"historyShardCount") GetClusterInfoResponse
_x
                             in
                               if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
48)
                                     ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                        Int32
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Text
_v
                                    = FoldLike
  Text GetClusterInfoResponse GetClusterInfoResponse Text Text
-> GetClusterInfoResponse -> 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 @"persistenceStore") GetClusterInfoResponse
_x
                                in
                                  if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                      Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  else
                                      Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                        ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                           (\ ByteString
bs
                                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                         (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                           Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (let
                                     _v :: Text
_v
                                       = FoldLike
  Text GetClusterInfoResponse GetClusterInfoResponse Text Text
-> GetClusterInfoResponse -> 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 @"visibilityStore") GetClusterInfoResponse
_x
                                   in
                                     if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                         Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                     else
                                         Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                                           ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                              (\ ByteString
bs
                                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                            (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                              Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                                  (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                     (FoldLike
  FieldSet
  GetClusterInfoResponse
  GetClusterInfoResponse
  FieldSet
  FieldSet
-> GetClusterInfoResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetClusterInfoResponse
  GetClusterInfoResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetClusterInfoResponse FieldSet
Data.ProtoLens.unknownFields GetClusterInfoResponse
_x)))))))))
instance Control.DeepSeq.NFData GetClusterInfoResponse where
  rnf :: GetClusterInfoResponse -> ()
rnf
    = \ GetClusterInfoResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetClusterInfoResponse -> FieldSet
_GetClusterInfoResponse'_unknownFields GetClusterInfoResponse
x__)
             (Map Text Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetClusterInfoResponse -> Map Text Text
_GetClusterInfoResponse'supportedClients GetClusterInfoResponse
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GetClusterInfoResponse -> Text
_GetClusterInfoResponse'serverVersion GetClusterInfoResponse
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (GetClusterInfoResponse -> Text
_GetClusterInfoResponse'clusterId GetClusterInfoResponse
x__)
                      (Maybe VersionInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (GetClusterInfoResponse -> Maybe VersionInfo
_GetClusterInfoResponse'versionInfo GetClusterInfoResponse
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (GetClusterInfoResponse -> Text
_GetClusterInfoResponse'clusterName GetClusterInfoResponse
x__)
                            (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (GetClusterInfoResponse -> Int32
_GetClusterInfoResponse'historyShardCount GetClusterInfoResponse
x__)
                               (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (GetClusterInfoResponse -> Text
_GetClusterInfoResponse'persistenceStore GetClusterInfoResponse
x__)
                                  (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (GetClusterInfoResponse -> Text
_GetClusterInfoResponse'visibilityStore GetClusterInfoResponse
x__) ()))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.key' @:: Lens' GetClusterInfoResponse'SupportedClientsEntry Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.value' @:: Lens' GetClusterInfoResponse'SupportedClientsEntry Data.Text.Text@ -}
data GetClusterInfoResponse'SupportedClientsEntry
  = GetClusterInfoResponse'SupportedClientsEntry'_constructor {GetClusterInfoResponse'SupportedClientsEntry -> Text
_GetClusterInfoResponse'SupportedClientsEntry'key :: !Data.Text.Text,
                                                               GetClusterInfoResponse'SupportedClientsEntry -> Text
_GetClusterInfoResponse'SupportedClientsEntry'value :: !Data.Text.Text,
                                                               GetClusterInfoResponse'SupportedClientsEntry -> FieldSet
_GetClusterInfoResponse'SupportedClientsEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Bool
(GetClusterInfoResponse'SupportedClientsEntry
 -> GetClusterInfoResponse'SupportedClientsEntry -> Bool)
-> (GetClusterInfoResponse'SupportedClientsEntry
    -> GetClusterInfoResponse'SupportedClientsEntry -> Bool)
-> Eq GetClusterInfoResponse'SupportedClientsEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Bool
== :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Bool
$c/= :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Bool
/= :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Bool
Prelude.Eq, Eq GetClusterInfoResponse'SupportedClientsEntry
Eq GetClusterInfoResponse'SupportedClientsEntry =>
(GetClusterInfoResponse'SupportedClientsEntry
 -> GetClusterInfoResponse'SupportedClientsEntry -> Ordering)
-> (GetClusterInfoResponse'SupportedClientsEntry
    -> GetClusterInfoResponse'SupportedClientsEntry -> Bool)
-> (GetClusterInfoResponse'SupportedClientsEntry
    -> GetClusterInfoResponse'SupportedClientsEntry -> Bool)
-> (GetClusterInfoResponse'SupportedClientsEntry
    -> GetClusterInfoResponse'SupportedClientsEntry -> Bool)
-> (GetClusterInfoResponse'SupportedClientsEntry
    -> GetClusterInfoResponse'SupportedClientsEntry -> Bool)
-> (GetClusterInfoResponse'SupportedClientsEntry
    -> GetClusterInfoResponse'SupportedClientsEntry
    -> GetClusterInfoResponse'SupportedClientsEntry)
-> (GetClusterInfoResponse'SupportedClientsEntry
    -> GetClusterInfoResponse'SupportedClientsEntry
    -> GetClusterInfoResponse'SupportedClientsEntry)
-> Ord GetClusterInfoResponse'SupportedClientsEntry
GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Bool
GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Ordering
GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry
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 :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Ordering
compare :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Ordering
$c< :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Bool
< :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Bool
$c<= :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Bool
<= :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Bool
$c> :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Bool
> :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Bool
$c>= :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Bool
>= :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry -> Bool
$cmax :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry
max :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry
$cmin :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry
min :: GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry
-> GetClusterInfoResponse'SupportedClientsEntry
Prelude.Ord)
instance Prelude.Show GetClusterInfoResponse'SupportedClientsEntry where
  showsPrec :: Int -> GetClusterInfoResponse'SupportedClientsEntry -> ShowS
showsPrec Int
_ GetClusterInfoResponse'SupportedClientsEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetClusterInfoResponse'SupportedClientsEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetClusterInfoResponse'SupportedClientsEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetClusterInfoResponse'SupportedClientsEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> GetClusterInfoResponse'SupportedClientsEntry
-> f GetClusterInfoResponse'SupportedClientsEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> GetClusterInfoResponse'SupportedClientsEntry
 -> f GetClusterInfoResponse'SupportedClientsEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetClusterInfoResponse'SupportedClientsEntry
-> f GetClusterInfoResponse'SupportedClientsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetClusterInfoResponse'SupportedClientsEntry -> Text)
-> (GetClusterInfoResponse'SupportedClientsEntry
    -> Text -> GetClusterInfoResponse'SupportedClientsEntry)
-> Lens' GetClusterInfoResponse'SupportedClientsEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetClusterInfoResponse'SupportedClientsEntry -> Text
_GetClusterInfoResponse'SupportedClientsEntry'key
           (\ GetClusterInfoResponse'SupportedClientsEntry
x__ Text
y__
              -> GetClusterInfoResponse'SupportedClientsEntry
x__ {_GetClusterInfoResponse'SupportedClientsEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetClusterInfoResponse'SupportedClientsEntry "value" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Text -> f Text)
-> GetClusterInfoResponse'SupportedClientsEntry
-> f GetClusterInfoResponse'SupportedClientsEntry
fieldOf Proxy# "value"
_
    = ((Text -> f Text)
 -> GetClusterInfoResponse'SupportedClientsEntry
 -> f GetClusterInfoResponse'SupportedClientsEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetClusterInfoResponse'SupportedClientsEntry
-> f GetClusterInfoResponse'SupportedClientsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetClusterInfoResponse'SupportedClientsEntry -> Text)
-> (GetClusterInfoResponse'SupportedClientsEntry
    -> Text -> GetClusterInfoResponse'SupportedClientsEntry)
-> Lens' GetClusterInfoResponse'SupportedClientsEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetClusterInfoResponse'SupportedClientsEntry -> Text
_GetClusterInfoResponse'SupportedClientsEntry'value
           (\ GetClusterInfoResponse'SupportedClientsEntry
x__ Text
y__
              -> GetClusterInfoResponse'SupportedClientsEntry
x__
                   {_GetClusterInfoResponse'SupportedClientsEntry'value = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetClusterInfoResponse'SupportedClientsEntry where
  messageName :: Proxy GetClusterInfoResponse'SupportedClientsEntry -> Text
messageName Proxy GetClusterInfoResponse'SupportedClientsEntry
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetClusterInfoResponse.SupportedClientsEntry"
  packedMessageDescriptor :: Proxy GetClusterInfoResponse'SupportedClientsEntry -> ByteString
packedMessageDescriptor Proxy GetClusterInfoResponse'SupportedClientsEntry
_
    = ByteString
"\n\
      \\NAKSupportedClientsEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy GetClusterInfoResponse'SupportedClientsEntry -> ByteString
packedFileDescriptor Proxy GetClusterInfoResponse'SupportedClientsEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor GetClusterInfoResponse'SupportedClientsEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor GetClusterInfoResponse'SupportedClientsEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetClusterInfoResponse'SupportedClientsEntry Text
-> FieldDescriptor GetClusterInfoResponse'SupportedClientsEntry
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' GetClusterInfoResponse'SupportedClientsEntry Text
-> FieldAccessor GetClusterInfoResponse'SupportedClientsEntry 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 GetClusterInfoResponse'SupportedClientsEntry
        value__field_descriptor :: FieldDescriptor GetClusterInfoResponse'SupportedClientsEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetClusterInfoResponse'SupportedClientsEntry Text
-> FieldDescriptor GetClusterInfoResponse'SupportedClientsEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"value"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens' GetClusterInfoResponse'SupportedClientsEntry Text
-> FieldAccessor GetClusterInfoResponse'SupportedClientsEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")) ::
              Data.ProtoLens.FieldDescriptor GetClusterInfoResponse'SupportedClientsEntry
      in
        [(Tag,
  FieldDescriptor GetClusterInfoResponse'SupportedClientsEntry)]
-> Map
     Tag (FieldDescriptor GetClusterInfoResponse'SupportedClientsEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetClusterInfoResponse'SupportedClientsEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor GetClusterInfoResponse'SupportedClientsEntry
value__field_descriptor)]
  unknownFields :: Lens' GetClusterInfoResponse'SupportedClientsEntry FieldSet
unknownFields
    = (GetClusterInfoResponse'SupportedClientsEntry -> FieldSet)
-> (GetClusterInfoResponse'SupportedClientsEntry
    -> FieldSet -> GetClusterInfoResponse'SupportedClientsEntry)
-> Lens' GetClusterInfoResponse'SupportedClientsEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetClusterInfoResponse'SupportedClientsEntry -> FieldSet
_GetClusterInfoResponse'SupportedClientsEntry'_unknownFields
        (\ GetClusterInfoResponse'SupportedClientsEntry
x__ FieldSet
y__
           -> GetClusterInfoResponse'SupportedClientsEntry
x__
                {_GetClusterInfoResponse'SupportedClientsEntry'_unknownFields = y__})
  defMessage :: GetClusterInfoResponse'SupportedClientsEntry
defMessage
    = GetClusterInfoResponse'SupportedClientsEntry'_constructor
        {_GetClusterInfoResponse'SupportedClientsEntry'key :: Text
_GetClusterInfoResponse'SupportedClientsEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetClusterInfoResponse'SupportedClientsEntry'value :: Text
_GetClusterInfoResponse'SupportedClientsEntry'value = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetClusterInfoResponse'SupportedClientsEntry'_unknownFields :: FieldSet
_GetClusterInfoResponse'SupportedClientsEntry'_unknownFields = []}
  parseMessage :: Parser GetClusterInfoResponse'SupportedClientsEntry
parseMessage
    = let
        loop ::
          GetClusterInfoResponse'SupportedClientsEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser GetClusterInfoResponse'SupportedClientsEntry
        loop :: GetClusterInfoResponse'SupportedClientsEntry
-> Parser GetClusterInfoResponse'SupportedClientsEntry
loop GetClusterInfoResponse'SupportedClientsEntry
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"key"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"key") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"value"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser GetClusterInfoResponse'SupportedClientsEntry
-> String -> Parser GetClusterInfoResponse'SupportedClientsEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GetClusterInfoResponse'SupportedClientsEntry
-> Parser GetClusterInfoResponse'SupportedClientsEntry
loop GetClusterInfoResponse'SupportedClientsEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"SupportedClientsEntry"
  buildMessage :: GetClusterInfoResponse'SupportedClientsEntry -> Builder
buildMessage
    = \ GetClusterInfoResponse'SupportedClientsEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  GetClusterInfoResponse'SupportedClientsEntry
  GetClusterInfoResponse'SupportedClientsEntry
  Text
  Text
-> GetClusterInfoResponse'SupportedClientsEntry -> 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") GetClusterInfoResponse'SupportedClientsEntry
_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
  GetClusterInfoResponse'SupportedClientsEntry
  GetClusterInfoResponse'SupportedClientsEntry
  Text
  Text
-> GetClusterInfoResponse'SupportedClientsEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") GetClusterInfoResponse'SupportedClientsEntry
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  GetClusterInfoResponse'SupportedClientsEntry
  GetClusterInfoResponse'SupportedClientsEntry
  FieldSet
  FieldSet
-> GetClusterInfoResponse'SupportedClientsEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetClusterInfoResponse'SupportedClientsEntry
  GetClusterInfoResponse'SupportedClientsEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetClusterInfoResponse'SupportedClientsEntry FieldSet
Data.ProtoLens.unknownFields GetClusterInfoResponse'SupportedClientsEntry
_x)))
instance Control.DeepSeq.NFData GetClusterInfoResponse'SupportedClientsEntry where
  rnf :: GetClusterInfoResponse'SupportedClientsEntry -> ()
rnf
    = \ GetClusterInfoResponse'SupportedClientsEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetClusterInfoResponse'SupportedClientsEntry -> FieldSet
_GetClusterInfoResponse'SupportedClientsEntry'_unknownFields GetClusterInfoResponse'SupportedClientsEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetClusterInfoResponse'SupportedClientsEntry -> Text
_GetClusterInfoResponse'SupportedClientsEntry'key GetClusterInfoResponse'SupportedClientsEntry
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GetClusterInfoResponse'SupportedClientsEntry -> Text
_GetClusterInfoResponse'SupportedClientsEntry'value GetClusterInfoResponse'SupportedClientsEntry
x__) ()))
{- | Fields :
      -}
data GetSearchAttributesRequest
  = GetSearchAttributesRequest'_constructor {GetSearchAttributesRequest -> FieldSet
_GetSearchAttributesRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetSearchAttributesRequest -> GetSearchAttributesRequest -> Bool
(GetSearchAttributesRequest -> GetSearchAttributesRequest -> Bool)
-> (GetSearchAttributesRequest
    -> GetSearchAttributesRequest -> Bool)
-> Eq GetSearchAttributesRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetSearchAttributesRequest -> GetSearchAttributesRequest -> Bool
== :: GetSearchAttributesRequest -> GetSearchAttributesRequest -> Bool
$c/= :: GetSearchAttributesRequest -> GetSearchAttributesRequest -> Bool
/= :: GetSearchAttributesRequest -> GetSearchAttributesRequest -> Bool
Prelude.Eq, Eq GetSearchAttributesRequest
Eq GetSearchAttributesRequest =>
(GetSearchAttributesRequest
 -> GetSearchAttributesRequest -> Ordering)
-> (GetSearchAttributesRequest
    -> GetSearchAttributesRequest -> Bool)
-> (GetSearchAttributesRequest
    -> GetSearchAttributesRequest -> Bool)
-> (GetSearchAttributesRequest
    -> GetSearchAttributesRequest -> Bool)
-> (GetSearchAttributesRequest
    -> GetSearchAttributesRequest -> Bool)
-> (GetSearchAttributesRequest
    -> GetSearchAttributesRequest -> GetSearchAttributesRequest)
-> (GetSearchAttributesRequest
    -> GetSearchAttributesRequest -> GetSearchAttributesRequest)
-> Ord GetSearchAttributesRequest
GetSearchAttributesRequest -> GetSearchAttributesRequest -> Bool
GetSearchAttributesRequest
-> GetSearchAttributesRequest -> Ordering
GetSearchAttributesRequest
-> GetSearchAttributesRequest -> GetSearchAttributesRequest
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 :: GetSearchAttributesRequest
-> GetSearchAttributesRequest -> Ordering
compare :: GetSearchAttributesRequest
-> GetSearchAttributesRequest -> Ordering
$c< :: GetSearchAttributesRequest -> GetSearchAttributesRequest -> Bool
< :: GetSearchAttributesRequest -> GetSearchAttributesRequest -> Bool
$c<= :: GetSearchAttributesRequest -> GetSearchAttributesRequest -> Bool
<= :: GetSearchAttributesRequest -> GetSearchAttributesRequest -> Bool
$c> :: GetSearchAttributesRequest -> GetSearchAttributesRequest -> Bool
> :: GetSearchAttributesRequest -> GetSearchAttributesRequest -> Bool
$c>= :: GetSearchAttributesRequest -> GetSearchAttributesRequest -> Bool
>= :: GetSearchAttributesRequest -> GetSearchAttributesRequest -> Bool
$cmax :: GetSearchAttributesRequest
-> GetSearchAttributesRequest -> GetSearchAttributesRequest
max :: GetSearchAttributesRequest
-> GetSearchAttributesRequest -> GetSearchAttributesRequest
$cmin :: GetSearchAttributesRequest
-> GetSearchAttributesRequest -> GetSearchAttributesRequest
min :: GetSearchAttributesRequest
-> GetSearchAttributesRequest -> GetSearchAttributesRequest
Prelude.Ord)
instance Prelude.Show GetSearchAttributesRequest where
  showsPrec :: Int -> GetSearchAttributesRequest -> ShowS
showsPrec Int
_ GetSearchAttributesRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetSearchAttributesRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetSearchAttributesRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message GetSearchAttributesRequest where
  messageName :: Proxy GetSearchAttributesRequest -> Text
messageName Proxy GetSearchAttributesRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetSearchAttributesRequest"
  packedMessageDescriptor :: Proxy GetSearchAttributesRequest -> ByteString
packedMessageDescriptor Proxy GetSearchAttributesRequest
_
    = ByteString
"\n\
      \\SUBGetSearchAttributesRequest"
  packedFileDescriptor :: Proxy GetSearchAttributesRequest -> ByteString
packedFileDescriptor Proxy GetSearchAttributesRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetSearchAttributesRequest)
fieldsByTag = let in [(Tag, FieldDescriptor GetSearchAttributesRequest)]
-> Map Tag (FieldDescriptor GetSearchAttributesRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' GetSearchAttributesRequest FieldSet
unknownFields
    = (GetSearchAttributesRequest -> FieldSet)
-> (GetSearchAttributesRequest
    -> FieldSet -> GetSearchAttributesRequest)
-> Lens' GetSearchAttributesRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetSearchAttributesRequest -> FieldSet
_GetSearchAttributesRequest'_unknownFields
        (\ GetSearchAttributesRequest
x__ FieldSet
y__
           -> GetSearchAttributesRequest
x__ {_GetSearchAttributesRequest'_unknownFields = y__})
  defMessage :: GetSearchAttributesRequest
defMessage
    = GetSearchAttributesRequest'_constructor
        {_GetSearchAttributesRequest'_unknownFields :: FieldSet
_GetSearchAttributesRequest'_unknownFields = []}
  parseMessage :: Parser GetSearchAttributesRequest
parseMessage
    = let
        loop ::
          GetSearchAttributesRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser GetSearchAttributesRequest
        loop :: GetSearchAttributesRequest -> Parser GetSearchAttributesRequest
loop GetSearchAttributesRequest
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 GetSearchAttributesRequest
-> String -> Parser GetSearchAttributesRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GetSearchAttributesRequest -> Parser GetSearchAttributesRequest
loop GetSearchAttributesRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"GetSearchAttributesRequest"
  buildMessage :: GetSearchAttributesRequest -> Builder
buildMessage
    = \ GetSearchAttributesRequest
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  GetSearchAttributesRequest
  GetSearchAttributesRequest
  FieldSet
  FieldSet
-> GetSearchAttributesRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetSearchAttributesRequest
  GetSearchAttributesRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetSearchAttributesRequest FieldSet
Data.ProtoLens.unknownFields GetSearchAttributesRequest
_x)
instance Control.DeepSeq.NFData GetSearchAttributesRequest where
  rnf :: GetSearchAttributesRequest -> ()
rnf
    = \ GetSearchAttributesRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetSearchAttributesRequest -> FieldSet
_GetSearchAttributesRequest'_unknownFields GetSearchAttributesRequest
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.keys' @:: Lens' GetSearchAttributesResponse (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Enums.V1.Common.IndexedValueType)@ -}
data GetSearchAttributesResponse
  = GetSearchAttributesResponse'_constructor {GetSearchAttributesResponse -> Map Text IndexedValueType
_GetSearchAttributesResponse'keys :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Enums.V1.Common.IndexedValueType),
                                              GetSearchAttributesResponse -> FieldSet
_GetSearchAttributesResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetSearchAttributesResponse -> GetSearchAttributesResponse -> Bool
(GetSearchAttributesResponse
 -> GetSearchAttributesResponse -> Bool)
-> (GetSearchAttributesResponse
    -> GetSearchAttributesResponse -> Bool)
-> Eq GetSearchAttributesResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetSearchAttributesResponse -> GetSearchAttributesResponse -> Bool
== :: GetSearchAttributesResponse -> GetSearchAttributesResponse -> Bool
$c/= :: GetSearchAttributesResponse -> GetSearchAttributesResponse -> Bool
/= :: GetSearchAttributesResponse -> GetSearchAttributesResponse -> Bool
Prelude.Eq, Eq GetSearchAttributesResponse
Eq GetSearchAttributesResponse =>
(GetSearchAttributesResponse
 -> GetSearchAttributesResponse -> Ordering)
-> (GetSearchAttributesResponse
    -> GetSearchAttributesResponse -> Bool)
-> (GetSearchAttributesResponse
    -> GetSearchAttributesResponse -> Bool)
-> (GetSearchAttributesResponse
    -> GetSearchAttributesResponse -> Bool)
-> (GetSearchAttributesResponse
    -> GetSearchAttributesResponse -> Bool)
-> (GetSearchAttributesResponse
    -> GetSearchAttributesResponse -> GetSearchAttributesResponse)
-> (GetSearchAttributesResponse
    -> GetSearchAttributesResponse -> GetSearchAttributesResponse)
-> Ord GetSearchAttributesResponse
GetSearchAttributesResponse -> GetSearchAttributesResponse -> Bool
GetSearchAttributesResponse
-> GetSearchAttributesResponse -> Ordering
GetSearchAttributesResponse
-> GetSearchAttributesResponse -> GetSearchAttributesResponse
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 :: GetSearchAttributesResponse
-> GetSearchAttributesResponse -> Ordering
compare :: GetSearchAttributesResponse
-> GetSearchAttributesResponse -> Ordering
$c< :: GetSearchAttributesResponse -> GetSearchAttributesResponse -> Bool
< :: GetSearchAttributesResponse -> GetSearchAttributesResponse -> Bool
$c<= :: GetSearchAttributesResponse -> GetSearchAttributesResponse -> Bool
<= :: GetSearchAttributesResponse -> GetSearchAttributesResponse -> Bool
$c> :: GetSearchAttributesResponse -> GetSearchAttributesResponse -> Bool
> :: GetSearchAttributesResponse -> GetSearchAttributesResponse -> Bool
$c>= :: GetSearchAttributesResponse -> GetSearchAttributesResponse -> Bool
>= :: GetSearchAttributesResponse -> GetSearchAttributesResponse -> Bool
$cmax :: GetSearchAttributesResponse
-> GetSearchAttributesResponse -> GetSearchAttributesResponse
max :: GetSearchAttributesResponse
-> GetSearchAttributesResponse -> GetSearchAttributesResponse
$cmin :: GetSearchAttributesResponse
-> GetSearchAttributesResponse -> GetSearchAttributesResponse
min :: GetSearchAttributesResponse
-> GetSearchAttributesResponse -> GetSearchAttributesResponse
Prelude.Ord)
instance Prelude.Show GetSearchAttributesResponse where
  showsPrec :: Int -> GetSearchAttributesResponse -> ShowS
showsPrec Int
_ GetSearchAttributesResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetSearchAttributesResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetSearchAttributesResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetSearchAttributesResponse "keys" (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Enums.V1.Common.IndexedValueType) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "keys"
-> (Map Text IndexedValueType -> f (Map Text IndexedValueType))
-> GetSearchAttributesResponse
-> f GetSearchAttributesResponse
fieldOf Proxy# "keys"
_
    = ((Map Text IndexedValueType -> f (Map Text IndexedValueType))
 -> GetSearchAttributesResponse -> f GetSearchAttributesResponse)
-> ((Map Text IndexedValueType -> f (Map Text IndexedValueType))
    -> Map Text IndexedValueType -> f (Map Text IndexedValueType))
-> (Map Text IndexedValueType -> f (Map Text IndexedValueType))
-> GetSearchAttributesResponse
-> f GetSearchAttributesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSearchAttributesResponse -> Map Text IndexedValueType)
-> (GetSearchAttributesResponse
    -> Map Text IndexedValueType -> GetSearchAttributesResponse)
-> Lens
     GetSearchAttributesResponse
     GetSearchAttributesResponse
     (Map Text IndexedValueType)
     (Map Text IndexedValueType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSearchAttributesResponse -> Map Text IndexedValueType
_GetSearchAttributesResponse'keys
           (\ GetSearchAttributesResponse
x__ Map Text IndexedValueType
y__ -> GetSearchAttributesResponse
x__ {_GetSearchAttributesResponse'keys = y__}))
        (Map Text IndexedValueType -> f (Map Text IndexedValueType))
-> Map Text IndexedValueType -> f (Map Text IndexedValueType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetSearchAttributesResponse where
  messageName :: Proxy GetSearchAttributesResponse -> Text
messageName Proxy GetSearchAttributesResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetSearchAttributesResponse"
  packedMessageDescriptor :: Proxy GetSearchAttributesResponse -> ByteString
packedMessageDescriptor Proxy GetSearchAttributesResponse
_
    = ByteString
"\n\
      \\ESCGetSearchAttributesResponse\DC2Z\n\
      \\EOTkeys\CAN\SOH \ETX(\v2F.temporal.api.workflowservice.v1.GetSearchAttributesResponse.KeysEntryR\EOTkeys\SUB`\n\
      \\tKeysEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2=\n\
      \\ENQvalue\CAN\STX \SOH(\SO2'.temporal.api.enums.v1.IndexedValueTypeR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy GetSearchAttributesResponse -> ByteString
packedFileDescriptor Proxy GetSearchAttributesResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetSearchAttributesResponse)
fieldsByTag
    = let
        keys__field_descriptor :: FieldDescriptor GetSearchAttributesResponse
keys__field_descriptor
          = String
-> FieldTypeDescriptor GetSearchAttributesResponse'KeysEntry
-> FieldAccessor
     GetSearchAttributesResponse GetSearchAttributesResponse'KeysEntry
-> FieldDescriptor GetSearchAttributesResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"keys"
              (MessageOrGroup
-> FieldTypeDescriptor GetSearchAttributesResponse'KeysEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor GetSearchAttributesResponse'KeysEntry)
              (Lens' GetSearchAttributesResponse'KeysEntry Text
-> Lens' GetSearchAttributesResponse'KeysEntry IndexedValueType
-> Lens
     GetSearchAttributesResponse
     GetSearchAttributesResponse
     (Map Text IndexedValueType)
     (Map Text IndexedValueType)
-> FieldAccessor
     GetSearchAttributesResponse GetSearchAttributesResponse'KeysEntry
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 @"keys")) ::
              Data.ProtoLens.FieldDescriptor GetSearchAttributesResponse
      in
        [(Tag, FieldDescriptor GetSearchAttributesResponse)]
-> Map Tag (FieldDescriptor GetSearchAttributesResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetSearchAttributesResponse
keys__field_descriptor)]
  unknownFields :: Lens' GetSearchAttributesResponse FieldSet
unknownFields
    = (GetSearchAttributesResponse -> FieldSet)
-> (GetSearchAttributesResponse
    -> FieldSet -> GetSearchAttributesResponse)
-> Lens' GetSearchAttributesResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetSearchAttributesResponse -> FieldSet
_GetSearchAttributesResponse'_unknownFields
        (\ GetSearchAttributesResponse
x__ FieldSet
y__
           -> GetSearchAttributesResponse
x__ {_GetSearchAttributesResponse'_unknownFields = y__})
  defMessage :: GetSearchAttributesResponse
defMessage
    = GetSearchAttributesResponse'_constructor
        {_GetSearchAttributesResponse'keys :: Map Text IndexedValueType
_GetSearchAttributesResponse'keys = Map Text IndexedValueType
forall k a. Map k a
Data.Map.empty,
         _GetSearchAttributesResponse'_unknownFields :: FieldSet
_GetSearchAttributesResponse'_unknownFields = []}
  parseMessage :: Parser GetSearchAttributesResponse
parseMessage
    = let
        loop ::
          GetSearchAttributesResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser GetSearchAttributesResponse
        loop :: GetSearchAttributesResponse -> Parser GetSearchAttributesResponse
loop GetSearchAttributesResponse
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 :: GetSearchAttributesResponse'KeysEntry) <- Parser GetSearchAttributesResponse'KeysEntry
-> String -> Parser GetSearchAttributesResponse'KeysEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                                           Data.ProtoLens.Encoding.Bytes.isolate
                                                                                             (Prelude.fromIntegral
                                                                                                len)
                                                                                             Data.ProtoLens.parseMessage)
                                                                                       String
"keys"
                                (let
                                   key = FoldLike
  Text
  GetSearchAttributesResponse'KeysEntry
  GetSearchAttributesResponse'KeysEntry
  Text
  Text
-> GetSearchAttributesResponse'KeysEntry -> 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") GetSearchAttributesResponse'KeysEntry
entry
                                   value
                                     = FoldLike
  IndexedValueType
  GetSearchAttributesResponse'KeysEntry
  GetSearchAttributesResponse'KeysEntry
  IndexedValueType
  IndexedValueType
-> GetSearchAttributesResponse'KeysEntry -> IndexedValueType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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") GetSearchAttributesResponse'KeysEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"keys")
                                        (\ !Map Text IndexedValueType
t -> Text
-> IndexedValueType
-> Map Text IndexedValueType
-> Map Text IndexedValueType
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key IndexedValueType
value Map Text IndexedValueType
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 GetSearchAttributesResponse
-> String -> Parser GetSearchAttributesResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GetSearchAttributesResponse -> Parser GetSearchAttributesResponse
loop GetSearchAttributesResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"GetSearchAttributesResponse"
  buildMessage :: GetSearchAttributesResponse -> Builder
buildMessage
    = \ GetSearchAttributesResponse
_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, IndexedValueType) -> Builder)
-> [(Text, IndexedValueType)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                   (\ (Text, IndexedValueType)
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                           ((ByteString -> Builder)
-> (GetSearchAttributesResponse'KeysEntry -> ByteString)
-> GetSearchAttributesResponse'KeysEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ ByteString
bs
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                              GetSearchAttributesResponse'KeysEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                              (Setter
  GetSearchAttributesResponse'KeysEntry
  GetSearchAttributesResponse'KeysEntry
  Text
  Text
-> Text
-> GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry
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, IndexedValueType) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, IndexedValueType)
_v)
                                 (Setter
  GetSearchAttributesResponse'KeysEntry
  GetSearchAttributesResponse'KeysEntry
  IndexedValueType
  IndexedValueType
-> IndexedValueType
-> GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry
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, IndexedValueType) -> IndexedValueType
forall a b. (a, b) -> b
Prelude.snd (Text, IndexedValueType)
_v)
                                    (GetSearchAttributesResponse'KeysEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                       GetSearchAttributesResponse'KeysEntry)))))
                   (Map Text IndexedValueType -> [(Text, IndexedValueType)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                      (FoldLike
  (Map Text IndexedValueType)
  GetSearchAttributesResponse
  GetSearchAttributesResponse
  (Map Text IndexedValueType)
  (Map Text IndexedValueType)
-> GetSearchAttributesResponse -> Map Text IndexedValueType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"keys") GetSearchAttributesResponse
_x))))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  GetSearchAttributesResponse
  GetSearchAttributesResponse
  FieldSet
  FieldSet
-> GetSearchAttributesResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetSearchAttributesResponse
  GetSearchAttributesResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetSearchAttributesResponse FieldSet
Data.ProtoLens.unknownFields GetSearchAttributesResponse
_x))
instance Control.DeepSeq.NFData GetSearchAttributesResponse where
  rnf :: GetSearchAttributesResponse -> ()
rnf
    = \ GetSearchAttributesResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetSearchAttributesResponse -> FieldSet
_GetSearchAttributesResponse'_unknownFields GetSearchAttributesResponse
x__)
             (Map Text IndexedValueType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetSearchAttributesResponse -> Map Text IndexedValueType
_GetSearchAttributesResponse'keys GetSearchAttributesResponse
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.key' @:: Lens' GetSearchAttributesResponse'KeysEntry Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.value' @:: Lens' GetSearchAttributesResponse'KeysEntry Proto.Temporal.Api.Enums.V1.Common.IndexedValueType@ -}
data GetSearchAttributesResponse'KeysEntry
  = GetSearchAttributesResponse'KeysEntry'_constructor {GetSearchAttributesResponse'KeysEntry -> Text
_GetSearchAttributesResponse'KeysEntry'key :: !Data.Text.Text,
                                                        GetSearchAttributesResponse'KeysEntry -> IndexedValueType
_GetSearchAttributesResponse'KeysEntry'value :: !Proto.Temporal.Api.Enums.V1.Common.IndexedValueType,
                                                        GetSearchAttributesResponse'KeysEntry -> FieldSet
_GetSearchAttributesResponse'KeysEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Bool
(GetSearchAttributesResponse'KeysEntry
 -> GetSearchAttributesResponse'KeysEntry -> Bool)
-> (GetSearchAttributesResponse'KeysEntry
    -> GetSearchAttributesResponse'KeysEntry -> Bool)
-> Eq GetSearchAttributesResponse'KeysEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Bool
== :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Bool
$c/= :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Bool
/= :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Bool
Prelude.Eq, Eq GetSearchAttributesResponse'KeysEntry
Eq GetSearchAttributesResponse'KeysEntry =>
(GetSearchAttributesResponse'KeysEntry
 -> GetSearchAttributesResponse'KeysEntry -> Ordering)
-> (GetSearchAttributesResponse'KeysEntry
    -> GetSearchAttributesResponse'KeysEntry -> Bool)
-> (GetSearchAttributesResponse'KeysEntry
    -> GetSearchAttributesResponse'KeysEntry -> Bool)
-> (GetSearchAttributesResponse'KeysEntry
    -> GetSearchAttributesResponse'KeysEntry -> Bool)
-> (GetSearchAttributesResponse'KeysEntry
    -> GetSearchAttributesResponse'KeysEntry -> Bool)
-> (GetSearchAttributesResponse'KeysEntry
    -> GetSearchAttributesResponse'KeysEntry
    -> GetSearchAttributesResponse'KeysEntry)
-> (GetSearchAttributesResponse'KeysEntry
    -> GetSearchAttributesResponse'KeysEntry
    -> GetSearchAttributesResponse'KeysEntry)
-> Ord GetSearchAttributesResponse'KeysEntry
GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Bool
GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Ordering
GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry
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 :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Ordering
compare :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Ordering
$c< :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Bool
< :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Bool
$c<= :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Bool
<= :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Bool
$c> :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Bool
> :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Bool
$c>= :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Bool
>= :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry -> Bool
$cmax :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry
max :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry
$cmin :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry
min :: GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry
-> GetSearchAttributesResponse'KeysEntry
Prelude.Ord)
instance Prelude.Show GetSearchAttributesResponse'KeysEntry where
  showsPrec :: Int -> GetSearchAttributesResponse'KeysEntry -> ShowS
showsPrec Int
_ GetSearchAttributesResponse'KeysEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetSearchAttributesResponse'KeysEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetSearchAttributesResponse'KeysEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetSearchAttributesResponse'KeysEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> GetSearchAttributesResponse'KeysEntry
-> f GetSearchAttributesResponse'KeysEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> GetSearchAttributesResponse'KeysEntry
 -> f GetSearchAttributesResponse'KeysEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetSearchAttributesResponse'KeysEntry
-> f GetSearchAttributesResponse'KeysEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSearchAttributesResponse'KeysEntry -> Text)
-> (GetSearchAttributesResponse'KeysEntry
    -> Text -> GetSearchAttributesResponse'KeysEntry)
-> Lens' GetSearchAttributesResponse'KeysEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSearchAttributesResponse'KeysEntry -> Text
_GetSearchAttributesResponse'KeysEntry'key
           (\ GetSearchAttributesResponse'KeysEntry
x__ Text
y__
              -> GetSearchAttributesResponse'KeysEntry
x__ {_GetSearchAttributesResponse'KeysEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetSearchAttributesResponse'KeysEntry "value" Proto.Temporal.Api.Enums.V1.Common.IndexedValueType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (IndexedValueType -> f IndexedValueType)
-> GetSearchAttributesResponse'KeysEntry
-> f GetSearchAttributesResponse'KeysEntry
fieldOf Proxy# "value"
_
    = ((IndexedValueType -> f IndexedValueType)
 -> GetSearchAttributesResponse'KeysEntry
 -> f GetSearchAttributesResponse'KeysEntry)
-> ((IndexedValueType -> f IndexedValueType)
    -> IndexedValueType -> f IndexedValueType)
-> (IndexedValueType -> f IndexedValueType)
-> GetSearchAttributesResponse'KeysEntry
-> f GetSearchAttributesResponse'KeysEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSearchAttributesResponse'KeysEntry -> IndexedValueType)
-> (GetSearchAttributesResponse'KeysEntry
    -> IndexedValueType -> GetSearchAttributesResponse'KeysEntry)
-> Lens' GetSearchAttributesResponse'KeysEntry IndexedValueType
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSearchAttributesResponse'KeysEntry -> IndexedValueType
_GetSearchAttributesResponse'KeysEntry'value
           (\ GetSearchAttributesResponse'KeysEntry
x__ IndexedValueType
y__
              -> GetSearchAttributesResponse'KeysEntry
x__ {_GetSearchAttributesResponse'KeysEntry'value = y__}))
        (IndexedValueType -> f IndexedValueType)
-> IndexedValueType -> f IndexedValueType
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetSearchAttributesResponse'KeysEntry where
  messageName :: Proxy GetSearchAttributesResponse'KeysEntry -> Text
messageName Proxy GetSearchAttributesResponse'KeysEntry
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetSearchAttributesResponse.KeysEntry"
  packedMessageDescriptor :: Proxy GetSearchAttributesResponse'KeysEntry -> ByteString
packedMessageDescriptor Proxy GetSearchAttributesResponse'KeysEntry
_
    = ByteString
"\n\
      \\tKeysEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2=\n\
      \\ENQvalue\CAN\STX \SOH(\SO2'.temporal.api.enums.v1.IndexedValueTypeR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy GetSearchAttributesResponse'KeysEntry -> ByteString
packedFileDescriptor Proxy GetSearchAttributesResponse'KeysEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetSearchAttributesResponse'KeysEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor GetSearchAttributesResponse'KeysEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetSearchAttributesResponse'KeysEntry Text
-> FieldDescriptor GetSearchAttributesResponse'KeysEntry
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' GetSearchAttributesResponse'KeysEntry Text
-> FieldAccessor GetSearchAttributesResponse'KeysEntry 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 GetSearchAttributesResponse'KeysEntry
        value__field_descriptor :: FieldDescriptor GetSearchAttributesResponse'KeysEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor IndexedValueType
-> FieldAccessor
     GetSearchAttributesResponse'KeysEntry IndexedValueType
-> FieldDescriptor GetSearchAttributesResponse'KeysEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"value"
              (ScalarField IndexedValueType
-> FieldTypeDescriptor IndexedValueType
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField IndexedValueType
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Common.IndexedValueType)
              (WireDefault IndexedValueType
-> Lens' GetSearchAttributesResponse'KeysEntry IndexedValueType
-> FieldAccessor
     GetSearchAttributesResponse'KeysEntry IndexedValueType
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault IndexedValueType
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")) ::
              Data.ProtoLens.FieldDescriptor GetSearchAttributesResponse'KeysEntry
      in
        [(Tag, FieldDescriptor GetSearchAttributesResponse'KeysEntry)]
-> Map Tag (FieldDescriptor GetSearchAttributesResponse'KeysEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetSearchAttributesResponse'KeysEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor GetSearchAttributesResponse'KeysEntry
value__field_descriptor)]
  unknownFields :: Lens' GetSearchAttributesResponse'KeysEntry FieldSet
unknownFields
    = (GetSearchAttributesResponse'KeysEntry -> FieldSet)
-> (GetSearchAttributesResponse'KeysEntry
    -> FieldSet -> GetSearchAttributesResponse'KeysEntry)
-> Lens' GetSearchAttributesResponse'KeysEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetSearchAttributesResponse'KeysEntry -> FieldSet
_GetSearchAttributesResponse'KeysEntry'_unknownFields
        (\ GetSearchAttributesResponse'KeysEntry
x__ FieldSet
y__
           -> GetSearchAttributesResponse'KeysEntry
x__
                {_GetSearchAttributesResponse'KeysEntry'_unknownFields = y__})
  defMessage :: GetSearchAttributesResponse'KeysEntry
defMessage
    = GetSearchAttributesResponse'KeysEntry'_constructor
        {_GetSearchAttributesResponse'KeysEntry'key :: Text
_GetSearchAttributesResponse'KeysEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetSearchAttributesResponse'KeysEntry'value :: IndexedValueType
_GetSearchAttributesResponse'KeysEntry'value = IndexedValueType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetSearchAttributesResponse'KeysEntry'_unknownFields :: FieldSet
_GetSearchAttributesResponse'KeysEntry'_unknownFields = []}
  parseMessage :: Parser GetSearchAttributesResponse'KeysEntry
parseMessage
    = let
        loop ::
          GetSearchAttributesResponse'KeysEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser GetSearchAttributesResponse'KeysEntry
        loop :: GetSearchAttributesResponse'KeysEntry
-> Parser GetSearchAttributesResponse'KeysEntry
loop GetSearchAttributesResponse'KeysEntry
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
16
                          -> do y <- Parser IndexedValueType -> String -> Parser IndexedValueType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> IndexedValueType) -> Parser Int -> Parser IndexedValueType
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> IndexedValueType
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
"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 GetSearchAttributesResponse'KeysEntry
-> String -> Parser GetSearchAttributesResponse'KeysEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GetSearchAttributesResponse'KeysEntry
-> Parser GetSearchAttributesResponse'KeysEntry
loop GetSearchAttributesResponse'KeysEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"KeysEntry"
  buildMessage :: GetSearchAttributesResponse'KeysEntry -> Builder
buildMessage
    = \ GetSearchAttributesResponse'KeysEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  GetSearchAttributesResponse'KeysEntry
  GetSearchAttributesResponse'KeysEntry
  Text
  Text
-> GetSearchAttributesResponse'KeysEntry -> 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") GetSearchAttributesResponse'KeysEntry
_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 :: IndexedValueType
_v = FoldLike
  IndexedValueType
  GetSearchAttributesResponse'KeysEntry
  GetSearchAttributesResponse'KeysEntry
  IndexedValueType
  IndexedValueType
-> GetSearchAttributesResponse'KeysEntry -> IndexedValueType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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") GetSearchAttributesResponse'KeysEntry
_x
                 in
                   if IndexedValueType -> IndexedValueType -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) IndexedValueType
_v IndexedValueType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
16)
                         ((Int -> Builder)
-> (IndexedValueType -> Int) -> IndexedValueType -> 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)
                            IndexedValueType -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum IndexedValueType
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  GetSearchAttributesResponse'KeysEntry
  GetSearchAttributesResponse'KeysEntry
  FieldSet
  FieldSet
-> GetSearchAttributesResponse'KeysEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetSearchAttributesResponse'KeysEntry
  GetSearchAttributesResponse'KeysEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetSearchAttributesResponse'KeysEntry FieldSet
Data.ProtoLens.unknownFields GetSearchAttributesResponse'KeysEntry
_x)))
instance Control.DeepSeq.NFData GetSearchAttributesResponse'KeysEntry where
  rnf :: GetSearchAttributesResponse'KeysEntry -> ()
rnf
    = \ GetSearchAttributesResponse'KeysEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetSearchAttributesResponse'KeysEntry -> FieldSet
_GetSearchAttributesResponse'KeysEntry'_unknownFields GetSearchAttributesResponse'KeysEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetSearchAttributesResponse'KeysEntry -> Text
_GetSearchAttributesResponse'KeysEntry'key GetSearchAttributesResponse'KeysEntry
x__)
                (IndexedValueType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GetSearchAttributesResponse'KeysEntry -> IndexedValueType
_GetSearchAttributesResponse'KeysEntry'value GetSearchAttributesResponse'KeysEntry
x__) ()))
{- | Fields :
      -}
data GetSystemInfoRequest
  = GetSystemInfoRequest'_constructor {GetSystemInfoRequest -> FieldSet
_GetSystemInfoRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetSystemInfoRequest -> GetSystemInfoRequest -> Bool
(GetSystemInfoRequest -> GetSystemInfoRequest -> Bool)
-> (GetSystemInfoRequest -> GetSystemInfoRequest -> Bool)
-> Eq GetSystemInfoRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetSystemInfoRequest -> GetSystemInfoRequest -> Bool
== :: GetSystemInfoRequest -> GetSystemInfoRequest -> Bool
$c/= :: GetSystemInfoRequest -> GetSystemInfoRequest -> Bool
/= :: GetSystemInfoRequest -> GetSystemInfoRequest -> Bool
Prelude.Eq, Eq GetSystemInfoRequest
Eq GetSystemInfoRequest =>
(GetSystemInfoRequest -> GetSystemInfoRequest -> Ordering)
-> (GetSystemInfoRequest -> GetSystemInfoRequest -> Bool)
-> (GetSystemInfoRequest -> GetSystemInfoRequest -> Bool)
-> (GetSystemInfoRequest -> GetSystemInfoRequest -> Bool)
-> (GetSystemInfoRequest -> GetSystemInfoRequest -> Bool)
-> (GetSystemInfoRequest
    -> GetSystemInfoRequest -> GetSystemInfoRequest)
-> (GetSystemInfoRequest
    -> GetSystemInfoRequest -> GetSystemInfoRequest)
-> Ord GetSystemInfoRequest
GetSystemInfoRequest -> GetSystemInfoRequest -> Bool
GetSystemInfoRequest -> GetSystemInfoRequest -> Ordering
GetSystemInfoRequest
-> GetSystemInfoRequest -> GetSystemInfoRequest
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 :: GetSystemInfoRequest -> GetSystemInfoRequest -> Ordering
compare :: GetSystemInfoRequest -> GetSystemInfoRequest -> Ordering
$c< :: GetSystemInfoRequest -> GetSystemInfoRequest -> Bool
< :: GetSystemInfoRequest -> GetSystemInfoRequest -> Bool
$c<= :: GetSystemInfoRequest -> GetSystemInfoRequest -> Bool
<= :: GetSystemInfoRequest -> GetSystemInfoRequest -> Bool
$c> :: GetSystemInfoRequest -> GetSystemInfoRequest -> Bool
> :: GetSystemInfoRequest -> GetSystemInfoRequest -> Bool
$c>= :: GetSystemInfoRequest -> GetSystemInfoRequest -> Bool
>= :: GetSystemInfoRequest -> GetSystemInfoRequest -> Bool
$cmax :: GetSystemInfoRequest
-> GetSystemInfoRequest -> GetSystemInfoRequest
max :: GetSystemInfoRequest
-> GetSystemInfoRequest -> GetSystemInfoRequest
$cmin :: GetSystemInfoRequest
-> GetSystemInfoRequest -> GetSystemInfoRequest
min :: GetSystemInfoRequest
-> GetSystemInfoRequest -> GetSystemInfoRequest
Prelude.Ord)
instance Prelude.Show GetSystemInfoRequest where
  showsPrec :: Int -> GetSystemInfoRequest -> ShowS
showsPrec Int
_ GetSystemInfoRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetSystemInfoRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetSystemInfoRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message GetSystemInfoRequest where
  messageName :: Proxy GetSystemInfoRequest -> Text
messageName Proxy GetSystemInfoRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetSystemInfoRequest"
  packedMessageDescriptor :: Proxy GetSystemInfoRequest -> ByteString
packedMessageDescriptor Proxy GetSystemInfoRequest
_
    = ByteString
"\n\
      \\DC4GetSystemInfoRequest"
  packedFileDescriptor :: Proxy GetSystemInfoRequest -> ByteString
packedFileDescriptor Proxy GetSystemInfoRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetSystemInfoRequest)
fieldsByTag = let in [(Tag, FieldDescriptor GetSystemInfoRequest)]
-> Map Tag (FieldDescriptor GetSystemInfoRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' GetSystemInfoRequest FieldSet
unknownFields
    = (GetSystemInfoRequest -> FieldSet)
-> (GetSystemInfoRequest -> FieldSet -> GetSystemInfoRequest)
-> Lens' GetSystemInfoRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetSystemInfoRequest -> FieldSet
_GetSystemInfoRequest'_unknownFields
        (\ GetSystemInfoRequest
x__ FieldSet
y__ -> GetSystemInfoRequest
x__ {_GetSystemInfoRequest'_unknownFields = y__})
  defMessage :: GetSystemInfoRequest
defMessage
    = GetSystemInfoRequest'_constructor
        {_GetSystemInfoRequest'_unknownFields :: FieldSet
_GetSystemInfoRequest'_unknownFields = []}
  parseMessage :: Parser GetSystemInfoRequest
parseMessage
    = let
        loop ::
          GetSystemInfoRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser GetSystemInfoRequest
        loop :: GetSystemInfoRequest -> Parser GetSystemInfoRequest
loop GetSystemInfoRequest
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 GetSystemInfoRequest
-> String -> Parser GetSystemInfoRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GetSystemInfoRequest -> Parser GetSystemInfoRequest
loop GetSystemInfoRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"GetSystemInfoRequest"
  buildMessage :: GetSystemInfoRequest -> Builder
buildMessage
    = \ GetSystemInfoRequest
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  GetSystemInfoRequest
  GetSystemInfoRequest
  FieldSet
  FieldSet
-> GetSystemInfoRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetSystemInfoRequest
  GetSystemInfoRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetSystemInfoRequest FieldSet
Data.ProtoLens.unknownFields GetSystemInfoRequest
_x)
instance Control.DeepSeq.NFData GetSystemInfoRequest where
  rnf :: GetSystemInfoRequest -> ()
rnf
    = \ GetSystemInfoRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetSystemInfoRequest -> FieldSet
_GetSystemInfoRequest'_unknownFields GetSystemInfoRequest
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.serverVersion' @:: Lens' GetSystemInfoResponse Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.capabilities' @:: Lens' GetSystemInfoResponse GetSystemInfoResponse'Capabilities@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'capabilities' @:: Lens' GetSystemInfoResponse (Prelude.Maybe GetSystemInfoResponse'Capabilities)@ -}
data GetSystemInfoResponse
  = GetSystemInfoResponse'_constructor {GetSystemInfoResponse -> Text
_GetSystemInfoResponse'serverVersion :: !Data.Text.Text,
                                        GetSystemInfoResponse -> Maybe GetSystemInfoResponse'Capabilities
_GetSystemInfoResponse'capabilities :: !(Prelude.Maybe GetSystemInfoResponse'Capabilities),
                                        GetSystemInfoResponse -> FieldSet
_GetSystemInfoResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetSystemInfoResponse -> GetSystemInfoResponse -> Bool
(GetSystemInfoResponse -> GetSystemInfoResponse -> Bool)
-> (GetSystemInfoResponse -> GetSystemInfoResponse -> Bool)
-> Eq GetSystemInfoResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetSystemInfoResponse -> GetSystemInfoResponse -> Bool
== :: GetSystemInfoResponse -> GetSystemInfoResponse -> Bool
$c/= :: GetSystemInfoResponse -> GetSystemInfoResponse -> Bool
/= :: GetSystemInfoResponse -> GetSystemInfoResponse -> Bool
Prelude.Eq, Eq GetSystemInfoResponse
Eq GetSystemInfoResponse =>
(GetSystemInfoResponse -> GetSystemInfoResponse -> Ordering)
-> (GetSystemInfoResponse -> GetSystemInfoResponse -> Bool)
-> (GetSystemInfoResponse -> GetSystemInfoResponse -> Bool)
-> (GetSystemInfoResponse -> GetSystemInfoResponse -> Bool)
-> (GetSystemInfoResponse -> GetSystemInfoResponse -> Bool)
-> (GetSystemInfoResponse
    -> GetSystemInfoResponse -> GetSystemInfoResponse)
-> (GetSystemInfoResponse
    -> GetSystemInfoResponse -> GetSystemInfoResponse)
-> Ord GetSystemInfoResponse
GetSystemInfoResponse -> GetSystemInfoResponse -> Bool
GetSystemInfoResponse -> GetSystemInfoResponse -> Ordering
GetSystemInfoResponse
-> GetSystemInfoResponse -> GetSystemInfoResponse
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 :: GetSystemInfoResponse -> GetSystemInfoResponse -> Ordering
compare :: GetSystemInfoResponse -> GetSystemInfoResponse -> Ordering
$c< :: GetSystemInfoResponse -> GetSystemInfoResponse -> Bool
< :: GetSystemInfoResponse -> GetSystemInfoResponse -> Bool
$c<= :: GetSystemInfoResponse -> GetSystemInfoResponse -> Bool
<= :: GetSystemInfoResponse -> GetSystemInfoResponse -> Bool
$c> :: GetSystemInfoResponse -> GetSystemInfoResponse -> Bool
> :: GetSystemInfoResponse -> GetSystemInfoResponse -> Bool
$c>= :: GetSystemInfoResponse -> GetSystemInfoResponse -> Bool
>= :: GetSystemInfoResponse -> GetSystemInfoResponse -> Bool
$cmax :: GetSystemInfoResponse
-> GetSystemInfoResponse -> GetSystemInfoResponse
max :: GetSystemInfoResponse
-> GetSystemInfoResponse -> GetSystemInfoResponse
$cmin :: GetSystemInfoResponse
-> GetSystemInfoResponse -> GetSystemInfoResponse
min :: GetSystemInfoResponse
-> GetSystemInfoResponse -> GetSystemInfoResponse
Prelude.Ord)
instance Prelude.Show GetSystemInfoResponse where
  showsPrec :: Int -> GetSystemInfoResponse -> ShowS
showsPrec Int
_ GetSystemInfoResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetSystemInfoResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetSystemInfoResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetSystemInfoResponse "serverVersion" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "serverVersion"
-> (Text -> f Text)
-> GetSystemInfoResponse
-> f GetSystemInfoResponse
fieldOf Proxy# "serverVersion"
_
    = ((Text -> f Text)
 -> GetSystemInfoResponse -> f GetSystemInfoResponse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetSystemInfoResponse
-> f GetSystemInfoResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSystemInfoResponse -> Text)
-> (GetSystemInfoResponse -> Text -> GetSystemInfoResponse)
-> Lens GetSystemInfoResponse GetSystemInfoResponse Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSystemInfoResponse -> Text
_GetSystemInfoResponse'serverVersion
           (\ GetSystemInfoResponse
x__ Text
y__ -> GetSystemInfoResponse
x__ {_GetSystemInfoResponse'serverVersion = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetSystemInfoResponse "capabilities" GetSystemInfoResponse'Capabilities where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "capabilities"
-> (GetSystemInfoResponse'Capabilities
    -> f GetSystemInfoResponse'Capabilities)
-> GetSystemInfoResponse
-> f GetSystemInfoResponse
fieldOf Proxy# "capabilities"
_
    = ((Maybe GetSystemInfoResponse'Capabilities
  -> f (Maybe GetSystemInfoResponse'Capabilities))
 -> GetSystemInfoResponse -> f GetSystemInfoResponse)
-> ((GetSystemInfoResponse'Capabilities
     -> f GetSystemInfoResponse'Capabilities)
    -> Maybe GetSystemInfoResponse'Capabilities
    -> f (Maybe GetSystemInfoResponse'Capabilities))
-> (GetSystemInfoResponse'Capabilities
    -> f GetSystemInfoResponse'Capabilities)
-> GetSystemInfoResponse
-> f GetSystemInfoResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSystemInfoResponse -> Maybe GetSystemInfoResponse'Capabilities)
-> (GetSystemInfoResponse
    -> Maybe GetSystemInfoResponse'Capabilities
    -> GetSystemInfoResponse)
-> Lens
     GetSystemInfoResponse
     GetSystemInfoResponse
     (Maybe GetSystemInfoResponse'Capabilities)
     (Maybe GetSystemInfoResponse'Capabilities)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSystemInfoResponse -> Maybe GetSystemInfoResponse'Capabilities
_GetSystemInfoResponse'capabilities
           (\ GetSystemInfoResponse
x__ Maybe GetSystemInfoResponse'Capabilities
y__ -> GetSystemInfoResponse
x__ {_GetSystemInfoResponse'capabilities = y__}))
        (GetSystemInfoResponse'Capabilities
-> Lens'
     (Maybe GetSystemInfoResponse'Capabilities)
     GetSystemInfoResponse'Capabilities
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens GetSystemInfoResponse'Capabilities
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField GetSystemInfoResponse "maybe'capabilities" (Prelude.Maybe GetSystemInfoResponse'Capabilities) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'capabilities"
-> (Maybe GetSystemInfoResponse'Capabilities
    -> f (Maybe GetSystemInfoResponse'Capabilities))
-> GetSystemInfoResponse
-> f GetSystemInfoResponse
fieldOf Proxy# "maybe'capabilities"
_
    = ((Maybe GetSystemInfoResponse'Capabilities
  -> f (Maybe GetSystemInfoResponse'Capabilities))
 -> GetSystemInfoResponse -> f GetSystemInfoResponse)
-> ((Maybe GetSystemInfoResponse'Capabilities
     -> f (Maybe GetSystemInfoResponse'Capabilities))
    -> Maybe GetSystemInfoResponse'Capabilities
    -> f (Maybe GetSystemInfoResponse'Capabilities))
-> (Maybe GetSystemInfoResponse'Capabilities
    -> f (Maybe GetSystemInfoResponse'Capabilities))
-> GetSystemInfoResponse
-> f GetSystemInfoResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSystemInfoResponse -> Maybe GetSystemInfoResponse'Capabilities)
-> (GetSystemInfoResponse
    -> Maybe GetSystemInfoResponse'Capabilities
    -> GetSystemInfoResponse)
-> Lens
     GetSystemInfoResponse
     GetSystemInfoResponse
     (Maybe GetSystemInfoResponse'Capabilities)
     (Maybe GetSystemInfoResponse'Capabilities)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSystemInfoResponse -> Maybe GetSystemInfoResponse'Capabilities
_GetSystemInfoResponse'capabilities
           (\ GetSystemInfoResponse
x__ Maybe GetSystemInfoResponse'Capabilities
y__ -> GetSystemInfoResponse
x__ {_GetSystemInfoResponse'capabilities = y__}))
        (Maybe GetSystemInfoResponse'Capabilities
 -> f (Maybe GetSystemInfoResponse'Capabilities))
-> Maybe GetSystemInfoResponse'Capabilities
-> f (Maybe GetSystemInfoResponse'Capabilities)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetSystemInfoResponse where
  messageName :: Proxy GetSystemInfoResponse -> Text
messageName Proxy GetSystemInfoResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetSystemInfoResponse"
  packedMessageDescriptor :: Proxy GetSystemInfoResponse -> ByteString
packedMessageDescriptor Proxy GetSystemInfoResponse
_
    = ByteString
"\n\
      \\NAKGetSystemInfoResponse\DC2%\n\
      \\SOserver_version\CAN\SOH \SOH(\tR\rserverVersion\DC2g\n\
      \\fcapabilities\CAN\STX \SOH(\v2C.temporal.api.workflowservice.v1.GetSystemInfoResponse.CapabilitiesR\fcapabilities\SUB\188\EOT\n\
      \\fCapabilities\DC25\n\
      \\ETBsignal_and_query_header\CAN\SOH \SOH(\bR\DC4signalAndQueryHeader\DC2D\n\
      \\RSinternal_error_differentiation\CAN\STX \SOH(\bR\FSinternalErrorDifferentiation\DC2K\n\
      \\"activity_failure_include_heartbeat\CAN\ETX \SOH(\bR\USactivityFailureIncludeHeartbeat\DC2-\n\
      \\DC2supports_schedules\CAN\EOT \SOH(\bR\DC1supportsSchedules\DC2<\n\
      \\SUBencoded_failure_attributes\CAN\ENQ \SOH(\bR\CANencodedFailureAttributes\DC29\n\
      \\EMbuild_id_based_versioning\CAN\ACK \SOH(\bR\SYNbuildIdBasedVersioning\DC2\US\n\
      \\vupsert_memo\CAN\a \SOH(\bR\n\
      \upsertMemo\DC20\n\
      \\DC4eager_workflow_start\CAN\b \SOH(\bR\DC2eagerWorkflowStart\DC2!\n\
      \\fsdk_metadata\CAN\t \SOH(\bR\vsdkMetadata\DC2D\n\
      \\UScount_group_by_execution_status\CAN\n\
      \ \SOH(\bR\ESCcountGroupByExecutionStatus"
  packedFileDescriptor :: Proxy GetSystemInfoResponse -> ByteString
packedFileDescriptor Proxy GetSystemInfoResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetSystemInfoResponse)
fieldsByTag
    = let
        serverVersion__field_descriptor :: FieldDescriptor GetSystemInfoResponse
serverVersion__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetSystemInfoResponse Text
-> FieldDescriptor GetSystemInfoResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"server_version"
              (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 GetSystemInfoResponse GetSystemInfoResponse Text Text
-> FieldAccessor GetSystemInfoResponse 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 @"serverVersion")) ::
              Data.ProtoLens.FieldDescriptor GetSystemInfoResponse
        capabilities__field_descriptor :: FieldDescriptor GetSystemInfoResponse
capabilities__field_descriptor
          = String
-> FieldTypeDescriptor GetSystemInfoResponse'Capabilities
-> FieldAccessor
     GetSystemInfoResponse GetSystemInfoResponse'Capabilities
-> FieldDescriptor GetSystemInfoResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"capabilities"
              (MessageOrGroup
-> FieldTypeDescriptor GetSystemInfoResponse'Capabilities
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor GetSystemInfoResponse'Capabilities)
              (Lens
  GetSystemInfoResponse
  GetSystemInfoResponse
  (Maybe GetSystemInfoResponse'Capabilities)
  (Maybe GetSystemInfoResponse'Capabilities)
-> FieldAccessor
     GetSystemInfoResponse GetSystemInfoResponse'Capabilities
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'capabilities")) ::
              Data.ProtoLens.FieldDescriptor GetSystemInfoResponse
      in
        [(Tag, FieldDescriptor GetSystemInfoResponse)]
-> Map Tag (FieldDescriptor GetSystemInfoResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetSystemInfoResponse
serverVersion__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor GetSystemInfoResponse
capabilities__field_descriptor)]
  unknownFields :: Lens' GetSystemInfoResponse FieldSet
unknownFields
    = (GetSystemInfoResponse -> FieldSet)
-> (GetSystemInfoResponse -> FieldSet -> GetSystemInfoResponse)
-> Lens' GetSystemInfoResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetSystemInfoResponse -> FieldSet
_GetSystemInfoResponse'_unknownFields
        (\ GetSystemInfoResponse
x__ FieldSet
y__ -> GetSystemInfoResponse
x__ {_GetSystemInfoResponse'_unknownFields = y__})
  defMessage :: GetSystemInfoResponse
defMessage
    = GetSystemInfoResponse'_constructor
        {_GetSystemInfoResponse'serverVersion :: Text
_GetSystemInfoResponse'serverVersion = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetSystemInfoResponse'capabilities :: Maybe GetSystemInfoResponse'Capabilities
_GetSystemInfoResponse'capabilities = Maybe GetSystemInfoResponse'Capabilities
forall a. Maybe a
Prelude.Nothing,
         _GetSystemInfoResponse'_unknownFields :: FieldSet
_GetSystemInfoResponse'_unknownFields = []}
  parseMessage :: Parser GetSystemInfoResponse
parseMessage
    = let
        loop ::
          GetSystemInfoResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser GetSystemInfoResponse
        loop :: GetSystemInfoResponse -> Parser GetSystemInfoResponse
loop GetSystemInfoResponse
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
"server_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"serverVersion") y x)
                        Word64
18
                          -> do y <- Parser GetSystemInfoResponse'Capabilities
-> String -> Parser GetSystemInfoResponse'Capabilities
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"capabilities"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"capabilities") 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 GetSystemInfoResponse
-> String -> Parser GetSystemInfoResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GetSystemInfoResponse -> Parser GetSystemInfoResponse
loop GetSystemInfoResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"GetSystemInfoResponse"
  buildMessage :: GetSystemInfoResponse -> Builder
buildMessage
    = \ GetSystemInfoResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike Text GetSystemInfoResponse GetSystemInfoResponse Text Text
-> GetSystemInfoResponse -> 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 @"serverVersion") GetSystemInfoResponse
_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 GetSystemInfoResponse'Capabilities)
  GetSystemInfoResponse
  GetSystemInfoResponse
  (Maybe GetSystemInfoResponse'Capabilities)
  (Maybe GetSystemInfoResponse'Capabilities)
-> GetSystemInfoResponse
-> Maybe GetSystemInfoResponse'Capabilities
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'capabilities") GetSystemInfoResponse
_x
                 of
                   Maybe GetSystemInfoResponse'Capabilities
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just GetSystemInfoResponse'Capabilities
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (GetSystemInfoResponse'Capabilities -> ByteString)
-> GetSystemInfoResponse'Capabilities
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             GetSystemInfoResponse'Capabilities -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage GetSystemInfoResponse'Capabilities
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  GetSystemInfoResponse
  GetSystemInfoResponse
  FieldSet
  FieldSet
-> GetSystemInfoResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetSystemInfoResponse
  GetSystemInfoResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetSystemInfoResponse FieldSet
Data.ProtoLens.unknownFields GetSystemInfoResponse
_x)))
instance Control.DeepSeq.NFData GetSystemInfoResponse where
  rnf :: GetSystemInfoResponse -> ()
rnf
    = \ GetSystemInfoResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetSystemInfoResponse -> FieldSet
_GetSystemInfoResponse'_unknownFields GetSystemInfoResponse
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetSystemInfoResponse -> Text
_GetSystemInfoResponse'serverVersion GetSystemInfoResponse
x__)
                (Maybe GetSystemInfoResponse'Capabilities -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GetSystemInfoResponse -> Maybe GetSystemInfoResponse'Capabilities
_GetSystemInfoResponse'capabilities GetSystemInfoResponse
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.signalAndQueryHeader' @:: Lens' GetSystemInfoResponse'Capabilities Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.internalErrorDifferentiation' @:: Lens' GetSystemInfoResponse'Capabilities Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.activityFailureIncludeHeartbeat' @:: Lens' GetSystemInfoResponse'Capabilities Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.supportsSchedules' @:: Lens' GetSystemInfoResponse'Capabilities Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.encodedFailureAttributes' @:: Lens' GetSystemInfoResponse'Capabilities Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.buildIdBasedVersioning' @:: Lens' GetSystemInfoResponse'Capabilities Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.upsertMemo' @:: Lens' GetSystemInfoResponse'Capabilities Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.eagerWorkflowStart' @:: Lens' GetSystemInfoResponse'Capabilities Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.sdkMetadata' @:: Lens' GetSystemInfoResponse'Capabilities Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.countGroupByExecutionStatus' @:: Lens' GetSystemInfoResponse'Capabilities Prelude.Bool@ -}
data GetSystemInfoResponse'Capabilities
  = GetSystemInfoResponse'Capabilities'_constructor {GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'signalAndQueryHeader :: !Prelude.Bool,
                                                     GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'internalErrorDifferentiation :: !Prelude.Bool,
                                                     GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'activityFailureIncludeHeartbeat :: !Prelude.Bool,
                                                     GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'supportsSchedules :: !Prelude.Bool,
                                                     GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'encodedFailureAttributes :: !Prelude.Bool,
                                                     GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'buildIdBasedVersioning :: !Prelude.Bool,
                                                     GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'upsertMemo :: !Prelude.Bool,
                                                     GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'eagerWorkflowStart :: !Prelude.Bool,
                                                     GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'sdkMetadata :: !Prelude.Bool,
                                                     GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'countGroupByExecutionStatus :: !Prelude.Bool,
                                                     GetSystemInfoResponse'Capabilities -> FieldSet
_GetSystemInfoResponse'Capabilities'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Bool
(GetSystemInfoResponse'Capabilities
 -> GetSystemInfoResponse'Capabilities -> Bool)
-> (GetSystemInfoResponse'Capabilities
    -> GetSystemInfoResponse'Capabilities -> Bool)
-> Eq GetSystemInfoResponse'Capabilities
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Bool
== :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Bool
$c/= :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Bool
/= :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Bool
Prelude.Eq, Eq GetSystemInfoResponse'Capabilities
Eq GetSystemInfoResponse'Capabilities =>
(GetSystemInfoResponse'Capabilities
 -> GetSystemInfoResponse'Capabilities -> Ordering)
-> (GetSystemInfoResponse'Capabilities
    -> GetSystemInfoResponse'Capabilities -> Bool)
-> (GetSystemInfoResponse'Capabilities
    -> GetSystemInfoResponse'Capabilities -> Bool)
-> (GetSystemInfoResponse'Capabilities
    -> GetSystemInfoResponse'Capabilities -> Bool)
-> (GetSystemInfoResponse'Capabilities
    -> GetSystemInfoResponse'Capabilities -> Bool)
-> (GetSystemInfoResponse'Capabilities
    -> GetSystemInfoResponse'Capabilities
    -> GetSystemInfoResponse'Capabilities)
-> (GetSystemInfoResponse'Capabilities
    -> GetSystemInfoResponse'Capabilities
    -> GetSystemInfoResponse'Capabilities)
-> Ord GetSystemInfoResponse'Capabilities
GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Bool
GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Ordering
GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities
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 :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Ordering
compare :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Ordering
$c< :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Bool
< :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Bool
$c<= :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Bool
<= :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Bool
$c> :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Bool
> :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Bool
$c>= :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Bool
>= :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities -> Bool
$cmax :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities
max :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities
$cmin :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities
min :: GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities
-> GetSystemInfoResponse'Capabilities
Prelude.Ord)
instance Prelude.Show GetSystemInfoResponse'Capabilities where
  showsPrec :: Int -> GetSystemInfoResponse'Capabilities -> ShowS
showsPrec Int
_ GetSystemInfoResponse'Capabilities
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetSystemInfoResponse'Capabilities -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetSystemInfoResponse'Capabilities
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetSystemInfoResponse'Capabilities "signalAndQueryHeader" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "signalAndQueryHeader"
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
fieldOf Proxy# "signalAndQueryHeader"
_
    = ((Bool -> f Bool)
 -> GetSystemInfoResponse'Capabilities
 -> f GetSystemInfoResponse'Capabilities)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSystemInfoResponse'Capabilities -> Bool)
-> (GetSystemInfoResponse'Capabilities
    -> Bool -> GetSystemInfoResponse'Capabilities)
-> Lens
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'signalAndQueryHeader
           (\ GetSystemInfoResponse'Capabilities
x__ Bool
y__
              -> GetSystemInfoResponse'Capabilities
x__
                   {_GetSystemInfoResponse'Capabilities'signalAndQueryHeader = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetSystemInfoResponse'Capabilities "internalErrorDifferentiation" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "internalErrorDifferentiation"
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
fieldOf Proxy# "internalErrorDifferentiation"
_
    = ((Bool -> f Bool)
 -> GetSystemInfoResponse'Capabilities
 -> f GetSystemInfoResponse'Capabilities)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSystemInfoResponse'Capabilities -> Bool)
-> (GetSystemInfoResponse'Capabilities
    -> Bool -> GetSystemInfoResponse'Capabilities)
-> Lens
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'internalErrorDifferentiation
           (\ GetSystemInfoResponse'Capabilities
x__ Bool
y__
              -> GetSystemInfoResponse'Capabilities
x__
                   {_GetSystemInfoResponse'Capabilities'internalErrorDifferentiation = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetSystemInfoResponse'Capabilities "activityFailureIncludeHeartbeat" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityFailureIncludeHeartbeat"
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
fieldOf Proxy# "activityFailureIncludeHeartbeat"
_
    = ((Bool -> f Bool)
 -> GetSystemInfoResponse'Capabilities
 -> f GetSystemInfoResponse'Capabilities)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSystemInfoResponse'Capabilities -> Bool)
-> (GetSystemInfoResponse'Capabilities
    -> Bool -> GetSystemInfoResponse'Capabilities)
-> Lens
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'activityFailureIncludeHeartbeat
           (\ GetSystemInfoResponse'Capabilities
x__ Bool
y__
              -> GetSystemInfoResponse'Capabilities
x__
                   {_GetSystemInfoResponse'Capabilities'activityFailureIncludeHeartbeat = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetSystemInfoResponse'Capabilities "supportsSchedules" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "supportsSchedules"
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
fieldOf Proxy# "supportsSchedules"
_
    = ((Bool -> f Bool)
 -> GetSystemInfoResponse'Capabilities
 -> f GetSystemInfoResponse'Capabilities)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSystemInfoResponse'Capabilities -> Bool)
-> (GetSystemInfoResponse'Capabilities
    -> Bool -> GetSystemInfoResponse'Capabilities)
-> Lens
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'supportsSchedules
           (\ GetSystemInfoResponse'Capabilities
x__ Bool
y__
              -> GetSystemInfoResponse'Capabilities
x__
                   {_GetSystemInfoResponse'Capabilities'supportsSchedules = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetSystemInfoResponse'Capabilities "encodedFailureAttributes" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "encodedFailureAttributes"
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
fieldOf Proxy# "encodedFailureAttributes"
_
    = ((Bool -> f Bool)
 -> GetSystemInfoResponse'Capabilities
 -> f GetSystemInfoResponse'Capabilities)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSystemInfoResponse'Capabilities -> Bool)
-> (GetSystemInfoResponse'Capabilities
    -> Bool -> GetSystemInfoResponse'Capabilities)
-> Lens
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'encodedFailureAttributes
           (\ GetSystemInfoResponse'Capabilities
x__ Bool
y__
              -> GetSystemInfoResponse'Capabilities
x__
                   {_GetSystemInfoResponse'Capabilities'encodedFailureAttributes = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetSystemInfoResponse'Capabilities "buildIdBasedVersioning" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "buildIdBasedVersioning"
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
fieldOf Proxy# "buildIdBasedVersioning"
_
    = ((Bool -> f Bool)
 -> GetSystemInfoResponse'Capabilities
 -> f GetSystemInfoResponse'Capabilities)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSystemInfoResponse'Capabilities -> Bool)
-> (GetSystemInfoResponse'Capabilities
    -> Bool -> GetSystemInfoResponse'Capabilities)
-> Lens
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'buildIdBasedVersioning
           (\ GetSystemInfoResponse'Capabilities
x__ Bool
y__
              -> GetSystemInfoResponse'Capabilities
x__
                   {_GetSystemInfoResponse'Capabilities'buildIdBasedVersioning = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetSystemInfoResponse'Capabilities "upsertMemo" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "upsertMemo"
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
fieldOf Proxy# "upsertMemo"
_
    = ((Bool -> f Bool)
 -> GetSystemInfoResponse'Capabilities
 -> f GetSystemInfoResponse'Capabilities)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSystemInfoResponse'Capabilities -> Bool)
-> (GetSystemInfoResponse'Capabilities
    -> Bool -> GetSystemInfoResponse'Capabilities)
-> Lens
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'upsertMemo
           (\ GetSystemInfoResponse'Capabilities
x__ Bool
y__
              -> GetSystemInfoResponse'Capabilities
x__ {_GetSystemInfoResponse'Capabilities'upsertMemo = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetSystemInfoResponse'Capabilities "eagerWorkflowStart" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "eagerWorkflowStart"
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
fieldOf Proxy# "eagerWorkflowStart"
_
    = ((Bool -> f Bool)
 -> GetSystemInfoResponse'Capabilities
 -> f GetSystemInfoResponse'Capabilities)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSystemInfoResponse'Capabilities -> Bool)
-> (GetSystemInfoResponse'Capabilities
    -> Bool -> GetSystemInfoResponse'Capabilities)
-> Lens
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'eagerWorkflowStart
           (\ GetSystemInfoResponse'Capabilities
x__ Bool
y__
              -> GetSystemInfoResponse'Capabilities
x__
                   {_GetSystemInfoResponse'Capabilities'eagerWorkflowStart = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetSystemInfoResponse'Capabilities "sdkMetadata" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "sdkMetadata"
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
fieldOf Proxy# "sdkMetadata"
_
    = ((Bool -> f Bool)
 -> GetSystemInfoResponse'Capabilities
 -> f GetSystemInfoResponse'Capabilities)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSystemInfoResponse'Capabilities -> Bool)
-> (GetSystemInfoResponse'Capabilities
    -> Bool -> GetSystemInfoResponse'Capabilities)
-> Lens
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'sdkMetadata
           (\ GetSystemInfoResponse'Capabilities
x__ Bool
y__
              -> GetSystemInfoResponse'Capabilities
x__ {_GetSystemInfoResponse'Capabilities'sdkMetadata = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetSystemInfoResponse'Capabilities "countGroupByExecutionStatus" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "countGroupByExecutionStatus"
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
fieldOf Proxy# "countGroupByExecutionStatus"
_
    = ((Bool -> f Bool)
 -> GetSystemInfoResponse'Capabilities
 -> f GetSystemInfoResponse'Capabilities)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GetSystemInfoResponse'Capabilities
-> f GetSystemInfoResponse'Capabilities
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetSystemInfoResponse'Capabilities -> Bool)
-> (GetSystemInfoResponse'Capabilities
    -> Bool -> GetSystemInfoResponse'Capabilities)
-> Lens
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'countGroupByExecutionStatus
           (\ GetSystemInfoResponse'Capabilities
x__ Bool
y__
              -> GetSystemInfoResponse'Capabilities
x__
                   {_GetSystemInfoResponse'Capabilities'countGroupByExecutionStatus = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetSystemInfoResponse'Capabilities where
  messageName :: Proxy GetSystemInfoResponse'Capabilities -> Text
messageName Proxy GetSystemInfoResponse'Capabilities
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetSystemInfoResponse.Capabilities"
  packedMessageDescriptor :: Proxy GetSystemInfoResponse'Capabilities -> ByteString
packedMessageDescriptor Proxy GetSystemInfoResponse'Capabilities
_
    = ByteString
"\n\
      \\fCapabilities\DC25\n\
      \\ETBsignal_and_query_header\CAN\SOH \SOH(\bR\DC4signalAndQueryHeader\DC2D\n\
      \\RSinternal_error_differentiation\CAN\STX \SOH(\bR\FSinternalErrorDifferentiation\DC2K\n\
      \\"activity_failure_include_heartbeat\CAN\ETX \SOH(\bR\USactivityFailureIncludeHeartbeat\DC2-\n\
      \\DC2supports_schedules\CAN\EOT \SOH(\bR\DC1supportsSchedules\DC2<\n\
      \\SUBencoded_failure_attributes\CAN\ENQ \SOH(\bR\CANencodedFailureAttributes\DC29\n\
      \\EMbuild_id_based_versioning\CAN\ACK \SOH(\bR\SYNbuildIdBasedVersioning\DC2\US\n\
      \\vupsert_memo\CAN\a \SOH(\bR\n\
      \upsertMemo\DC20\n\
      \\DC4eager_workflow_start\CAN\b \SOH(\bR\DC2eagerWorkflowStart\DC2!\n\
      \\fsdk_metadata\CAN\t \SOH(\bR\vsdkMetadata\DC2D\n\
      \\UScount_group_by_execution_status\CAN\n\
      \ \SOH(\bR\ESCcountGroupByExecutionStatus"
  packedFileDescriptor :: Proxy GetSystemInfoResponse'Capabilities -> ByteString
packedFileDescriptor Proxy GetSystemInfoResponse'Capabilities
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetSystemInfoResponse'Capabilities)
fieldsByTag
    = let
        signalAndQueryHeader__field_descriptor :: FieldDescriptor GetSystemInfoResponse'Capabilities
signalAndQueryHeader__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities Bool
-> FieldDescriptor GetSystemInfoResponse'Capabilities
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"signal_and_query_header"
              (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
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities 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 @"signalAndQueryHeader")) ::
              Data.ProtoLens.FieldDescriptor GetSystemInfoResponse'Capabilities
        internalErrorDifferentiation__field_descriptor :: FieldDescriptor GetSystemInfoResponse'Capabilities
internalErrorDifferentiation__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities Bool
-> FieldDescriptor GetSystemInfoResponse'Capabilities
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"internal_error_differentiation"
              (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
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities 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 @"internalErrorDifferentiation")) ::
              Data.ProtoLens.FieldDescriptor GetSystemInfoResponse'Capabilities
        activityFailureIncludeHeartbeat__field_descriptor :: FieldDescriptor GetSystemInfoResponse'Capabilities
activityFailureIncludeHeartbeat__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities Bool
-> FieldDescriptor GetSystemInfoResponse'Capabilities
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_failure_include_heartbeat"
              (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
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities 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 @"activityFailureIncludeHeartbeat")) ::
              Data.ProtoLens.FieldDescriptor GetSystemInfoResponse'Capabilities
        supportsSchedules__field_descriptor :: FieldDescriptor GetSystemInfoResponse'Capabilities
supportsSchedules__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities Bool
-> FieldDescriptor GetSystemInfoResponse'Capabilities
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"supports_schedules"
              (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
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities 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 @"supportsSchedules")) ::
              Data.ProtoLens.FieldDescriptor GetSystemInfoResponse'Capabilities
        encodedFailureAttributes__field_descriptor :: FieldDescriptor GetSystemInfoResponse'Capabilities
encodedFailureAttributes__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities Bool
-> FieldDescriptor GetSystemInfoResponse'Capabilities
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"encoded_failure_attributes"
              (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
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities 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 @"encodedFailureAttributes")) ::
              Data.ProtoLens.FieldDescriptor GetSystemInfoResponse'Capabilities
        buildIdBasedVersioning__field_descriptor :: FieldDescriptor GetSystemInfoResponse'Capabilities
buildIdBasedVersioning__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities Bool
-> FieldDescriptor GetSystemInfoResponse'Capabilities
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"build_id_based_versioning"
              (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
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities 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 @"buildIdBasedVersioning")) ::
              Data.ProtoLens.FieldDescriptor GetSystemInfoResponse'Capabilities
        upsertMemo__field_descriptor :: FieldDescriptor GetSystemInfoResponse'Capabilities
upsertMemo__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities Bool
-> FieldDescriptor GetSystemInfoResponse'Capabilities
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"upsert_memo"
              (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
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities 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 @"upsertMemo")) ::
              Data.ProtoLens.FieldDescriptor GetSystemInfoResponse'Capabilities
        eagerWorkflowStart__field_descriptor :: FieldDescriptor GetSystemInfoResponse'Capabilities
eagerWorkflowStart__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities Bool
-> FieldDescriptor GetSystemInfoResponse'Capabilities
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"eager_workflow_start"
              (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
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities 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 @"eagerWorkflowStart")) ::
              Data.ProtoLens.FieldDescriptor GetSystemInfoResponse'Capabilities
        sdkMetadata__field_descriptor :: FieldDescriptor GetSystemInfoResponse'Capabilities
sdkMetadata__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities Bool
-> FieldDescriptor GetSystemInfoResponse'Capabilities
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"sdk_metadata"
              (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
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities 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 @"sdkMetadata")) ::
              Data.ProtoLens.FieldDescriptor GetSystemInfoResponse'Capabilities
        countGroupByExecutionStatus__field_descriptor :: FieldDescriptor GetSystemInfoResponse'Capabilities
countGroupByExecutionStatus__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities Bool
-> FieldDescriptor GetSystemInfoResponse'Capabilities
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"count_group_by_execution_status"
              (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
     GetSystemInfoResponse'Capabilities
     GetSystemInfoResponse'Capabilities
     Bool
     Bool
-> FieldAccessor GetSystemInfoResponse'Capabilities 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 @"countGroupByExecutionStatus")) ::
              Data.ProtoLens.FieldDescriptor GetSystemInfoResponse'Capabilities
      in
        [(Tag, FieldDescriptor GetSystemInfoResponse'Capabilities)]
-> Map Tag (FieldDescriptor GetSystemInfoResponse'Capabilities)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetSystemInfoResponse'Capabilities
signalAndQueryHeader__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, 
            FieldDescriptor GetSystemInfoResponse'Capabilities
internalErrorDifferentiation__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, 
            FieldDescriptor GetSystemInfoResponse'Capabilities
activityFailureIncludeHeartbeat__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor GetSystemInfoResponse'Capabilities
supportsSchedules__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor GetSystemInfoResponse'Capabilities
encodedFailureAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor GetSystemInfoResponse'Capabilities
buildIdBasedVersioning__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor GetSystemInfoResponse'Capabilities
upsertMemo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor GetSystemInfoResponse'Capabilities
eagerWorkflowStart__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor GetSystemInfoResponse'Capabilities
sdkMetadata__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, 
            FieldDescriptor GetSystemInfoResponse'Capabilities
countGroupByExecutionStatus__field_descriptor)]
  unknownFields :: Lens' GetSystemInfoResponse'Capabilities FieldSet
unknownFields
    = (GetSystemInfoResponse'Capabilities -> FieldSet)
-> (GetSystemInfoResponse'Capabilities
    -> FieldSet -> GetSystemInfoResponse'Capabilities)
-> Lens' GetSystemInfoResponse'Capabilities FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetSystemInfoResponse'Capabilities -> FieldSet
_GetSystemInfoResponse'Capabilities'_unknownFields
        (\ GetSystemInfoResponse'Capabilities
x__ FieldSet
y__
           -> GetSystemInfoResponse'Capabilities
x__ {_GetSystemInfoResponse'Capabilities'_unknownFields = y__})
  defMessage :: GetSystemInfoResponse'Capabilities
defMessage
    = GetSystemInfoResponse'Capabilities'_constructor
        {_GetSystemInfoResponse'Capabilities'signalAndQueryHeader :: Bool
_GetSystemInfoResponse'Capabilities'signalAndQueryHeader = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetSystemInfoResponse'Capabilities'internalErrorDifferentiation :: Bool
_GetSystemInfoResponse'Capabilities'internalErrorDifferentiation = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetSystemInfoResponse'Capabilities'activityFailureIncludeHeartbeat :: Bool
_GetSystemInfoResponse'Capabilities'activityFailureIncludeHeartbeat = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetSystemInfoResponse'Capabilities'supportsSchedules :: Bool
_GetSystemInfoResponse'Capabilities'supportsSchedules = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetSystemInfoResponse'Capabilities'encodedFailureAttributes :: Bool
_GetSystemInfoResponse'Capabilities'encodedFailureAttributes = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetSystemInfoResponse'Capabilities'buildIdBasedVersioning :: Bool
_GetSystemInfoResponse'Capabilities'buildIdBasedVersioning = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetSystemInfoResponse'Capabilities'upsertMemo :: Bool
_GetSystemInfoResponse'Capabilities'upsertMemo = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetSystemInfoResponse'Capabilities'eagerWorkflowStart :: Bool
_GetSystemInfoResponse'Capabilities'eagerWorkflowStart = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetSystemInfoResponse'Capabilities'sdkMetadata :: Bool
_GetSystemInfoResponse'Capabilities'sdkMetadata = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetSystemInfoResponse'Capabilities'countGroupByExecutionStatus :: Bool
_GetSystemInfoResponse'Capabilities'countGroupByExecutionStatus = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetSystemInfoResponse'Capabilities'_unknownFields :: FieldSet
_GetSystemInfoResponse'Capabilities'_unknownFields = []}
  parseMessage :: Parser GetSystemInfoResponse'Capabilities
parseMessage
    = let
        loop ::
          GetSystemInfoResponse'Capabilities
          -> Data.ProtoLens.Encoding.Bytes.Parser GetSystemInfoResponse'Capabilities
        loop :: GetSystemInfoResponse'Capabilities
-> Parser GetSystemInfoResponse'Capabilities
loop GetSystemInfoResponse'Capabilities
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 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
"signal_and_query_header"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"signalAndQueryHeader") 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
"internal_error_differentiation"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"internalErrorDifferentiation") y
                                     x)
                        Word64
24
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"activity_failure_include_heartbeat"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"activityFailureIncludeHeartbeat")
                                     y x)
                        Word64
32
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"supports_schedules"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"supportsSchedules") y x)
                        Word64
40
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"encoded_failure_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"encodedFailureAttributes") y x)
                        Word64
48
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"build_id_based_versioning"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"buildIdBasedVersioning") y x)
                        Word64
56
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"upsert_memo"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"upsertMemo") y x)
                        Word64
64
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"eager_workflow_start"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"eagerWorkflowStart") y x)
                        Word64
72
                          -> 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
"sdk_metadata"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"sdkMetadata") y x)
                        Word64
80
                          -> 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
"count_group_by_execution_status"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"countGroupByExecutionStatus") 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 GetSystemInfoResponse'Capabilities
-> String -> Parser GetSystemInfoResponse'Capabilities
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GetSystemInfoResponse'Capabilities
-> Parser GetSystemInfoResponse'Capabilities
loop GetSystemInfoResponse'Capabilities
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"Capabilities"
  buildMessage :: GetSystemInfoResponse'Capabilities -> Builder
buildMessage
    = \ GetSystemInfoResponse'Capabilities
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Bool
_v
                  = FoldLike
  Bool
  GetSystemInfoResponse'Capabilities
  GetSystemInfoResponse'Capabilities
  Bool
  Bool
-> GetSystemInfoResponse'Capabilities -> 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 @"signalAndQueryHeader") GetSystemInfoResponse'Capabilities
_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
8)
                      ((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 :: Bool
_v
                     = FoldLike
  Bool
  GetSystemInfoResponse'Capabilities
  GetSystemInfoResponse'Capabilities
  Bool
  Bool
-> GetSystemInfoResponse'Capabilities -> 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 @"internalErrorDifferentiation") GetSystemInfoResponse'Capabilities
_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))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Bool
_v
                        = FoldLike
  Bool
  GetSystemInfoResponse'Capabilities
  GetSystemInfoResponse'Capabilities
  Bool
  Bool
-> GetSystemInfoResponse'Capabilities -> 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 @"activityFailureIncludeHeartbeat") GetSystemInfoResponse'Capabilities
_x
                    in
                      if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
24)
                            ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt (\ Bool
b -> if Bool
b then Word64
1 else Word64
0)
                               Bool
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Bool
_v
                           = FoldLike
  Bool
  GetSystemInfoResponse'Capabilities
  GetSystemInfoResponse'Capabilities
  Bool
  Bool
-> GetSystemInfoResponse'Capabilities -> 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 @"supportsSchedules") GetSystemInfoResponse'Capabilities
_x
                       in
                         if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
32)
                               ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (\ Bool
b -> if Bool
b then Word64
1 else Word64
0) Bool
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Bool
_v
                              = FoldLike
  Bool
  GetSystemInfoResponse'Capabilities
  GetSystemInfoResponse'Capabilities
  Bool
  Bool
-> GetSystemInfoResponse'Capabilities -> 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 @"encodedFailureAttributes") GetSystemInfoResponse'Capabilities
_x
                          in
                            if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
40)
                                  ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (\ Bool
b -> if Bool
b then Word64
1 else Word64
0) Bool
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Bool
_v
                                 = FoldLike
  Bool
  GetSystemInfoResponse'Capabilities
  GetSystemInfoResponse'Capabilities
  Bool
  Bool
-> GetSystemInfoResponse'Capabilities -> 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 @"buildIdBasedVersioning") GetSystemInfoResponse'Capabilities
_x
                             in
                               if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
48)
                                     ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (\ Bool
b -> if Bool
b then Word64
1 else Word64
0) Bool
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Bool
_v
                                    = FoldLike
  Bool
  GetSystemInfoResponse'Capabilities
  GetSystemInfoResponse'Capabilities
  Bool
  Bool
-> GetSystemInfoResponse'Capabilities -> 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 @"upsertMemo") GetSystemInfoResponse'Capabilities
_x
                                in
                                  if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                      Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  else
                                      Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
56)
                                        ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                           Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (\ Bool
b -> if Bool
b then Word64
1 else Word64
0) Bool
_v))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (let
                                     _v :: Bool
_v
                                       = FoldLike
  Bool
  GetSystemInfoResponse'Capabilities
  GetSystemInfoResponse'Capabilities
  Bool
  Bool
-> GetSystemInfoResponse'Capabilities -> 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 @"eagerWorkflowStart") GetSystemInfoResponse'Capabilities
_x
                                   in
                                     if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                         Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                     else
                                         Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
64)
                                           ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                              Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (\ Bool
b -> if Bool
b then Word64
1 else Word64
0) Bool
_v))
                                  (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (let
                                        _v :: Bool
_v
                                          = FoldLike
  Bool
  GetSystemInfoResponse'Capabilities
  GetSystemInfoResponse'Capabilities
  Bool
  Bool
-> GetSystemInfoResponse'Capabilities -> 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 @"sdkMetadata") GetSystemInfoResponse'Capabilities
_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
72)
                                              ((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 :: Bool
_v
                                             = FoldLike
  Bool
  GetSystemInfoResponse'Capabilities
  GetSystemInfoResponse'Capabilities
  Bool
  Bool
-> GetSystemInfoResponse'Capabilities -> 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
                                                    @"countGroupByExecutionStatus")
                                                 GetSystemInfoResponse'Capabilities
_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
80)
                                                 ((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
  GetSystemInfoResponse'Capabilities
  GetSystemInfoResponse'Capabilities
  FieldSet
  FieldSet
-> GetSystemInfoResponse'Capabilities -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                              FoldLike
  FieldSet
  GetSystemInfoResponse'Capabilities
  GetSystemInfoResponse'Capabilities
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetSystemInfoResponse'Capabilities FieldSet
Data.ProtoLens.unknownFields GetSystemInfoResponse'Capabilities
_x)))))))))))
instance Control.DeepSeq.NFData GetSystemInfoResponse'Capabilities where
  rnf :: GetSystemInfoResponse'Capabilities -> ()
rnf
    = \ GetSystemInfoResponse'Capabilities
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetSystemInfoResponse'Capabilities -> FieldSet
_GetSystemInfoResponse'Capabilities'_unknownFields GetSystemInfoResponse'Capabilities
x__)
             (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'signalAndQueryHeader GetSystemInfoResponse'Capabilities
x__)
                (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'internalErrorDifferentiation
                      GetSystemInfoResponse'Capabilities
x__)
                   (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'activityFailureIncludeHeartbeat
                         GetSystemInfoResponse'Capabilities
x__)
                      (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'supportsSchedules GetSystemInfoResponse'Capabilities
x__)
                         (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'encodedFailureAttributes GetSystemInfoResponse'Capabilities
x__)
                            (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'buildIdBasedVersioning GetSystemInfoResponse'Capabilities
x__)
                               (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'upsertMemo GetSystemInfoResponse'Capabilities
x__)
                                  (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'eagerWorkflowStart GetSystemInfoResponse'Capabilities
x__)
                                     (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'sdkMetadata GetSystemInfoResponse'Capabilities
x__)
                                        (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (GetSystemInfoResponse'Capabilities -> Bool
_GetSystemInfoResponse'Capabilities'countGroupByExecutionStatus
                                              GetSystemInfoResponse'Capabilities
x__)
                                           ()))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' GetWorkerBuildIdCompatibilityRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueue' @:: Lens' GetWorkerBuildIdCompatibilityRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maxSets' @:: Lens' GetWorkerBuildIdCompatibilityRequest Data.Int.Int32@ -}
data GetWorkerBuildIdCompatibilityRequest
  = GetWorkerBuildIdCompatibilityRequest'_constructor {GetWorkerBuildIdCompatibilityRequest -> Text
_GetWorkerBuildIdCompatibilityRequest'namespace :: !Data.Text.Text,
                                                       GetWorkerBuildIdCompatibilityRequest -> Text
_GetWorkerBuildIdCompatibilityRequest'taskQueue :: !Data.Text.Text,
                                                       GetWorkerBuildIdCompatibilityRequest -> Int32
_GetWorkerBuildIdCompatibilityRequest'maxSets :: !Data.Int.Int32,
                                                       GetWorkerBuildIdCompatibilityRequest -> FieldSet
_GetWorkerBuildIdCompatibilityRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Bool
(GetWorkerBuildIdCompatibilityRequest
 -> GetWorkerBuildIdCompatibilityRequest -> Bool)
-> (GetWorkerBuildIdCompatibilityRequest
    -> GetWorkerBuildIdCompatibilityRequest -> Bool)
-> Eq GetWorkerBuildIdCompatibilityRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Bool
== :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Bool
$c/= :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Bool
/= :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Bool
Prelude.Eq, Eq GetWorkerBuildIdCompatibilityRequest
Eq GetWorkerBuildIdCompatibilityRequest =>
(GetWorkerBuildIdCompatibilityRequest
 -> GetWorkerBuildIdCompatibilityRequest -> Ordering)
-> (GetWorkerBuildIdCompatibilityRequest
    -> GetWorkerBuildIdCompatibilityRequest -> Bool)
-> (GetWorkerBuildIdCompatibilityRequest
    -> GetWorkerBuildIdCompatibilityRequest -> Bool)
-> (GetWorkerBuildIdCompatibilityRequest
    -> GetWorkerBuildIdCompatibilityRequest -> Bool)
-> (GetWorkerBuildIdCompatibilityRequest
    -> GetWorkerBuildIdCompatibilityRequest -> Bool)
-> (GetWorkerBuildIdCompatibilityRequest
    -> GetWorkerBuildIdCompatibilityRequest
    -> GetWorkerBuildIdCompatibilityRequest)
-> (GetWorkerBuildIdCompatibilityRequest
    -> GetWorkerBuildIdCompatibilityRequest
    -> GetWorkerBuildIdCompatibilityRequest)
-> Ord GetWorkerBuildIdCompatibilityRequest
GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Bool
GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Ordering
GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest
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 :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Ordering
compare :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Ordering
$c< :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Bool
< :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Bool
$c<= :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Bool
<= :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Bool
$c> :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Bool
> :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Bool
$c>= :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Bool
>= :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest -> Bool
$cmax :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest
max :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest
$cmin :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest
min :: GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest
-> GetWorkerBuildIdCompatibilityRequest
Prelude.Ord)
instance Prelude.Show GetWorkerBuildIdCompatibilityRequest where
  showsPrec :: Int -> GetWorkerBuildIdCompatibilityRequest -> ShowS
showsPrec Int
_ GetWorkerBuildIdCompatibilityRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetWorkerBuildIdCompatibilityRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetWorkerBuildIdCompatibilityRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetWorkerBuildIdCompatibilityRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> GetWorkerBuildIdCompatibilityRequest
-> f GetWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> GetWorkerBuildIdCompatibilityRequest
 -> f GetWorkerBuildIdCompatibilityRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetWorkerBuildIdCompatibilityRequest
-> f GetWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerBuildIdCompatibilityRequest -> Text)
-> (GetWorkerBuildIdCompatibilityRequest
    -> Text -> GetWorkerBuildIdCompatibilityRequest)
-> Lens
     GetWorkerBuildIdCompatibilityRequest
     GetWorkerBuildIdCompatibilityRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerBuildIdCompatibilityRequest -> Text
_GetWorkerBuildIdCompatibilityRequest'namespace
           (\ GetWorkerBuildIdCompatibilityRequest
x__ Text
y__
              -> GetWorkerBuildIdCompatibilityRequest
x__ {_GetWorkerBuildIdCompatibilityRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkerBuildIdCompatibilityRequest "taskQueue" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (Text -> f Text)
-> GetWorkerBuildIdCompatibilityRequest
-> f GetWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "taskQueue"
_
    = ((Text -> f Text)
 -> GetWorkerBuildIdCompatibilityRequest
 -> f GetWorkerBuildIdCompatibilityRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetWorkerBuildIdCompatibilityRequest
-> f GetWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerBuildIdCompatibilityRequest -> Text)
-> (GetWorkerBuildIdCompatibilityRequest
    -> Text -> GetWorkerBuildIdCompatibilityRequest)
-> Lens
     GetWorkerBuildIdCompatibilityRequest
     GetWorkerBuildIdCompatibilityRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerBuildIdCompatibilityRequest -> Text
_GetWorkerBuildIdCompatibilityRequest'taskQueue
           (\ GetWorkerBuildIdCompatibilityRequest
x__ Text
y__
              -> GetWorkerBuildIdCompatibilityRequest
x__ {_GetWorkerBuildIdCompatibilityRequest'taskQueue = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkerBuildIdCompatibilityRequest "maxSets" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maxSets"
-> (Int32 -> f Int32)
-> GetWorkerBuildIdCompatibilityRequest
-> f GetWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "maxSets"
_
    = ((Int32 -> f Int32)
 -> GetWorkerBuildIdCompatibilityRequest
 -> f GetWorkerBuildIdCompatibilityRequest)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> GetWorkerBuildIdCompatibilityRequest
-> f GetWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerBuildIdCompatibilityRequest -> Int32)
-> (GetWorkerBuildIdCompatibilityRequest
    -> Int32 -> GetWorkerBuildIdCompatibilityRequest)
-> Lens
     GetWorkerBuildIdCompatibilityRequest
     GetWorkerBuildIdCompatibilityRequest
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerBuildIdCompatibilityRequest -> Int32
_GetWorkerBuildIdCompatibilityRequest'maxSets
           (\ GetWorkerBuildIdCompatibilityRequest
x__ Int32
y__
              -> GetWorkerBuildIdCompatibilityRequest
x__ {_GetWorkerBuildIdCompatibilityRequest'maxSets = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetWorkerBuildIdCompatibilityRequest where
  messageName :: Proxy GetWorkerBuildIdCompatibilityRequest -> Text
messageName Proxy GetWorkerBuildIdCompatibilityRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetWorkerBuildIdCompatibilityRequest"
  packedMessageDescriptor :: Proxy GetWorkerBuildIdCompatibilityRequest -> ByteString
packedMessageDescriptor Proxy GetWorkerBuildIdCompatibilityRequest
_
    = ByteString
"\n\
      \$GetWorkerBuildIdCompatibilityRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\GS\n\
      \\n\
      \task_queue\CAN\STX \SOH(\tR\ttaskQueue\DC2\EM\n\
      \\bmax_sets\CAN\ETX \SOH(\ENQR\amaxSets"
  packedFileDescriptor :: Proxy GetWorkerBuildIdCompatibilityRequest -> ByteString
packedFileDescriptor Proxy GetWorkerBuildIdCompatibilityRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetWorkerBuildIdCompatibilityRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor GetWorkerBuildIdCompatibilityRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetWorkerBuildIdCompatibilityRequest Text
-> FieldDescriptor GetWorkerBuildIdCompatibilityRequest
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
     GetWorkerBuildIdCompatibilityRequest
     GetWorkerBuildIdCompatibilityRequest
     Text
     Text
-> FieldAccessor GetWorkerBuildIdCompatibilityRequest 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 GetWorkerBuildIdCompatibilityRequest
        taskQueue__field_descriptor :: FieldDescriptor GetWorkerBuildIdCompatibilityRequest
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetWorkerBuildIdCompatibilityRequest Text
-> FieldDescriptor GetWorkerBuildIdCompatibilityRequest
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
     GetWorkerBuildIdCompatibilityRequest
     GetWorkerBuildIdCompatibilityRequest
     Text
     Text
-> FieldAccessor GetWorkerBuildIdCompatibilityRequest 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 GetWorkerBuildIdCompatibilityRequest
        maxSets__field_descriptor :: FieldDescriptor GetWorkerBuildIdCompatibilityRequest
maxSets__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor GetWorkerBuildIdCompatibilityRequest Int32
-> FieldDescriptor GetWorkerBuildIdCompatibilityRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"max_sets"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     GetWorkerBuildIdCompatibilityRequest
     GetWorkerBuildIdCompatibilityRequest
     Int32
     Int32
-> FieldAccessor GetWorkerBuildIdCompatibilityRequest Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxSets")) ::
              Data.ProtoLens.FieldDescriptor GetWorkerBuildIdCompatibilityRequest
      in
        [(Tag, FieldDescriptor GetWorkerBuildIdCompatibilityRequest)]
-> Map Tag (FieldDescriptor GetWorkerBuildIdCompatibilityRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetWorkerBuildIdCompatibilityRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor GetWorkerBuildIdCompatibilityRequest
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor GetWorkerBuildIdCompatibilityRequest
maxSets__field_descriptor)]
  unknownFields :: Lens' GetWorkerBuildIdCompatibilityRequest FieldSet
unknownFields
    = (GetWorkerBuildIdCompatibilityRequest -> FieldSet)
-> (GetWorkerBuildIdCompatibilityRequest
    -> FieldSet -> GetWorkerBuildIdCompatibilityRequest)
-> Lens' GetWorkerBuildIdCompatibilityRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetWorkerBuildIdCompatibilityRequest -> FieldSet
_GetWorkerBuildIdCompatibilityRequest'_unknownFields
        (\ GetWorkerBuildIdCompatibilityRequest
x__ FieldSet
y__
           -> GetWorkerBuildIdCompatibilityRequest
x__
                {_GetWorkerBuildIdCompatibilityRequest'_unknownFields = y__})
  defMessage :: GetWorkerBuildIdCompatibilityRequest
defMessage
    = GetWorkerBuildIdCompatibilityRequest'_constructor
        {_GetWorkerBuildIdCompatibilityRequest'namespace :: Text
_GetWorkerBuildIdCompatibilityRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkerBuildIdCompatibilityRequest'taskQueue :: Text
_GetWorkerBuildIdCompatibilityRequest'taskQueue = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkerBuildIdCompatibilityRequest'maxSets :: Int32
_GetWorkerBuildIdCompatibilityRequest'maxSets = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkerBuildIdCompatibilityRequest'_unknownFields :: FieldSet
_GetWorkerBuildIdCompatibilityRequest'_unknownFields = []}
  parseMessage :: Parser GetWorkerBuildIdCompatibilityRequest
parseMessage
    = let
        loop ::
          GetWorkerBuildIdCompatibilityRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser GetWorkerBuildIdCompatibilityRequest
        loop :: GetWorkerBuildIdCompatibilityRequest
-> Parser GetWorkerBuildIdCompatibilityRequest
loop GetWorkerBuildIdCompatibilityRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
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)
                        Word64
24
                          -> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"max_sets"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"maxSets") 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 GetWorkerBuildIdCompatibilityRequest
-> String -> Parser GetWorkerBuildIdCompatibilityRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GetWorkerBuildIdCompatibilityRequest
-> Parser GetWorkerBuildIdCompatibilityRequest
loop GetWorkerBuildIdCompatibilityRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"GetWorkerBuildIdCompatibilityRequest"
  buildMessage :: GetWorkerBuildIdCompatibilityRequest -> Builder
buildMessage
    = \ GetWorkerBuildIdCompatibilityRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  GetWorkerBuildIdCompatibilityRequest
  GetWorkerBuildIdCompatibilityRequest
  Text
  Text
-> GetWorkerBuildIdCompatibilityRequest -> 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") GetWorkerBuildIdCompatibilityRequest
_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
  GetWorkerBuildIdCompatibilityRequest
  GetWorkerBuildIdCompatibilityRequest
  Text
  Text
-> GetWorkerBuildIdCompatibilityRequest -> 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") GetWorkerBuildIdCompatibilityRequest
_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 :: Int32
_v = FoldLike
  Int32
  GetWorkerBuildIdCompatibilityRequest
  GetWorkerBuildIdCompatibilityRequest
  Int32
  Int32
-> GetWorkerBuildIdCompatibilityRequest -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxSets") GetWorkerBuildIdCompatibilityRequest
_x
                    in
                      if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
24)
                            ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  GetWorkerBuildIdCompatibilityRequest
  GetWorkerBuildIdCompatibilityRequest
  FieldSet
  FieldSet
-> GetWorkerBuildIdCompatibilityRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetWorkerBuildIdCompatibilityRequest
  GetWorkerBuildIdCompatibilityRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetWorkerBuildIdCompatibilityRequest FieldSet
Data.ProtoLens.unknownFields GetWorkerBuildIdCompatibilityRequest
_x))))
instance Control.DeepSeq.NFData GetWorkerBuildIdCompatibilityRequest where
  rnf :: GetWorkerBuildIdCompatibilityRequest -> ()
rnf
    = \ GetWorkerBuildIdCompatibilityRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetWorkerBuildIdCompatibilityRequest -> FieldSet
_GetWorkerBuildIdCompatibilityRequest'_unknownFields GetWorkerBuildIdCompatibilityRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetWorkerBuildIdCompatibilityRequest -> Text
_GetWorkerBuildIdCompatibilityRequest'namespace GetWorkerBuildIdCompatibilityRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GetWorkerBuildIdCompatibilityRequest -> Text
_GetWorkerBuildIdCompatibilityRequest'taskQueue GetWorkerBuildIdCompatibilityRequest
x__)
                   (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (GetWorkerBuildIdCompatibilityRequest -> Int32
_GetWorkerBuildIdCompatibilityRequest'maxSets GetWorkerBuildIdCompatibilityRequest
x__) ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.majorVersionSets' @:: Lens' GetWorkerBuildIdCompatibilityResponse [Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleVersionSet]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'majorVersionSets' @:: Lens' GetWorkerBuildIdCompatibilityResponse (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleVersionSet)@ -}
data GetWorkerBuildIdCompatibilityResponse
  = GetWorkerBuildIdCompatibilityResponse'_constructor {GetWorkerBuildIdCompatibilityResponse
-> Vector CompatibleVersionSet
_GetWorkerBuildIdCompatibilityResponse'majorVersionSets :: !(Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleVersionSet),
                                                        GetWorkerBuildIdCompatibilityResponse -> FieldSet
_GetWorkerBuildIdCompatibilityResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Bool
(GetWorkerBuildIdCompatibilityResponse
 -> GetWorkerBuildIdCompatibilityResponse -> Bool)
-> (GetWorkerBuildIdCompatibilityResponse
    -> GetWorkerBuildIdCompatibilityResponse -> Bool)
-> Eq GetWorkerBuildIdCompatibilityResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Bool
== :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Bool
$c/= :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Bool
/= :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Bool
Prelude.Eq, Eq GetWorkerBuildIdCompatibilityResponse
Eq GetWorkerBuildIdCompatibilityResponse =>
(GetWorkerBuildIdCompatibilityResponse
 -> GetWorkerBuildIdCompatibilityResponse -> Ordering)
-> (GetWorkerBuildIdCompatibilityResponse
    -> GetWorkerBuildIdCompatibilityResponse -> Bool)
-> (GetWorkerBuildIdCompatibilityResponse
    -> GetWorkerBuildIdCompatibilityResponse -> Bool)
-> (GetWorkerBuildIdCompatibilityResponse
    -> GetWorkerBuildIdCompatibilityResponse -> Bool)
-> (GetWorkerBuildIdCompatibilityResponse
    -> GetWorkerBuildIdCompatibilityResponse -> Bool)
-> (GetWorkerBuildIdCompatibilityResponse
    -> GetWorkerBuildIdCompatibilityResponse
    -> GetWorkerBuildIdCompatibilityResponse)
-> (GetWorkerBuildIdCompatibilityResponse
    -> GetWorkerBuildIdCompatibilityResponse
    -> GetWorkerBuildIdCompatibilityResponse)
-> Ord GetWorkerBuildIdCompatibilityResponse
GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Bool
GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Ordering
GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse
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 :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Ordering
compare :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Ordering
$c< :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Bool
< :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Bool
$c<= :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Bool
<= :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Bool
$c> :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Bool
> :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Bool
$c>= :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Bool
>= :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse -> Bool
$cmax :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse
max :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse
$cmin :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse
min :: GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse
-> GetWorkerBuildIdCompatibilityResponse
Prelude.Ord)
instance Prelude.Show GetWorkerBuildIdCompatibilityResponse where
  showsPrec :: Int -> GetWorkerBuildIdCompatibilityResponse -> ShowS
showsPrec Int
_ GetWorkerBuildIdCompatibilityResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetWorkerBuildIdCompatibilityResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetWorkerBuildIdCompatibilityResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetWorkerBuildIdCompatibilityResponse "majorVersionSets" [Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleVersionSet] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "majorVersionSets"
-> ([CompatibleVersionSet] -> f [CompatibleVersionSet])
-> GetWorkerBuildIdCompatibilityResponse
-> f GetWorkerBuildIdCompatibilityResponse
fieldOf Proxy# "majorVersionSets"
_
    = ((Vector CompatibleVersionSet -> f (Vector CompatibleVersionSet))
 -> GetWorkerBuildIdCompatibilityResponse
 -> f GetWorkerBuildIdCompatibilityResponse)
-> (([CompatibleVersionSet] -> f [CompatibleVersionSet])
    -> Vector CompatibleVersionSet -> f (Vector CompatibleVersionSet))
-> ([CompatibleVersionSet] -> f [CompatibleVersionSet])
-> GetWorkerBuildIdCompatibilityResponse
-> f GetWorkerBuildIdCompatibilityResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerBuildIdCompatibilityResponse
 -> Vector CompatibleVersionSet)
-> (GetWorkerBuildIdCompatibilityResponse
    -> Vector CompatibleVersionSet
    -> GetWorkerBuildIdCompatibilityResponse)
-> Lens
     GetWorkerBuildIdCompatibilityResponse
     GetWorkerBuildIdCompatibilityResponse
     (Vector CompatibleVersionSet)
     (Vector CompatibleVersionSet)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerBuildIdCompatibilityResponse
-> Vector CompatibleVersionSet
_GetWorkerBuildIdCompatibilityResponse'majorVersionSets
           (\ GetWorkerBuildIdCompatibilityResponse
x__ Vector CompatibleVersionSet
y__
              -> GetWorkerBuildIdCompatibilityResponse
x__
                   {_GetWorkerBuildIdCompatibilityResponse'majorVersionSets = y__}))
        ((Vector CompatibleVersionSet -> [CompatibleVersionSet])
-> (Vector CompatibleVersionSet
    -> [CompatibleVersionSet] -> Vector CompatibleVersionSet)
-> Lens
     (Vector CompatibleVersionSet)
     (Vector CompatibleVersionSet)
     [CompatibleVersionSet]
     [CompatibleVersionSet]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector CompatibleVersionSet -> [CompatibleVersionSet]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector CompatibleVersionSet
_ [CompatibleVersionSet]
y__ -> [CompatibleVersionSet] -> Vector CompatibleVersionSet
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [CompatibleVersionSet]
y__))
instance Data.ProtoLens.Field.HasField GetWorkerBuildIdCompatibilityResponse "vec'majorVersionSets" (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleVersionSet) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'majorVersionSets"
-> (Vector CompatibleVersionSet -> f (Vector CompatibleVersionSet))
-> GetWorkerBuildIdCompatibilityResponse
-> f GetWorkerBuildIdCompatibilityResponse
fieldOf Proxy# "vec'majorVersionSets"
_
    = ((Vector CompatibleVersionSet -> f (Vector CompatibleVersionSet))
 -> GetWorkerBuildIdCompatibilityResponse
 -> f GetWorkerBuildIdCompatibilityResponse)
-> ((Vector CompatibleVersionSet
     -> f (Vector CompatibleVersionSet))
    -> Vector CompatibleVersionSet -> f (Vector CompatibleVersionSet))
-> (Vector CompatibleVersionSet -> f (Vector CompatibleVersionSet))
-> GetWorkerBuildIdCompatibilityResponse
-> f GetWorkerBuildIdCompatibilityResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerBuildIdCompatibilityResponse
 -> Vector CompatibleVersionSet)
-> (GetWorkerBuildIdCompatibilityResponse
    -> Vector CompatibleVersionSet
    -> GetWorkerBuildIdCompatibilityResponse)
-> Lens
     GetWorkerBuildIdCompatibilityResponse
     GetWorkerBuildIdCompatibilityResponse
     (Vector CompatibleVersionSet)
     (Vector CompatibleVersionSet)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerBuildIdCompatibilityResponse
-> Vector CompatibleVersionSet
_GetWorkerBuildIdCompatibilityResponse'majorVersionSets
           (\ GetWorkerBuildIdCompatibilityResponse
x__ Vector CompatibleVersionSet
y__
              -> GetWorkerBuildIdCompatibilityResponse
x__
                   {_GetWorkerBuildIdCompatibilityResponse'majorVersionSets = y__}))
        (Vector CompatibleVersionSet -> f (Vector CompatibleVersionSet))
-> Vector CompatibleVersionSet -> f (Vector CompatibleVersionSet)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetWorkerBuildIdCompatibilityResponse where
  messageName :: Proxy GetWorkerBuildIdCompatibilityResponse -> Text
messageName Proxy GetWorkerBuildIdCompatibilityResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetWorkerBuildIdCompatibilityResponse"
  packedMessageDescriptor :: Proxy GetWorkerBuildIdCompatibilityResponse -> ByteString
packedMessageDescriptor Proxy GetWorkerBuildIdCompatibilityResponse
_
    = ByteString
"\n\
      \%GetWorkerBuildIdCompatibilityResponse\DC2]\n\
      \\DC2major_version_sets\CAN\SOH \ETX(\v2/.temporal.api.taskqueue.v1.CompatibleVersionSetR\DLEmajorVersionSets"
  packedFileDescriptor :: Proxy GetWorkerBuildIdCompatibilityResponse -> ByteString
packedFileDescriptor Proxy GetWorkerBuildIdCompatibilityResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetWorkerBuildIdCompatibilityResponse)
fieldsByTag
    = let
        majorVersionSets__field_descriptor :: FieldDescriptor GetWorkerBuildIdCompatibilityResponse
majorVersionSets__field_descriptor
          = String
-> FieldTypeDescriptor CompatibleVersionSet
-> FieldAccessor
     GetWorkerBuildIdCompatibilityResponse CompatibleVersionSet
-> FieldDescriptor GetWorkerBuildIdCompatibilityResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"major_version_sets"
              (MessageOrGroup -> FieldTypeDescriptor CompatibleVersionSet
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleVersionSet)
              (Packing
-> Lens'
     GetWorkerBuildIdCompatibilityResponse [CompatibleVersionSet]
-> FieldAccessor
     GetWorkerBuildIdCompatibilityResponse CompatibleVersionSet
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 @"majorVersionSets")) ::
              Data.ProtoLens.FieldDescriptor GetWorkerBuildIdCompatibilityResponse
      in
        [(Tag, FieldDescriptor GetWorkerBuildIdCompatibilityResponse)]
-> Map Tag (FieldDescriptor GetWorkerBuildIdCompatibilityResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetWorkerBuildIdCompatibilityResponse
majorVersionSets__field_descriptor)]
  unknownFields :: Lens' GetWorkerBuildIdCompatibilityResponse FieldSet
unknownFields
    = (GetWorkerBuildIdCompatibilityResponse -> FieldSet)
-> (GetWorkerBuildIdCompatibilityResponse
    -> FieldSet -> GetWorkerBuildIdCompatibilityResponse)
-> Lens' GetWorkerBuildIdCompatibilityResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetWorkerBuildIdCompatibilityResponse -> FieldSet
_GetWorkerBuildIdCompatibilityResponse'_unknownFields
        (\ GetWorkerBuildIdCompatibilityResponse
x__ FieldSet
y__
           -> GetWorkerBuildIdCompatibilityResponse
x__
                {_GetWorkerBuildIdCompatibilityResponse'_unknownFields = y__})
  defMessage :: GetWorkerBuildIdCompatibilityResponse
defMessage
    = GetWorkerBuildIdCompatibilityResponse'_constructor
        {_GetWorkerBuildIdCompatibilityResponse'majorVersionSets :: Vector CompatibleVersionSet
_GetWorkerBuildIdCompatibilityResponse'majorVersionSets = Vector CompatibleVersionSet
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _GetWorkerBuildIdCompatibilityResponse'_unknownFields :: FieldSet
_GetWorkerBuildIdCompatibilityResponse'_unknownFields = []}
  parseMessage :: Parser GetWorkerBuildIdCompatibilityResponse
parseMessage
    = let
        loop ::
          GetWorkerBuildIdCompatibilityResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleVersionSet
             -> Data.ProtoLens.Encoding.Bytes.Parser GetWorkerBuildIdCompatibilityResponse
        loop :: GetWorkerBuildIdCompatibilityResponse
-> Growing Vector RealWorld CompatibleVersionSet
-> Parser GetWorkerBuildIdCompatibilityResponse
loop GetWorkerBuildIdCompatibilityResponse
x Growing Vector RealWorld CompatibleVersionSet
mutable'majorVersionSets
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'majorVersionSets <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                   (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                      mutable'majorVersionSets)
                      (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'majorVersionSets")
                              frozen'majorVersionSets x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser CompatibleVersionSet
-> String -> Parser CompatibleVersionSet
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"major_version_sets"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'majorVersionSets y)
                                loop x v
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
                                  mutable'majorVersionSets
      in
        Parser GetWorkerBuildIdCompatibilityResponse
-> String -> Parser GetWorkerBuildIdCompatibilityResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'majorVersionSets <- IO (Growing Vector RealWorld CompatibleVersionSet)
-> Parser (Growing Vector RealWorld CompatibleVersionSet)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                            IO (Growing Vector RealWorld CompatibleVersionSet)
IO (Growing Vector (PrimState IO) CompatibleVersionSet)
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'majorVersionSets)
          String
"GetWorkerBuildIdCompatibilityResponse"
  buildMessage :: GetWorkerBuildIdCompatibilityResponse -> Builder
buildMessage
    = \ GetWorkerBuildIdCompatibilityResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((CompatibleVersionSet -> Builder)
-> Vector CompatibleVersionSet -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ CompatibleVersionSet
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (CompatibleVersionSet -> ByteString)
-> CompatibleVersionSet
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           CompatibleVersionSet -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage CompatibleVersionSet
_v))
                (FoldLike
  (Vector CompatibleVersionSet)
  GetWorkerBuildIdCompatibilityResponse
  GetWorkerBuildIdCompatibilityResponse
  (Vector CompatibleVersionSet)
  (Vector CompatibleVersionSet)
-> GetWorkerBuildIdCompatibilityResponse
-> Vector CompatibleVersionSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'majorVersionSets") GetWorkerBuildIdCompatibilityResponse
_x))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  GetWorkerBuildIdCompatibilityResponse
  GetWorkerBuildIdCompatibilityResponse
  FieldSet
  FieldSet
-> GetWorkerBuildIdCompatibilityResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetWorkerBuildIdCompatibilityResponse
  GetWorkerBuildIdCompatibilityResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetWorkerBuildIdCompatibilityResponse FieldSet
Data.ProtoLens.unknownFields GetWorkerBuildIdCompatibilityResponse
_x))
instance Control.DeepSeq.NFData GetWorkerBuildIdCompatibilityResponse where
  rnf :: GetWorkerBuildIdCompatibilityResponse -> ()
rnf
    = \ GetWorkerBuildIdCompatibilityResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetWorkerBuildIdCompatibilityResponse -> FieldSet
_GetWorkerBuildIdCompatibilityResponse'_unknownFields GetWorkerBuildIdCompatibilityResponse
x__)
             (Vector CompatibleVersionSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetWorkerBuildIdCompatibilityResponse
-> Vector CompatibleVersionSet
_GetWorkerBuildIdCompatibilityResponse'majorVersionSets GetWorkerBuildIdCompatibilityResponse
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' GetWorkerTaskReachabilityRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.buildIds' @:: Lens' GetWorkerTaskReachabilityRequest [Data.Text.Text]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'buildIds' @:: Lens' GetWorkerTaskReachabilityRequest (Data.Vector.Vector Data.Text.Text)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueues' @:: Lens' GetWorkerTaskReachabilityRequest [Data.Text.Text]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'taskQueues' @:: Lens' GetWorkerTaskReachabilityRequest (Data.Vector.Vector Data.Text.Text)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.reachability' @:: Lens' GetWorkerTaskReachabilityRequest Proto.Temporal.Api.Enums.V1.TaskQueue.TaskReachability@ -}
data GetWorkerTaskReachabilityRequest
  = GetWorkerTaskReachabilityRequest'_constructor {GetWorkerTaskReachabilityRequest -> Text
_GetWorkerTaskReachabilityRequest'namespace :: !Data.Text.Text,
                                                   GetWorkerTaskReachabilityRequest -> Vector Text
_GetWorkerTaskReachabilityRequest'buildIds :: !(Data.Vector.Vector Data.Text.Text),
                                                   GetWorkerTaskReachabilityRequest -> Vector Text
_GetWorkerTaskReachabilityRequest'taskQueues :: !(Data.Vector.Vector Data.Text.Text),
                                                   GetWorkerTaskReachabilityRequest -> TaskReachability
_GetWorkerTaskReachabilityRequest'reachability :: !Proto.Temporal.Api.Enums.V1.TaskQueue.TaskReachability,
                                                   GetWorkerTaskReachabilityRequest -> FieldSet
_GetWorkerTaskReachabilityRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Bool
(GetWorkerTaskReachabilityRequest
 -> GetWorkerTaskReachabilityRequest -> Bool)
-> (GetWorkerTaskReachabilityRequest
    -> GetWorkerTaskReachabilityRequest -> Bool)
-> Eq GetWorkerTaskReachabilityRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Bool
== :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Bool
$c/= :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Bool
/= :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Bool
Prelude.Eq, Eq GetWorkerTaskReachabilityRequest
Eq GetWorkerTaskReachabilityRequest =>
(GetWorkerTaskReachabilityRequest
 -> GetWorkerTaskReachabilityRequest -> Ordering)
-> (GetWorkerTaskReachabilityRequest
    -> GetWorkerTaskReachabilityRequest -> Bool)
-> (GetWorkerTaskReachabilityRequest
    -> GetWorkerTaskReachabilityRequest -> Bool)
-> (GetWorkerTaskReachabilityRequest
    -> GetWorkerTaskReachabilityRequest -> Bool)
-> (GetWorkerTaskReachabilityRequest
    -> GetWorkerTaskReachabilityRequest -> Bool)
-> (GetWorkerTaskReachabilityRequest
    -> GetWorkerTaskReachabilityRequest
    -> GetWorkerTaskReachabilityRequest)
-> (GetWorkerTaskReachabilityRequest
    -> GetWorkerTaskReachabilityRequest
    -> GetWorkerTaskReachabilityRequest)
-> Ord GetWorkerTaskReachabilityRequest
GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Bool
GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Ordering
GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest
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 :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Ordering
compare :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Ordering
$c< :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Bool
< :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Bool
$c<= :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Bool
<= :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Bool
$c> :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Bool
> :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Bool
$c>= :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Bool
>= :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest -> Bool
$cmax :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest
max :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest
$cmin :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest
min :: GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest
-> GetWorkerTaskReachabilityRequest
Prelude.Ord)
instance Prelude.Show GetWorkerTaskReachabilityRequest where
  showsPrec :: Int -> GetWorkerTaskReachabilityRequest -> ShowS
showsPrec Int
_ GetWorkerTaskReachabilityRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetWorkerTaskReachabilityRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetWorkerTaskReachabilityRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetWorkerTaskReachabilityRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> GetWorkerTaskReachabilityRequest
-> f GetWorkerTaskReachabilityRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> GetWorkerTaskReachabilityRequest
 -> f GetWorkerTaskReachabilityRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetWorkerTaskReachabilityRequest
-> f GetWorkerTaskReachabilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerTaskReachabilityRequest -> Text)
-> (GetWorkerTaskReachabilityRequest
    -> Text -> GetWorkerTaskReachabilityRequest)
-> Lens
     GetWorkerTaskReachabilityRequest
     GetWorkerTaskReachabilityRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerTaskReachabilityRequest -> Text
_GetWorkerTaskReachabilityRequest'namespace
           (\ GetWorkerTaskReachabilityRequest
x__ Text
y__
              -> GetWorkerTaskReachabilityRequest
x__ {_GetWorkerTaskReachabilityRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkerTaskReachabilityRequest "buildIds" [Data.Text.Text] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "buildIds"
-> ([Text] -> f [Text])
-> GetWorkerTaskReachabilityRequest
-> f GetWorkerTaskReachabilityRequest
fieldOf Proxy# "buildIds"
_
    = ((Vector Text -> f (Vector Text))
 -> GetWorkerTaskReachabilityRequest
 -> f GetWorkerTaskReachabilityRequest)
-> (([Text] -> f [Text]) -> Vector Text -> f (Vector Text))
-> ([Text] -> f [Text])
-> GetWorkerTaskReachabilityRequest
-> f GetWorkerTaskReachabilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerTaskReachabilityRequest -> Vector Text)
-> (GetWorkerTaskReachabilityRequest
    -> Vector Text -> GetWorkerTaskReachabilityRequest)
-> Lens
     GetWorkerTaskReachabilityRequest
     GetWorkerTaskReachabilityRequest
     (Vector Text)
     (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerTaskReachabilityRequest -> Vector Text
_GetWorkerTaskReachabilityRequest'buildIds
           (\ GetWorkerTaskReachabilityRequest
x__ Vector Text
y__
              -> GetWorkerTaskReachabilityRequest
x__ {_GetWorkerTaskReachabilityRequest'buildIds = y__}))
        ((Vector Text -> [Text])
-> (Vector Text -> [Text] -> Vector Text)
-> Lens (Vector Text) (Vector Text) [Text] [Text]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Text -> [Text]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Text
_ [Text]
y__ -> [Text] -> Vector Text
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Text]
y__))
instance Data.ProtoLens.Field.HasField GetWorkerTaskReachabilityRequest "vec'buildIds" (Data.Vector.Vector Data.Text.Text) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'buildIds"
-> (Vector Text -> f (Vector Text))
-> GetWorkerTaskReachabilityRequest
-> f GetWorkerTaskReachabilityRequest
fieldOf Proxy# "vec'buildIds"
_
    = ((Vector Text -> f (Vector Text))
 -> GetWorkerTaskReachabilityRequest
 -> f GetWorkerTaskReachabilityRequest)
-> ((Vector Text -> f (Vector Text))
    -> Vector Text -> f (Vector Text))
-> (Vector Text -> f (Vector Text))
-> GetWorkerTaskReachabilityRequest
-> f GetWorkerTaskReachabilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerTaskReachabilityRequest -> Vector Text)
-> (GetWorkerTaskReachabilityRequest
    -> Vector Text -> GetWorkerTaskReachabilityRequest)
-> Lens
     GetWorkerTaskReachabilityRequest
     GetWorkerTaskReachabilityRequest
     (Vector Text)
     (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerTaskReachabilityRequest -> Vector Text
_GetWorkerTaskReachabilityRequest'buildIds
           (\ GetWorkerTaskReachabilityRequest
x__ Vector Text
y__
              -> GetWorkerTaskReachabilityRequest
x__ {_GetWorkerTaskReachabilityRequest'buildIds = y__}))
        (Vector Text -> f (Vector Text)) -> Vector Text -> f (Vector Text)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkerTaskReachabilityRequest "taskQueues" [Data.Text.Text] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueues"
-> ([Text] -> f [Text])
-> GetWorkerTaskReachabilityRequest
-> f GetWorkerTaskReachabilityRequest
fieldOf Proxy# "taskQueues"
_
    = ((Vector Text -> f (Vector Text))
 -> GetWorkerTaskReachabilityRequest
 -> f GetWorkerTaskReachabilityRequest)
-> (([Text] -> f [Text]) -> Vector Text -> f (Vector Text))
-> ([Text] -> f [Text])
-> GetWorkerTaskReachabilityRequest
-> f GetWorkerTaskReachabilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerTaskReachabilityRequest -> Vector Text)
-> (GetWorkerTaskReachabilityRequest
    -> Vector Text -> GetWorkerTaskReachabilityRequest)
-> Lens
     GetWorkerTaskReachabilityRequest
     GetWorkerTaskReachabilityRequest
     (Vector Text)
     (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerTaskReachabilityRequest -> Vector Text
_GetWorkerTaskReachabilityRequest'taskQueues
           (\ GetWorkerTaskReachabilityRequest
x__ Vector Text
y__
              -> GetWorkerTaskReachabilityRequest
x__ {_GetWorkerTaskReachabilityRequest'taskQueues = y__}))
        ((Vector Text -> [Text])
-> (Vector Text -> [Text] -> Vector Text)
-> Lens (Vector Text) (Vector Text) [Text] [Text]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Text -> [Text]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Text
_ [Text]
y__ -> [Text] -> Vector Text
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Text]
y__))
instance Data.ProtoLens.Field.HasField GetWorkerTaskReachabilityRequest "vec'taskQueues" (Data.Vector.Vector Data.Text.Text) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'taskQueues"
-> (Vector Text -> f (Vector Text))
-> GetWorkerTaskReachabilityRequest
-> f GetWorkerTaskReachabilityRequest
fieldOf Proxy# "vec'taskQueues"
_
    = ((Vector Text -> f (Vector Text))
 -> GetWorkerTaskReachabilityRequest
 -> f GetWorkerTaskReachabilityRequest)
-> ((Vector Text -> f (Vector Text))
    -> Vector Text -> f (Vector Text))
-> (Vector Text -> f (Vector Text))
-> GetWorkerTaskReachabilityRequest
-> f GetWorkerTaskReachabilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerTaskReachabilityRequest -> Vector Text)
-> (GetWorkerTaskReachabilityRequest
    -> Vector Text -> GetWorkerTaskReachabilityRequest)
-> Lens
     GetWorkerTaskReachabilityRequest
     GetWorkerTaskReachabilityRequest
     (Vector Text)
     (Vector Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerTaskReachabilityRequest -> Vector Text
_GetWorkerTaskReachabilityRequest'taskQueues
           (\ GetWorkerTaskReachabilityRequest
x__ Vector Text
y__
              -> GetWorkerTaskReachabilityRequest
x__ {_GetWorkerTaskReachabilityRequest'taskQueues = y__}))
        (Vector Text -> f (Vector Text)) -> Vector Text -> f (Vector Text)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkerTaskReachabilityRequest "reachability" Proto.Temporal.Api.Enums.V1.TaskQueue.TaskReachability where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "reachability"
-> (TaskReachability -> f TaskReachability)
-> GetWorkerTaskReachabilityRequest
-> f GetWorkerTaskReachabilityRequest
fieldOf Proxy# "reachability"
_
    = ((TaskReachability -> f TaskReachability)
 -> GetWorkerTaskReachabilityRequest
 -> f GetWorkerTaskReachabilityRequest)
-> ((TaskReachability -> f TaskReachability)
    -> TaskReachability -> f TaskReachability)
-> (TaskReachability -> f TaskReachability)
-> GetWorkerTaskReachabilityRequest
-> f GetWorkerTaskReachabilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerTaskReachabilityRequest -> TaskReachability)
-> (GetWorkerTaskReachabilityRequest
    -> TaskReachability -> GetWorkerTaskReachabilityRequest)
-> Lens
     GetWorkerTaskReachabilityRequest
     GetWorkerTaskReachabilityRequest
     TaskReachability
     TaskReachability
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerTaskReachabilityRequest -> TaskReachability
_GetWorkerTaskReachabilityRequest'reachability
           (\ GetWorkerTaskReachabilityRequest
x__ TaskReachability
y__
              -> GetWorkerTaskReachabilityRequest
x__ {_GetWorkerTaskReachabilityRequest'reachability = y__}))
        (TaskReachability -> f TaskReachability)
-> TaskReachability -> f TaskReachability
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetWorkerTaskReachabilityRequest where
  messageName :: Proxy GetWorkerTaskReachabilityRequest -> Text
messageName Proxy GetWorkerTaskReachabilityRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetWorkerTaskReachabilityRequest"
  packedMessageDescriptor :: Proxy GetWorkerTaskReachabilityRequest -> ByteString
packedMessageDescriptor Proxy GetWorkerTaskReachabilityRequest
_
    = ByteString
"\n\
      \ GetWorkerTaskReachabilityRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\ESC\n\
      \\tbuild_ids\CAN\STX \ETX(\tR\bbuildIds\DC2\US\n\
      \\vtask_queues\CAN\ETX \ETX(\tR\n\
      \taskQueues\DC2K\n\
      \\freachability\CAN\EOT \SOH(\SO2'.temporal.api.enums.v1.TaskReachabilityR\freachability"
  packedFileDescriptor :: Proxy GetWorkerTaskReachabilityRequest -> ByteString
packedFileDescriptor Proxy GetWorkerTaskReachabilityRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetWorkerTaskReachabilityRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor GetWorkerTaskReachabilityRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetWorkerTaskReachabilityRequest Text
-> FieldDescriptor GetWorkerTaskReachabilityRequest
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
     GetWorkerTaskReachabilityRequest
     GetWorkerTaskReachabilityRequest
     Text
     Text
-> FieldAccessor GetWorkerTaskReachabilityRequest 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 GetWorkerTaskReachabilityRequest
        buildIds__field_descriptor :: FieldDescriptor GetWorkerTaskReachabilityRequest
buildIds__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetWorkerTaskReachabilityRequest Text
-> FieldDescriptor GetWorkerTaskReachabilityRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"build_ids"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (Packing
-> Lens' GetWorkerTaskReachabilityRequest [Text]
-> FieldAccessor GetWorkerTaskReachabilityRequest Text
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 @"buildIds")) ::
              Data.ProtoLens.FieldDescriptor GetWorkerTaskReachabilityRequest
        taskQueues__field_descriptor :: FieldDescriptor GetWorkerTaskReachabilityRequest
taskQueues__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetWorkerTaskReachabilityRequest Text
-> FieldDescriptor GetWorkerTaskReachabilityRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_queues"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (Packing
-> Lens' GetWorkerTaskReachabilityRequest [Text]
-> FieldAccessor GetWorkerTaskReachabilityRequest Text
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 @"taskQueues")) ::
              Data.ProtoLens.FieldDescriptor GetWorkerTaskReachabilityRequest
        reachability__field_descriptor :: FieldDescriptor GetWorkerTaskReachabilityRequest
reachability__field_descriptor
          = String
-> FieldTypeDescriptor TaskReachability
-> FieldAccessor GetWorkerTaskReachabilityRequest TaskReachability
-> FieldDescriptor GetWorkerTaskReachabilityRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"reachability"
              (ScalarField TaskReachability
-> FieldTypeDescriptor TaskReachability
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField TaskReachability
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.TaskQueue.TaskReachability)
              (WireDefault TaskReachability
-> Lens
     GetWorkerTaskReachabilityRequest
     GetWorkerTaskReachabilityRequest
     TaskReachability
     TaskReachability
-> FieldAccessor GetWorkerTaskReachabilityRequest TaskReachability
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault TaskReachability
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reachability")) ::
              Data.ProtoLens.FieldDescriptor GetWorkerTaskReachabilityRequest
      in
        [(Tag, FieldDescriptor GetWorkerTaskReachabilityRequest)]
-> Map Tag (FieldDescriptor GetWorkerTaskReachabilityRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetWorkerTaskReachabilityRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor GetWorkerTaskReachabilityRequest
buildIds__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor GetWorkerTaskReachabilityRequest
taskQueues__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor GetWorkerTaskReachabilityRequest
reachability__field_descriptor)]
  unknownFields :: Lens' GetWorkerTaskReachabilityRequest FieldSet
unknownFields
    = (GetWorkerTaskReachabilityRequest -> FieldSet)
-> (GetWorkerTaskReachabilityRequest
    -> FieldSet -> GetWorkerTaskReachabilityRequest)
-> Lens' GetWorkerTaskReachabilityRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetWorkerTaskReachabilityRequest -> FieldSet
_GetWorkerTaskReachabilityRequest'_unknownFields
        (\ GetWorkerTaskReachabilityRequest
x__ FieldSet
y__
           -> GetWorkerTaskReachabilityRequest
x__ {_GetWorkerTaskReachabilityRequest'_unknownFields = y__})
  defMessage :: GetWorkerTaskReachabilityRequest
defMessage
    = GetWorkerTaskReachabilityRequest'_constructor
        {_GetWorkerTaskReachabilityRequest'namespace :: Text
_GetWorkerTaskReachabilityRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkerTaskReachabilityRequest'buildIds :: Vector Text
_GetWorkerTaskReachabilityRequest'buildIds = Vector Text
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _GetWorkerTaskReachabilityRequest'taskQueues :: Vector Text
_GetWorkerTaskReachabilityRequest'taskQueues = Vector Text
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _GetWorkerTaskReachabilityRequest'reachability :: TaskReachability
_GetWorkerTaskReachabilityRequest'reachability = TaskReachability
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkerTaskReachabilityRequest'_unknownFields :: FieldSet
_GetWorkerTaskReachabilityRequest'_unknownFields = []}
  parseMessage :: Parser GetWorkerTaskReachabilityRequest
parseMessage
    = let
        loop ::
          GetWorkerTaskReachabilityRequest
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Data.Text.Text
                -> Data.ProtoLens.Encoding.Bytes.Parser GetWorkerTaskReachabilityRequest
        loop :: GetWorkerTaskReachabilityRequest
-> Growing Vector RealWorld Text
-> Growing Vector RealWorld Text
-> Parser GetWorkerTaskReachabilityRequest
loop GetWorkerTaskReachabilityRequest
x Growing Vector RealWorld Text
mutable'buildIds Growing Vector RealWorld Text
mutable'taskQueues
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'buildIds <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                              mutable'buildIds)
                      frozen'taskQueues <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                mutable'taskQueues)
                      (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'buildIds") frozen'buildIds
                              (Lens.Family2.set
                                 (Data.ProtoLens.Field.field @"vec'taskQueues") frozen'taskQueues
                                 x)))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                                  mutable'buildIds mutable'taskQueues
                        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
"build_ids"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'buildIds y)
                                loop x v mutable'taskQueues
                        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
"task_queues"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'taskQueues y)
                                loop x mutable'buildIds v
                        Word64
32
                          -> do y <- Parser TaskReachability -> String -> Parser TaskReachability
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> TaskReachability) -> Parser Int -> Parser TaskReachability
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> TaskReachability
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
"reachability"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"reachability") y x)
                                  mutable'buildIds mutable'taskQueues
                        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'buildIds mutable'taskQueues
      in
        Parser GetWorkerTaskReachabilityRequest
-> String -> Parser GetWorkerTaskReachabilityRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'buildIds <- IO (Growing Vector RealWorld Text)
-> Parser (Growing Vector RealWorld Text)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                    IO (Growing Vector RealWorld Text)
IO (Growing Vector (PrimState IO) Text)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              mutable'taskQueues <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      Data.ProtoLens.Encoding.Growing.new
              loop Data.ProtoLens.defMessage mutable'buildIds mutable'taskQueues)
          String
"GetWorkerTaskReachabilityRequest"
  buildMessage :: GetWorkerTaskReachabilityRequest -> Builder
buildMessage
    = \ GetWorkerTaskReachabilityRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  GetWorkerTaskReachabilityRequest
  GetWorkerTaskReachabilityRequest
  Text
  Text
-> GetWorkerTaskReachabilityRequest -> 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") GetWorkerTaskReachabilityRequest
_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.<>)
                ((Text -> Builder) -> Vector Text -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                   (\ Text
_v
                      -> 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))
                   (FoldLike
  (Vector Text)
  GetWorkerTaskReachabilityRequest
  GetWorkerTaskReachabilityRequest
  (Vector Text)
  (Vector Text)
-> GetWorkerTaskReachabilityRequest -> Vector 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 @"vec'buildIds") GetWorkerTaskReachabilityRequest
_x))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   ((Text -> Builder) -> Vector Text -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                      (\ 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))
                      (FoldLike
  (Vector Text)
  GetWorkerTaskReachabilityRequest
  GetWorkerTaskReachabilityRequest
  (Vector Text)
  (Vector Text)
-> GetWorkerTaskReachabilityRequest -> Vector 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 @"vec'taskQueues") GetWorkerTaskReachabilityRequest
_x))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: TaskReachability
_v
                           = FoldLike
  TaskReachability
  GetWorkerTaskReachabilityRequest
  GetWorkerTaskReachabilityRequest
  TaskReachability
  TaskReachability
-> GetWorkerTaskReachabilityRequest -> TaskReachability
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reachability") GetWorkerTaskReachabilityRequest
_x
                       in
                         if TaskReachability -> TaskReachability -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) TaskReachability
_v TaskReachability
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
32)
                               ((Int -> Builder)
-> (TaskReachability -> Int) -> TaskReachability -> 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)
                                  TaskReachability -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum TaskReachability
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  GetWorkerTaskReachabilityRequest
  GetWorkerTaskReachabilityRequest
  FieldSet
  FieldSet
-> GetWorkerTaskReachabilityRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetWorkerTaskReachabilityRequest
  GetWorkerTaskReachabilityRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetWorkerTaskReachabilityRequest FieldSet
Data.ProtoLens.unknownFields GetWorkerTaskReachabilityRequest
_x)))))
instance Control.DeepSeq.NFData GetWorkerTaskReachabilityRequest where
  rnf :: GetWorkerTaskReachabilityRequest -> ()
rnf
    = \ GetWorkerTaskReachabilityRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetWorkerTaskReachabilityRequest -> FieldSet
_GetWorkerTaskReachabilityRequest'_unknownFields GetWorkerTaskReachabilityRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetWorkerTaskReachabilityRequest -> Text
_GetWorkerTaskReachabilityRequest'namespace GetWorkerTaskReachabilityRequest
x__)
                (Vector Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GetWorkerTaskReachabilityRequest -> Vector Text
_GetWorkerTaskReachabilityRequest'buildIds GetWorkerTaskReachabilityRequest
x__)
                   (Vector Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (GetWorkerTaskReachabilityRequest -> Vector Text
_GetWorkerTaskReachabilityRequest'taskQueues GetWorkerTaskReachabilityRequest
x__)
                      (TaskReachability -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (GetWorkerTaskReachabilityRequest -> TaskReachability
_GetWorkerTaskReachabilityRequest'reachability GetWorkerTaskReachabilityRequest
x__) ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.buildIdReachability' @:: Lens' GetWorkerTaskReachabilityResponse [Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdReachability]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'buildIdReachability' @:: Lens' GetWorkerTaskReachabilityResponse (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdReachability)@ -}
data GetWorkerTaskReachabilityResponse
  = GetWorkerTaskReachabilityResponse'_constructor {GetWorkerTaskReachabilityResponse -> Vector BuildIdReachability
_GetWorkerTaskReachabilityResponse'buildIdReachability :: !(Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdReachability),
                                                    GetWorkerTaskReachabilityResponse -> FieldSet
_GetWorkerTaskReachabilityResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Bool
(GetWorkerTaskReachabilityResponse
 -> GetWorkerTaskReachabilityResponse -> Bool)
-> (GetWorkerTaskReachabilityResponse
    -> GetWorkerTaskReachabilityResponse -> Bool)
-> Eq GetWorkerTaskReachabilityResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Bool
== :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Bool
$c/= :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Bool
/= :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Bool
Prelude.Eq, Eq GetWorkerTaskReachabilityResponse
Eq GetWorkerTaskReachabilityResponse =>
(GetWorkerTaskReachabilityResponse
 -> GetWorkerTaskReachabilityResponse -> Ordering)
-> (GetWorkerTaskReachabilityResponse
    -> GetWorkerTaskReachabilityResponse -> Bool)
-> (GetWorkerTaskReachabilityResponse
    -> GetWorkerTaskReachabilityResponse -> Bool)
-> (GetWorkerTaskReachabilityResponse
    -> GetWorkerTaskReachabilityResponse -> Bool)
-> (GetWorkerTaskReachabilityResponse
    -> GetWorkerTaskReachabilityResponse -> Bool)
-> (GetWorkerTaskReachabilityResponse
    -> GetWorkerTaskReachabilityResponse
    -> GetWorkerTaskReachabilityResponse)
-> (GetWorkerTaskReachabilityResponse
    -> GetWorkerTaskReachabilityResponse
    -> GetWorkerTaskReachabilityResponse)
-> Ord GetWorkerTaskReachabilityResponse
GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Bool
GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Ordering
GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse
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 :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Ordering
compare :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Ordering
$c< :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Bool
< :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Bool
$c<= :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Bool
<= :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Bool
$c> :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Bool
> :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Bool
$c>= :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Bool
>= :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse -> Bool
$cmax :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse
max :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse
$cmin :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse
min :: GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse
-> GetWorkerTaskReachabilityResponse
Prelude.Ord)
instance Prelude.Show GetWorkerTaskReachabilityResponse where
  showsPrec :: Int -> GetWorkerTaskReachabilityResponse -> ShowS
showsPrec Int
_ GetWorkerTaskReachabilityResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetWorkerTaskReachabilityResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetWorkerTaskReachabilityResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetWorkerTaskReachabilityResponse "buildIdReachability" [Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdReachability] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "buildIdReachability"
-> ([BuildIdReachability] -> f [BuildIdReachability])
-> GetWorkerTaskReachabilityResponse
-> f GetWorkerTaskReachabilityResponse
fieldOf Proxy# "buildIdReachability"
_
    = ((Vector BuildIdReachability -> f (Vector BuildIdReachability))
 -> GetWorkerTaskReachabilityResponse
 -> f GetWorkerTaskReachabilityResponse)
-> (([BuildIdReachability] -> f [BuildIdReachability])
    -> Vector BuildIdReachability -> f (Vector BuildIdReachability))
-> ([BuildIdReachability] -> f [BuildIdReachability])
-> GetWorkerTaskReachabilityResponse
-> f GetWorkerTaskReachabilityResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerTaskReachabilityResponse -> Vector BuildIdReachability)
-> (GetWorkerTaskReachabilityResponse
    -> Vector BuildIdReachability -> GetWorkerTaskReachabilityResponse)
-> Lens
     GetWorkerTaskReachabilityResponse
     GetWorkerTaskReachabilityResponse
     (Vector BuildIdReachability)
     (Vector BuildIdReachability)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerTaskReachabilityResponse -> Vector BuildIdReachability
_GetWorkerTaskReachabilityResponse'buildIdReachability
           (\ GetWorkerTaskReachabilityResponse
x__ Vector BuildIdReachability
y__
              -> GetWorkerTaskReachabilityResponse
x__
                   {_GetWorkerTaskReachabilityResponse'buildIdReachability = y__}))
        ((Vector BuildIdReachability -> [BuildIdReachability])
-> (Vector BuildIdReachability
    -> [BuildIdReachability] -> Vector BuildIdReachability)
-> Lens
     (Vector BuildIdReachability)
     (Vector BuildIdReachability)
     [BuildIdReachability]
     [BuildIdReachability]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector BuildIdReachability -> [BuildIdReachability]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector BuildIdReachability
_ [BuildIdReachability]
y__ -> [BuildIdReachability] -> Vector BuildIdReachability
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [BuildIdReachability]
y__))
instance Data.ProtoLens.Field.HasField GetWorkerTaskReachabilityResponse "vec'buildIdReachability" (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdReachability) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'buildIdReachability"
-> (Vector BuildIdReachability -> f (Vector BuildIdReachability))
-> GetWorkerTaskReachabilityResponse
-> f GetWorkerTaskReachabilityResponse
fieldOf Proxy# "vec'buildIdReachability"
_
    = ((Vector BuildIdReachability -> f (Vector BuildIdReachability))
 -> GetWorkerTaskReachabilityResponse
 -> f GetWorkerTaskReachabilityResponse)
-> ((Vector BuildIdReachability -> f (Vector BuildIdReachability))
    -> Vector BuildIdReachability -> f (Vector BuildIdReachability))
-> (Vector BuildIdReachability -> f (Vector BuildIdReachability))
-> GetWorkerTaskReachabilityResponse
-> f GetWorkerTaskReachabilityResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerTaskReachabilityResponse -> Vector BuildIdReachability)
-> (GetWorkerTaskReachabilityResponse
    -> Vector BuildIdReachability -> GetWorkerTaskReachabilityResponse)
-> Lens
     GetWorkerTaskReachabilityResponse
     GetWorkerTaskReachabilityResponse
     (Vector BuildIdReachability)
     (Vector BuildIdReachability)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerTaskReachabilityResponse -> Vector BuildIdReachability
_GetWorkerTaskReachabilityResponse'buildIdReachability
           (\ GetWorkerTaskReachabilityResponse
x__ Vector BuildIdReachability
y__
              -> GetWorkerTaskReachabilityResponse
x__
                   {_GetWorkerTaskReachabilityResponse'buildIdReachability = y__}))
        (Vector BuildIdReachability -> f (Vector BuildIdReachability))
-> Vector BuildIdReachability -> f (Vector BuildIdReachability)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetWorkerTaskReachabilityResponse where
  messageName :: Proxy GetWorkerTaskReachabilityResponse -> Text
messageName Proxy GetWorkerTaskReachabilityResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetWorkerTaskReachabilityResponse"
  packedMessageDescriptor :: Proxy GetWorkerTaskReachabilityResponse -> ByteString
packedMessageDescriptor Proxy GetWorkerTaskReachabilityResponse
_
    = ByteString
"\n\
      \!GetWorkerTaskReachabilityResponse\DC2b\n\
      \\NAKbuild_id_reachability\CAN\SOH \ETX(\v2..temporal.api.taskqueue.v1.BuildIdReachabilityR\DC3buildIdReachability"
  packedFileDescriptor :: Proxy GetWorkerTaskReachabilityResponse -> ByteString
packedFileDescriptor Proxy GetWorkerTaskReachabilityResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetWorkerTaskReachabilityResponse)
fieldsByTag
    = let
        buildIdReachability__field_descriptor :: FieldDescriptor GetWorkerTaskReachabilityResponse
buildIdReachability__field_descriptor
          = String
-> FieldTypeDescriptor BuildIdReachability
-> FieldAccessor
     GetWorkerTaskReachabilityResponse BuildIdReachability
-> FieldDescriptor GetWorkerTaskReachabilityResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"build_id_reachability"
              (MessageOrGroup -> FieldTypeDescriptor BuildIdReachability
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdReachability)
              (Packing
-> Lens' GetWorkerTaskReachabilityResponse [BuildIdReachability]
-> FieldAccessor
     GetWorkerTaskReachabilityResponse BuildIdReachability
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 @"buildIdReachability")) ::
              Data.ProtoLens.FieldDescriptor GetWorkerTaskReachabilityResponse
      in
        [(Tag, FieldDescriptor GetWorkerTaskReachabilityResponse)]
-> Map Tag (FieldDescriptor GetWorkerTaskReachabilityResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetWorkerTaskReachabilityResponse
buildIdReachability__field_descriptor)]
  unknownFields :: Lens' GetWorkerTaskReachabilityResponse FieldSet
unknownFields
    = (GetWorkerTaskReachabilityResponse -> FieldSet)
-> (GetWorkerTaskReachabilityResponse
    -> FieldSet -> GetWorkerTaskReachabilityResponse)
-> Lens' GetWorkerTaskReachabilityResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetWorkerTaskReachabilityResponse -> FieldSet
_GetWorkerTaskReachabilityResponse'_unknownFields
        (\ GetWorkerTaskReachabilityResponse
x__ FieldSet
y__
           -> GetWorkerTaskReachabilityResponse
x__ {_GetWorkerTaskReachabilityResponse'_unknownFields = y__})
  defMessage :: GetWorkerTaskReachabilityResponse
defMessage
    = GetWorkerTaskReachabilityResponse'_constructor
        {_GetWorkerTaskReachabilityResponse'buildIdReachability :: Vector BuildIdReachability
_GetWorkerTaskReachabilityResponse'buildIdReachability = Vector BuildIdReachability
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _GetWorkerTaskReachabilityResponse'_unknownFields :: FieldSet
_GetWorkerTaskReachabilityResponse'_unknownFields = []}
  parseMessage :: Parser GetWorkerTaskReachabilityResponse
parseMessage
    = let
        loop ::
          GetWorkerTaskReachabilityResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdReachability
             -> Data.ProtoLens.Encoding.Bytes.Parser GetWorkerTaskReachabilityResponse
        loop :: GetWorkerTaskReachabilityResponse
-> Growing Vector RealWorld BuildIdReachability
-> Parser GetWorkerTaskReachabilityResponse
loop GetWorkerTaskReachabilityResponse
x Growing Vector RealWorld BuildIdReachability
mutable'buildIdReachability
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'buildIdReachability <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                      (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                         mutable'buildIdReachability)
                      (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'buildIdReachability")
                              frozen'buildIdReachability x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser BuildIdReachability -> String -> Parser BuildIdReachability
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"build_id_reachability"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'buildIdReachability y)
                                loop x v
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
                                  mutable'buildIdReachability
      in
        Parser GetWorkerTaskReachabilityResponse
-> String -> Parser GetWorkerTaskReachabilityResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'buildIdReachability <- IO (Growing Vector RealWorld BuildIdReachability)
-> Parser (Growing Vector RealWorld BuildIdReachability)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                               IO (Growing Vector RealWorld BuildIdReachability)
IO (Growing Vector (PrimState IO) BuildIdReachability)
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'buildIdReachability)
          String
"GetWorkerTaskReachabilityResponse"
  buildMessage :: GetWorkerTaskReachabilityResponse -> Builder
buildMessage
    = \ GetWorkerTaskReachabilityResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((BuildIdReachability -> Builder)
-> Vector BuildIdReachability -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ BuildIdReachability
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (BuildIdReachability -> ByteString)
-> BuildIdReachability
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           BuildIdReachability -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage BuildIdReachability
_v))
                (FoldLike
  (Vector BuildIdReachability)
  GetWorkerTaskReachabilityResponse
  GetWorkerTaskReachabilityResponse
  (Vector BuildIdReachability)
  (Vector BuildIdReachability)
-> GetWorkerTaskReachabilityResponse -> Vector BuildIdReachability
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'buildIdReachability") GetWorkerTaskReachabilityResponse
_x))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  GetWorkerTaskReachabilityResponse
  GetWorkerTaskReachabilityResponse
  FieldSet
  FieldSet
-> GetWorkerTaskReachabilityResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetWorkerTaskReachabilityResponse
  GetWorkerTaskReachabilityResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetWorkerTaskReachabilityResponse FieldSet
Data.ProtoLens.unknownFields GetWorkerTaskReachabilityResponse
_x))
instance Control.DeepSeq.NFData GetWorkerTaskReachabilityResponse where
  rnf :: GetWorkerTaskReachabilityResponse -> ()
rnf
    = \ GetWorkerTaskReachabilityResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetWorkerTaskReachabilityResponse -> FieldSet
_GetWorkerTaskReachabilityResponse'_unknownFields GetWorkerTaskReachabilityResponse
x__)
             (Vector BuildIdReachability -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetWorkerTaskReachabilityResponse -> Vector BuildIdReachability
_GetWorkerTaskReachabilityResponse'buildIdReachability GetWorkerTaskReachabilityResponse
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' GetWorkerVersioningRulesRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueue' @:: Lens' GetWorkerVersioningRulesRequest Data.Text.Text@ -}
data GetWorkerVersioningRulesRequest
  = GetWorkerVersioningRulesRequest'_constructor {GetWorkerVersioningRulesRequest -> Text
_GetWorkerVersioningRulesRequest'namespace :: !Data.Text.Text,
                                                  GetWorkerVersioningRulesRequest -> Text
_GetWorkerVersioningRulesRequest'taskQueue :: !Data.Text.Text,
                                                  GetWorkerVersioningRulesRequest -> FieldSet
_GetWorkerVersioningRulesRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Bool
(GetWorkerVersioningRulesRequest
 -> GetWorkerVersioningRulesRequest -> Bool)
-> (GetWorkerVersioningRulesRequest
    -> GetWorkerVersioningRulesRequest -> Bool)
-> Eq GetWorkerVersioningRulesRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Bool
== :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Bool
$c/= :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Bool
/= :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Bool
Prelude.Eq, Eq GetWorkerVersioningRulesRequest
Eq GetWorkerVersioningRulesRequest =>
(GetWorkerVersioningRulesRequest
 -> GetWorkerVersioningRulesRequest -> Ordering)
-> (GetWorkerVersioningRulesRequest
    -> GetWorkerVersioningRulesRequest -> Bool)
-> (GetWorkerVersioningRulesRequest
    -> GetWorkerVersioningRulesRequest -> Bool)
-> (GetWorkerVersioningRulesRequest
    -> GetWorkerVersioningRulesRequest -> Bool)
-> (GetWorkerVersioningRulesRequest
    -> GetWorkerVersioningRulesRequest -> Bool)
-> (GetWorkerVersioningRulesRequest
    -> GetWorkerVersioningRulesRequest
    -> GetWorkerVersioningRulesRequest)
-> (GetWorkerVersioningRulesRequest
    -> GetWorkerVersioningRulesRequest
    -> GetWorkerVersioningRulesRequest)
-> Ord GetWorkerVersioningRulesRequest
GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Bool
GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Ordering
GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest
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 :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Ordering
compare :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Ordering
$c< :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Bool
< :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Bool
$c<= :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Bool
<= :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Bool
$c> :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Bool
> :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Bool
$c>= :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Bool
>= :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest -> Bool
$cmax :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest
max :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest
$cmin :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest
min :: GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest
-> GetWorkerVersioningRulesRequest
Prelude.Ord)
instance Prelude.Show GetWorkerVersioningRulesRequest where
  showsPrec :: Int -> GetWorkerVersioningRulesRequest -> ShowS
showsPrec Int
_ GetWorkerVersioningRulesRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetWorkerVersioningRulesRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetWorkerVersioningRulesRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetWorkerVersioningRulesRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> GetWorkerVersioningRulesRequest
-> f GetWorkerVersioningRulesRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> GetWorkerVersioningRulesRequest
 -> f GetWorkerVersioningRulesRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetWorkerVersioningRulesRequest
-> f GetWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerVersioningRulesRequest -> Text)
-> (GetWorkerVersioningRulesRequest
    -> Text -> GetWorkerVersioningRulesRequest)
-> Lens
     GetWorkerVersioningRulesRequest
     GetWorkerVersioningRulesRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerVersioningRulesRequest -> Text
_GetWorkerVersioningRulesRequest'namespace
           (\ GetWorkerVersioningRulesRequest
x__ Text
y__
              -> GetWorkerVersioningRulesRequest
x__ {_GetWorkerVersioningRulesRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkerVersioningRulesRequest "taskQueue" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (Text -> f Text)
-> GetWorkerVersioningRulesRequest
-> f GetWorkerVersioningRulesRequest
fieldOf Proxy# "taskQueue"
_
    = ((Text -> f Text)
 -> GetWorkerVersioningRulesRequest
 -> f GetWorkerVersioningRulesRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetWorkerVersioningRulesRequest
-> f GetWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerVersioningRulesRequest -> Text)
-> (GetWorkerVersioningRulesRequest
    -> Text -> GetWorkerVersioningRulesRequest)
-> Lens
     GetWorkerVersioningRulesRequest
     GetWorkerVersioningRulesRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerVersioningRulesRequest -> Text
_GetWorkerVersioningRulesRequest'taskQueue
           (\ GetWorkerVersioningRulesRequest
x__ Text
y__
              -> GetWorkerVersioningRulesRequest
x__ {_GetWorkerVersioningRulesRequest'taskQueue = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetWorkerVersioningRulesRequest where
  messageName :: Proxy GetWorkerVersioningRulesRequest -> Text
messageName Proxy GetWorkerVersioningRulesRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetWorkerVersioningRulesRequest"
  packedMessageDescriptor :: Proxy GetWorkerVersioningRulesRequest -> ByteString
packedMessageDescriptor Proxy GetWorkerVersioningRulesRequest
_
    = ByteString
"\n\
      \\USGetWorkerVersioningRulesRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\GS\n\
      \\n\
      \task_queue\CAN\STX \SOH(\tR\ttaskQueue"
  packedFileDescriptor :: Proxy GetWorkerVersioningRulesRequest -> ByteString
packedFileDescriptor Proxy GetWorkerVersioningRulesRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetWorkerVersioningRulesRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor GetWorkerVersioningRulesRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetWorkerVersioningRulesRequest Text
-> FieldDescriptor GetWorkerVersioningRulesRequest
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
     GetWorkerVersioningRulesRequest
     GetWorkerVersioningRulesRequest
     Text
     Text
-> FieldAccessor GetWorkerVersioningRulesRequest 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 GetWorkerVersioningRulesRequest
        taskQueue__field_descriptor :: FieldDescriptor GetWorkerVersioningRulesRequest
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetWorkerVersioningRulesRequest Text
-> FieldDescriptor GetWorkerVersioningRulesRequest
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
     GetWorkerVersioningRulesRequest
     GetWorkerVersioningRulesRequest
     Text
     Text
-> FieldAccessor GetWorkerVersioningRulesRequest 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 GetWorkerVersioningRulesRequest
      in
        [(Tag, FieldDescriptor GetWorkerVersioningRulesRequest)]
-> Map Tag (FieldDescriptor GetWorkerVersioningRulesRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetWorkerVersioningRulesRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor GetWorkerVersioningRulesRequest
taskQueue__field_descriptor)]
  unknownFields :: Lens' GetWorkerVersioningRulesRequest FieldSet
unknownFields
    = (GetWorkerVersioningRulesRequest -> FieldSet)
-> (GetWorkerVersioningRulesRequest
    -> FieldSet -> GetWorkerVersioningRulesRequest)
-> Lens' GetWorkerVersioningRulesRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetWorkerVersioningRulesRequest -> FieldSet
_GetWorkerVersioningRulesRequest'_unknownFields
        (\ GetWorkerVersioningRulesRequest
x__ FieldSet
y__
           -> GetWorkerVersioningRulesRequest
x__ {_GetWorkerVersioningRulesRequest'_unknownFields = y__})
  defMessage :: GetWorkerVersioningRulesRequest
defMessage
    = GetWorkerVersioningRulesRequest'_constructor
        {_GetWorkerVersioningRulesRequest'namespace :: Text
_GetWorkerVersioningRulesRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkerVersioningRulesRequest'taskQueue :: Text
_GetWorkerVersioningRulesRequest'taskQueue = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkerVersioningRulesRequest'_unknownFields :: FieldSet
_GetWorkerVersioningRulesRequest'_unknownFields = []}
  parseMessage :: Parser GetWorkerVersioningRulesRequest
parseMessage
    = let
        loop ::
          GetWorkerVersioningRulesRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser GetWorkerVersioningRulesRequest
        loop :: GetWorkerVersioningRulesRequest
-> Parser GetWorkerVersioningRulesRequest
loop GetWorkerVersioningRulesRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
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)
                        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 GetWorkerVersioningRulesRequest
-> String -> Parser GetWorkerVersioningRulesRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GetWorkerVersioningRulesRequest
-> Parser GetWorkerVersioningRulesRequest
loop GetWorkerVersioningRulesRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"GetWorkerVersioningRulesRequest"
  buildMessage :: GetWorkerVersioningRulesRequest -> Builder
buildMessage
    = \ GetWorkerVersioningRulesRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  GetWorkerVersioningRulesRequest
  GetWorkerVersioningRulesRequest
  Text
  Text
-> GetWorkerVersioningRulesRequest -> 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") GetWorkerVersioningRulesRequest
_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
  GetWorkerVersioningRulesRequest
  GetWorkerVersioningRulesRequest
  Text
  Text
-> GetWorkerVersioningRulesRequest -> 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") GetWorkerVersioningRulesRequest
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  GetWorkerVersioningRulesRequest
  GetWorkerVersioningRulesRequest
  FieldSet
  FieldSet
-> GetWorkerVersioningRulesRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetWorkerVersioningRulesRequest
  GetWorkerVersioningRulesRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetWorkerVersioningRulesRequest FieldSet
Data.ProtoLens.unknownFields GetWorkerVersioningRulesRequest
_x)))
instance Control.DeepSeq.NFData GetWorkerVersioningRulesRequest where
  rnf :: GetWorkerVersioningRulesRequest -> ()
rnf
    = \ GetWorkerVersioningRulesRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetWorkerVersioningRulesRequest -> FieldSet
_GetWorkerVersioningRulesRequest'_unknownFields GetWorkerVersioningRulesRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetWorkerVersioningRulesRequest -> Text
_GetWorkerVersioningRulesRequest'namespace GetWorkerVersioningRulesRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GetWorkerVersioningRulesRequest -> Text
_GetWorkerVersioningRulesRequest'taskQueue GetWorkerVersioningRulesRequest
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.assignmentRules' @:: Lens' GetWorkerVersioningRulesResponse [Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedBuildIdAssignmentRule]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'assignmentRules' @:: Lens' GetWorkerVersioningRulesResponse (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedBuildIdAssignmentRule)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.compatibleRedirectRules' @:: Lens' GetWorkerVersioningRulesResponse [Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedCompatibleBuildIdRedirectRule]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'compatibleRedirectRules' @:: Lens' GetWorkerVersioningRulesResponse (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedCompatibleBuildIdRedirectRule)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.conflictToken' @:: Lens' GetWorkerVersioningRulesResponse Data.ByteString.ByteString@ -}
data GetWorkerVersioningRulesResponse
  = GetWorkerVersioningRulesResponse'_constructor {GetWorkerVersioningRulesResponse
-> Vector TimestampedBuildIdAssignmentRule
_GetWorkerVersioningRulesResponse'assignmentRules :: !(Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedBuildIdAssignmentRule),
                                                   GetWorkerVersioningRulesResponse
-> Vector TimestampedCompatibleBuildIdRedirectRule
_GetWorkerVersioningRulesResponse'compatibleRedirectRules :: !(Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedCompatibleBuildIdRedirectRule),
                                                   GetWorkerVersioningRulesResponse -> ByteString
_GetWorkerVersioningRulesResponse'conflictToken :: !Data.ByteString.ByteString,
                                                   GetWorkerVersioningRulesResponse -> FieldSet
_GetWorkerVersioningRulesResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Bool
(GetWorkerVersioningRulesResponse
 -> GetWorkerVersioningRulesResponse -> Bool)
-> (GetWorkerVersioningRulesResponse
    -> GetWorkerVersioningRulesResponse -> Bool)
-> Eq GetWorkerVersioningRulesResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Bool
== :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Bool
$c/= :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Bool
/= :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Bool
Prelude.Eq, Eq GetWorkerVersioningRulesResponse
Eq GetWorkerVersioningRulesResponse =>
(GetWorkerVersioningRulesResponse
 -> GetWorkerVersioningRulesResponse -> Ordering)
-> (GetWorkerVersioningRulesResponse
    -> GetWorkerVersioningRulesResponse -> Bool)
-> (GetWorkerVersioningRulesResponse
    -> GetWorkerVersioningRulesResponse -> Bool)
-> (GetWorkerVersioningRulesResponse
    -> GetWorkerVersioningRulesResponse -> Bool)
-> (GetWorkerVersioningRulesResponse
    -> GetWorkerVersioningRulesResponse -> Bool)
-> (GetWorkerVersioningRulesResponse
    -> GetWorkerVersioningRulesResponse
    -> GetWorkerVersioningRulesResponse)
-> (GetWorkerVersioningRulesResponse
    -> GetWorkerVersioningRulesResponse
    -> GetWorkerVersioningRulesResponse)
-> Ord GetWorkerVersioningRulesResponse
GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Bool
GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Ordering
GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse
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 :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Ordering
compare :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Ordering
$c< :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Bool
< :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Bool
$c<= :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Bool
<= :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Bool
$c> :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Bool
> :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Bool
$c>= :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Bool
>= :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse -> Bool
$cmax :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse
max :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse
$cmin :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse
min :: GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse
-> GetWorkerVersioningRulesResponse
Prelude.Ord)
instance Prelude.Show GetWorkerVersioningRulesResponse where
  showsPrec :: Int -> GetWorkerVersioningRulesResponse -> ShowS
showsPrec Int
_ GetWorkerVersioningRulesResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetWorkerVersioningRulesResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetWorkerVersioningRulesResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetWorkerVersioningRulesResponse "assignmentRules" [Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedBuildIdAssignmentRule] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "assignmentRules"
-> ([TimestampedBuildIdAssignmentRule]
    -> f [TimestampedBuildIdAssignmentRule])
-> GetWorkerVersioningRulesResponse
-> f GetWorkerVersioningRulesResponse
fieldOf Proxy# "assignmentRules"
_
    = ((Vector TimestampedBuildIdAssignmentRule
  -> f (Vector TimestampedBuildIdAssignmentRule))
 -> GetWorkerVersioningRulesResponse
 -> f GetWorkerVersioningRulesResponse)
-> (([TimestampedBuildIdAssignmentRule]
     -> f [TimestampedBuildIdAssignmentRule])
    -> Vector TimestampedBuildIdAssignmentRule
    -> f (Vector TimestampedBuildIdAssignmentRule))
-> ([TimestampedBuildIdAssignmentRule]
    -> f [TimestampedBuildIdAssignmentRule])
-> GetWorkerVersioningRulesResponse
-> f GetWorkerVersioningRulesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerVersioningRulesResponse
 -> Vector TimestampedBuildIdAssignmentRule)
-> (GetWorkerVersioningRulesResponse
    -> Vector TimestampedBuildIdAssignmentRule
    -> GetWorkerVersioningRulesResponse)
-> Lens
     GetWorkerVersioningRulesResponse
     GetWorkerVersioningRulesResponse
     (Vector TimestampedBuildIdAssignmentRule)
     (Vector TimestampedBuildIdAssignmentRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerVersioningRulesResponse
-> Vector TimestampedBuildIdAssignmentRule
_GetWorkerVersioningRulesResponse'assignmentRules
           (\ GetWorkerVersioningRulesResponse
x__ Vector TimestampedBuildIdAssignmentRule
y__
              -> GetWorkerVersioningRulesResponse
x__ {_GetWorkerVersioningRulesResponse'assignmentRules = y__}))
        ((Vector TimestampedBuildIdAssignmentRule
 -> [TimestampedBuildIdAssignmentRule])
-> (Vector TimestampedBuildIdAssignmentRule
    -> [TimestampedBuildIdAssignmentRule]
    -> Vector TimestampedBuildIdAssignmentRule)
-> Lens
     (Vector TimestampedBuildIdAssignmentRule)
     (Vector TimestampedBuildIdAssignmentRule)
     [TimestampedBuildIdAssignmentRule]
     [TimestampedBuildIdAssignmentRule]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector TimestampedBuildIdAssignmentRule
-> [TimestampedBuildIdAssignmentRule]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector TimestampedBuildIdAssignmentRule
_ [TimestampedBuildIdAssignmentRule]
y__ -> [TimestampedBuildIdAssignmentRule]
-> Vector TimestampedBuildIdAssignmentRule
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [TimestampedBuildIdAssignmentRule]
y__))
instance Data.ProtoLens.Field.HasField GetWorkerVersioningRulesResponse "vec'assignmentRules" (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedBuildIdAssignmentRule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'assignmentRules"
-> (Vector TimestampedBuildIdAssignmentRule
    -> f (Vector TimestampedBuildIdAssignmentRule))
-> GetWorkerVersioningRulesResponse
-> f GetWorkerVersioningRulesResponse
fieldOf Proxy# "vec'assignmentRules"
_
    = ((Vector TimestampedBuildIdAssignmentRule
  -> f (Vector TimestampedBuildIdAssignmentRule))
 -> GetWorkerVersioningRulesResponse
 -> f GetWorkerVersioningRulesResponse)
-> ((Vector TimestampedBuildIdAssignmentRule
     -> f (Vector TimestampedBuildIdAssignmentRule))
    -> Vector TimestampedBuildIdAssignmentRule
    -> f (Vector TimestampedBuildIdAssignmentRule))
-> (Vector TimestampedBuildIdAssignmentRule
    -> f (Vector TimestampedBuildIdAssignmentRule))
-> GetWorkerVersioningRulesResponse
-> f GetWorkerVersioningRulesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerVersioningRulesResponse
 -> Vector TimestampedBuildIdAssignmentRule)
-> (GetWorkerVersioningRulesResponse
    -> Vector TimestampedBuildIdAssignmentRule
    -> GetWorkerVersioningRulesResponse)
-> Lens
     GetWorkerVersioningRulesResponse
     GetWorkerVersioningRulesResponse
     (Vector TimestampedBuildIdAssignmentRule)
     (Vector TimestampedBuildIdAssignmentRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerVersioningRulesResponse
-> Vector TimestampedBuildIdAssignmentRule
_GetWorkerVersioningRulesResponse'assignmentRules
           (\ GetWorkerVersioningRulesResponse
x__ Vector TimestampedBuildIdAssignmentRule
y__
              -> GetWorkerVersioningRulesResponse
x__ {_GetWorkerVersioningRulesResponse'assignmentRules = y__}))
        (Vector TimestampedBuildIdAssignmentRule
 -> f (Vector TimestampedBuildIdAssignmentRule))
-> Vector TimestampedBuildIdAssignmentRule
-> f (Vector TimestampedBuildIdAssignmentRule)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkerVersioningRulesResponse "compatibleRedirectRules" [Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedCompatibleBuildIdRedirectRule] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "compatibleRedirectRules"
-> ([TimestampedCompatibleBuildIdRedirectRule]
    -> f [TimestampedCompatibleBuildIdRedirectRule])
-> GetWorkerVersioningRulesResponse
-> f GetWorkerVersioningRulesResponse
fieldOf Proxy# "compatibleRedirectRules"
_
    = ((Vector TimestampedCompatibleBuildIdRedirectRule
  -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
 -> GetWorkerVersioningRulesResponse
 -> f GetWorkerVersioningRulesResponse)
-> (([TimestampedCompatibleBuildIdRedirectRule]
     -> f [TimestampedCompatibleBuildIdRedirectRule])
    -> Vector TimestampedCompatibleBuildIdRedirectRule
    -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
-> ([TimestampedCompatibleBuildIdRedirectRule]
    -> f [TimestampedCompatibleBuildIdRedirectRule])
-> GetWorkerVersioningRulesResponse
-> f GetWorkerVersioningRulesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerVersioningRulesResponse
 -> Vector TimestampedCompatibleBuildIdRedirectRule)
-> (GetWorkerVersioningRulesResponse
    -> Vector TimestampedCompatibleBuildIdRedirectRule
    -> GetWorkerVersioningRulesResponse)
-> Lens
     GetWorkerVersioningRulesResponse
     GetWorkerVersioningRulesResponse
     (Vector TimestampedCompatibleBuildIdRedirectRule)
     (Vector TimestampedCompatibleBuildIdRedirectRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerVersioningRulesResponse
-> Vector TimestampedCompatibleBuildIdRedirectRule
_GetWorkerVersioningRulesResponse'compatibleRedirectRules
           (\ GetWorkerVersioningRulesResponse
x__ Vector TimestampedCompatibleBuildIdRedirectRule
y__
              -> GetWorkerVersioningRulesResponse
x__
                   {_GetWorkerVersioningRulesResponse'compatibleRedirectRules = y__}))
        ((Vector TimestampedCompatibleBuildIdRedirectRule
 -> [TimestampedCompatibleBuildIdRedirectRule])
-> (Vector TimestampedCompatibleBuildIdRedirectRule
    -> [TimestampedCompatibleBuildIdRedirectRule]
    -> Vector TimestampedCompatibleBuildIdRedirectRule)
-> Lens
     (Vector TimestampedCompatibleBuildIdRedirectRule)
     (Vector TimestampedCompatibleBuildIdRedirectRule)
     [TimestampedCompatibleBuildIdRedirectRule]
     [TimestampedCompatibleBuildIdRedirectRule]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector TimestampedCompatibleBuildIdRedirectRule
-> [TimestampedCompatibleBuildIdRedirectRule]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector TimestampedCompatibleBuildIdRedirectRule
_ [TimestampedCompatibleBuildIdRedirectRule]
y__ -> [TimestampedCompatibleBuildIdRedirectRule]
-> Vector TimestampedCompatibleBuildIdRedirectRule
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [TimestampedCompatibleBuildIdRedirectRule]
y__))
instance Data.ProtoLens.Field.HasField GetWorkerVersioningRulesResponse "vec'compatibleRedirectRules" (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedCompatibleBuildIdRedirectRule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'compatibleRedirectRules"
-> (Vector TimestampedCompatibleBuildIdRedirectRule
    -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
-> GetWorkerVersioningRulesResponse
-> f GetWorkerVersioningRulesResponse
fieldOf Proxy# "vec'compatibleRedirectRules"
_
    = ((Vector TimestampedCompatibleBuildIdRedirectRule
  -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
 -> GetWorkerVersioningRulesResponse
 -> f GetWorkerVersioningRulesResponse)
-> ((Vector TimestampedCompatibleBuildIdRedirectRule
     -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
    -> Vector TimestampedCompatibleBuildIdRedirectRule
    -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
-> (Vector TimestampedCompatibleBuildIdRedirectRule
    -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
-> GetWorkerVersioningRulesResponse
-> f GetWorkerVersioningRulesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerVersioningRulesResponse
 -> Vector TimestampedCompatibleBuildIdRedirectRule)
-> (GetWorkerVersioningRulesResponse
    -> Vector TimestampedCompatibleBuildIdRedirectRule
    -> GetWorkerVersioningRulesResponse)
-> Lens
     GetWorkerVersioningRulesResponse
     GetWorkerVersioningRulesResponse
     (Vector TimestampedCompatibleBuildIdRedirectRule)
     (Vector TimestampedCompatibleBuildIdRedirectRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerVersioningRulesResponse
-> Vector TimestampedCompatibleBuildIdRedirectRule
_GetWorkerVersioningRulesResponse'compatibleRedirectRules
           (\ GetWorkerVersioningRulesResponse
x__ Vector TimestampedCompatibleBuildIdRedirectRule
y__
              -> GetWorkerVersioningRulesResponse
x__
                   {_GetWorkerVersioningRulesResponse'compatibleRedirectRules = y__}))
        (Vector TimestampedCompatibleBuildIdRedirectRule
 -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
-> Vector TimestampedCompatibleBuildIdRedirectRule
-> f (Vector TimestampedCompatibleBuildIdRedirectRule)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkerVersioningRulesResponse "conflictToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "conflictToken"
-> (ByteString -> f ByteString)
-> GetWorkerVersioningRulesResponse
-> f GetWorkerVersioningRulesResponse
fieldOf Proxy# "conflictToken"
_
    = ((ByteString -> f ByteString)
 -> GetWorkerVersioningRulesResponse
 -> f GetWorkerVersioningRulesResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> GetWorkerVersioningRulesResponse
-> f GetWorkerVersioningRulesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkerVersioningRulesResponse -> ByteString)
-> (GetWorkerVersioningRulesResponse
    -> ByteString -> GetWorkerVersioningRulesResponse)
-> Lens
     GetWorkerVersioningRulesResponse
     GetWorkerVersioningRulesResponse
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkerVersioningRulesResponse -> ByteString
_GetWorkerVersioningRulesResponse'conflictToken
           (\ GetWorkerVersioningRulesResponse
x__ ByteString
y__
              -> GetWorkerVersioningRulesResponse
x__ {_GetWorkerVersioningRulesResponse'conflictToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetWorkerVersioningRulesResponse where
  messageName :: Proxy GetWorkerVersioningRulesResponse -> Text
messageName Proxy GetWorkerVersioningRulesResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetWorkerVersioningRulesResponse"
  packedMessageDescriptor :: Proxy GetWorkerVersioningRulesResponse -> ByteString
packedMessageDescriptor Proxy GetWorkerVersioningRulesResponse
_
    = ByteString
"\n\
      \ GetWorkerVersioningRulesResponse\DC2f\n\
      \\DLEassignment_rules\CAN\SOH \ETX(\v2;.temporal.api.taskqueue.v1.TimestampedBuildIdAssignmentRuleR\SIassignmentRules\DC2\DEL\n\
      \\EMcompatible_redirect_rules\CAN\STX \ETX(\v2C.temporal.api.taskqueue.v1.TimestampedCompatibleBuildIdRedirectRuleR\ETBcompatibleRedirectRules\DC2%\n\
      \\SOconflict_token\CAN\ETX \SOH(\fR\rconflictToken"
  packedFileDescriptor :: Proxy GetWorkerVersioningRulesResponse -> ByteString
packedFileDescriptor Proxy GetWorkerVersioningRulesResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetWorkerVersioningRulesResponse)
fieldsByTag
    = let
        assignmentRules__field_descriptor :: FieldDescriptor GetWorkerVersioningRulesResponse
assignmentRules__field_descriptor
          = String
-> FieldTypeDescriptor TimestampedBuildIdAssignmentRule
-> FieldAccessor
     GetWorkerVersioningRulesResponse TimestampedBuildIdAssignmentRule
-> FieldDescriptor GetWorkerVersioningRulesResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"assignment_rules"
              (MessageOrGroup
-> FieldTypeDescriptor TimestampedBuildIdAssignmentRule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedBuildIdAssignmentRule)
              (Packing
-> Lens'
     GetWorkerVersioningRulesResponse [TimestampedBuildIdAssignmentRule]
-> FieldAccessor
     GetWorkerVersioningRulesResponse TimestampedBuildIdAssignmentRule
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 @"assignmentRules")) ::
              Data.ProtoLens.FieldDescriptor GetWorkerVersioningRulesResponse
        compatibleRedirectRules__field_descriptor :: FieldDescriptor GetWorkerVersioningRulesResponse
compatibleRedirectRules__field_descriptor
          = String
-> FieldTypeDescriptor TimestampedCompatibleBuildIdRedirectRule
-> FieldAccessor
     GetWorkerVersioningRulesResponse
     TimestampedCompatibleBuildIdRedirectRule
-> FieldDescriptor GetWorkerVersioningRulesResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"compatible_redirect_rules"
              (MessageOrGroup
-> FieldTypeDescriptor TimestampedCompatibleBuildIdRedirectRule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedCompatibleBuildIdRedirectRule)
              (Packing
-> Lens'
     GetWorkerVersioningRulesResponse
     [TimestampedCompatibleBuildIdRedirectRule]
-> FieldAccessor
     GetWorkerVersioningRulesResponse
     TimestampedCompatibleBuildIdRedirectRule
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 @"compatibleRedirectRules")) ::
              Data.ProtoLens.FieldDescriptor GetWorkerVersioningRulesResponse
        conflictToken__field_descriptor :: FieldDescriptor GetWorkerVersioningRulesResponse
conflictToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor GetWorkerVersioningRulesResponse ByteString
-> FieldDescriptor GetWorkerVersioningRulesResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"conflict_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     GetWorkerVersioningRulesResponse
     GetWorkerVersioningRulesResponse
     ByteString
     ByteString
-> FieldAccessor GetWorkerVersioningRulesResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"conflictToken")) ::
              Data.ProtoLens.FieldDescriptor GetWorkerVersioningRulesResponse
      in
        [(Tag, FieldDescriptor GetWorkerVersioningRulesResponse)]
-> Map Tag (FieldDescriptor GetWorkerVersioningRulesResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetWorkerVersioningRulesResponse
assignmentRules__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor GetWorkerVersioningRulesResponse
compatibleRedirectRules__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor GetWorkerVersioningRulesResponse
conflictToken__field_descriptor)]
  unknownFields :: Lens' GetWorkerVersioningRulesResponse FieldSet
unknownFields
    = (GetWorkerVersioningRulesResponse -> FieldSet)
-> (GetWorkerVersioningRulesResponse
    -> FieldSet -> GetWorkerVersioningRulesResponse)
-> Lens' GetWorkerVersioningRulesResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetWorkerVersioningRulesResponse -> FieldSet
_GetWorkerVersioningRulesResponse'_unknownFields
        (\ GetWorkerVersioningRulesResponse
x__ FieldSet
y__
           -> GetWorkerVersioningRulesResponse
x__ {_GetWorkerVersioningRulesResponse'_unknownFields = y__})
  defMessage :: GetWorkerVersioningRulesResponse
defMessage
    = GetWorkerVersioningRulesResponse'_constructor
        {_GetWorkerVersioningRulesResponse'assignmentRules :: Vector TimestampedBuildIdAssignmentRule
_GetWorkerVersioningRulesResponse'assignmentRules = Vector TimestampedBuildIdAssignmentRule
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _GetWorkerVersioningRulesResponse'compatibleRedirectRules :: Vector TimestampedCompatibleBuildIdRedirectRule
_GetWorkerVersioningRulesResponse'compatibleRedirectRules = Vector TimestampedCompatibleBuildIdRedirectRule
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _GetWorkerVersioningRulesResponse'conflictToken :: ByteString
_GetWorkerVersioningRulesResponse'conflictToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkerVersioningRulesResponse'_unknownFields :: FieldSet
_GetWorkerVersioningRulesResponse'_unknownFields = []}
  parseMessage :: Parser GetWorkerVersioningRulesResponse
parseMessage
    = let
        loop ::
          GetWorkerVersioningRulesResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedBuildIdAssignmentRule
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedCompatibleBuildIdRedirectRule
                -> Data.ProtoLens.Encoding.Bytes.Parser GetWorkerVersioningRulesResponse
        loop :: GetWorkerVersioningRulesResponse
-> Growing Vector RealWorld TimestampedBuildIdAssignmentRule
-> Growing
     Vector RealWorld TimestampedCompatibleBuildIdRedirectRule
-> Parser GetWorkerVersioningRulesResponse
loop GetWorkerVersioningRulesResponse
x Growing Vector RealWorld TimestampedBuildIdAssignmentRule
mutable'assignmentRules Growing Vector RealWorld TimestampedCompatibleBuildIdRedirectRule
mutable'compatibleRedirectRules
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'assignmentRules <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                  (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                     mutable'assignmentRules)
                      frozen'compatibleRedirectRules <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                          (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                             mutable'compatibleRedirectRules)
                      (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'assignmentRules")
                              frozen'assignmentRules
                              (Lens.Family2.set
                                 (Data.ProtoLens.Field.field @"vec'compatibleRedirectRules")
                                 frozen'compatibleRedirectRules x)))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser TimestampedBuildIdAssignmentRule
-> String -> Parser TimestampedBuildIdAssignmentRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"assignment_rules"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'assignmentRules y)
                                loop x v mutable'compatibleRedirectRules
                        Word64
18
                          -> do !y <- Parser TimestampedCompatibleBuildIdRedirectRule
-> String -> Parser TimestampedCompatibleBuildIdRedirectRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"compatible_redirect_rules"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'compatibleRedirectRules y)
                                loop x mutable'assignmentRules v
                        Word64
26
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"conflict_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"conflictToken") y x)
                                  mutable'assignmentRules mutable'compatibleRedirectRules
                        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'assignmentRules mutable'compatibleRedirectRules
      in
        Parser GetWorkerVersioningRulesResponse
-> String -> Parser GetWorkerVersioningRulesResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'assignmentRules <- IO (Growing Vector RealWorld TimestampedBuildIdAssignmentRule)
-> Parser
     (Growing Vector RealWorld TimestampedBuildIdAssignmentRule)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           IO (Growing Vector RealWorld TimestampedBuildIdAssignmentRule)
IO (Growing Vector (PrimState IO) TimestampedBuildIdAssignmentRule)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              mutable'compatibleRedirectRules <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                   Data.ProtoLens.Encoding.Growing.new
              loop
                Data.ProtoLens.defMessage mutable'assignmentRules
                mutable'compatibleRedirectRules)
          String
"GetWorkerVersioningRulesResponse"
  buildMessage :: GetWorkerVersioningRulesResponse -> Builder
buildMessage
    = \ GetWorkerVersioningRulesResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((TimestampedBuildIdAssignmentRule -> Builder)
-> Vector TimestampedBuildIdAssignmentRule -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ TimestampedBuildIdAssignmentRule
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (TimestampedBuildIdAssignmentRule -> ByteString)
-> TimestampedBuildIdAssignmentRule
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           TimestampedBuildIdAssignmentRule -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TimestampedBuildIdAssignmentRule
_v))
                (FoldLike
  (Vector TimestampedBuildIdAssignmentRule)
  GetWorkerVersioningRulesResponse
  GetWorkerVersioningRulesResponse
  (Vector TimestampedBuildIdAssignmentRule)
  (Vector TimestampedBuildIdAssignmentRule)
-> GetWorkerVersioningRulesResponse
-> Vector TimestampedBuildIdAssignmentRule
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'assignmentRules") GetWorkerVersioningRulesResponse
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                ((TimestampedCompatibleBuildIdRedirectRule -> Builder)
-> Vector TimestampedCompatibleBuildIdRedirectRule -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                   (\ TimestampedCompatibleBuildIdRedirectRule
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                           ((ByteString -> Builder)
-> (TimestampedCompatibleBuildIdRedirectRule -> ByteString)
-> TimestampedCompatibleBuildIdRedirectRule
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ ByteString
bs
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                              TimestampedCompatibleBuildIdRedirectRule -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TimestampedCompatibleBuildIdRedirectRule
_v))
                   (FoldLike
  (Vector TimestampedCompatibleBuildIdRedirectRule)
  GetWorkerVersioningRulesResponse
  GetWorkerVersioningRulesResponse
  (Vector TimestampedCompatibleBuildIdRedirectRule)
  (Vector TimestampedCompatibleBuildIdRedirectRule)
-> GetWorkerVersioningRulesResponse
-> Vector TimestampedCompatibleBuildIdRedirectRule
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'compatibleRedirectRules") GetWorkerVersioningRulesResponse
_x))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: ByteString
_v
                        = FoldLike
  ByteString
  GetWorkerVersioningRulesResponse
  GetWorkerVersioningRulesResponse
  ByteString
  ByteString
-> GetWorkerVersioningRulesResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"conflictToken") GetWorkerVersioningRulesResponse
_x
                    in
                      if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
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
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               ByteString
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  GetWorkerVersioningRulesResponse
  GetWorkerVersioningRulesResponse
  FieldSet
  FieldSet
-> GetWorkerVersioningRulesResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetWorkerVersioningRulesResponse
  GetWorkerVersioningRulesResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetWorkerVersioningRulesResponse FieldSet
Data.ProtoLens.unknownFields GetWorkerVersioningRulesResponse
_x))))
instance Control.DeepSeq.NFData GetWorkerVersioningRulesResponse where
  rnf :: GetWorkerVersioningRulesResponse -> ()
rnf
    = \ GetWorkerVersioningRulesResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetWorkerVersioningRulesResponse -> FieldSet
_GetWorkerVersioningRulesResponse'_unknownFields GetWorkerVersioningRulesResponse
x__)
             (Vector TimestampedBuildIdAssignmentRule -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetWorkerVersioningRulesResponse
-> Vector TimestampedBuildIdAssignmentRule
_GetWorkerVersioningRulesResponse'assignmentRules GetWorkerVersioningRulesResponse
x__)
                (Vector TimestampedCompatibleBuildIdRedirectRule -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GetWorkerVersioningRulesResponse
-> Vector TimestampedCompatibleBuildIdRedirectRule
_GetWorkerVersioningRulesResponse'compatibleRedirectRules GetWorkerVersioningRulesResponse
x__)
                   (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (GetWorkerVersioningRulesResponse -> ByteString
_GetWorkerVersioningRulesResponse'conflictToken GetWorkerVersioningRulesResponse
x__) ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' GetWorkflowExecutionHistoryRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.execution' @:: Lens' GetWorkflowExecutionHistoryRequest Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'execution' @:: Lens' GetWorkflowExecutionHistoryRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maximumPageSize' @:: Lens' GetWorkflowExecutionHistoryRequest Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' GetWorkflowExecutionHistoryRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.waitNewEvent' @:: Lens' GetWorkflowExecutionHistoryRequest Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.historyEventFilterType' @:: Lens' GetWorkflowExecutionHistoryRequest Proto.Temporal.Api.Enums.V1.Workflow.HistoryEventFilterType@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.skipArchival' @:: Lens' GetWorkflowExecutionHistoryRequest Prelude.Bool@ -}
data GetWorkflowExecutionHistoryRequest
  = GetWorkflowExecutionHistoryRequest'_constructor {GetWorkflowExecutionHistoryRequest -> Text
_GetWorkflowExecutionHistoryRequest'namespace :: !Data.Text.Text,
                                                     GetWorkflowExecutionHistoryRequest -> Maybe WorkflowExecution
_GetWorkflowExecutionHistoryRequest'execution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                     GetWorkflowExecutionHistoryRequest -> Int32
_GetWorkflowExecutionHistoryRequest'maximumPageSize :: !Data.Int.Int32,
                                                     GetWorkflowExecutionHistoryRequest -> ByteString
_GetWorkflowExecutionHistoryRequest'nextPageToken :: !Data.ByteString.ByteString,
                                                     GetWorkflowExecutionHistoryRequest -> Bool
_GetWorkflowExecutionHistoryRequest'waitNewEvent :: !Prelude.Bool,
                                                     GetWorkflowExecutionHistoryRequest -> HistoryEventFilterType
_GetWorkflowExecutionHistoryRequest'historyEventFilterType :: !Proto.Temporal.Api.Enums.V1.Workflow.HistoryEventFilterType,
                                                     GetWorkflowExecutionHistoryRequest -> Bool
_GetWorkflowExecutionHistoryRequest'skipArchival :: !Prelude.Bool,
                                                     GetWorkflowExecutionHistoryRequest -> FieldSet
_GetWorkflowExecutionHistoryRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Bool
(GetWorkflowExecutionHistoryRequest
 -> GetWorkflowExecutionHistoryRequest -> Bool)
-> (GetWorkflowExecutionHistoryRequest
    -> GetWorkflowExecutionHistoryRequest -> Bool)
-> Eq GetWorkflowExecutionHistoryRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Bool
== :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Bool
$c/= :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Bool
/= :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Bool
Prelude.Eq, Eq GetWorkflowExecutionHistoryRequest
Eq GetWorkflowExecutionHistoryRequest =>
(GetWorkflowExecutionHistoryRequest
 -> GetWorkflowExecutionHistoryRequest -> Ordering)
-> (GetWorkflowExecutionHistoryRequest
    -> GetWorkflowExecutionHistoryRequest -> Bool)
-> (GetWorkflowExecutionHistoryRequest
    -> GetWorkflowExecutionHistoryRequest -> Bool)
-> (GetWorkflowExecutionHistoryRequest
    -> GetWorkflowExecutionHistoryRequest -> Bool)
-> (GetWorkflowExecutionHistoryRequest
    -> GetWorkflowExecutionHistoryRequest -> Bool)
-> (GetWorkflowExecutionHistoryRequest
    -> GetWorkflowExecutionHistoryRequest
    -> GetWorkflowExecutionHistoryRequest)
-> (GetWorkflowExecutionHistoryRequest
    -> GetWorkflowExecutionHistoryRequest
    -> GetWorkflowExecutionHistoryRequest)
-> Ord GetWorkflowExecutionHistoryRequest
GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Bool
GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Ordering
GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest
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 :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Ordering
compare :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Ordering
$c< :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Bool
< :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Bool
$c<= :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Bool
<= :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Bool
$c> :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Bool
> :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Bool
$c>= :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Bool
>= :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest -> Bool
$cmax :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest
max :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest
$cmin :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest
min :: GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest
-> GetWorkflowExecutionHistoryRequest
Prelude.Ord)
instance Prelude.Show GetWorkflowExecutionHistoryRequest where
  showsPrec :: Int -> GetWorkflowExecutionHistoryRequest -> ShowS
showsPrec Int
_ GetWorkflowExecutionHistoryRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetWorkflowExecutionHistoryRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetWorkflowExecutionHistoryRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> GetWorkflowExecutionHistoryRequest
 -> f GetWorkflowExecutionHistoryRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryRequest -> Text)
-> (GetWorkflowExecutionHistoryRequest
    -> Text -> GetWorkflowExecutionHistoryRequest)
-> Lens
     GetWorkflowExecutionHistoryRequest
     GetWorkflowExecutionHistoryRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryRequest -> Text
_GetWorkflowExecutionHistoryRequest'namespace
           (\ GetWorkflowExecutionHistoryRequest
x__ Text
y__
              -> GetWorkflowExecutionHistoryRequest
x__ {_GetWorkflowExecutionHistoryRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryRequest "execution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "execution"
-> (WorkflowExecution -> f WorkflowExecution)
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
fieldOf Proxy# "execution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> GetWorkflowExecutionHistoryRequest
 -> f GetWorkflowExecutionHistoryRequest)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryRequest -> Maybe WorkflowExecution)
-> (GetWorkflowExecutionHistoryRequest
    -> Maybe WorkflowExecution -> GetWorkflowExecutionHistoryRequest)
-> Lens
     GetWorkflowExecutionHistoryRequest
     GetWorkflowExecutionHistoryRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryRequest -> Maybe WorkflowExecution
_GetWorkflowExecutionHistoryRequest'execution
           (\ GetWorkflowExecutionHistoryRequest
x__ Maybe WorkflowExecution
y__
              -> GetWorkflowExecutionHistoryRequest
x__ {_GetWorkflowExecutionHistoryRequest'execution = y__}))
        (WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryRequest "maybe'execution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'execution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
fieldOf Proxy# "maybe'execution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> GetWorkflowExecutionHistoryRequest
 -> f GetWorkflowExecutionHistoryRequest)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryRequest -> Maybe WorkflowExecution)
-> (GetWorkflowExecutionHistoryRequest
    -> Maybe WorkflowExecution -> GetWorkflowExecutionHistoryRequest)
-> Lens
     GetWorkflowExecutionHistoryRequest
     GetWorkflowExecutionHistoryRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryRequest -> Maybe WorkflowExecution
_GetWorkflowExecutionHistoryRequest'execution
           (\ GetWorkflowExecutionHistoryRequest
x__ Maybe WorkflowExecution
y__
              -> GetWorkflowExecutionHistoryRequest
x__ {_GetWorkflowExecutionHistoryRequest'execution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryRequest "maximumPageSize" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maximumPageSize"
-> (Int32 -> f Int32)
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
fieldOf Proxy# "maximumPageSize"
_
    = ((Int32 -> f Int32)
 -> GetWorkflowExecutionHistoryRequest
 -> f GetWorkflowExecutionHistoryRequest)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryRequest -> Int32)
-> (GetWorkflowExecutionHistoryRequest
    -> Int32 -> GetWorkflowExecutionHistoryRequest)
-> Lens
     GetWorkflowExecutionHistoryRequest
     GetWorkflowExecutionHistoryRequest
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryRequest -> Int32
_GetWorkflowExecutionHistoryRequest'maximumPageSize
           (\ GetWorkflowExecutionHistoryRequest
x__ Int32
y__
              -> GetWorkflowExecutionHistoryRequest
x__
                   {_GetWorkflowExecutionHistoryRequest'maximumPageSize = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryRequest "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> GetWorkflowExecutionHistoryRequest
 -> f GetWorkflowExecutionHistoryRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryRequest -> ByteString)
-> (GetWorkflowExecutionHistoryRequest
    -> ByteString -> GetWorkflowExecutionHistoryRequest)
-> Lens
     GetWorkflowExecutionHistoryRequest
     GetWorkflowExecutionHistoryRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryRequest -> ByteString
_GetWorkflowExecutionHistoryRequest'nextPageToken
           (\ GetWorkflowExecutionHistoryRequest
x__ ByteString
y__
              -> GetWorkflowExecutionHistoryRequest
x__ {_GetWorkflowExecutionHistoryRequest'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryRequest "waitNewEvent" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "waitNewEvent"
-> (Bool -> f Bool)
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
fieldOf Proxy# "waitNewEvent"
_
    = ((Bool -> f Bool)
 -> GetWorkflowExecutionHistoryRequest
 -> f GetWorkflowExecutionHistoryRequest)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryRequest -> Bool)
-> (GetWorkflowExecutionHistoryRequest
    -> Bool -> GetWorkflowExecutionHistoryRequest)
-> Lens
     GetWorkflowExecutionHistoryRequest
     GetWorkflowExecutionHistoryRequest
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryRequest -> Bool
_GetWorkflowExecutionHistoryRequest'waitNewEvent
           (\ GetWorkflowExecutionHistoryRequest
x__ Bool
y__
              -> GetWorkflowExecutionHistoryRequest
x__ {_GetWorkflowExecutionHistoryRequest'waitNewEvent = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryRequest "historyEventFilterType" Proto.Temporal.Api.Enums.V1.Workflow.HistoryEventFilterType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "historyEventFilterType"
-> (HistoryEventFilterType -> f HistoryEventFilterType)
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
fieldOf Proxy# "historyEventFilterType"
_
    = ((HistoryEventFilterType -> f HistoryEventFilterType)
 -> GetWorkflowExecutionHistoryRequest
 -> f GetWorkflowExecutionHistoryRequest)
-> ((HistoryEventFilterType -> f HistoryEventFilterType)
    -> HistoryEventFilterType -> f HistoryEventFilterType)
-> (HistoryEventFilterType -> f HistoryEventFilterType)
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryRequest -> HistoryEventFilterType)
-> (GetWorkflowExecutionHistoryRequest
    -> HistoryEventFilterType -> GetWorkflowExecutionHistoryRequest)
-> Lens
     GetWorkflowExecutionHistoryRequest
     GetWorkflowExecutionHistoryRequest
     HistoryEventFilterType
     HistoryEventFilterType
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryRequest -> HistoryEventFilterType
_GetWorkflowExecutionHistoryRequest'historyEventFilterType
           (\ GetWorkflowExecutionHistoryRequest
x__ HistoryEventFilterType
y__
              -> GetWorkflowExecutionHistoryRequest
x__
                   {_GetWorkflowExecutionHistoryRequest'historyEventFilterType = y__}))
        (HistoryEventFilterType -> f HistoryEventFilterType)
-> HistoryEventFilterType -> f HistoryEventFilterType
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryRequest "skipArchival" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "skipArchival"
-> (Bool -> f Bool)
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
fieldOf Proxy# "skipArchival"
_
    = ((Bool -> f Bool)
 -> GetWorkflowExecutionHistoryRequest
 -> f GetWorkflowExecutionHistoryRequest)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GetWorkflowExecutionHistoryRequest
-> f GetWorkflowExecutionHistoryRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryRequest -> Bool)
-> (GetWorkflowExecutionHistoryRequest
    -> Bool -> GetWorkflowExecutionHistoryRequest)
-> Lens
     GetWorkflowExecutionHistoryRequest
     GetWorkflowExecutionHistoryRequest
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryRequest -> Bool
_GetWorkflowExecutionHistoryRequest'skipArchival
           (\ GetWorkflowExecutionHistoryRequest
x__ Bool
y__
              -> GetWorkflowExecutionHistoryRequest
x__ {_GetWorkflowExecutionHistoryRequest'skipArchival = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetWorkflowExecutionHistoryRequest where
  messageName :: Proxy GetWorkflowExecutionHistoryRequest -> Text
messageName Proxy GetWorkflowExecutionHistoryRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetWorkflowExecutionHistoryRequest"
  packedMessageDescriptor :: Proxy GetWorkflowExecutionHistoryRequest -> ByteString
packedMessageDescriptor Proxy GetWorkflowExecutionHistoryRequest
_
    = ByteString
"\n\
      \\"GetWorkflowExecutionHistoryRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2G\n\
      \\texecution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\texecution\DC2*\n\
      \\DC1maximum_page_size\CAN\ETX \SOH(\ENQR\SImaximumPageSize\DC2&\n\
      \\SInext_page_token\CAN\EOT \SOH(\fR\rnextPageToken\DC2$\n\
      \\SOwait_new_event\CAN\ENQ \SOH(\bR\fwaitNewEvent\DC2h\n\
      \\EMhistory_event_filter_type\CAN\ACK \SOH(\SO2-.temporal.api.enums.v1.HistoryEventFilterTypeR\SYNhistoryEventFilterType\DC2#\n\
      \\rskip_archival\CAN\a \SOH(\bR\fskipArchival"
  packedFileDescriptor :: Proxy GetWorkflowExecutionHistoryRequest -> ByteString
packedFileDescriptor Proxy GetWorkflowExecutionHistoryRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetWorkflowExecutionHistoryRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetWorkflowExecutionHistoryRequest Text
-> FieldDescriptor GetWorkflowExecutionHistoryRequest
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
     GetWorkflowExecutionHistoryRequest
     GetWorkflowExecutionHistoryRequest
     Text
     Text
-> FieldAccessor GetWorkflowExecutionHistoryRequest 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 GetWorkflowExecutionHistoryRequest
        execution__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryRequest
execution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     GetWorkflowExecutionHistoryRequest WorkflowExecution
-> FieldDescriptor GetWorkflowExecutionHistoryRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"execution"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
              (Lens
  GetWorkflowExecutionHistoryRequest
  GetWorkflowExecutionHistoryRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     GetWorkflowExecutionHistoryRequest WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'execution")) ::
              Data.ProtoLens.FieldDescriptor GetWorkflowExecutionHistoryRequest
        maximumPageSize__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryRequest
maximumPageSize__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor GetWorkflowExecutionHistoryRequest Int32
-> FieldDescriptor GetWorkflowExecutionHistoryRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"maximum_page_size"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     GetWorkflowExecutionHistoryRequest
     GetWorkflowExecutionHistoryRequest
     Int32
     Int32
-> FieldAccessor GetWorkflowExecutionHistoryRequest Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maximumPageSize")) ::
              Data.ProtoLens.FieldDescriptor GetWorkflowExecutionHistoryRequest
        nextPageToken__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryRequest
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor GetWorkflowExecutionHistoryRequest ByteString
-> FieldDescriptor GetWorkflowExecutionHistoryRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     GetWorkflowExecutionHistoryRequest
     GetWorkflowExecutionHistoryRequest
     ByteString
     ByteString
-> FieldAccessor GetWorkflowExecutionHistoryRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor GetWorkflowExecutionHistoryRequest
        waitNewEvent__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryRequest
waitNewEvent__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GetWorkflowExecutionHistoryRequest Bool
-> FieldDescriptor GetWorkflowExecutionHistoryRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"wait_new_event"
              (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
     GetWorkflowExecutionHistoryRequest
     GetWorkflowExecutionHistoryRequest
     Bool
     Bool
-> FieldAccessor GetWorkflowExecutionHistoryRequest 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 @"waitNewEvent")) ::
              Data.ProtoLens.FieldDescriptor GetWorkflowExecutionHistoryRequest
        historyEventFilterType__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryRequest
historyEventFilterType__field_descriptor
          = String
-> FieldTypeDescriptor HistoryEventFilterType
-> FieldAccessor
     GetWorkflowExecutionHistoryRequest HistoryEventFilterType
-> FieldDescriptor GetWorkflowExecutionHistoryRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"history_event_filter_type"
              (ScalarField HistoryEventFilterType
-> FieldTypeDescriptor HistoryEventFilterType
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField HistoryEventFilterType
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.HistoryEventFilterType)
              (WireDefault HistoryEventFilterType
-> Lens
     GetWorkflowExecutionHistoryRequest
     GetWorkflowExecutionHistoryRequest
     HistoryEventFilterType
     HistoryEventFilterType
-> FieldAccessor
     GetWorkflowExecutionHistoryRequest HistoryEventFilterType
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault HistoryEventFilterType
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"historyEventFilterType")) ::
              Data.ProtoLens.FieldDescriptor GetWorkflowExecutionHistoryRequest
        skipArchival__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryRequest
skipArchival__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GetWorkflowExecutionHistoryRequest Bool
-> FieldDescriptor GetWorkflowExecutionHistoryRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"skip_archival"
              (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
     GetWorkflowExecutionHistoryRequest
     GetWorkflowExecutionHistoryRequest
     Bool
     Bool
-> FieldAccessor GetWorkflowExecutionHistoryRequest 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 @"skipArchival")) ::
              Data.ProtoLens.FieldDescriptor GetWorkflowExecutionHistoryRequest
      in
        [(Tag, FieldDescriptor GetWorkflowExecutionHistoryRequest)]
-> Map Tag (FieldDescriptor GetWorkflowExecutionHistoryRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetWorkflowExecutionHistoryRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor GetWorkflowExecutionHistoryRequest
execution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor GetWorkflowExecutionHistoryRequest
maximumPageSize__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor GetWorkflowExecutionHistoryRequest
nextPageToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor GetWorkflowExecutionHistoryRequest
waitNewEvent__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor GetWorkflowExecutionHistoryRequest
historyEventFilterType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor GetWorkflowExecutionHistoryRequest
skipArchival__field_descriptor)]
  unknownFields :: Lens' GetWorkflowExecutionHistoryRequest FieldSet
unknownFields
    = (GetWorkflowExecutionHistoryRequest -> FieldSet)
-> (GetWorkflowExecutionHistoryRequest
    -> FieldSet -> GetWorkflowExecutionHistoryRequest)
-> Lens' GetWorkflowExecutionHistoryRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetWorkflowExecutionHistoryRequest -> FieldSet
_GetWorkflowExecutionHistoryRequest'_unknownFields
        (\ GetWorkflowExecutionHistoryRequest
x__ FieldSet
y__
           -> GetWorkflowExecutionHistoryRequest
x__ {_GetWorkflowExecutionHistoryRequest'_unknownFields = y__})
  defMessage :: GetWorkflowExecutionHistoryRequest
defMessage
    = GetWorkflowExecutionHistoryRequest'_constructor
        {_GetWorkflowExecutionHistoryRequest'namespace :: Text
_GetWorkflowExecutionHistoryRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkflowExecutionHistoryRequest'execution :: Maybe WorkflowExecution
_GetWorkflowExecutionHistoryRequest'execution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _GetWorkflowExecutionHistoryRequest'maximumPageSize :: Int32
_GetWorkflowExecutionHistoryRequest'maximumPageSize = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkflowExecutionHistoryRequest'nextPageToken :: ByteString
_GetWorkflowExecutionHistoryRequest'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkflowExecutionHistoryRequest'waitNewEvent :: Bool
_GetWorkflowExecutionHistoryRequest'waitNewEvent = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkflowExecutionHistoryRequest'historyEventFilterType :: HistoryEventFilterType
_GetWorkflowExecutionHistoryRequest'historyEventFilterType = HistoryEventFilterType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkflowExecutionHistoryRequest'skipArchival :: Bool
_GetWorkflowExecutionHistoryRequest'skipArchival = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkflowExecutionHistoryRequest'_unknownFields :: FieldSet
_GetWorkflowExecutionHistoryRequest'_unknownFields = []}
  parseMessage :: Parser GetWorkflowExecutionHistoryRequest
parseMessage
    = let
        loop ::
          GetWorkflowExecutionHistoryRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser GetWorkflowExecutionHistoryRequest
        loop :: GetWorkflowExecutionHistoryRequest
-> Parser GetWorkflowExecutionHistoryRequest
loop GetWorkflowExecutionHistoryRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"execution"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"execution") y x)
                        Word64
24
                          -> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"maximum_page_size"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"maximumPageSize") y x)
                        Word64
34
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                        Word64
40
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"wait_new_event"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"waitNewEvent") y x)
                        Word64
48
                          -> do y <- Parser HistoryEventFilterType
-> String -> Parser HistoryEventFilterType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> HistoryEventFilterType)
-> Parser Int -> Parser HistoryEventFilterType
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> HistoryEventFilterType
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
"history_event_filter_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"historyEventFilterType") y x)
                        Word64
56
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"skip_archival"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"skipArchival") 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 GetWorkflowExecutionHistoryRequest
-> String -> Parser GetWorkflowExecutionHistoryRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GetWorkflowExecutionHistoryRequest
-> Parser GetWorkflowExecutionHistoryRequest
loop GetWorkflowExecutionHistoryRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"GetWorkflowExecutionHistoryRequest"
  buildMessage :: GetWorkflowExecutionHistoryRequest -> Builder
buildMessage
    = \ GetWorkflowExecutionHistoryRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  GetWorkflowExecutionHistoryRequest
  GetWorkflowExecutionHistoryRequest
  Text
  Text
-> GetWorkflowExecutionHistoryRequest -> 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") GetWorkflowExecutionHistoryRequest
_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 WorkflowExecution)
  GetWorkflowExecutionHistoryRequest
  GetWorkflowExecutionHistoryRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> GetWorkflowExecutionHistoryRequest -> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'execution") GetWorkflowExecutionHistoryRequest
_x
                 of
                   Maybe WorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just WorkflowExecution
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Int32
_v
                        = FoldLike
  Int32
  GetWorkflowExecutionHistoryRequest
  GetWorkflowExecutionHistoryRequest
  Int32
  Int32
-> GetWorkflowExecutionHistoryRequest -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maximumPageSize") GetWorkflowExecutionHistoryRequest
_x
                    in
                      if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
24)
                            ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: ByteString
_v
                           = FoldLike
  ByteString
  GetWorkflowExecutionHistoryRequest
  GetWorkflowExecutionHistoryRequest
  ByteString
  ByteString
-> GetWorkflowExecutionHistoryRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") GetWorkflowExecutionHistoryRequest
_x
                       in
                         if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
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
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  ByteString
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Bool
_v
                              = FoldLike
  Bool
  GetWorkflowExecutionHistoryRequest
  GetWorkflowExecutionHistoryRequest
  Bool
  Bool
-> GetWorkflowExecutionHistoryRequest -> 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 @"waitNewEvent") GetWorkflowExecutionHistoryRequest
_x
                          in
                            if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
40)
                                  ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (\ Bool
b -> if Bool
b then Word64
1 else Word64
0) Bool
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: HistoryEventFilterType
_v
                                 = FoldLike
  HistoryEventFilterType
  GetWorkflowExecutionHistoryRequest
  GetWorkflowExecutionHistoryRequest
  HistoryEventFilterType
  HistoryEventFilterType
-> GetWorkflowExecutionHistoryRequest -> HistoryEventFilterType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"historyEventFilterType") GetWorkflowExecutionHistoryRequest
_x
                             in
                               if HistoryEventFilterType -> HistoryEventFilterType -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) HistoryEventFilterType
_v HistoryEventFilterType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
48)
                                     ((Int -> Builder)
-> (HistoryEventFilterType -> Int)
-> HistoryEventFilterType
-> 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)
                                        HistoryEventFilterType -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum HistoryEventFilterType
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Bool
_v
                                    = FoldLike
  Bool
  GetWorkflowExecutionHistoryRequest
  GetWorkflowExecutionHistoryRequest
  Bool
  Bool
-> GetWorkflowExecutionHistoryRequest -> 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 @"skipArchival") GetWorkflowExecutionHistoryRequest
_x
                                in
                                  if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                      Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  else
                                      Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
56)
                                        ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                           Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (\ Bool
b -> if Bool
b then Word64
1 else Word64
0) Bool
_v))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike
  FieldSet
  GetWorkflowExecutionHistoryRequest
  GetWorkflowExecutionHistoryRequest
  FieldSet
  FieldSet
-> GetWorkflowExecutionHistoryRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetWorkflowExecutionHistoryRequest
  GetWorkflowExecutionHistoryRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetWorkflowExecutionHistoryRequest FieldSet
Data.ProtoLens.unknownFields GetWorkflowExecutionHistoryRequest
_x))))))))
instance Control.DeepSeq.NFData GetWorkflowExecutionHistoryRequest where
  rnf :: GetWorkflowExecutionHistoryRequest -> ()
rnf
    = \ GetWorkflowExecutionHistoryRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetWorkflowExecutionHistoryRequest -> FieldSet
_GetWorkflowExecutionHistoryRequest'_unknownFields GetWorkflowExecutionHistoryRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetWorkflowExecutionHistoryRequest -> Text
_GetWorkflowExecutionHistoryRequest'namespace GetWorkflowExecutionHistoryRequest
x__)
                (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GetWorkflowExecutionHistoryRequest -> Maybe WorkflowExecution
_GetWorkflowExecutionHistoryRequest'execution GetWorkflowExecutionHistoryRequest
x__)
                   (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (GetWorkflowExecutionHistoryRequest -> Int32
_GetWorkflowExecutionHistoryRequest'maximumPageSize GetWorkflowExecutionHistoryRequest
x__)
                      (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (GetWorkflowExecutionHistoryRequest -> ByteString
_GetWorkflowExecutionHistoryRequest'nextPageToken GetWorkflowExecutionHistoryRequest
x__)
                         (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (GetWorkflowExecutionHistoryRequest -> Bool
_GetWorkflowExecutionHistoryRequest'waitNewEvent GetWorkflowExecutionHistoryRequest
x__)
                            (HistoryEventFilterType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (GetWorkflowExecutionHistoryRequest -> HistoryEventFilterType
_GetWorkflowExecutionHistoryRequest'historyEventFilterType GetWorkflowExecutionHistoryRequest
x__)
                               (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (GetWorkflowExecutionHistoryRequest -> Bool
_GetWorkflowExecutionHistoryRequest'skipArchival GetWorkflowExecutionHistoryRequest
x__) ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.history' @:: Lens' GetWorkflowExecutionHistoryResponse Proto.Temporal.Api.History.V1.Message.History@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'history' @:: Lens' GetWorkflowExecutionHistoryResponse (Prelude.Maybe Proto.Temporal.Api.History.V1.Message.History)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.rawHistory' @:: Lens' GetWorkflowExecutionHistoryResponse [Proto.Temporal.Api.Common.V1.Message.DataBlob]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'rawHistory' @:: Lens' GetWorkflowExecutionHistoryResponse (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.DataBlob)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' GetWorkflowExecutionHistoryResponse Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.archived' @:: Lens' GetWorkflowExecutionHistoryResponse Prelude.Bool@ -}
data GetWorkflowExecutionHistoryResponse
  = GetWorkflowExecutionHistoryResponse'_constructor {GetWorkflowExecutionHistoryResponse -> Maybe History
_GetWorkflowExecutionHistoryResponse'history :: !(Prelude.Maybe Proto.Temporal.Api.History.V1.Message.History),
                                                      GetWorkflowExecutionHistoryResponse -> Vector DataBlob
_GetWorkflowExecutionHistoryResponse'rawHistory :: !(Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.DataBlob),
                                                      GetWorkflowExecutionHistoryResponse -> ByteString
_GetWorkflowExecutionHistoryResponse'nextPageToken :: !Data.ByteString.ByteString,
                                                      GetWorkflowExecutionHistoryResponse -> Bool
_GetWorkflowExecutionHistoryResponse'archived :: !Prelude.Bool,
                                                      GetWorkflowExecutionHistoryResponse -> FieldSet
_GetWorkflowExecutionHistoryResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Bool
(GetWorkflowExecutionHistoryResponse
 -> GetWorkflowExecutionHistoryResponse -> Bool)
-> (GetWorkflowExecutionHistoryResponse
    -> GetWorkflowExecutionHistoryResponse -> Bool)
-> Eq GetWorkflowExecutionHistoryResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Bool
== :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Bool
$c/= :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Bool
/= :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Bool
Prelude.Eq, Eq GetWorkflowExecutionHistoryResponse
Eq GetWorkflowExecutionHistoryResponse =>
(GetWorkflowExecutionHistoryResponse
 -> GetWorkflowExecutionHistoryResponse -> Ordering)
-> (GetWorkflowExecutionHistoryResponse
    -> GetWorkflowExecutionHistoryResponse -> Bool)
-> (GetWorkflowExecutionHistoryResponse
    -> GetWorkflowExecutionHistoryResponse -> Bool)
-> (GetWorkflowExecutionHistoryResponse
    -> GetWorkflowExecutionHistoryResponse -> Bool)
-> (GetWorkflowExecutionHistoryResponse
    -> GetWorkflowExecutionHistoryResponse -> Bool)
-> (GetWorkflowExecutionHistoryResponse
    -> GetWorkflowExecutionHistoryResponse
    -> GetWorkflowExecutionHistoryResponse)
-> (GetWorkflowExecutionHistoryResponse
    -> GetWorkflowExecutionHistoryResponse
    -> GetWorkflowExecutionHistoryResponse)
-> Ord GetWorkflowExecutionHistoryResponse
GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Bool
GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Ordering
GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse
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 :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Ordering
compare :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Ordering
$c< :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Bool
< :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Bool
$c<= :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Bool
<= :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Bool
$c> :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Bool
> :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Bool
$c>= :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Bool
>= :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse -> Bool
$cmax :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse
max :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse
$cmin :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse
min :: GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse
-> GetWorkflowExecutionHistoryResponse
Prelude.Ord)
instance Prelude.Show GetWorkflowExecutionHistoryResponse where
  showsPrec :: Int -> GetWorkflowExecutionHistoryResponse -> ShowS
showsPrec Int
_ GetWorkflowExecutionHistoryResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetWorkflowExecutionHistoryResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetWorkflowExecutionHistoryResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryResponse "history" Proto.Temporal.Api.History.V1.Message.History where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "history"
-> (History -> f History)
-> GetWorkflowExecutionHistoryResponse
-> f GetWorkflowExecutionHistoryResponse
fieldOf Proxy# "history"
_
    = ((Maybe History -> f (Maybe History))
 -> GetWorkflowExecutionHistoryResponse
 -> f GetWorkflowExecutionHistoryResponse)
-> ((History -> f History) -> Maybe History -> f (Maybe History))
-> (History -> f History)
-> GetWorkflowExecutionHistoryResponse
-> f GetWorkflowExecutionHistoryResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryResponse -> Maybe History)
-> (GetWorkflowExecutionHistoryResponse
    -> Maybe History -> GetWorkflowExecutionHistoryResponse)
-> Lens
     GetWorkflowExecutionHistoryResponse
     GetWorkflowExecutionHistoryResponse
     (Maybe History)
     (Maybe History)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryResponse -> Maybe History
_GetWorkflowExecutionHistoryResponse'history
           (\ GetWorkflowExecutionHistoryResponse
x__ Maybe History
y__
              -> GetWorkflowExecutionHistoryResponse
x__ {_GetWorkflowExecutionHistoryResponse'history = y__}))
        (History -> Lens' (Maybe History) History
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens History
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryResponse "maybe'history" (Prelude.Maybe Proto.Temporal.Api.History.V1.Message.History) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'history"
-> (Maybe History -> f (Maybe History))
-> GetWorkflowExecutionHistoryResponse
-> f GetWorkflowExecutionHistoryResponse
fieldOf Proxy# "maybe'history"
_
    = ((Maybe History -> f (Maybe History))
 -> GetWorkflowExecutionHistoryResponse
 -> f GetWorkflowExecutionHistoryResponse)
-> ((Maybe History -> f (Maybe History))
    -> Maybe History -> f (Maybe History))
-> (Maybe History -> f (Maybe History))
-> GetWorkflowExecutionHistoryResponse
-> f GetWorkflowExecutionHistoryResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryResponse -> Maybe History)
-> (GetWorkflowExecutionHistoryResponse
    -> Maybe History -> GetWorkflowExecutionHistoryResponse)
-> Lens
     GetWorkflowExecutionHistoryResponse
     GetWorkflowExecutionHistoryResponse
     (Maybe History)
     (Maybe History)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryResponse -> Maybe History
_GetWorkflowExecutionHistoryResponse'history
           (\ GetWorkflowExecutionHistoryResponse
x__ Maybe History
y__
              -> GetWorkflowExecutionHistoryResponse
x__ {_GetWorkflowExecutionHistoryResponse'history = y__}))
        (Maybe History -> f (Maybe History))
-> Maybe History -> f (Maybe History)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryResponse "rawHistory" [Proto.Temporal.Api.Common.V1.Message.DataBlob] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "rawHistory"
-> ([DataBlob] -> f [DataBlob])
-> GetWorkflowExecutionHistoryResponse
-> f GetWorkflowExecutionHistoryResponse
fieldOf Proxy# "rawHistory"
_
    = ((Vector DataBlob -> f (Vector DataBlob))
 -> GetWorkflowExecutionHistoryResponse
 -> f GetWorkflowExecutionHistoryResponse)
-> (([DataBlob] -> f [DataBlob])
    -> Vector DataBlob -> f (Vector DataBlob))
-> ([DataBlob] -> f [DataBlob])
-> GetWorkflowExecutionHistoryResponse
-> f GetWorkflowExecutionHistoryResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryResponse -> Vector DataBlob)
-> (GetWorkflowExecutionHistoryResponse
    -> Vector DataBlob -> GetWorkflowExecutionHistoryResponse)
-> Lens
     GetWorkflowExecutionHistoryResponse
     GetWorkflowExecutionHistoryResponse
     (Vector DataBlob)
     (Vector DataBlob)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryResponse -> Vector DataBlob
_GetWorkflowExecutionHistoryResponse'rawHistory
           (\ GetWorkflowExecutionHistoryResponse
x__ Vector DataBlob
y__
              -> GetWorkflowExecutionHistoryResponse
x__ {_GetWorkflowExecutionHistoryResponse'rawHistory = y__}))
        ((Vector DataBlob -> [DataBlob])
-> (Vector DataBlob -> [DataBlob] -> Vector DataBlob)
-> Lens (Vector DataBlob) (Vector DataBlob) [DataBlob] [DataBlob]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector DataBlob -> [DataBlob]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector DataBlob
_ [DataBlob]
y__ -> [DataBlob] -> Vector DataBlob
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [DataBlob]
y__))
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryResponse "vec'rawHistory" (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.DataBlob) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'rawHistory"
-> (Vector DataBlob -> f (Vector DataBlob))
-> GetWorkflowExecutionHistoryResponse
-> f GetWorkflowExecutionHistoryResponse
fieldOf Proxy# "vec'rawHistory"
_
    = ((Vector DataBlob -> f (Vector DataBlob))
 -> GetWorkflowExecutionHistoryResponse
 -> f GetWorkflowExecutionHistoryResponse)
-> ((Vector DataBlob -> f (Vector DataBlob))
    -> Vector DataBlob -> f (Vector DataBlob))
-> (Vector DataBlob -> f (Vector DataBlob))
-> GetWorkflowExecutionHistoryResponse
-> f GetWorkflowExecutionHistoryResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryResponse -> Vector DataBlob)
-> (GetWorkflowExecutionHistoryResponse
    -> Vector DataBlob -> GetWorkflowExecutionHistoryResponse)
-> Lens
     GetWorkflowExecutionHistoryResponse
     GetWorkflowExecutionHistoryResponse
     (Vector DataBlob)
     (Vector DataBlob)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryResponse -> Vector DataBlob
_GetWorkflowExecutionHistoryResponse'rawHistory
           (\ GetWorkflowExecutionHistoryResponse
x__ Vector DataBlob
y__
              -> GetWorkflowExecutionHistoryResponse
x__ {_GetWorkflowExecutionHistoryResponse'rawHistory = y__}))
        (Vector DataBlob -> f (Vector DataBlob))
-> Vector DataBlob -> f (Vector DataBlob)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryResponse "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> GetWorkflowExecutionHistoryResponse
-> f GetWorkflowExecutionHistoryResponse
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> GetWorkflowExecutionHistoryResponse
 -> f GetWorkflowExecutionHistoryResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> GetWorkflowExecutionHistoryResponse
-> f GetWorkflowExecutionHistoryResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryResponse -> ByteString)
-> (GetWorkflowExecutionHistoryResponse
    -> ByteString -> GetWorkflowExecutionHistoryResponse)
-> Lens
     GetWorkflowExecutionHistoryResponse
     GetWorkflowExecutionHistoryResponse
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryResponse -> ByteString
_GetWorkflowExecutionHistoryResponse'nextPageToken
           (\ GetWorkflowExecutionHistoryResponse
x__ ByteString
y__
              -> GetWorkflowExecutionHistoryResponse
x__ {_GetWorkflowExecutionHistoryResponse'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryResponse "archived" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "archived"
-> (Bool -> f Bool)
-> GetWorkflowExecutionHistoryResponse
-> f GetWorkflowExecutionHistoryResponse
fieldOf Proxy# "archived"
_
    = ((Bool -> f Bool)
 -> GetWorkflowExecutionHistoryResponse
 -> f GetWorkflowExecutionHistoryResponse)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> GetWorkflowExecutionHistoryResponse
-> f GetWorkflowExecutionHistoryResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryResponse -> Bool)
-> (GetWorkflowExecutionHistoryResponse
    -> Bool -> GetWorkflowExecutionHistoryResponse)
-> Lens
     GetWorkflowExecutionHistoryResponse
     GetWorkflowExecutionHistoryResponse
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryResponse -> Bool
_GetWorkflowExecutionHistoryResponse'archived
           (\ GetWorkflowExecutionHistoryResponse
x__ Bool
y__
              -> GetWorkflowExecutionHistoryResponse
x__ {_GetWorkflowExecutionHistoryResponse'archived = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetWorkflowExecutionHistoryResponse where
  messageName :: Proxy GetWorkflowExecutionHistoryResponse -> Text
messageName Proxy GetWorkflowExecutionHistoryResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetWorkflowExecutionHistoryResponse"
  packedMessageDescriptor :: Proxy GetWorkflowExecutionHistoryResponse -> ByteString
packedMessageDescriptor Proxy GetWorkflowExecutionHistoryResponse
_
    = ByteString
"\n\
      \#GetWorkflowExecutionHistoryResponse\DC2:\n\
      \\ahistory\CAN\SOH \SOH(\v2 .temporal.api.history.v1.HistoryR\ahistory\DC2A\n\
      \\vraw_history\CAN\STX \ETX(\v2 .temporal.api.common.v1.DataBlobR\n\
      \rawHistory\DC2&\n\
      \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\DC2\SUB\n\
      \\barchived\CAN\EOT \SOH(\bR\barchived"
  packedFileDescriptor :: Proxy GetWorkflowExecutionHistoryResponse -> ByteString
packedFileDescriptor Proxy GetWorkflowExecutionHistoryResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetWorkflowExecutionHistoryResponse)
fieldsByTag
    = let
        history__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryResponse
history__field_descriptor
          = String
-> FieldTypeDescriptor History
-> FieldAccessor GetWorkflowExecutionHistoryResponse History
-> FieldDescriptor GetWorkflowExecutionHistoryResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"history"
              (MessageOrGroup -> FieldTypeDescriptor History
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.History.V1.Message.History)
              (Lens
  GetWorkflowExecutionHistoryResponse
  GetWorkflowExecutionHistoryResponse
  (Maybe History)
  (Maybe History)
-> FieldAccessor GetWorkflowExecutionHistoryResponse History
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'history")) ::
              Data.ProtoLens.FieldDescriptor GetWorkflowExecutionHistoryResponse
        rawHistory__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryResponse
rawHistory__field_descriptor
          = String
-> FieldTypeDescriptor DataBlob
-> FieldAccessor GetWorkflowExecutionHistoryResponse DataBlob
-> FieldDescriptor GetWorkflowExecutionHistoryResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"raw_history"
              (MessageOrGroup -> FieldTypeDescriptor DataBlob
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.DataBlob)
              (Packing
-> Lens' GetWorkflowExecutionHistoryResponse [DataBlob]
-> FieldAccessor GetWorkflowExecutionHistoryResponse DataBlob
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 @"rawHistory")) ::
              Data.ProtoLens.FieldDescriptor GetWorkflowExecutionHistoryResponse
        nextPageToken__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryResponse
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor GetWorkflowExecutionHistoryResponse ByteString
-> FieldDescriptor GetWorkflowExecutionHistoryResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     GetWorkflowExecutionHistoryResponse
     GetWorkflowExecutionHistoryResponse
     ByteString
     ByteString
-> FieldAccessor GetWorkflowExecutionHistoryResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor GetWorkflowExecutionHistoryResponse
        archived__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryResponse
archived__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor GetWorkflowExecutionHistoryResponse Bool
-> FieldDescriptor GetWorkflowExecutionHistoryResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"archived"
              (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
     GetWorkflowExecutionHistoryResponse
     GetWorkflowExecutionHistoryResponse
     Bool
     Bool
-> FieldAccessor GetWorkflowExecutionHistoryResponse 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 @"archived")) ::
              Data.ProtoLens.FieldDescriptor GetWorkflowExecutionHistoryResponse
      in
        [(Tag, FieldDescriptor GetWorkflowExecutionHistoryResponse)]
-> Map Tag (FieldDescriptor GetWorkflowExecutionHistoryResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetWorkflowExecutionHistoryResponse
history__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor GetWorkflowExecutionHistoryResponse
rawHistory__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor GetWorkflowExecutionHistoryResponse
nextPageToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor GetWorkflowExecutionHistoryResponse
archived__field_descriptor)]
  unknownFields :: Lens' GetWorkflowExecutionHistoryResponse FieldSet
unknownFields
    = (GetWorkflowExecutionHistoryResponse -> FieldSet)
-> (GetWorkflowExecutionHistoryResponse
    -> FieldSet -> GetWorkflowExecutionHistoryResponse)
-> Lens' GetWorkflowExecutionHistoryResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetWorkflowExecutionHistoryResponse -> FieldSet
_GetWorkflowExecutionHistoryResponse'_unknownFields
        (\ GetWorkflowExecutionHistoryResponse
x__ FieldSet
y__
           -> GetWorkflowExecutionHistoryResponse
x__ {_GetWorkflowExecutionHistoryResponse'_unknownFields = y__})
  defMessage :: GetWorkflowExecutionHistoryResponse
defMessage
    = GetWorkflowExecutionHistoryResponse'_constructor
        {_GetWorkflowExecutionHistoryResponse'history :: Maybe History
_GetWorkflowExecutionHistoryResponse'history = Maybe History
forall a. Maybe a
Prelude.Nothing,
         _GetWorkflowExecutionHistoryResponse'rawHistory :: Vector DataBlob
_GetWorkflowExecutionHistoryResponse'rawHistory = Vector DataBlob
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _GetWorkflowExecutionHistoryResponse'nextPageToken :: ByteString
_GetWorkflowExecutionHistoryResponse'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkflowExecutionHistoryResponse'archived :: Bool
_GetWorkflowExecutionHistoryResponse'archived = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkflowExecutionHistoryResponse'_unknownFields :: FieldSet
_GetWorkflowExecutionHistoryResponse'_unknownFields = []}
  parseMessage :: Parser GetWorkflowExecutionHistoryResponse
parseMessage
    = let
        loop ::
          GetWorkflowExecutionHistoryResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Common.V1.Message.DataBlob
             -> Data.ProtoLens.Encoding.Bytes.Parser GetWorkflowExecutionHistoryResponse
        loop :: GetWorkflowExecutionHistoryResponse
-> Growing Vector RealWorld DataBlob
-> Parser GetWorkflowExecutionHistoryResponse
loop GetWorkflowExecutionHistoryResponse
x Growing Vector RealWorld DataBlob
mutable'rawHistory
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'rawHistory <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                mutable'rawHistory)
                      (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'rawHistory") frozen'rawHistory
                              x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser History -> String -> Parser History
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"history"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"history") y x)
                                  mutable'rawHistory
                        Word64
18
                          -> do !y <- Parser DataBlob -> String -> Parser DataBlob
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"raw_history"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'rawHistory y)
                                loop x v
                        Word64
26
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                                  mutable'rawHistory
                        Word64
32
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"archived"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"archived") y x)
                                  mutable'rawHistory
                        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'rawHistory
      in
        Parser GetWorkflowExecutionHistoryResponse
-> String -> Parser GetWorkflowExecutionHistoryResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'rawHistory <- IO (Growing Vector RealWorld DataBlob)
-> Parser (Growing Vector RealWorld DataBlob)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld DataBlob)
IO (Growing Vector (PrimState IO) DataBlob)
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'rawHistory)
          String
"GetWorkflowExecutionHistoryResponse"
  buildMessage :: GetWorkflowExecutionHistoryResponse -> Builder
buildMessage
    = \ GetWorkflowExecutionHistoryResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe History)
  GetWorkflowExecutionHistoryResponse
  GetWorkflowExecutionHistoryResponse
  (Maybe History)
  (Maybe History)
-> GetWorkflowExecutionHistoryResponse -> Maybe History
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'history") GetWorkflowExecutionHistoryResponse
_x
              of
                Maybe History
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just History
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (History -> ByteString) -> History -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          History -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage History
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                ((DataBlob -> Builder) -> Vector DataBlob -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                   (\ DataBlob
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                           ((ByteString -> Builder)
-> (DataBlob -> ByteString) -> DataBlob -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ ByteString
bs
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                              DataBlob -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage DataBlob
_v))
                   (FoldLike
  (Vector DataBlob)
  GetWorkflowExecutionHistoryResponse
  GetWorkflowExecutionHistoryResponse
  (Vector DataBlob)
  (Vector DataBlob)
-> GetWorkflowExecutionHistoryResponse -> Vector DataBlob
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'rawHistory") GetWorkflowExecutionHistoryResponse
_x))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: ByteString
_v
                        = FoldLike
  ByteString
  GetWorkflowExecutionHistoryResponse
  GetWorkflowExecutionHistoryResponse
  ByteString
  ByteString
-> GetWorkflowExecutionHistoryResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") GetWorkflowExecutionHistoryResponse
_x
                    in
                      if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
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
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               ByteString
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Bool
_v = FoldLike
  Bool
  GetWorkflowExecutionHistoryResponse
  GetWorkflowExecutionHistoryResponse
  Bool
  Bool
-> GetWorkflowExecutionHistoryResponse -> 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 @"archived") GetWorkflowExecutionHistoryResponse
_x
                       in
                         if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
32)
                               ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (\ Bool
b -> if Bool
b then Word64
1 else Word64
0) Bool
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  GetWorkflowExecutionHistoryResponse
  GetWorkflowExecutionHistoryResponse
  FieldSet
  FieldSet
-> GetWorkflowExecutionHistoryResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetWorkflowExecutionHistoryResponse
  GetWorkflowExecutionHistoryResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetWorkflowExecutionHistoryResponse FieldSet
Data.ProtoLens.unknownFields GetWorkflowExecutionHistoryResponse
_x)))))
instance Control.DeepSeq.NFData GetWorkflowExecutionHistoryResponse where
  rnf :: GetWorkflowExecutionHistoryResponse -> ()
rnf
    = \ GetWorkflowExecutionHistoryResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetWorkflowExecutionHistoryResponse -> FieldSet
_GetWorkflowExecutionHistoryResponse'_unknownFields GetWorkflowExecutionHistoryResponse
x__)
             (Maybe History -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetWorkflowExecutionHistoryResponse -> Maybe History
_GetWorkflowExecutionHistoryResponse'history GetWorkflowExecutionHistoryResponse
x__)
                (Vector DataBlob -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GetWorkflowExecutionHistoryResponse -> Vector DataBlob
_GetWorkflowExecutionHistoryResponse'rawHistory GetWorkflowExecutionHistoryResponse
x__)
                   (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (GetWorkflowExecutionHistoryResponse -> ByteString
_GetWorkflowExecutionHistoryResponse'nextPageToken GetWorkflowExecutionHistoryResponse
x__)
                      (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (GetWorkflowExecutionHistoryResponse -> Bool
_GetWorkflowExecutionHistoryResponse'archived GetWorkflowExecutionHistoryResponse
x__) ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' GetWorkflowExecutionHistoryReverseRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.execution' @:: Lens' GetWorkflowExecutionHistoryReverseRequest Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'execution' @:: Lens' GetWorkflowExecutionHistoryReverseRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maximumPageSize' @:: Lens' GetWorkflowExecutionHistoryReverseRequest Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' GetWorkflowExecutionHistoryReverseRequest Data.ByteString.ByteString@ -}
data GetWorkflowExecutionHistoryReverseRequest
  = GetWorkflowExecutionHistoryReverseRequest'_constructor {GetWorkflowExecutionHistoryReverseRequest -> Text
_GetWorkflowExecutionHistoryReverseRequest'namespace :: !Data.Text.Text,
                                                            GetWorkflowExecutionHistoryReverseRequest
-> Maybe WorkflowExecution
_GetWorkflowExecutionHistoryReverseRequest'execution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                            GetWorkflowExecutionHistoryReverseRequest -> Int32
_GetWorkflowExecutionHistoryReverseRequest'maximumPageSize :: !Data.Int.Int32,
                                                            GetWorkflowExecutionHistoryReverseRequest -> ByteString
_GetWorkflowExecutionHistoryReverseRequest'nextPageToken :: !Data.ByteString.ByteString,
                                                            GetWorkflowExecutionHistoryReverseRequest -> FieldSet
_GetWorkflowExecutionHistoryReverseRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Bool
(GetWorkflowExecutionHistoryReverseRequest
 -> GetWorkflowExecutionHistoryReverseRequest -> Bool)
-> (GetWorkflowExecutionHistoryReverseRequest
    -> GetWorkflowExecutionHistoryReverseRequest -> Bool)
-> Eq GetWorkflowExecutionHistoryReverseRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Bool
== :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Bool
$c/= :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Bool
/= :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Bool
Prelude.Eq, Eq GetWorkflowExecutionHistoryReverseRequest
Eq GetWorkflowExecutionHistoryReverseRequest =>
(GetWorkflowExecutionHistoryReverseRequest
 -> GetWorkflowExecutionHistoryReverseRequest -> Ordering)
-> (GetWorkflowExecutionHistoryReverseRequest
    -> GetWorkflowExecutionHistoryReverseRequest -> Bool)
-> (GetWorkflowExecutionHistoryReverseRequest
    -> GetWorkflowExecutionHistoryReverseRequest -> Bool)
-> (GetWorkflowExecutionHistoryReverseRequest
    -> GetWorkflowExecutionHistoryReverseRequest -> Bool)
-> (GetWorkflowExecutionHistoryReverseRequest
    -> GetWorkflowExecutionHistoryReverseRequest -> Bool)
-> (GetWorkflowExecutionHistoryReverseRequest
    -> GetWorkflowExecutionHistoryReverseRequest
    -> GetWorkflowExecutionHistoryReverseRequest)
-> (GetWorkflowExecutionHistoryReverseRequest
    -> GetWorkflowExecutionHistoryReverseRequest
    -> GetWorkflowExecutionHistoryReverseRequest)
-> Ord GetWorkflowExecutionHistoryReverseRequest
GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Bool
GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Ordering
GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest
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 :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Ordering
compare :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Ordering
$c< :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Bool
< :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Bool
$c<= :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Bool
<= :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Bool
$c> :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Bool
> :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Bool
$c>= :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Bool
>= :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest -> Bool
$cmax :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest
max :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest
$cmin :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest
min :: GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest
-> GetWorkflowExecutionHistoryReverseRequest
Prelude.Ord)
instance Prelude.Show GetWorkflowExecutionHistoryReverseRequest where
  showsPrec :: Int -> GetWorkflowExecutionHistoryReverseRequest -> ShowS
showsPrec Int
_ GetWorkflowExecutionHistoryReverseRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetWorkflowExecutionHistoryReverseRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetWorkflowExecutionHistoryReverseRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryReverseRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> GetWorkflowExecutionHistoryReverseRequest
-> f GetWorkflowExecutionHistoryReverseRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> GetWorkflowExecutionHistoryReverseRequest
 -> f GetWorkflowExecutionHistoryReverseRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> GetWorkflowExecutionHistoryReverseRequest
-> f GetWorkflowExecutionHistoryReverseRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryReverseRequest -> Text)
-> (GetWorkflowExecutionHistoryReverseRequest
    -> Text -> GetWorkflowExecutionHistoryReverseRequest)
-> Lens
     GetWorkflowExecutionHistoryReverseRequest
     GetWorkflowExecutionHistoryReverseRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryReverseRequest -> Text
_GetWorkflowExecutionHistoryReverseRequest'namespace
           (\ GetWorkflowExecutionHistoryReverseRequest
x__ Text
y__
              -> GetWorkflowExecutionHistoryReverseRequest
x__
                   {_GetWorkflowExecutionHistoryReverseRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryReverseRequest "execution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "execution"
-> (WorkflowExecution -> f WorkflowExecution)
-> GetWorkflowExecutionHistoryReverseRequest
-> f GetWorkflowExecutionHistoryReverseRequest
fieldOf Proxy# "execution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> GetWorkflowExecutionHistoryReverseRequest
 -> f GetWorkflowExecutionHistoryReverseRequest)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> GetWorkflowExecutionHistoryReverseRequest
-> f GetWorkflowExecutionHistoryReverseRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryReverseRequest
 -> Maybe WorkflowExecution)
-> (GetWorkflowExecutionHistoryReverseRequest
    -> Maybe WorkflowExecution
    -> GetWorkflowExecutionHistoryReverseRequest)
-> Lens
     GetWorkflowExecutionHistoryReverseRequest
     GetWorkflowExecutionHistoryReverseRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryReverseRequest
-> Maybe WorkflowExecution
_GetWorkflowExecutionHistoryReverseRequest'execution
           (\ GetWorkflowExecutionHistoryReverseRequest
x__ Maybe WorkflowExecution
y__
              -> GetWorkflowExecutionHistoryReverseRequest
x__
                   {_GetWorkflowExecutionHistoryReverseRequest'execution = y__}))
        (WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryReverseRequest "maybe'execution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'execution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> GetWorkflowExecutionHistoryReverseRequest
-> f GetWorkflowExecutionHistoryReverseRequest
fieldOf Proxy# "maybe'execution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> GetWorkflowExecutionHistoryReverseRequest
 -> f GetWorkflowExecutionHistoryReverseRequest)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> GetWorkflowExecutionHistoryReverseRequest
-> f GetWorkflowExecutionHistoryReverseRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryReverseRequest
 -> Maybe WorkflowExecution)
-> (GetWorkflowExecutionHistoryReverseRequest
    -> Maybe WorkflowExecution
    -> GetWorkflowExecutionHistoryReverseRequest)
-> Lens
     GetWorkflowExecutionHistoryReverseRequest
     GetWorkflowExecutionHistoryReverseRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryReverseRequest
-> Maybe WorkflowExecution
_GetWorkflowExecutionHistoryReverseRequest'execution
           (\ GetWorkflowExecutionHistoryReverseRequest
x__ Maybe WorkflowExecution
y__
              -> GetWorkflowExecutionHistoryReverseRequest
x__
                   {_GetWorkflowExecutionHistoryReverseRequest'execution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryReverseRequest "maximumPageSize" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maximumPageSize"
-> (Int32 -> f Int32)
-> GetWorkflowExecutionHistoryReverseRequest
-> f GetWorkflowExecutionHistoryReverseRequest
fieldOf Proxy# "maximumPageSize"
_
    = ((Int32 -> f Int32)
 -> GetWorkflowExecutionHistoryReverseRequest
 -> f GetWorkflowExecutionHistoryReverseRequest)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> GetWorkflowExecutionHistoryReverseRequest
-> f GetWorkflowExecutionHistoryReverseRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryReverseRequest -> Int32)
-> (GetWorkflowExecutionHistoryReverseRequest
    -> Int32 -> GetWorkflowExecutionHistoryReverseRequest)
-> Lens
     GetWorkflowExecutionHistoryReverseRequest
     GetWorkflowExecutionHistoryReverseRequest
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryReverseRequest -> Int32
_GetWorkflowExecutionHistoryReverseRequest'maximumPageSize
           (\ GetWorkflowExecutionHistoryReverseRequest
x__ Int32
y__
              -> GetWorkflowExecutionHistoryReverseRequest
x__
                   {_GetWorkflowExecutionHistoryReverseRequest'maximumPageSize = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryReverseRequest "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> GetWorkflowExecutionHistoryReverseRequest
-> f GetWorkflowExecutionHistoryReverseRequest
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> GetWorkflowExecutionHistoryReverseRequest
 -> f GetWorkflowExecutionHistoryReverseRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> GetWorkflowExecutionHistoryReverseRequest
-> f GetWorkflowExecutionHistoryReverseRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryReverseRequest -> ByteString)
-> (GetWorkflowExecutionHistoryReverseRequest
    -> ByteString -> GetWorkflowExecutionHistoryReverseRequest)
-> Lens
     GetWorkflowExecutionHistoryReverseRequest
     GetWorkflowExecutionHistoryReverseRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryReverseRequest -> ByteString
_GetWorkflowExecutionHistoryReverseRequest'nextPageToken
           (\ GetWorkflowExecutionHistoryReverseRequest
x__ ByteString
y__
              -> GetWorkflowExecutionHistoryReverseRequest
x__
                   {_GetWorkflowExecutionHistoryReverseRequest'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetWorkflowExecutionHistoryReverseRequest where
  messageName :: Proxy GetWorkflowExecutionHistoryReverseRequest -> Text
messageName Proxy GetWorkflowExecutionHistoryReverseRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetWorkflowExecutionHistoryReverseRequest"
  packedMessageDescriptor :: Proxy GetWorkflowExecutionHistoryReverseRequest -> ByteString
packedMessageDescriptor Proxy GetWorkflowExecutionHistoryReverseRequest
_
    = ByteString
"\n\
      \)GetWorkflowExecutionHistoryReverseRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2G\n\
      \\texecution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\texecution\DC2*\n\
      \\DC1maximum_page_size\CAN\ETX \SOH(\ENQR\SImaximumPageSize\DC2&\n\
      \\SInext_page_token\CAN\EOT \SOH(\fR\rnextPageToken"
  packedFileDescriptor :: Proxy GetWorkflowExecutionHistoryReverseRequest -> ByteString
packedFileDescriptor Proxy GetWorkflowExecutionHistoryReverseRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor GetWorkflowExecutionHistoryReverseRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryReverseRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor GetWorkflowExecutionHistoryReverseRequest Text
-> FieldDescriptor GetWorkflowExecutionHistoryReverseRequest
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
     GetWorkflowExecutionHistoryReverseRequest
     GetWorkflowExecutionHistoryReverseRequest
     Text
     Text
-> FieldAccessor GetWorkflowExecutionHistoryReverseRequest 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 GetWorkflowExecutionHistoryReverseRequest
        execution__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryReverseRequest
execution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     GetWorkflowExecutionHistoryReverseRequest WorkflowExecution
-> FieldDescriptor GetWorkflowExecutionHistoryReverseRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"execution"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
              (Lens
  GetWorkflowExecutionHistoryReverseRequest
  GetWorkflowExecutionHistoryReverseRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     GetWorkflowExecutionHistoryReverseRequest WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'execution")) ::
              Data.ProtoLens.FieldDescriptor GetWorkflowExecutionHistoryReverseRequest
        maximumPageSize__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryReverseRequest
maximumPageSize__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor GetWorkflowExecutionHistoryReverseRequest Int32
-> FieldDescriptor GetWorkflowExecutionHistoryReverseRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"maximum_page_size"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     GetWorkflowExecutionHistoryReverseRequest
     GetWorkflowExecutionHistoryReverseRequest
     Int32
     Int32
-> FieldAccessor GetWorkflowExecutionHistoryReverseRequest Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maximumPageSize")) ::
              Data.ProtoLens.FieldDescriptor GetWorkflowExecutionHistoryReverseRequest
        nextPageToken__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryReverseRequest
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor
     GetWorkflowExecutionHistoryReverseRequest ByteString
-> FieldDescriptor GetWorkflowExecutionHistoryReverseRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     GetWorkflowExecutionHistoryReverseRequest
     GetWorkflowExecutionHistoryReverseRequest
     ByteString
     ByteString
-> FieldAccessor
     GetWorkflowExecutionHistoryReverseRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor GetWorkflowExecutionHistoryReverseRequest
      in
        [(Tag, FieldDescriptor GetWorkflowExecutionHistoryReverseRequest)]
-> Map
     Tag (FieldDescriptor GetWorkflowExecutionHistoryReverseRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetWorkflowExecutionHistoryReverseRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor GetWorkflowExecutionHistoryReverseRequest
execution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor GetWorkflowExecutionHistoryReverseRequest
maximumPageSize__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor GetWorkflowExecutionHistoryReverseRequest
nextPageToken__field_descriptor)]
  unknownFields :: Lens' GetWorkflowExecutionHistoryReverseRequest FieldSet
unknownFields
    = (GetWorkflowExecutionHistoryReverseRequest -> FieldSet)
-> (GetWorkflowExecutionHistoryReverseRequest
    -> FieldSet -> GetWorkflowExecutionHistoryReverseRequest)
-> Lens' GetWorkflowExecutionHistoryReverseRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetWorkflowExecutionHistoryReverseRequest -> FieldSet
_GetWorkflowExecutionHistoryReverseRequest'_unknownFields
        (\ GetWorkflowExecutionHistoryReverseRequest
x__ FieldSet
y__
           -> GetWorkflowExecutionHistoryReverseRequest
x__
                {_GetWorkflowExecutionHistoryReverseRequest'_unknownFields = y__})
  defMessage :: GetWorkflowExecutionHistoryReverseRequest
defMessage
    = GetWorkflowExecutionHistoryReverseRequest'_constructor
        {_GetWorkflowExecutionHistoryReverseRequest'namespace :: Text
_GetWorkflowExecutionHistoryReverseRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkflowExecutionHistoryReverseRequest'execution :: Maybe WorkflowExecution
_GetWorkflowExecutionHistoryReverseRequest'execution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _GetWorkflowExecutionHistoryReverseRequest'maximumPageSize :: Int32
_GetWorkflowExecutionHistoryReverseRequest'maximumPageSize = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkflowExecutionHistoryReverseRequest'nextPageToken :: ByteString
_GetWorkflowExecutionHistoryReverseRequest'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkflowExecutionHistoryReverseRequest'_unknownFields :: FieldSet
_GetWorkflowExecutionHistoryReverseRequest'_unknownFields = []}
  parseMessage :: Parser GetWorkflowExecutionHistoryReverseRequest
parseMessage
    = let
        loop ::
          GetWorkflowExecutionHistoryReverseRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser GetWorkflowExecutionHistoryReverseRequest
        loop :: GetWorkflowExecutionHistoryReverseRequest
-> Parser GetWorkflowExecutionHistoryReverseRequest
loop GetWorkflowExecutionHistoryReverseRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"execution"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"execution") y x)
                        Word64
24
                          -> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"maximum_page_size"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"maximumPageSize") y x)
                        Word64
34
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") 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 GetWorkflowExecutionHistoryReverseRequest
-> String -> Parser GetWorkflowExecutionHistoryReverseRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GetWorkflowExecutionHistoryReverseRequest
-> Parser GetWorkflowExecutionHistoryReverseRequest
loop GetWorkflowExecutionHistoryReverseRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"GetWorkflowExecutionHistoryReverseRequest"
  buildMessage :: GetWorkflowExecutionHistoryReverseRequest -> Builder
buildMessage
    = \ GetWorkflowExecutionHistoryReverseRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  GetWorkflowExecutionHistoryReverseRequest
  GetWorkflowExecutionHistoryReverseRequest
  Text
  Text
-> GetWorkflowExecutionHistoryReverseRequest -> 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") GetWorkflowExecutionHistoryReverseRequest
_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 WorkflowExecution)
  GetWorkflowExecutionHistoryReverseRequest
  GetWorkflowExecutionHistoryReverseRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> GetWorkflowExecutionHistoryReverseRequest
-> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'execution") GetWorkflowExecutionHistoryReverseRequest
_x
                 of
                   Maybe WorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just WorkflowExecution
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Int32
_v
                        = FoldLike
  Int32
  GetWorkflowExecutionHistoryReverseRequest
  GetWorkflowExecutionHistoryReverseRequest
  Int32
  Int32
-> GetWorkflowExecutionHistoryReverseRequest -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maximumPageSize") GetWorkflowExecutionHistoryReverseRequest
_x
                    in
                      if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
24)
                            ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: ByteString
_v
                           = FoldLike
  ByteString
  GetWorkflowExecutionHistoryReverseRequest
  GetWorkflowExecutionHistoryReverseRequest
  ByteString
  ByteString
-> GetWorkflowExecutionHistoryReverseRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") GetWorkflowExecutionHistoryReverseRequest
_x
                       in
                         if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
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
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  ByteString
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  GetWorkflowExecutionHistoryReverseRequest
  GetWorkflowExecutionHistoryReverseRequest
  FieldSet
  FieldSet
-> GetWorkflowExecutionHistoryReverseRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetWorkflowExecutionHistoryReverseRequest
  GetWorkflowExecutionHistoryReverseRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetWorkflowExecutionHistoryReverseRequest FieldSet
Data.ProtoLens.unknownFields GetWorkflowExecutionHistoryReverseRequest
_x)))))
instance Control.DeepSeq.NFData GetWorkflowExecutionHistoryReverseRequest where
  rnf :: GetWorkflowExecutionHistoryReverseRequest -> ()
rnf
    = \ GetWorkflowExecutionHistoryReverseRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetWorkflowExecutionHistoryReverseRequest -> FieldSet
_GetWorkflowExecutionHistoryReverseRequest'_unknownFields GetWorkflowExecutionHistoryReverseRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetWorkflowExecutionHistoryReverseRequest -> Text
_GetWorkflowExecutionHistoryReverseRequest'namespace GetWorkflowExecutionHistoryReverseRequest
x__)
                (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GetWorkflowExecutionHistoryReverseRequest
-> Maybe WorkflowExecution
_GetWorkflowExecutionHistoryReverseRequest'execution GetWorkflowExecutionHistoryReverseRequest
x__)
                   (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (GetWorkflowExecutionHistoryReverseRequest -> Int32
_GetWorkflowExecutionHistoryReverseRequest'maximumPageSize GetWorkflowExecutionHistoryReverseRequest
x__)
                      (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (GetWorkflowExecutionHistoryReverseRequest -> ByteString
_GetWorkflowExecutionHistoryReverseRequest'nextPageToken GetWorkflowExecutionHistoryReverseRequest
x__)
                         ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.history' @:: Lens' GetWorkflowExecutionHistoryReverseResponse Proto.Temporal.Api.History.V1.Message.History@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'history' @:: Lens' GetWorkflowExecutionHistoryReverseResponse (Prelude.Maybe Proto.Temporal.Api.History.V1.Message.History)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' GetWorkflowExecutionHistoryReverseResponse Data.ByteString.ByteString@ -}
data GetWorkflowExecutionHistoryReverseResponse
  = GetWorkflowExecutionHistoryReverseResponse'_constructor {GetWorkflowExecutionHistoryReverseResponse -> Maybe History
_GetWorkflowExecutionHistoryReverseResponse'history :: !(Prelude.Maybe Proto.Temporal.Api.History.V1.Message.History),
                                                             GetWorkflowExecutionHistoryReverseResponse -> ByteString
_GetWorkflowExecutionHistoryReverseResponse'nextPageToken :: !Data.ByteString.ByteString,
                                                             GetWorkflowExecutionHistoryReverseResponse -> FieldSet
_GetWorkflowExecutionHistoryReverseResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Bool
(GetWorkflowExecutionHistoryReverseResponse
 -> GetWorkflowExecutionHistoryReverseResponse -> Bool)
-> (GetWorkflowExecutionHistoryReverseResponse
    -> GetWorkflowExecutionHistoryReverseResponse -> Bool)
-> Eq GetWorkflowExecutionHistoryReverseResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Bool
== :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Bool
$c/= :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Bool
/= :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Bool
Prelude.Eq, Eq GetWorkflowExecutionHistoryReverseResponse
Eq GetWorkflowExecutionHistoryReverseResponse =>
(GetWorkflowExecutionHistoryReverseResponse
 -> GetWorkflowExecutionHistoryReverseResponse -> Ordering)
-> (GetWorkflowExecutionHistoryReverseResponse
    -> GetWorkflowExecutionHistoryReverseResponse -> Bool)
-> (GetWorkflowExecutionHistoryReverseResponse
    -> GetWorkflowExecutionHistoryReverseResponse -> Bool)
-> (GetWorkflowExecutionHistoryReverseResponse
    -> GetWorkflowExecutionHistoryReverseResponse -> Bool)
-> (GetWorkflowExecutionHistoryReverseResponse
    -> GetWorkflowExecutionHistoryReverseResponse -> Bool)
-> (GetWorkflowExecutionHistoryReverseResponse
    -> GetWorkflowExecutionHistoryReverseResponse
    -> GetWorkflowExecutionHistoryReverseResponse)
-> (GetWorkflowExecutionHistoryReverseResponse
    -> GetWorkflowExecutionHistoryReverseResponse
    -> GetWorkflowExecutionHistoryReverseResponse)
-> Ord GetWorkflowExecutionHistoryReverseResponse
GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Bool
GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Ordering
GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse
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 :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Ordering
compare :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Ordering
$c< :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Bool
< :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Bool
$c<= :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Bool
<= :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Bool
$c> :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Bool
> :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Bool
$c>= :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Bool
>= :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse -> Bool
$cmax :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse
max :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse
$cmin :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse
min :: GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse
-> GetWorkflowExecutionHistoryReverseResponse
Prelude.Ord)
instance Prelude.Show GetWorkflowExecutionHistoryReverseResponse where
  showsPrec :: Int -> GetWorkflowExecutionHistoryReverseResponse -> ShowS
showsPrec Int
_ GetWorkflowExecutionHistoryReverseResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (GetWorkflowExecutionHistoryReverseResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort GetWorkflowExecutionHistoryReverseResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryReverseResponse "history" Proto.Temporal.Api.History.V1.Message.History where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "history"
-> (History -> f History)
-> GetWorkflowExecutionHistoryReverseResponse
-> f GetWorkflowExecutionHistoryReverseResponse
fieldOf Proxy# "history"
_
    = ((Maybe History -> f (Maybe History))
 -> GetWorkflowExecutionHistoryReverseResponse
 -> f GetWorkflowExecutionHistoryReverseResponse)
-> ((History -> f History) -> Maybe History -> f (Maybe History))
-> (History -> f History)
-> GetWorkflowExecutionHistoryReverseResponse
-> f GetWorkflowExecutionHistoryReverseResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryReverseResponse -> Maybe History)
-> (GetWorkflowExecutionHistoryReverseResponse
    -> Maybe History -> GetWorkflowExecutionHistoryReverseResponse)
-> Lens
     GetWorkflowExecutionHistoryReverseResponse
     GetWorkflowExecutionHistoryReverseResponse
     (Maybe History)
     (Maybe History)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryReverseResponse -> Maybe History
_GetWorkflowExecutionHistoryReverseResponse'history
           (\ GetWorkflowExecutionHistoryReverseResponse
x__ Maybe History
y__
              -> GetWorkflowExecutionHistoryReverseResponse
x__
                   {_GetWorkflowExecutionHistoryReverseResponse'history = y__}))
        (History -> Lens' (Maybe History) History
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens History
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryReverseResponse "maybe'history" (Prelude.Maybe Proto.Temporal.Api.History.V1.Message.History) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'history"
-> (Maybe History -> f (Maybe History))
-> GetWorkflowExecutionHistoryReverseResponse
-> f GetWorkflowExecutionHistoryReverseResponse
fieldOf Proxy# "maybe'history"
_
    = ((Maybe History -> f (Maybe History))
 -> GetWorkflowExecutionHistoryReverseResponse
 -> f GetWorkflowExecutionHistoryReverseResponse)
-> ((Maybe History -> f (Maybe History))
    -> Maybe History -> f (Maybe History))
-> (Maybe History -> f (Maybe History))
-> GetWorkflowExecutionHistoryReverseResponse
-> f GetWorkflowExecutionHistoryReverseResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryReverseResponse -> Maybe History)
-> (GetWorkflowExecutionHistoryReverseResponse
    -> Maybe History -> GetWorkflowExecutionHistoryReverseResponse)
-> Lens
     GetWorkflowExecutionHistoryReverseResponse
     GetWorkflowExecutionHistoryReverseResponse
     (Maybe History)
     (Maybe History)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryReverseResponse -> Maybe History
_GetWorkflowExecutionHistoryReverseResponse'history
           (\ GetWorkflowExecutionHistoryReverseResponse
x__ Maybe History
y__
              -> GetWorkflowExecutionHistoryReverseResponse
x__
                   {_GetWorkflowExecutionHistoryReverseResponse'history = y__}))
        (Maybe History -> f (Maybe History))
-> Maybe History -> f (Maybe History)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField GetWorkflowExecutionHistoryReverseResponse "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> GetWorkflowExecutionHistoryReverseResponse
-> f GetWorkflowExecutionHistoryReverseResponse
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> GetWorkflowExecutionHistoryReverseResponse
 -> f GetWorkflowExecutionHistoryReverseResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> GetWorkflowExecutionHistoryReverseResponse
-> f GetWorkflowExecutionHistoryReverseResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((GetWorkflowExecutionHistoryReverseResponse -> ByteString)
-> (GetWorkflowExecutionHistoryReverseResponse
    -> ByteString -> GetWorkflowExecutionHistoryReverseResponse)
-> Lens
     GetWorkflowExecutionHistoryReverseResponse
     GetWorkflowExecutionHistoryReverseResponse
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           GetWorkflowExecutionHistoryReverseResponse -> ByteString
_GetWorkflowExecutionHistoryReverseResponse'nextPageToken
           (\ GetWorkflowExecutionHistoryReverseResponse
x__ ByteString
y__
              -> GetWorkflowExecutionHistoryReverseResponse
x__
                   {_GetWorkflowExecutionHistoryReverseResponse'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message GetWorkflowExecutionHistoryReverseResponse where
  messageName :: Proxy GetWorkflowExecutionHistoryReverseResponse -> Text
messageName Proxy GetWorkflowExecutionHistoryReverseResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.GetWorkflowExecutionHistoryReverseResponse"
  packedMessageDescriptor :: Proxy GetWorkflowExecutionHistoryReverseResponse -> ByteString
packedMessageDescriptor Proxy GetWorkflowExecutionHistoryReverseResponse
_
    = ByteString
"\n\
      \*GetWorkflowExecutionHistoryReverseResponse\DC2:\n\
      \\ahistory\CAN\SOH \SOH(\v2 .temporal.api.history.v1.HistoryR\ahistory\DC2&\n\
      \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken"
  packedFileDescriptor :: Proxy GetWorkflowExecutionHistoryReverseResponse -> ByteString
packedFileDescriptor Proxy GetWorkflowExecutionHistoryReverseResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor GetWorkflowExecutionHistoryReverseResponse)
fieldsByTag
    = let
        history__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryReverseResponse
history__field_descriptor
          = String
-> FieldTypeDescriptor History
-> FieldAccessor GetWorkflowExecutionHistoryReverseResponse History
-> FieldDescriptor GetWorkflowExecutionHistoryReverseResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"history"
              (MessageOrGroup -> FieldTypeDescriptor History
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.History.V1.Message.History)
              (Lens
  GetWorkflowExecutionHistoryReverseResponse
  GetWorkflowExecutionHistoryReverseResponse
  (Maybe History)
  (Maybe History)
-> FieldAccessor GetWorkflowExecutionHistoryReverseResponse History
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'history")) ::
              Data.ProtoLens.FieldDescriptor GetWorkflowExecutionHistoryReverseResponse
        nextPageToken__field_descriptor :: FieldDescriptor GetWorkflowExecutionHistoryReverseResponse
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor
     GetWorkflowExecutionHistoryReverseResponse ByteString
-> FieldDescriptor GetWorkflowExecutionHistoryReverseResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     GetWorkflowExecutionHistoryReverseResponse
     GetWorkflowExecutionHistoryReverseResponse
     ByteString
     ByteString
-> FieldAccessor
     GetWorkflowExecutionHistoryReverseResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor GetWorkflowExecutionHistoryReverseResponse
      in
        [(Tag, FieldDescriptor GetWorkflowExecutionHistoryReverseResponse)]
-> Map
     Tag (FieldDescriptor GetWorkflowExecutionHistoryReverseResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor GetWorkflowExecutionHistoryReverseResponse
history__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor GetWorkflowExecutionHistoryReverseResponse
nextPageToken__field_descriptor)]
  unknownFields :: Lens' GetWorkflowExecutionHistoryReverseResponse FieldSet
unknownFields
    = (GetWorkflowExecutionHistoryReverseResponse -> FieldSet)
-> (GetWorkflowExecutionHistoryReverseResponse
    -> FieldSet -> GetWorkflowExecutionHistoryReverseResponse)
-> Lens' GetWorkflowExecutionHistoryReverseResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        GetWorkflowExecutionHistoryReverseResponse -> FieldSet
_GetWorkflowExecutionHistoryReverseResponse'_unknownFields
        (\ GetWorkflowExecutionHistoryReverseResponse
x__ FieldSet
y__
           -> GetWorkflowExecutionHistoryReverseResponse
x__
                {_GetWorkflowExecutionHistoryReverseResponse'_unknownFields = y__})
  defMessage :: GetWorkflowExecutionHistoryReverseResponse
defMessage
    = GetWorkflowExecutionHistoryReverseResponse'_constructor
        {_GetWorkflowExecutionHistoryReverseResponse'history :: Maybe History
_GetWorkflowExecutionHistoryReverseResponse'history = Maybe History
forall a. Maybe a
Prelude.Nothing,
         _GetWorkflowExecutionHistoryReverseResponse'nextPageToken :: ByteString
_GetWorkflowExecutionHistoryReverseResponse'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _GetWorkflowExecutionHistoryReverseResponse'_unknownFields :: FieldSet
_GetWorkflowExecutionHistoryReverseResponse'_unknownFields = []}
  parseMessage :: Parser GetWorkflowExecutionHistoryReverseResponse
parseMessage
    = let
        loop ::
          GetWorkflowExecutionHistoryReverseResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser GetWorkflowExecutionHistoryReverseResponse
        loop :: GetWorkflowExecutionHistoryReverseResponse
-> Parser GetWorkflowExecutionHistoryReverseResponse
loop GetWorkflowExecutionHistoryReverseResponse
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 History -> String -> Parser History
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"history"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"history") y x)
                        Word64
26
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") 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 GetWorkflowExecutionHistoryReverseResponse
-> String -> Parser GetWorkflowExecutionHistoryReverseResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do GetWorkflowExecutionHistoryReverseResponse
-> Parser GetWorkflowExecutionHistoryReverseResponse
loop GetWorkflowExecutionHistoryReverseResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"GetWorkflowExecutionHistoryReverseResponse"
  buildMessage :: GetWorkflowExecutionHistoryReverseResponse -> Builder
buildMessage
    = \ GetWorkflowExecutionHistoryReverseResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe History)
  GetWorkflowExecutionHistoryReverseResponse
  GetWorkflowExecutionHistoryReverseResponse
  (Maybe History)
  (Maybe History)
-> GetWorkflowExecutionHistoryReverseResponse -> Maybe History
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'history") GetWorkflowExecutionHistoryReverseResponse
_x
              of
                Maybe History
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just History
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (History -> ByteString) -> History -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          History -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage History
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: ByteString
_v
                     = FoldLike
  ByteString
  GetWorkflowExecutionHistoryReverseResponse
  GetWorkflowExecutionHistoryReverseResponse
  ByteString
  ByteString
-> GetWorkflowExecutionHistoryReverseResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") GetWorkflowExecutionHistoryReverseResponse
_x
                 in
                   if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
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
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            ByteString
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  GetWorkflowExecutionHistoryReverseResponse
  GetWorkflowExecutionHistoryReverseResponse
  FieldSet
  FieldSet
-> GetWorkflowExecutionHistoryReverseResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  GetWorkflowExecutionHistoryReverseResponse
  GetWorkflowExecutionHistoryReverseResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' GetWorkflowExecutionHistoryReverseResponse FieldSet
Data.ProtoLens.unknownFields GetWorkflowExecutionHistoryReverseResponse
_x)))
instance Control.DeepSeq.NFData GetWorkflowExecutionHistoryReverseResponse where
  rnf :: GetWorkflowExecutionHistoryReverseResponse -> ()
rnf
    = \ GetWorkflowExecutionHistoryReverseResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (GetWorkflowExecutionHistoryReverseResponse -> FieldSet
_GetWorkflowExecutionHistoryReverseResponse'_unknownFields GetWorkflowExecutionHistoryReverseResponse
x__)
             (Maybe History -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (GetWorkflowExecutionHistoryReverseResponse -> Maybe History
_GetWorkflowExecutionHistoryReverseResponse'history GetWorkflowExecutionHistoryReverseResponse
x__)
                (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (GetWorkflowExecutionHistoryReverseResponse -> ByteString
_GetWorkflowExecutionHistoryReverseResponse'nextPageToken GetWorkflowExecutionHistoryReverseResponse
x__)
                   ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' ListArchivedWorkflowExecutionsRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.pageSize' @:: Lens' ListArchivedWorkflowExecutionsRequest Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ListArchivedWorkflowExecutionsRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.query' @:: Lens' ListArchivedWorkflowExecutionsRequest Data.Text.Text@ -}
data ListArchivedWorkflowExecutionsRequest
  = ListArchivedWorkflowExecutionsRequest'_constructor {ListArchivedWorkflowExecutionsRequest -> Text
_ListArchivedWorkflowExecutionsRequest'namespace :: !Data.Text.Text,
                                                        ListArchivedWorkflowExecutionsRequest -> Int32
_ListArchivedWorkflowExecutionsRequest'pageSize :: !Data.Int.Int32,
                                                        ListArchivedWorkflowExecutionsRequest -> ByteString
_ListArchivedWorkflowExecutionsRequest'nextPageToken :: !Data.ByteString.ByteString,
                                                        ListArchivedWorkflowExecutionsRequest -> Text
_ListArchivedWorkflowExecutionsRequest'query :: !Data.Text.Text,
                                                        ListArchivedWorkflowExecutionsRequest -> FieldSet
_ListArchivedWorkflowExecutionsRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Bool
(ListArchivedWorkflowExecutionsRequest
 -> ListArchivedWorkflowExecutionsRequest -> Bool)
-> (ListArchivedWorkflowExecutionsRequest
    -> ListArchivedWorkflowExecutionsRequest -> Bool)
-> Eq ListArchivedWorkflowExecutionsRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Bool
== :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Bool
$c/= :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Bool
/= :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Bool
Prelude.Eq, Eq ListArchivedWorkflowExecutionsRequest
Eq ListArchivedWorkflowExecutionsRequest =>
(ListArchivedWorkflowExecutionsRequest
 -> ListArchivedWorkflowExecutionsRequest -> Ordering)
-> (ListArchivedWorkflowExecutionsRequest
    -> ListArchivedWorkflowExecutionsRequest -> Bool)
-> (ListArchivedWorkflowExecutionsRequest
    -> ListArchivedWorkflowExecutionsRequest -> Bool)
-> (ListArchivedWorkflowExecutionsRequest
    -> ListArchivedWorkflowExecutionsRequest -> Bool)
-> (ListArchivedWorkflowExecutionsRequest
    -> ListArchivedWorkflowExecutionsRequest -> Bool)
-> (ListArchivedWorkflowExecutionsRequest
    -> ListArchivedWorkflowExecutionsRequest
    -> ListArchivedWorkflowExecutionsRequest)
-> (ListArchivedWorkflowExecutionsRequest
    -> ListArchivedWorkflowExecutionsRequest
    -> ListArchivedWorkflowExecutionsRequest)
-> Ord ListArchivedWorkflowExecutionsRequest
ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Bool
ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Ordering
ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest
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 :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Ordering
compare :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Ordering
$c< :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Bool
< :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Bool
$c<= :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Bool
<= :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Bool
$c> :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Bool
> :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Bool
$c>= :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Bool
>= :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest -> Bool
$cmax :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest
max :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest
$cmin :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest
min :: ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest
-> ListArchivedWorkflowExecutionsRequest
Prelude.Ord)
instance Prelude.Show ListArchivedWorkflowExecutionsRequest where
  showsPrec :: Int -> ListArchivedWorkflowExecutionsRequest -> ShowS
showsPrec Int
_ ListArchivedWorkflowExecutionsRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListArchivedWorkflowExecutionsRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListArchivedWorkflowExecutionsRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListArchivedWorkflowExecutionsRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ListArchivedWorkflowExecutionsRequest
-> f ListArchivedWorkflowExecutionsRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ListArchivedWorkflowExecutionsRequest
 -> f ListArchivedWorkflowExecutionsRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ListArchivedWorkflowExecutionsRequest
-> f ListArchivedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListArchivedWorkflowExecutionsRequest -> Text)
-> (ListArchivedWorkflowExecutionsRequest
    -> Text -> ListArchivedWorkflowExecutionsRequest)
-> Lens
     ListArchivedWorkflowExecutionsRequest
     ListArchivedWorkflowExecutionsRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListArchivedWorkflowExecutionsRequest -> Text
_ListArchivedWorkflowExecutionsRequest'namespace
           (\ ListArchivedWorkflowExecutionsRequest
x__ Text
y__
              -> ListArchivedWorkflowExecutionsRequest
x__ {_ListArchivedWorkflowExecutionsRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListArchivedWorkflowExecutionsRequest "pageSize" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "pageSize"
-> (Int32 -> f Int32)
-> ListArchivedWorkflowExecutionsRequest
-> f ListArchivedWorkflowExecutionsRequest
fieldOf Proxy# "pageSize"
_
    = ((Int32 -> f Int32)
 -> ListArchivedWorkflowExecutionsRequest
 -> f ListArchivedWorkflowExecutionsRequest)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ListArchivedWorkflowExecutionsRequest
-> f ListArchivedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListArchivedWorkflowExecutionsRequest -> Int32)
-> (ListArchivedWorkflowExecutionsRequest
    -> Int32 -> ListArchivedWorkflowExecutionsRequest)
-> Lens
     ListArchivedWorkflowExecutionsRequest
     ListArchivedWorkflowExecutionsRequest
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListArchivedWorkflowExecutionsRequest -> Int32
_ListArchivedWorkflowExecutionsRequest'pageSize
           (\ ListArchivedWorkflowExecutionsRequest
x__ Int32
y__
              -> ListArchivedWorkflowExecutionsRequest
x__ {_ListArchivedWorkflowExecutionsRequest'pageSize = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListArchivedWorkflowExecutionsRequest "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ListArchivedWorkflowExecutionsRequest
-> f ListArchivedWorkflowExecutionsRequest
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ListArchivedWorkflowExecutionsRequest
 -> f ListArchivedWorkflowExecutionsRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ListArchivedWorkflowExecutionsRequest
-> f ListArchivedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListArchivedWorkflowExecutionsRequest -> ByteString)
-> (ListArchivedWorkflowExecutionsRequest
    -> ByteString -> ListArchivedWorkflowExecutionsRequest)
-> Lens
     ListArchivedWorkflowExecutionsRequest
     ListArchivedWorkflowExecutionsRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListArchivedWorkflowExecutionsRequest -> ByteString
_ListArchivedWorkflowExecutionsRequest'nextPageToken
           (\ ListArchivedWorkflowExecutionsRequest
x__ ByteString
y__
              -> ListArchivedWorkflowExecutionsRequest
x__
                   {_ListArchivedWorkflowExecutionsRequest'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListArchivedWorkflowExecutionsRequest "query" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "query"
-> (Text -> f Text)
-> ListArchivedWorkflowExecutionsRequest
-> f ListArchivedWorkflowExecutionsRequest
fieldOf Proxy# "query"
_
    = ((Text -> f Text)
 -> ListArchivedWorkflowExecutionsRequest
 -> f ListArchivedWorkflowExecutionsRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ListArchivedWorkflowExecutionsRequest
-> f ListArchivedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListArchivedWorkflowExecutionsRequest -> Text)
-> (ListArchivedWorkflowExecutionsRequest
    -> Text -> ListArchivedWorkflowExecutionsRequest)
-> Lens
     ListArchivedWorkflowExecutionsRequest
     ListArchivedWorkflowExecutionsRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListArchivedWorkflowExecutionsRequest -> Text
_ListArchivedWorkflowExecutionsRequest'query
           (\ ListArchivedWorkflowExecutionsRequest
x__ Text
y__
              -> ListArchivedWorkflowExecutionsRequest
x__ {_ListArchivedWorkflowExecutionsRequest'query = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListArchivedWorkflowExecutionsRequest where
  messageName :: Proxy ListArchivedWorkflowExecutionsRequest -> Text
messageName Proxy ListArchivedWorkflowExecutionsRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListArchivedWorkflowExecutionsRequest"
  packedMessageDescriptor :: Proxy ListArchivedWorkflowExecutionsRequest -> ByteString
packedMessageDescriptor Proxy ListArchivedWorkflowExecutionsRequest
_
    = ByteString
"\n\
      \%ListArchivedWorkflowExecutionsRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\ESC\n\
      \\tpage_size\CAN\STX \SOH(\ENQR\bpageSize\DC2&\n\
      \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\DC2\DC4\n\
      \\ENQquery\CAN\EOT \SOH(\tR\ENQquery"
  packedFileDescriptor :: Proxy ListArchivedWorkflowExecutionsRequest -> ByteString
packedFileDescriptor Proxy ListArchivedWorkflowExecutionsRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListArchivedWorkflowExecutionsRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor ListArchivedWorkflowExecutionsRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ListArchivedWorkflowExecutionsRequest Text
-> FieldDescriptor ListArchivedWorkflowExecutionsRequest
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
     ListArchivedWorkflowExecutionsRequest
     ListArchivedWorkflowExecutionsRequest
     Text
     Text
-> FieldAccessor ListArchivedWorkflowExecutionsRequest 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 ListArchivedWorkflowExecutionsRequest
        pageSize__field_descriptor :: FieldDescriptor ListArchivedWorkflowExecutionsRequest
pageSize__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ListArchivedWorkflowExecutionsRequest Int32
-> FieldDescriptor ListArchivedWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"page_size"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     ListArchivedWorkflowExecutionsRequest
     ListArchivedWorkflowExecutionsRequest
     Int32
     Int32
-> FieldAccessor ListArchivedWorkflowExecutionsRequest Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pageSize")) ::
              Data.ProtoLens.FieldDescriptor ListArchivedWorkflowExecutionsRequest
        nextPageToken__field_descriptor :: FieldDescriptor ListArchivedWorkflowExecutionsRequest
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ListArchivedWorkflowExecutionsRequest ByteString
-> FieldDescriptor ListArchivedWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ListArchivedWorkflowExecutionsRequest
     ListArchivedWorkflowExecutionsRequest
     ByteString
     ByteString
-> FieldAccessor ListArchivedWorkflowExecutionsRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ListArchivedWorkflowExecutionsRequest
        query__field_descriptor :: FieldDescriptor ListArchivedWorkflowExecutionsRequest
query__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ListArchivedWorkflowExecutionsRequest Text
-> FieldDescriptor ListArchivedWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"query"
              (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
     ListArchivedWorkflowExecutionsRequest
     ListArchivedWorkflowExecutionsRequest
     Text
     Text
-> FieldAccessor ListArchivedWorkflowExecutionsRequest 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 @"query")) ::
              Data.ProtoLens.FieldDescriptor ListArchivedWorkflowExecutionsRequest
      in
        [(Tag, FieldDescriptor ListArchivedWorkflowExecutionsRequest)]
-> Map Tag (FieldDescriptor ListArchivedWorkflowExecutionsRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListArchivedWorkflowExecutionsRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListArchivedWorkflowExecutionsRequest
pageSize__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ListArchivedWorkflowExecutionsRequest
nextPageToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ListArchivedWorkflowExecutionsRequest
query__field_descriptor)]
  unknownFields :: Lens' ListArchivedWorkflowExecutionsRequest FieldSet
unknownFields
    = (ListArchivedWorkflowExecutionsRequest -> FieldSet)
-> (ListArchivedWorkflowExecutionsRequest
    -> FieldSet -> ListArchivedWorkflowExecutionsRequest)
-> Lens' ListArchivedWorkflowExecutionsRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListArchivedWorkflowExecutionsRequest -> FieldSet
_ListArchivedWorkflowExecutionsRequest'_unknownFields
        (\ ListArchivedWorkflowExecutionsRequest
x__ FieldSet
y__
           -> ListArchivedWorkflowExecutionsRequest
x__
                {_ListArchivedWorkflowExecutionsRequest'_unknownFields = y__})
  defMessage :: ListArchivedWorkflowExecutionsRequest
defMessage
    = ListArchivedWorkflowExecutionsRequest'_constructor
        {_ListArchivedWorkflowExecutionsRequest'namespace :: Text
_ListArchivedWorkflowExecutionsRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListArchivedWorkflowExecutionsRequest'pageSize :: Int32
_ListArchivedWorkflowExecutionsRequest'pageSize = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListArchivedWorkflowExecutionsRequest'nextPageToken :: ByteString
_ListArchivedWorkflowExecutionsRequest'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListArchivedWorkflowExecutionsRequest'query :: Text
_ListArchivedWorkflowExecutionsRequest'query = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListArchivedWorkflowExecutionsRequest'_unknownFields :: FieldSet
_ListArchivedWorkflowExecutionsRequest'_unknownFields = []}
  parseMessage :: Parser ListArchivedWorkflowExecutionsRequest
parseMessage
    = let
        loop ::
          ListArchivedWorkflowExecutionsRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser ListArchivedWorkflowExecutionsRequest
        loop :: ListArchivedWorkflowExecutionsRequest
-> Parser ListArchivedWorkflowExecutionsRequest
loop ListArchivedWorkflowExecutionsRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
16
                          -> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"page_size"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"pageSize") y x)
                        Word64
26
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"query"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"query") 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 ListArchivedWorkflowExecutionsRequest
-> String -> Parser ListArchivedWorkflowExecutionsRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ListArchivedWorkflowExecutionsRequest
-> Parser ListArchivedWorkflowExecutionsRequest
loop ListArchivedWorkflowExecutionsRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ListArchivedWorkflowExecutionsRequest"
  buildMessage :: ListArchivedWorkflowExecutionsRequest -> Builder
buildMessage
    = \ ListArchivedWorkflowExecutionsRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ListArchivedWorkflowExecutionsRequest
  ListArchivedWorkflowExecutionsRequest
  Text
  Text
-> ListArchivedWorkflowExecutionsRequest -> 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") ListArchivedWorkflowExecutionsRequest
_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 :: Int32
_v = FoldLike
  Int32
  ListArchivedWorkflowExecutionsRequest
  ListArchivedWorkflowExecutionsRequest
  Int32
  Int32
-> ListArchivedWorkflowExecutionsRequest -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pageSize") ListArchivedWorkflowExecutionsRequest
_x
                 in
                   if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
16)
                         ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: ByteString
_v
                        = FoldLike
  ByteString
  ListArchivedWorkflowExecutionsRequest
  ListArchivedWorkflowExecutionsRequest
  ByteString
  ByteString
-> ListArchivedWorkflowExecutionsRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ListArchivedWorkflowExecutionsRequest
_x
                    in
                      if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
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
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               ByteString
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Text
_v = FoldLike
  Text
  ListArchivedWorkflowExecutionsRequest
  ListArchivedWorkflowExecutionsRequest
  Text
  Text
-> ListArchivedWorkflowExecutionsRequest -> 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 @"query") ListArchivedWorkflowExecutionsRequest
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  ListArchivedWorkflowExecutionsRequest
  ListArchivedWorkflowExecutionsRequest
  FieldSet
  FieldSet
-> ListArchivedWorkflowExecutionsRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListArchivedWorkflowExecutionsRequest
  ListArchivedWorkflowExecutionsRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListArchivedWorkflowExecutionsRequest FieldSet
Data.ProtoLens.unknownFields ListArchivedWorkflowExecutionsRequest
_x)))))
instance Control.DeepSeq.NFData ListArchivedWorkflowExecutionsRequest where
  rnf :: ListArchivedWorkflowExecutionsRequest -> ()
rnf
    = \ ListArchivedWorkflowExecutionsRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListArchivedWorkflowExecutionsRequest -> FieldSet
_ListArchivedWorkflowExecutionsRequest'_unknownFields ListArchivedWorkflowExecutionsRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListArchivedWorkflowExecutionsRequest -> Text
_ListArchivedWorkflowExecutionsRequest'namespace ListArchivedWorkflowExecutionsRequest
x__)
                (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListArchivedWorkflowExecutionsRequest -> Int32
_ListArchivedWorkflowExecutionsRequest'pageSize ListArchivedWorkflowExecutionsRequest
x__)
                   (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ListArchivedWorkflowExecutionsRequest -> ByteString
_ListArchivedWorkflowExecutionsRequest'nextPageToken ListArchivedWorkflowExecutionsRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ListArchivedWorkflowExecutionsRequest -> Text
_ListArchivedWorkflowExecutionsRequest'query ListArchivedWorkflowExecutionsRequest
x__) ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.executions' @:: Lens' ListArchivedWorkflowExecutionsResponse [Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'executions' @:: Lens' ListArchivedWorkflowExecutionsResponse (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ListArchivedWorkflowExecutionsResponse Data.ByteString.ByteString@ -}
data ListArchivedWorkflowExecutionsResponse
  = ListArchivedWorkflowExecutionsResponse'_constructor {ListArchivedWorkflowExecutionsResponse
-> Vector WorkflowExecutionInfo
_ListArchivedWorkflowExecutionsResponse'executions :: !(Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo),
                                                         ListArchivedWorkflowExecutionsResponse -> ByteString
_ListArchivedWorkflowExecutionsResponse'nextPageToken :: !Data.ByteString.ByteString,
                                                         ListArchivedWorkflowExecutionsResponse -> FieldSet
_ListArchivedWorkflowExecutionsResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Bool
(ListArchivedWorkflowExecutionsResponse
 -> ListArchivedWorkflowExecutionsResponse -> Bool)
-> (ListArchivedWorkflowExecutionsResponse
    -> ListArchivedWorkflowExecutionsResponse -> Bool)
-> Eq ListArchivedWorkflowExecutionsResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Bool
== :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Bool
$c/= :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Bool
/= :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Bool
Prelude.Eq, Eq ListArchivedWorkflowExecutionsResponse
Eq ListArchivedWorkflowExecutionsResponse =>
(ListArchivedWorkflowExecutionsResponse
 -> ListArchivedWorkflowExecutionsResponse -> Ordering)
-> (ListArchivedWorkflowExecutionsResponse
    -> ListArchivedWorkflowExecutionsResponse -> Bool)
-> (ListArchivedWorkflowExecutionsResponse
    -> ListArchivedWorkflowExecutionsResponse -> Bool)
-> (ListArchivedWorkflowExecutionsResponse
    -> ListArchivedWorkflowExecutionsResponse -> Bool)
-> (ListArchivedWorkflowExecutionsResponse
    -> ListArchivedWorkflowExecutionsResponse -> Bool)
-> (ListArchivedWorkflowExecutionsResponse
    -> ListArchivedWorkflowExecutionsResponse
    -> ListArchivedWorkflowExecutionsResponse)
-> (ListArchivedWorkflowExecutionsResponse
    -> ListArchivedWorkflowExecutionsResponse
    -> ListArchivedWorkflowExecutionsResponse)
-> Ord ListArchivedWorkflowExecutionsResponse
ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Bool
ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Ordering
ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse
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 :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Ordering
compare :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Ordering
$c< :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Bool
< :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Bool
$c<= :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Bool
<= :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Bool
$c> :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Bool
> :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Bool
$c>= :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Bool
>= :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse -> Bool
$cmax :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse
max :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse
$cmin :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse
min :: ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse
-> ListArchivedWorkflowExecutionsResponse
Prelude.Ord)
instance Prelude.Show ListArchivedWorkflowExecutionsResponse where
  showsPrec :: Int -> ListArchivedWorkflowExecutionsResponse -> ShowS
showsPrec Int
_ ListArchivedWorkflowExecutionsResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListArchivedWorkflowExecutionsResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListArchivedWorkflowExecutionsResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListArchivedWorkflowExecutionsResponse "executions" [Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "executions"
-> ([WorkflowExecutionInfo] -> f [WorkflowExecutionInfo])
-> ListArchivedWorkflowExecutionsResponse
-> f ListArchivedWorkflowExecutionsResponse
fieldOf Proxy# "executions"
_
    = ((Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo))
 -> ListArchivedWorkflowExecutionsResponse
 -> f ListArchivedWorkflowExecutionsResponse)
-> (([WorkflowExecutionInfo] -> f [WorkflowExecutionInfo])
    -> Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> ([WorkflowExecutionInfo] -> f [WorkflowExecutionInfo])
-> ListArchivedWorkflowExecutionsResponse
-> f ListArchivedWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListArchivedWorkflowExecutionsResponse
 -> Vector WorkflowExecutionInfo)
-> (ListArchivedWorkflowExecutionsResponse
    -> Vector WorkflowExecutionInfo
    -> ListArchivedWorkflowExecutionsResponse)
-> Lens
     ListArchivedWorkflowExecutionsResponse
     ListArchivedWorkflowExecutionsResponse
     (Vector WorkflowExecutionInfo)
     (Vector WorkflowExecutionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListArchivedWorkflowExecutionsResponse
-> Vector WorkflowExecutionInfo
_ListArchivedWorkflowExecutionsResponse'executions
           (\ ListArchivedWorkflowExecutionsResponse
x__ Vector WorkflowExecutionInfo
y__
              -> ListArchivedWorkflowExecutionsResponse
x__ {_ListArchivedWorkflowExecutionsResponse'executions = y__}))
        ((Vector WorkflowExecutionInfo -> [WorkflowExecutionInfo])
-> (Vector WorkflowExecutionInfo
    -> [WorkflowExecutionInfo] -> Vector WorkflowExecutionInfo)
-> Lens
     (Vector WorkflowExecutionInfo)
     (Vector WorkflowExecutionInfo)
     [WorkflowExecutionInfo]
     [WorkflowExecutionInfo]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector WorkflowExecutionInfo -> [WorkflowExecutionInfo]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector WorkflowExecutionInfo
_ [WorkflowExecutionInfo]
y__ -> [WorkflowExecutionInfo] -> Vector WorkflowExecutionInfo
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [WorkflowExecutionInfo]
y__))
instance Data.ProtoLens.Field.HasField ListArchivedWorkflowExecutionsResponse "vec'executions" (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'executions"
-> (Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> ListArchivedWorkflowExecutionsResponse
-> f ListArchivedWorkflowExecutionsResponse
fieldOf Proxy# "vec'executions"
_
    = ((Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo))
 -> ListArchivedWorkflowExecutionsResponse
 -> f ListArchivedWorkflowExecutionsResponse)
-> ((Vector WorkflowExecutionInfo
     -> f (Vector WorkflowExecutionInfo))
    -> Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> (Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> ListArchivedWorkflowExecutionsResponse
-> f ListArchivedWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListArchivedWorkflowExecutionsResponse
 -> Vector WorkflowExecutionInfo)
-> (ListArchivedWorkflowExecutionsResponse
    -> Vector WorkflowExecutionInfo
    -> ListArchivedWorkflowExecutionsResponse)
-> Lens
     ListArchivedWorkflowExecutionsResponse
     ListArchivedWorkflowExecutionsResponse
     (Vector WorkflowExecutionInfo)
     (Vector WorkflowExecutionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListArchivedWorkflowExecutionsResponse
-> Vector WorkflowExecutionInfo
_ListArchivedWorkflowExecutionsResponse'executions
           (\ ListArchivedWorkflowExecutionsResponse
x__ Vector WorkflowExecutionInfo
y__
              -> ListArchivedWorkflowExecutionsResponse
x__ {_ListArchivedWorkflowExecutionsResponse'executions = y__}))
        (Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo))
-> Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListArchivedWorkflowExecutionsResponse "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ListArchivedWorkflowExecutionsResponse
-> f ListArchivedWorkflowExecutionsResponse
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ListArchivedWorkflowExecutionsResponse
 -> f ListArchivedWorkflowExecutionsResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ListArchivedWorkflowExecutionsResponse
-> f ListArchivedWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListArchivedWorkflowExecutionsResponse -> ByteString)
-> (ListArchivedWorkflowExecutionsResponse
    -> ByteString -> ListArchivedWorkflowExecutionsResponse)
-> Lens
     ListArchivedWorkflowExecutionsResponse
     ListArchivedWorkflowExecutionsResponse
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListArchivedWorkflowExecutionsResponse -> ByteString
_ListArchivedWorkflowExecutionsResponse'nextPageToken
           (\ ListArchivedWorkflowExecutionsResponse
x__ ByteString
y__
              -> ListArchivedWorkflowExecutionsResponse
x__
                   {_ListArchivedWorkflowExecutionsResponse'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListArchivedWorkflowExecutionsResponse where
  messageName :: Proxy ListArchivedWorkflowExecutionsResponse -> Text
messageName Proxy ListArchivedWorkflowExecutionsResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListArchivedWorkflowExecutionsResponse"
  packedMessageDescriptor :: Proxy ListArchivedWorkflowExecutionsResponse -> ByteString
packedMessageDescriptor Proxy ListArchivedWorkflowExecutionsResponse
_
    = ByteString
"\n\
      \&ListArchivedWorkflowExecutionsResponse\DC2O\n\
      \\n\
      \executions\CAN\SOH \ETX(\v2/.temporal.api.workflow.v1.WorkflowExecutionInfoR\n\
      \executions\DC2&\n\
      \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken"
  packedFileDescriptor :: Proxy ListArchivedWorkflowExecutionsResponse -> ByteString
packedFileDescriptor Proxy ListArchivedWorkflowExecutionsResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListArchivedWorkflowExecutionsResponse)
fieldsByTag
    = let
        executions__field_descriptor :: FieldDescriptor ListArchivedWorkflowExecutionsResponse
executions__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionInfo
-> FieldAccessor
     ListArchivedWorkflowExecutionsResponse WorkflowExecutionInfo
-> FieldDescriptor ListArchivedWorkflowExecutionsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"executions"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecutionInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo)
              (Packing
-> Lens'
     ListArchivedWorkflowExecutionsResponse [WorkflowExecutionInfo]
-> FieldAccessor
     ListArchivedWorkflowExecutionsResponse WorkflowExecutionInfo
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 @"executions")) ::
              Data.ProtoLens.FieldDescriptor ListArchivedWorkflowExecutionsResponse
        nextPageToken__field_descriptor :: FieldDescriptor ListArchivedWorkflowExecutionsResponse
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ListArchivedWorkflowExecutionsResponse ByteString
-> FieldDescriptor ListArchivedWorkflowExecutionsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ListArchivedWorkflowExecutionsResponse
     ListArchivedWorkflowExecutionsResponse
     ByteString
     ByteString
-> FieldAccessor ListArchivedWorkflowExecutionsResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ListArchivedWorkflowExecutionsResponse
      in
        [(Tag, FieldDescriptor ListArchivedWorkflowExecutionsResponse)]
-> Map Tag (FieldDescriptor ListArchivedWorkflowExecutionsResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListArchivedWorkflowExecutionsResponse
executions__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListArchivedWorkflowExecutionsResponse
nextPageToken__field_descriptor)]
  unknownFields :: Lens' ListArchivedWorkflowExecutionsResponse FieldSet
unknownFields
    = (ListArchivedWorkflowExecutionsResponse -> FieldSet)
-> (ListArchivedWorkflowExecutionsResponse
    -> FieldSet -> ListArchivedWorkflowExecutionsResponse)
-> Lens' ListArchivedWorkflowExecutionsResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListArchivedWorkflowExecutionsResponse -> FieldSet
_ListArchivedWorkflowExecutionsResponse'_unknownFields
        (\ ListArchivedWorkflowExecutionsResponse
x__ FieldSet
y__
           -> ListArchivedWorkflowExecutionsResponse
x__
                {_ListArchivedWorkflowExecutionsResponse'_unknownFields = y__})
  defMessage :: ListArchivedWorkflowExecutionsResponse
defMessage
    = ListArchivedWorkflowExecutionsResponse'_constructor
        {_ListArchivedWorkflowExecutionsResponse'executions :: Vector WorkflowExecutionInfo
_ListArchivedWorkflowExecutionsResponse'executions = Vector WorkflowExecutionInfo
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ListArchivedWorkflowExecutionsResponse'nextPageToken :: ByteString
_ListArchivedWorkflowExecutionsResponse'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListArchivedWorkflowExecutionsResponse'_unknownFields :: FieldSet
_ListArchivedWorkflowExecutionsResponse'_unknownFields = []}
  parseMessage :: Parser ListArchivedWorkflowExecutionsResponse
parseMessage
    = let
        loop ::
          ListArchivedWorkflowExecutionsResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo
             -> Data.ProtoLens.Encoding.Bytes.Parser ListArchivedWorkflowExecutionsResponse
        loop :: ListArchivedWorkflowExecutionsResponse
-> Growing Vector RealWorld WorkflowExecutionInfo
-> Parser ListArchivedWorkflowExecutionsResponse
loop ListArchivedWorkflowExecutionsResponse
x Growing Vector RealWorld WorkflowExecutionInfo
mutable'executions
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'executions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                mutable'executions)
                      (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'executions") frozen'executions
                              x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser WorkflowExecutionInfo
-> String -> Parser WorkflowExecutionInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"executions"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'executions y)
                                loop x v
                        Word64
18
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                                  mutable'executions
                        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'executions
      in
        Parser ListArchivedWorkflowExecutionsResponse
-> String -> Parser ListArchivedWorkflowExecutionsResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'executions <- IO (Growing Vector RealWorld WorkflowExecutionInfo)
-> Parser (Growing Vector RealWorld WorkflowExecutionInfo)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld WorkflowExecutionInfo)
IO (Growing Vector (PrimState IO) WorkflowExecutionInfo)
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'executions)
          String
"ListArchivedWorkflowExecutionsResponse"
  buildMessage :: ListArchivedWorkflowExecutionsResponse -> Builder
buildMessage
    = \ ListArchivedWorkflowExecutionsResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((WorkflowExecutionInfo -> Builder)
-> Vector WorkflowExecutionInfo -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ WorkflowExecutionInfo
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (WorkflowExecutionInfo -> ByteString)
-> WorkflowExecutionInfo
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           WorkflowExecutionInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionInfo
_v))
                (FoldLike
  (Vector WorkflowExecutionInfo)
  ListArchivedWorkflowExecutionsResponse
  ListArchivedWorkflowExecutionsResponse
  (Vector WorkflowExecutionInfo)
  (Vector WorkflowExecutionInfo)
-> ListArchivedWorkflowExecutionsResponse
-> Vector WorkflowExecutionInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'executions") ListArchivedWorkflowExecutionsResponse
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: ByteString
_v
                     = FoldLike
  ByteString
  ListArchivedWorkflowExecutionsResponse
  ListArchivedWorkflowExecutionsResponse
  ByteString
  ByteString
-> ListArchivedWorkflowExecutionsResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ListArchivedWorkflowExecutionsResponse
_x
                 in
                   if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
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
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            ByteString
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ListArchivedWorkflowExecutionsResponse
  ListArchivedWorkflowExecutionsResponse
  FieldSet
  FieldSet
-> ListArchivedWorkflowExecutionsResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListArchivedWorkflowExecutionsResponse
  ListArchivedWorkflowExecutionsResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListArchivedWorkflowExecutionsResponse FieldSet
Data.ProtoLens.unknownFields ListArchivedWorkflowExecutionsResponse
_x)))
instance Control.DeepSeq.NFData ListArchivedWorkflowExecutionsResponse where
  rnf :: ListArchivedWorkflowExecutionsResponse -> ()
rnf
    = \ ListArchivedWorkflowExecutionsResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListArchivedWorkflowExecutionsResponse -> FieldSet
_ListArchivedWorkflowExecutionsResponse'_unknownFields ListArchivedWorkflowExecutionsResponse
x__)
             (Vector WorkflowExecutionInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListArchivedWorkflowExecutionsResponse
-> Vector WorkflowExecutionInfo
_ListArchivedWorkflowExecutionsResponse'executions ListArchivedWorkflowExecutionsResponse
x__)
                (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListArchivedWorkflowExecutionsResponse -> ByteString
_ListArchivedWorkflowExecutionsResponse'nextPageToken ListArchivedWorkflowExecutionsResponse
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' ListBatchOperationsRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.pageSize' @:: Lens' ListBatchOperationsRequest Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ListBatchOperationsRequest Data.ByteString.ByteString@ -}
data ListBatchOperationsRequest
  = ListBatchOperationsRequest'_constructor {ListBatchOperationsRequest -> Text
_ListBatchOperationsRequest'namespace :: !Data.Text.Text,
                                             ListBatchOperationsRequest -> Int32
_ListBatchOperationsRequest'pageSize :: !Data.Int.Int32,
                                             ListBatchOperationsRequest -> ByteString
_ListBatchOperationsRequest'nextPageToken :: !Data.ByteString.ByteString,
                                             ListBatchOperationsRequest -> FieldSet
_ListBatchOperationsRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListBatchOperationsRequest -> ListBatchOperationsRequest -> Bool
(ListBatchOperationsRequest -> ListBatchOperationsRequest -> Bool)
-> (ListBatchOperationsRequest
    -> ListBatchOperationsRequest -> Bool)
-> Eq ListBatchOperationsRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListBatchOperationsRequest -> ListBatchOperationsRequest -> Bool
== :: ListBatchOperationsRequest -> ListBatchOperationsRequest -> Bool
$c/= :: ListBatchOperationsRequest -> ListBatchOperationsRequest -> Bool
/= :: ListBatchOperationsRequest -> ListBatchOperationsRequest -> Bool
Prelude.Eq, Eq ListBatchOperationsRequest
Eq ListBatchOperationsRequest =>
(ListBatchOperationsRequest
 -> ListBatchOperationsRequest -> Ordering)
-> (ListBatchOperationsRequest
    -> ListBatchOperationsRequest -> Bool)
-> (ListBatchOperationsRequest
    -> ListBatchOperationsRequest -> Bool)
-> (ListBatchOperationsRequest
    -> ListBatchOperationsRequest -> Bool)
-> (ListBatchOperationsRequest
    -> ListBatchOperationsRequest -> Bool)
-> (ListBatchOperationsRequest
    -> ListBatchOperationsRequest -> ListBatchOperationsRequest)
-> (ListBatchOperationsRequest
    -> ListBatchOperationsRequest -> ListBatchOperationsRequest)
-> Ord ListBatchOperationsRequest
ListBatchOperationsRequest -> ListBatchOperationsRequest -> Bool
ListBatchOperationsRequest
-> ListBatchOperationsRequest -> Ordering
ListBatchOperationsRequest
-> ListBatchOperationsRequest -> ListBatchOperationsRequest
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 :: ListBatchOperationsRequest
-> ListBatchOperationsRequest -> Ordering
compare :: ListBatchOperationsRequest
-> ListBatchOperationsRequest -> Ordering
$c< :: ListBatchOperationsRequest -> ListBatchOperationsRequest -> Bool
< :: ListBatchOperationsRequest -> ListBatchOperationsRequest -> Bool
$c<= :: ListBatchOperationsRequest -> ListBatchOperationsRequest -> Bool
<= :: ListBatchOperationsRequest -> ListBatchOperationsRequest -> Bool
$c> :: ListBatchOperationsRequest -> ListBatchOperationsRequest -> Bool
> :: ListBatchOperationsRequest -> ListBatchOperationsRequest -> Bool
$c>= :: ListBatchOperationsRequest -> ListBatchOperationsRequest -> Bool
>= :: ListBatchOperationsRequest -> ListBatchOperationsRequest -> Bool
$cmax :: ListBatchOperationsRequest
-> ListBatchOperationsRequest -> ListBatchOperationsRequest
max :: ListBatchOperationsRequest
-> ListBatchOperationsRequest -> ListBatchOperationsRequest
$cmin :: ListBatchOperationsRequest
-> ListBatchOperationsRequest -> ListBatchOperationsRequest
min :: ListBatchOperationsRequest
-> ListBatchOperationsRequest -> ListBatchOperationsRequest
Prelude.Ord)
instance Prelude.Show ListBatchOperationsRequest where
  showsPrec :: Int -> ListBatchOperationsRequest -> ShowS
showsPrec Int
_ ListBatchOperationsRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListBatchOperationsRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListBatchOperationsRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListBatchOperationsRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ListBatchOperationsRequest
-> f ListBatchOperationsRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ListBatchOperationsRequest -> f ListBatchOperationsRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ListBatchOperationsRequest
-> f ListBatchOperationsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListBatchOperationsRequest -> Text)
-> (ListBatchOperationsRequest
    -> Text -> ListBatchOperationsRequest)
-> Lens
     ListBatchOperationsRequest ListBatchOperationsRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListBatchOperationsRequest -> Text
_ListBatchOperationsRequest'namespace
           (\ ListBatchOperationsRequest
x__ Text
y__ -> ListBatchOperationsRequest
x__ {_ListBatchOperationsRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListBatchOperationsRequest "pageSize" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "pageSize"
-> (Int32 -> f Int32)
-> ListBatchOperationsRequest
-> f ListBatchOperationsRequest
fieldOf Proxy# "pageSize"
_
    = ((Int32 -> f Int32)
 -> ListBatchOperationsRequest -> f ListBatchOperationsRequest)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ListBatchOperationsRequest
-> f ListBatchOperationsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListBatchOperationsRequest -> Int32)
-> (ListBatchOperationsRequest
    -> Int32 -> ListBatchOperationsRequest)
-> Lens
     ListBatchOperationsRequest ListBatchOperationsRequest Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListBatchOperationsRequest -> Int32
_ListBatchOperationsRequest'pageSize
           (\ ListBatchOperationsRequest
x__ Int32
y__ -> ListBatchOperationsRequest
x__ {_ListBatchOperationsRequest'pageSize = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListBatchOperationsRequest "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ListBatchOperationsRequest
-> f ListBatchOperationsRequest
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ListBatchOperationsRequest -> f ListBatchOperationsRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ListBatchOperationsRequest
-> f ListBatchOperationsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListBatchOperationsRequest -> ByteString)
-> (ListBatchOperationsRequest
    -> ByteString -> ListBatchOperationsRequest)
-> Lens
     ListBatchOperationsRequest
     ListBatchOperationsRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListBatchOperationsRequest -> ByteString
_ListBatchOperationsRequest'nextPageToken
           (\ ListBatchOperationsRequest
x__ ByteString
y__
              -> ListBatchOperationsRequest
x__ {_ListBatchOperationsRequest'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListBatchOperationsRequest where
  messageName :: Proxy ListBatchOperationsRequest -> Text
messageName Proxy ListBatchOperationsRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListBatchOperationsRequest"
  packedMessageDescriptor :: Proxy ListBatchOperationsRequest -> ByteString
packedMessageDescriptor Proxy ListBatchOperationsRequest
_
    = ByteString
"\n\
      \\SUBListBatchOperationsRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\ESC\n\
      \\tpage_size\CAN\STX \SOH(\ENQR\bpageSize\DC2&\n\
      \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken"
  packedFileDescriptor :: Proxy ListBatchOperationsRequest -> ByteString
packedFileDescriptor Proxy ListBatchOperationsRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListBatchOperationsRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor ListBatchOperationsRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ListBatchOperationsRequest Text
-> FieldDescriptor ListBatchOperationsRequest
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
     ListBatchOperationsRequest ListBatchOperationsRequest Text Text
-> FieldAccessor ListBatchOperationsRequest 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 ListBatchOperationsRequest
        pageSize__field_descriptor :: FieldDescriptor ListBatchOperationsRequest
pageSize__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ListBatchOperationsRequest Int32
-> FieldDescriptor ListBatchOperationsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"page_size"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     ListBatchOperationsRequest ListBatchOperationsRequest Int32 Int32
-> FieldAccessor ListBatchOperationsRequest Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pageSize")) ::
              Data.ProtoLens.FieldDescriptor ListBatchOperationsRequest
        nextPageToken__field_descriptor :: FieldDescriptor ListBatchOperationsRequest
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ListBatchOperationsRequest ByteString
-> FieldDescriptor ListBatchOperationsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ListBatchOperationsRequest
     ListBatchOperationsRequest
     ByteString
     ByteString
-> FieldAccessor ListBatchOperationsRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ListBatchOperationsRequest
      in
        [(Tag, FieldDescriptor ListBatchOperationsRequest)]
-> Map Tag (FieldDescriptor ListBatchOperationsRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListBatchOperationsRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListBatchOperationsRequest
pageSize__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ListBatchOperationsRequest
nextPageToken__field_descriptor)]
  unknownFields :: Lens' ListBatchOperationsRequest FieldSet
unknownFields
    = (ListBatchOperationsRequest -> FieldSet)
-> (ListBatchOperationsRequest
    -> FieldSet -> ListBatchOperationsRequest)
-> Lens' ListBatchOperationsRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListBatchOperationsRequest -> FieldSet
_ListBatchOperationsRequest'_unknownFields
        (\ ListBatchOperationsRequest
x__ FieldSet
y__
           -> ListBatchOperationsRequest
x__ {_ListBatchOperationsRequest'_unknownFields = y__})
  defMessage :: ListBatchOperationsRequest
defMessage
    = ListBatchOperationsRequest'_constructor
        {_ListBatchOperationsRequest'namespace :: Text
_ListBatchOperationsRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListBatchOperationsRequest'pageSize :: Int32
_ListBatchOperationsRequest'pageSize = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListBatchOperationsRequest'nextPageToken :: ByteString
_ListBatchOperationsRequest'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListBatchOperationsRequest'_unknownFields :: FieldSet
_ListBatchOperationsRequest'_unknownFields = []}
  parseMessage :: Parser ListBatchOperationsRequest
parseMessage
    = let
        loop ::
          ListBatchOperationsRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser ListBatchOperationsRequest
        loop :: ListBatchOperationsRequest -> Parser ListBatchOperationsRequest
loop ListBatchOperationsRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
16
                          -> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"page_size"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"pageSize") y x)
                        Word64
26
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") 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 ListBatchOperationsRequest
-> String -> Parser ListBatchOperationsRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ListBatchOperationsRequest -> Parser ListBatchOperationsRequest
loop ListBatchOperationsRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ListBatchOperationsRequest"
  buildMessage :: ListBatchOperationsRequest -> Builder
buildMessage
    = \ ListBatchOperationsRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ListBatchOperationsRequest
  ListBatchOperationsRequest
  Text
  Text
-> ListBatchOperationsRequest -> 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") ListBatchOperationsRequest
_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 :: Int32
_v = FoldLike
  Int32
  ListBatchOperationsRequest
  ListBatchOperationsRequest
  Int32
  Int32
-> ListBatchOperationsRequest -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pageSize") ListBatchOperationsRequest
_x
                 in
                   if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
16)
                         ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: ByteString
_v
                        = FoldLike
  ByteString
  ListBatchOperationsRequest
  ListBatchOperationsRequest
  ByteString
  ByteString
-> ListBatchOperationsRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ListBatchOperationsRequest
_x
                    in
                      if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
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
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               ByteString
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  ListBatchOperationsRequest
  ListBatchOperationsRequest
  FieldSet
  FieldSet
-> ListBatchOperationsRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListBatchOperationsRequest
  ListBatchOperationsRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListBatchOperationsRequest FieldSet
Data.ProtoLens.unknownFields ListBatchOperationsRequest
_x))))
instance Control.DeepSeq.NFData ListBatchOperationsRequest where
  rnf :: ListBatchOperationsRequest -> ()
rnf
    = \ ListBatchOperationsRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListBatchOperationsRequest -> FieldSet
_ListBatchOperationsRequest'_unknownFields ListBatchOperationsRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListBatchOperationsRequest -> Text
_ListBatchOperationsRequest'namespace ListBatchOperationsRequest
x__)
                (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListBatchOperationsRequest -> Int32
_ListBatchOperationsRequest'pageSize ListBatchOperationsRequest
x__)
                   (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ListBatchOperationsRequest -> ByteString
_ListBatchOperationsRequest'nextPageToken ListBatchOperationsRequest
x__) ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.operationInfo' @:: Lens' ListBatchOperationsResponse [Proto.Temporal.Api.Batch.V1.Message.BatchOperationInfo]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'operationInfo' @:: Lens' ListBatchOperationsResponse (Data.Vector.Vector Proto.Temporal.Api.Batch.V1.Message.BatchOperationInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ListBatchOperationsResponse Data.ByteString.ByteString@ -}
data ListBatchOperationsResponse
  = ListBatchOperationsResponse'_constructor {ListBatchOperationsResponse -> Vector BatchOperationInfo
_ListBatchOperationsResponse'operationInfo :: !(Data.Vector.Vector Proto.Temporal.Api.Batch.V1.Message.BatchOperationInfo),
                                              ListBatchOperationsResponse -> ByteString
_ListBatchOperationsResponse'nextPageToken :: !Data.ByteString.ByteString,
                                              ListBatchOperationsResponse -> FieldSet
_ListBatchOperationsResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListBatchOperationsResponse -> ListBatchOperationsResponse -> Bool
(ListBatchOperationsResponse
 -> ListBatchOperationsResponse -> Bool)
-> (ListBatchOperationsResponse
    -> ListBatchOperationsResponse -> Bool)
-> Eq ListBatchOperationsResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListBatchOperationsResponse -> ListBatchOperationsResponse -> Bool
== :: ListBatchOperationsResponse -> ListBatchOperationsResponse -> Bool
$c/= :: ListBatchOperationsResponse -> ListBatchOperationsResponse -> Bool
/= :: ListBatchOperationsResponse -> ListBatchOperationsResponse -> Bool
Prelude.Eq, Eq ListBatchOperationsResponse
Eq ListBatchOperationsResponse =>
(ListBatchOperationsResponse
 -> ListBatchOperationsResponse -> Ordering)
-> (ListBatchOperationsResponse
    -> ListBatchOperationsResponse -> Bool)
-> (ListBatchOperationsResponse
    -> ListBatchOperationsResponse -> Bool)
-> (ListBatchOperationsResponse
    -> ListBatchOperationsResponse -> Bool)
-> (ListBatchOperationsResponse
    -> ListBatchOperationsResponse -> Bool)
-> (ListBatchOperationsResponse
    -> ListBatchOperationsResponse -> ListBatchOperationsResponse)
-> (ListBatchOperationsResponse
    -> ListBatchOperationsResponse -> ListBatchOperationsResponse)
-> Ord ListBatchOperationsResponse
ListBatchOperationsResponse -> ListBatchOperationsResponse -> Bool
ListBatchOperationsResponse
-> ListBatchOperationsResponse -> Ordering
ListBatchOperationsResponse
-> ListBatchOperationsResponse -> ListBatchOperationsResponse
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 :: ListBatchOperationsResponse
-> ListBatchOperationsResponse -> Ordering
compare :: ListBatchOperationsResponse
-> ListBatchOperationsResponse -> Ordering
$c< :: ListBatchOperationsResponse -> ListBatchOperationsResponse -> Bool
< :: ListBatchOperationsResponse -> ListBatchOperationsResponse -> Bool
$c<= :: ListBatchOperationsResponse -> ListBatchOperationsResponse -> Bool
<= :: ListBatchOperationsResponse -> ListBatchOperationsResponse -> Bool
$c> :: ListBatchOperationsResponse -> ListBatchOperationsResponse -> Bool
> :: ListBatchOperationsResponse -> ListBatchOperationsResponse -> Bool
$c>= :: ListBatchOperationsResponse -> ListBatchOperationsResponse -> Bool
>= :: ListBatchOperationsResponse -> ListBatchOperationsResponse -> Bool
$cmax :: ListBatchOperationsResponse
-> ListBatchOperationsResponse -> ListBatchOperationsResponse
max :: ListBatchOperationsResponse
-> ListBatchOperationsResponse -> ListBatchOperationsResponse
$cmin :: ListBatchOperationsResponse
-> ListBatchOperationsResponse -> ListBatchOperationsResponse
min :: ListBatchOperationsResponse
-> ListBatchOperationsResponse -> ListBatchOperationsResponse
Prelude.Ord)
instance Prelude.Show ListBatchOperationsResponse where
  showsPrec :: Int -> ListBatchOperationsResponse -> ShowS
showsPrec Int
_ ListBatchOperationsResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListBatchOperationsResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListBatchOperationsResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListBatchOperationsResponse "operationInfo" [Proto.Temporal.Api.Batch.V1.Message.BatchOperationInfo] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "operationInfo"
-> ([BatchOperationInfo] -> f [BatchOperationInfo])
-> ListBatchOperationsResponse
-> f ListBatchOperationsResponse
fieldOf Proxy# "operationInfo"
_
    = ((Vector BatchOperationInfo -> f (Vector BatchOperationInfo))
 -> ListBatchOperationsResponse -> f ListBatchOperationsResponse)
-> (([BatchOperationInfo] -> f [BatchOperationInfo])
    -> Vector BatchOperationInfo -> f (Vector BatchOperationInfo))
-> ([BatchOperationInfo] -> f [BatchOperationInfo])
-> ListBatchOperationsResponse
-> f ListBatchOperationsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListBatchOperationsResponse -> Vector BatchOperationInfo)
-> (ListBatchOperationsResponse
    -> Vector BatchOperationInfo -> ListBatchOperationsResponse)
-> Lens
     ListBatchOperationsResponse
     ListBatchOperationsResponse
     (Vector BatchOperationInfo)
     (Vector BatchOperationInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListBatchOperationsResponse -> Vector BatchOperationInfo
_ListBatchOperationsResponse'operationInfo
           (\ ListBatchOperationsResponse
x__ Vector BatchOperationInfo
y__
              -> ListBatchOperationsResponse
x__ {_ListBatchOperationsResponse'operationInfo = y__}))
        ((Vector BatchOperationInfo -> [BatchOperationInfo])
-> (Vector BatchOperationInfo
    -> [BatchOperationInfo] -> Vector BatchOperationInfo)
-> Lens
     (Vector BatchOperationInfo)
     (Vector BatchOperationInfo)
     [BatchOperationInfo]
     [BatchOperationInfo]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector BatchOperationInfo -> [BatchOperationInfo]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector BatchOperationInfo
_ [BatchOperationInfo]
y__ -> [BatchOperationInfo] -> Vector BatchOperationInfo
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [BatchOperationInfo]
y__))
instance Data.ProtoLens.Field.HasField ListBatchOperationsResponse "vec'operationInfo" (Data.Vector.Vector Proto.Temporal.Api.Batch.V1.Message.BatchOperationInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'operationInfo"
-> (Vector BatchOperationInfo -> f (Vector BatchOperationInfo))
-> ListBatchOperationsResponse
-> f ListBatchOperationsResponse
fieldOf Proxy# "vec'operationInfo"
_
    = ((Vector BatchOperationInfo -> f (Vector BatchOperationInfo))
 -> ListBatchOperationsResponse -> f ListBatchOperationsResponse)
-> ((Vector BatchOperationInfo -> f (Vector BatchOperationInfo))
    -> Vector BatchOperationInfo -> f (Vector BatchOperationInfo))
-> (Vector BatchOperationInfo -> f (Vector BatchOperationInfo))
-> ListBatchOperationsResponse
-> f ListBatchOperationsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListBatchOperationsResponse -> Vector BatchOperationInfo)
-> (ListBatchOperationsResponse
    -> Vector BatchOperationInfo -> ListBatchOperationsResponse)
-> Lens
     ListBatchOperationsResponse
     ListBatchOperationsResponse
     (Vector BatchOperationInfo)
     (Vector BatchOperationInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListBatchOperationsResponse -> Vector BatchOperationInfo
_ListBatchOperationsResponse'operationInfo
           (\ ListBatchOperationsResponse
x__ Vector BatchOperationInfo
y__
              -> ListBatchOperationsResponse
x__ {_ListBatchOperationsResponse'operationInfo = y__}))
        (Vector BatchOperationInfo -> f (Vector BatchOperationInfo))
-> Vector BatchOperationInfo -> f (Vector BatchOperationInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListBatchOperationsResponse "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ListBatchOperationsResponse
-> f ListBatchOperationsResponse
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ListBatchOperationsResponse -> f ListBatchOperationsResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ListBatchOperationsResponse
-> f ListBatchOperationsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListBatchOperationsResponse -> ByteString)
-> (ListBatchOperationsResponse
    -> ByteString -> ListBatchOperationsResponse)
-> Lens
     ListBatchOperationsResponse
     ListBatchOperationsResponse
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListBatchOperationsResponse -> ByteString
_ListBatchOperationsResponse'nextPageToken
           (\ ListBatchOperationsResponse
x__ ByteString
y__
              -> ListBatchOperationsResponse
x__ {_ListBatchOperationsResponse'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListBatchOperationsResponse where
  messageName :: Proxy ListBatchOperationsResponse -> Text
messageName Proxy ListBatchOperationsResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListBatchOperationsResponse"
  packedMessageDescriptor :: Proxy ListBatchOperationsResponse -> ByteString
packedMessageDescriptor Proxy ListBatchOperationsResponse
_
    = ByteString
"\n\
      \\ESCListBatchOperationsResponse\DC2P\n\
      \\SOoperation_info\CAN\SOH \ETX(\v2).temporal.api.batch.v1.BatchOperationInfoR\roperationInfo\DC2&\n\
      \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken"
  packedFileDescriptor :: Proxy ListBatchOperationsResponse -> ByteString
packedFileDescriptor Proxy ListBatchOperationsResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListBatchOperationsResponse)
fieldsByTag
    = let
        operationInfo__field_descriptor :: FieldDescriptor ListBatchOperationsResponse
operationInfo__field_descriptor
          = String
-> FieldTypeDescriptor BatchOperationInfo
-> FieldAccessor ListBatchOperationsResponse BatchOperationInfo
-> FieldDescriptor ListBatchOperationsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"operation_info"
              (MessageOrGroup -> FieldTypeDescriptor BatchOperationInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Batch.V1.Message.BatchOperationInfo)
              (Packing
-> Lens' ListBatchOperationsResponse [BatchOperationInfo]
-> FieldAccessor ListBatchOperationsResponse BatchOperationInfo
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 @"operationInfo")) ::
              Data.ProtoLens.FieldDescriptor ListBatchOperationsResponse
        nextPageToken__field_descriptor :: FieldDescriptor ListBatchOperationsResponse
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ListBatchOperationsResponse ByteString
-> FieldDescriptor ListBatchOperationsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ListBatchOperationsResponse
     ListBatchOperationsResponse
     ByteString
     ByteString
-> FieldAccessor ListBatchOperationsResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ListBatchOperationsResponse
      in
        [(Tag, FieldDescriptor ListBatchOperationsResponse)]
-> Map Tag (FieldDescriptor ListBatchOperationsResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListBatchOperationsResponse
operationInfo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListBatchOperationsResponse
nextPageToken__field_descriptor)]
  unknownFields :: Lens' ListBatchOperationsResponse FieldSet
unknownFields
    = (ListBatchOperationsResponse -> FieldSet)
-> (ListBatchOperationsResponse
    -> FieldSet -> ListBatchOperationsResponse)
-> Lens' ListBatchOperationsResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListBatchOperationsResponse -> FieldSet
_ListBatchOperationsResponse'_unknownFields
        (\ ListBatchOperationsResponse
x__ FieldSet
y__
           -> ListBatchOperationsResponse
x__ {_ListBatchOperationsResponse'_unknownFields = y__})
  defMessage :: ListBatchOperationsResponse
defMessage
    = ListBatchOperationsResponse'_constructor
        {_ListBatchOperationsResponse'operationInfo :: Vector BatchOperationInfo
_ListBatchOperationsResponse'operationInfo = Vector BatchOperationInfo
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ListBatchOperationsResponse'nextPageToken :: ByteString
_ListBatchOperationsResponse'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListBatchOperationsResponse'_unknownFields :: FieldSet
_ListBatchOperationsResponse'_unknownFields = []}
  parseMessage :: Parser ListBatchOperationsResponse
parseMessage
    = let
        loop ::
          ListBatchOperationsResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Batch.V1.Message.BatchOperationInfo
             -> Data.ProtoLens.Encoding.Bytes.Parser ListBatchOperationsResponse
        loop :: ListBatchOperationsResponse
-> Growing Vector RealWorld BatchOperationInfo
-> Parser ListBatchOperationsResponse
loop ListBatchOperationsResponse
x Growing Vector RealWorld BatchOperationInfo
mutable'operationInfo
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'operationInfo <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                   mutable'operationInfo)
                      (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'operationInfo")
                              frozen'operationInfo x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser BatchOperationInfo -> String -> Parser BatchOperationInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"operation_info"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'operationInfo y)
                                loop x v
                        Word64
18
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                                  mutable'operationInfo
                        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'operationInfo
      in
        Parser ListBatchOperationsResponse
-> String -> Parser ListBatchOperationsResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'operationInfo <- IO (Growing Vector RealWorld BatchOperationInfo)
-> Parser (Growing Vector RealWorld BatchOperationInfo)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                         IO (Growing Vector RealWorld BatchOperationInfo)
IO (Growing Vector (PrimState IO) BatchOperationInfo)
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'operationInfo)
          String
"ListBatchOperationsResponse"
  buildMessage :: ListBatchOperationsResponse -> Builder
buildMessage
    = \ ListBatchOperationsResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((BatchOperationInfo -> Builder)
-> Vector BatchOperationInfo -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ BatchOperationInfo
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (BatchOperationInfo -> ByteString)
-> BatchOperationInfo
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           BatchOperationInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage BatchOperationInfo
_v))
                (FoldLike
  (Vector BatchOperationInfo)
  ListBatchOperationsResponse
  ListBatchOperationsResponse
  (Vector BatchOperationInfo)
  (Vector BatchOperationInfo)
-> ListBatchOperationsResponse -> Vector BatchOperationInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'operationInfo") ListBatchOperationsResponse
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: ByteString
_v
                     = FoldLike
  ByteString
  ListBatchOperationsResponse
  ListBatchOperationsResponse
  ByteString
  ByteString
-> ListBatchOperationsResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ListBatchOperationsResponse
_x
                 in
                   if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
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
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            ByteString
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ListBatchOperationsResponse
  ListBatchOperationsResponse
  FieldSet
  FieldSet
-> ListBatchOperationsResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListBatchOperationsResponse
  ListBatchOperationsResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListBatchOperationsResponse FieldSet
Data.ProtoLens.unknownFields ListBatchOperationsResponse
_x)))
instance Control.DeepSeq.NFData ListBatchOperationsResponse where
  rnf :: ListBatchOperationsResponse -> ()
rnf
    = \ ListBatchOperationsResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListBatchOperationsResponse -> FieldSet
_ListBatchOperationsResponse'_unknownFields ListBatchOperationsResponse
x__)
             (Vector BatchOperationInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListBatchOperationsResponse -> Vector BatchOperationInfo
_ListBatchOperationsResponse'operationInfo ListBatchOperationsResponse
x__)
                (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListBatchOperationsResponse -> ByteString
_ListBatchOperationsResponse'nextPageToken ListBatchOperationsResponse
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' ListClosedWorkflowExecutionsRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maximumPageSize' @:: Lens' ListClosedWorkflowExecutionsRequest Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ListClosedWorkflowExecutionsRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.startTimeFilter' @:: Lens' ListClosedWorkflowExecutionsRequest Proto.Temporal.Api.Filter.V1.Message.StartTimeFilter@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'startTimeFilter' @:: Lens' ListClosedWorkflowExecutionsRequest (Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.StartTimeFilter)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'filters' @:: Lens' ListClosedWorkflowExecutionsRequest (Prelude.Maybe ListClosedWorkflowExecutionsRequest'Filters)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'executionFilter' @:: Lens' ListClosedWorkflowExecutionsRequest (Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.WorkflowExecutionFilter)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.executionFilter' @:: Lens' ListClosedWorkflowExecutionsRequest Proto.Temporal.Api.Filter.V1.Message.WorkflowExecutionFilter@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'typeFilter' @:: Lens' ListClosedWorkflowExecutionsRequest (Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.WorkflowTypeFilter)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.typeFilter' @:: Lens' ListClosedWorkflowExecutionsRequest Proto.Temporal.Api.Filter.V1.Message.WorkflowTypeFilter@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'statusFilter' @:: Lens' ListClosedWorkflowExecutionsRequest (Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.StatusFilter)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.statusFilter' @:: Lens' ListClosedWorkflowExecutionsRequest Proto.Temporal.Api.Filter.V1.Message.StatusFilter@ -}
data ListClosedWorkflowExecutionsRequest
  = ListClosedWorkflowExecutionsRequest'_constructor {ListClosedWorkflowExecutionsRequest -> Text
_ListClosedWorkflowExecutionsRequest'namespace :: !Data.Text.Text,
                                                      ListClosedWorkflowExecutionsRequest -> Int32
_ListClosedWorkflowExecutionsRequest'maximumPageSize :: !Data.Int.Int32,
                                                      ListClosedWorkflowExecutionsRequest -> ByteString
_ListClosedWorkflowExecutionsRequest'nextPageToken :: !Data.ByteString.ByteString,
                                                      ListClosedWorkflowExecutionsRequest -> Maybe StartTimeFilter
_ListClosedWorkflowExecutionsRequest'startTimeFilter :: !(Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.StartTimeFilter),
                                                      ListClosedWorkflowExecutionsRequest
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
_ListClosedWorkflowExecutionsRequest'filters :: !(Prelude.Maybe ListClosedWorkflowExecutionsRequest'Filters),
                                                      ListClosedWorkflowExecutionsRequest -> FieldSet
_ListClosedWorkflowExecutionsRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Bool
(ListClosedWorkflowExecutionsRequest
 -> ListClosedWorkflowExecutionsRequest -> Bool)
-> (ListClosedWorkflowExecutionsRequest
    -> ListClosedWorkflowExecutionsRequest -> Bool)
-> Eq ListClosedWorkflowExecutionsRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Bool
== :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Bool
$c/= :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Bool
/= :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Bool
Prelude.Eq, Eq ListClosedWorkflowExecutionsRequest
Eq ListClosedWorkflowExecutionsRequest =>
(ListClosedWorkflowExecutionsRequest
 -> ListClosedWorkflowExecutionsRequest -> Ordering)
-> (ListClosedWorkflowExecutionsRequest
    -> ListClosedWorkflowExecutionsRequest -> Bool)
-> (ListClosedWorkflowExecutionsRequest
    -> ListClosedWorkflowExecutionsRequest -> Bool)
-> (ListClosedWorkflowExecutionsRequest
    -> ListClosedWorkflowExecutionsRequest -> Bool)
-> (ListClosedWorkflowExecutionsRequest
    -> ListClosedWorkflowExecutionsRequest -> Bool)
-> (ListClosedWorkflowExecutionsRequest
    -> ListClosedWorkflowExecutionsRequest
    -> ListClosedWorkflowExecutionsRequest)
-> (ListClosedWorkflowExecutionsRequest
    -> ListClosedWorkflowExecutionsRequest
    -> ListClosedWorkflowExecutionsRequest)
-> Ord ListClosedWorkflowExecutionsRequest
ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Bool
ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Ordering
ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest
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 :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Ordering
compare :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Ordering
$c< :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Bool
< :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Bool
$c<= :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Bool
<= :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Bool
$c> :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Bool
> :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Bool
$c>= :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Bool
>= :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest -> Bool
$cmax :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest
max :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest
$cmin :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest
min :: ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest
-> ListClosedWorkflowExecutionsRequest
Prelude.Ord)
instance Prelude.Show ListClosedWorkflowExecutionsRequest where
  showsPrec :: Int -> ListClosedWorkflowExecutionsRequest -> ShowS
showsPrec Int
_ ListClosedWorkflowExecutionsRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListClosedWorkflowExecutionsRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListClosedWorkflowExecutionsRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data ListClosedWorkflowExecutionsRequest'Filters
  = ListClosedWorkflowExecutionsRequest'ExecutionFilter !Proto.Temporal.Api.Filter.V1.Message.WorkflowExecutionFilter |
    ListClosedWorkflowExecutionsRequest'TypeFilter !Proto.Temporal.Api.Filter.V1.Message.WorkflowTypeFilter |
    ListClosedWorkflowExecutionsRequest'StatusFilter !Proto.Temporal.Api.Filter.V1.Message.StatusFilter
  deriving stock (Int -> ListClosedWorkflowExecutionsRequest'Filters -> ShowS
[ListClosedWorkflowExecutionsRequest'Filters] -> ShowS
ListClosedWorkflowExecutionsRequest'Filters -> String
(Int -> ListClosedWorkflowExecutionsRequest'Filters -> ShowS)
-> (ListClosedWorkflowExecutionsRequest'Filters -> String)
-> ([ListClosedWorkflowExecutionsRequest'Filters] -> ShowS)
-> Show ListClosedWorkflowExecutionsRequest'Filters
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ListClosedWorkflowExecutionsRequest'Filters -> ShowS
showsPrec :: Int -> ListClosedWorkflowExecutionsRequest'Filters -> ShowS
$cshow :: ListClosedWorkflowExecutionsRequest'Filters -> String
show :: ListClosedWorkflowExecutionsRequest'Filters -> String
$cshowList :: [ListClosedWorkflowExecutionsRequest'Filters] -> ShowS
showList :: [ListClosedWorkflowExecutionsRequest'Filters] -> ShowS
Prelude.Show, ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Bool
(ListClosedWorkflowExecutionsRequest'Filters
 -> ListClosedWorkflowExecutionsRequest'Filters -> Bool)
-> (ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest'Filters -> Bool)
-> Eq ListClosedWorkflowExecutionsRequest'Filters
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Bool
== :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Bool
$c/= :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Bool
/= :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Bool
Prelude.Eq, Eq ListClosedWorkflowExecutionsRequest'Filters
Eq ListClosedWorkflowExecutionsRequest'Filters =>
(ListClosedWorkflowExecutionsRequest'Filters
 -> ListClosedWorkflowExecutionsRequest'Filters -> Ordering)
-> (ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest'Filters -> Bool)
-> (ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest'Filters -> Bool)
-> (ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest'Filters -> Bool)
-> (ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest'Filters -> Bool)
-> (ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest'Filters)
-> (ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest'Filters)
-> Ord ListClosedWorkflowExecutionsRequest'Filters
ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Bool
ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Ordering
ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters
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 :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Ordering
compare :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Ordering
$c< :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Bool
< :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Bool
$c<= :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Bool
<= :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Bool
$c> :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Bool
> :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Bool
$c>= :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Bool
>= :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters -> Bool
$cmax :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters
max :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters
$cmin :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters
min :: ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters
-> ListClosedWorkflowExecutionsRequest'Filters
Prelude.Ord)
instance Data.ProtoLens.Field.HasField ListClosedWorkflowExecutionsRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ListClosedWorkflowExecutionsRequest
 -> f ListClosedWorkflowExecutionsRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListClosedWorkflowExecutionsRequest -> Text)
-> (ListClosedWorkflowExecutionsRequest
    -> Text -> ListClosedWorkflowExecutionsRequest)
-> Lens
     ListClosedWorkflowExecutionsRequest
     ListClosedWorkflowExecutionsRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListClosedWorkflowExecutionsRequest -> Text
_ListClosedWorkflowExecutionsRequest'namespace
           (\ ListClosedWorkflowExecutionsRequest
x__ Text
y__
              -> ListClosedWorkflowExecutionsRequest
x__ {_ListClosedWorkflowExecutionsRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListClosedWorkflowExecutionsRequest "maximumPageSize" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maximumPageSize"
-> (Int32 -> f Int32)
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
fieldOf Proxy# "maximumPageSize"
_
    = ((Int32 -> f Int32)
 -> ListClosedWorkflowExecutionsRequest
 -> f ListClosedWorkflowExecutionsRequest)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListClosedWorkflowExecutionsRequest -> Int32)
-> (ListClosedWorkflowExecutionsRequest
    -> Int32 -> ListClosedWorkflowExecutionsRequest)
-> Lens
     ListClosedWorkflowExecutionsRequest
     ListClosedWorkflowExecutionsRequest
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListClosedWorkflowExecutionsRequest -> Int32
_ListClosedWorkflowExecutionsRequest'maximumPageSize
           (\ ListClosedWorkflowExecutionsRequest
x__ Int32
y__
              -> ListClosedWorkflowExecutionsRequest
x__
                   {_ListClosedWorkflowExecutionsRequest'maximumPageSize = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListClosedWorkflowExecutionsRequest "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ListClosedWorkflowExecutionsRequest
 -> f ListClosedWorkflowExecutionsRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListClosedWorkflowExecutionsRequest -> ByteString)
-> (ListClosedWorkflowExecutionsRequest
    -> ByteString -> ListClosedWorkflowExecutionsRequest)
-> Lens
     ListClosedWorkflowExecutionsRequest
     ListClosedWorkflowExecutionsRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListClosedWorkflowExecutionsRequest -> ByteString
_ListClosedWorkflowExecutionsRequest'nextPageToken
           (\ ListClosedWorkflowExecutionsRequest
x__ ByteString
y__
              -> ListClosedWorkflowExecutionsRequest
x__ {_ListClosedWorkflowExecutionsRequest'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListClosedWorkflowExecutionsRequest "startTimeFilter" Proto.Temporal.Api.Filter.V1.Message.StartTimeFilter where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startTimeFilter"
-> (StartTimeFilter -> f StartTimeFilter)
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
fieldOf Proxy# "startTimeFilter"
_
    = ((Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
 -> ListClosedWorkflowExecutionsRequest
 -> f ListClosedWorkflowExecutionsRequest)
-> ((StartTimeFilter -> f StartTimeFilter)
    -> Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
-> (StartTimeFilter -> f StartTimeFilter)
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListClosedWorkflowExecutionsRequest -> Maybe StartTimeFilter)
-> (ListClosedWorkflowExecutionsRequest
    -> Maybe StartTimeFilter -> ListClosedWorkflowExecutionsRequest)
-> Lens
     ListClosedWorkflowExecutionsRequest
     ListClosedWorkflowExecutionsRequest
     (Maybe StartTimeFilter)
     (Maybe StartTimeFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListClosedWorkflowExecutionsRequest -> Maybe StartTimeFilter
_ListClosedWorkflowExecutionsRequest'startTimeFilter
           (\ ListClosedWorkflowExecutionsRequest
x__ Maybe StartTimeFilter
y__
              -> ListClosedWorkflowExecutionsRequest
x__
                   {_ListClosedWorkflowExecutionsRequest'startTimeFilter = y__}))
        (StartTimeFilter -> Lens' (Maybe StartTimeFilter) StartTimeFilter
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens StartTimeFilter
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ListClosedWorkflowExecutionsRequest "maybe'startTimeFilter" (Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.StartTimeFilter) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startTimeFilter"
-> (Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
fieldOf Proxy# "maybe'startTimeFilter"
_
    = ((Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
 -> ListClosedWorkflowExecutionsRequest
 -> f ListClosedWorkflowExecutionsRequest)
-> ((Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
    -> Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
-> (Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListClosedWorkflowExecutionsRequest -> Maybe StartTimeFilter)
-> (ListClosedWorkflowExecutionsRequest
    -> Maybe StartTimeFilter -> ListClosedWorkflowExecutionsRequest)
-> Lens
     ListClosedWorkflowExecutionsRequest
     ListClosedWorkflowExecutionsRequest
     (Maybe StartTimeFilter)
     (Maybe StartTimeFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListClosedWorkflowExecutionsRequest -> Maybe StartTimeFilter
_ListClosedWorkflowExecutionsRequest'startTimeFilter
           (\ ListClosedWorkflowExecutionsRequest
x__ Maybe StartTimeFilter
y__
              -> ListClosedWorkflowExecutionsRequest
x__
                   {_ListClosedWorkflowExecutionsRequest'startTimeFilter = y__}))
        (Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
-> Maybe StartTimeFilter -> f (Maybe StartTimeFilter)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListClosedWorkflowExecutionsRequest "maybe'filters" (Prelude.Maybe ListClosedWorkflowExecutionsRequest'Filters) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'filters"
-> (Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
fieldOf Proxy# "maybe'filters"
_
    = ((Maybe ListClosedWorkflowExecutionsRequest'Filters
  -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
 -> ListClosedWorkflowExecutionsRequest
 -> f ListClosedWorkflowExecutionsRequest)
-> ((Maybe ListClosedWorkflowExecutionsRequest'Filters
     -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
-> (Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListClosedWorkflowExecutionsRequest
 -> Maybe ListClosedWorkflowExecutionsRequest'Filters)
-> (ListClosedWorkflowExecutionsRequest
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest)
-> Lens
     ListClosedWorkflowExecutionsRequest
     ListClosedWorkflowExecutionsRequest
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListClosedWorkflowExecutionsRequest
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
_ListClosedWorkflowExecutionsRequest'filters
           (\ ListClosedWorkflowExecutionsRequest
x__ Maybe ListClosedWorkflowExecutionsRequest'Filters
y__
              -> ListClosedWorkflowExecutionsRequest
x__ {_ListClosedWorkflowExecutionsRequest'filters = y__}))
        (Maybe ListClosedWorkflowExecutionsRequest'Filters
 -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
-> f (Maybe ListClosedWorkflowExecutionsRequest'Filters)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListClosedWorkflowExecutionsRequest "maybe'executionFilter" (Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.WorkflowExecutionFilter) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'executionFilter"
-> (Maybe WorkflowExecutionFilter
    -> f (Maybe WorkflowExecutionFilter))
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
fieldOf Proxy# "maybe'executionFilter"
_
    = ((Maybe ListClosedWorkflowExecutionsRequest'Filters
  -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
 -> ListClosedWorkflowExecutionsRequest
 -> f ListClosedWorkflowExecutionsRequest)
-> ((Maybe WorkflowExecutionFilter
     -> f (Maybe WorkflowExecutionFilter))
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
-> (Maybe WorkflowExecutionFilter
    -> f (Maybe WorkflowExecutionFilter))
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListClosedWorkflowExecutionsRequest
 -> Maybe ListClosedWorkflowExecutionsRequest'Filters)
-> (ListClosedWorkflowExecutionsRequest
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest)
-> Lens
     ListClosedWorkflowExecutionsRequest
     ListClosedWorkflowExecutionsRequest
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListClosedWorkflowExecutionsRequest
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
_ListClosedWorkflowExecutionsRequest'filters
           (\ ListClosedWorkflowExecutionsRequest
x__ Maybe ListClosedWorkflowExecutionsRequest'Filters
y__
              -> ListClosedWorkflowExecutionsRequest
x__ {_ListClosedWorkflowExecutionsRequest'filters = y__}))
        ((Maybe ListClosedWorkflowExecutionsRequest'Filters
 -> Maybe WorkflowExecutionFilter)
-> (Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> Maybe WorkflowExecutionFilter
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters)
-> Lens
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe WorkflowExecutionFilter)
     (Maybe WorkflowExecutionFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe ListClosedWorkflowExecutionsRequest'Filters
x__
              -> case Maybe ListClosedWorkflowExecutionsRequest'Filters
x__ of
                   (Prelude.Just (ListClosedWorkflowExecutionsRequest'ExecutionFilter WorkflowExecutionFilter
x__val))
                     -> WorkflowExecutionFilter -> Maybe WorkflowExecutionFilter
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionFilter
x__val
                   Maybe ListClosedWorkflowExecutionsRequest'Filters
_otherwise -> Maybe WorkflowExecutionFilter
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe ListClosedWorkflowExecutionsRequest'Filters
_ Maybe WorkflowExecutionFilter
y__
              -> (WorkflowExecutionFilter
 -> ListClosedWorkflowExecutionsRequest'Filters)
-> Maybe WorkflowExecutionFilter
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowExecutionFilter
-> ListClosedWorkflowExecutionsRequest'Filters
ListClosedWorkflowExecutionsRequest'ExecutionFilter Maybe WorkflowExecutionFilter
y__))
instance Data.ProtoLens.Field.HasField ListClosedWorkflowExecutionsRequest "executionFilter" Proto.Temporal.Api.Filter.V1.Message.WorkflowExecutionFilter where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "executionFilter"
-> (WorkflowExecutionFilter -> f WorkflowExecutionFilter)
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
fieldOf Proxy# "executionFilter"
_
    = ((Maybe ListClosedWorkflowExecutionsRequest'Filters
  -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
 -> ListClosedWorkflowExecutionsRequest
 -> f ListClosedWorkflowExecutionsRequest)
-> ((WorkflowExecutionFilter -> f WorkflowExecutionFilter)
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
-> (WorkflowExecutionFilter -> f WorkflowExecutionFilter)
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListClosedWorkflowExecutionsRequest
 -> Maybe ListClosedWorkflowExecutionsRequest'Filters)
-> (ListClosedWorkflowExecutionsRequest
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest)
-> Lens
     ListClosedWorkflowExecutionsRequest
     ListClosedWorkflowExecutionsRequest
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListClosedWorkflowExecutionsRequest
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
_ListClosedWorkflowExecutionsRequest'filters
           (\ ListClosedWorkflowExecutionsRequest
x__ Maybe ListClosedWorkflowExecutionsRequest'Filters
y__
              -> ListClosedWorkflowExecutionsRequest
x__ {_ListClosedWorkflowExecutionsRequest'filters = y__}))
        (((Maybe WorkflowExecutionFilter
  -> f (Maybe WorkflowExecutionFilter))
 -> Maybe ListClosedWorkflowExecutionsRequest'Filters
 -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
-> ((WorkflowExecutionFilter -> f WorkflowExecutionFilter)
    -> Maybe WorkflowExecutionFilter
    -> f (Maybe WorkflowExecutionFilter))
-> (WorkflowExecutionFilter -> f WorkflowExecutionFilter)
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
-> f (Maybe ListClosedWorkflowExecutionsRequest'Filters)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe ListClosedWorkflowExecutionsRequest'Filters
 -> Maybe WorkflowExecutionFilter)
-> (Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> Maybe WorkflowExecutionFilter
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters)
-> Lens
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe WorkflowExecutionFilter)
     (Maybe WorkflowExecutionFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe ListClosedWorkflowExecutionsRequest'Filters
x__
                 -> case Maybe ListClosedWorkflowExecutionsRequest'Filters
x__ of
                      (Prelude.Just (ListClosedWorkflowExecutionsRequest'ExecutionFilter WorkflowExecutionFilter
x__val))
                        -> WorkflowExecutionFilter -> Maybe WorkflowExecutionFilter
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionFilter
x__val
                      Maybe ListClosedWorkflowExecutionsRequest'Filters
_otherwise -> Maybe WorkflowExecutionFilter
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe ListClosedWorkflowExecutionsRequest'Filters
_ Maybe WorkflowExecutionFilter
y__
                 -> (WorkflowExecutionFilter
 -> ListClosedWorkflowExecutionsRequest'Filters)
-> Maybe WorkflowExecutionFilter
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowExecutionFilter
-> ListClosedWorkflowExecutionsRequest'Filters
ListClosedWorkflowExecutionsRequest'ExecutionFilter Maybe WorkflowExecutionFilter
y__))
           (WorkflowExecutionFilter
-> Lens' (Maybe WorkflowExecutionFilter) WorkflowExecutionFilter
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionFilter
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField ListClosedWorkflowExecutionsRequest "maybe'typeFilter" (Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.WorkflowTypeFilter) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'typeFilter"
-> (Maybe WorkflowTypeFilter -> f (Maybe WorkflowTypeFilter))
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
fieldOf Proxy# "maybe'typeFilter"
_
    = ((Maybe ListClosedWorkflowExecutionsRequest'Filters
  -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
 -> ListClosedWorkflowExecutionsRequest
 -> f ListClosedWorkflowExecutionsRequest)
-> ((Maybe WorkflowTypeFilter -> f (Maybe WorkflowTypeFilter))
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
-> (Maybe WorkflowTypeFilter -> f (Maybe WorkflowTypeFilter))
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListClosedWorkflowExecutionsRequest
 -> Maybe ListClosedWorkflowExecutionsRequest'Filters)
-> (ListClosedWorkflowExecutionsRequest
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest)
-> Lens
     ListClosedWorkflowExecutionsRequest
     ListClosedWorkflowExecutionsRequest
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListClosedWorkflowExecutionsRequest
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
_ListClosedWorkflowExecutionsRequest'filters
           (\ ListClosedWorkflowExecutionsRequest
x__ Maybe ListClosedWorkflowExecutionsRequest'Filters
y__
              -> ListClosedWorkflowExecutionsRequest
x__ {_ListClosedWorkflowExecutionsRequest'filters = y__}))
        ((Maybe ListClosedWorkflowExecutionsRequest'Filters
 -> Maybe WorkflowTypeFilter)
-> (Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> Maybe WorkflowTypeFilter
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters)
-> Lens
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe WorkflowTypeFilter)
     (Maybe WorkflowTypeFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe ListClosedWorkflowExecutionsRequest'Filters
x__
              -> case Maybe ListClosedWorkflowExecutionsRequest'Filters
x__ of
                   (Prelude.Just (ListClosedWorkflowExecutionsRequest'TypeFilter WorkflowTypeFilter
x__val))
                     -> WorkflowTypeFilter -> Maybe WorkflowTypeFilter
forall a. a -> Maybe a
Prelude.Just WorkflowTypeFilter
x__val
                   Maybe ListClosedWorkflowExecutionsRequest'Filters
_otherwise -> Maybe WorkflowTypeFilter
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe ListClosedWorkflowExecutionsRequest'Filters
_ Maybe WorkflowTypeFilter
y__
              -> (WorkflowTypeFilter -> ListClosedWorkflowExecutionsRequest'Filters)
-> Maybe WorkflowTypeFilter
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowTypeFilter -> ListClosedWorkflowExecutionsRequest'Filters
ListClosedWorkflowExecutionsRequest'TypeFilter Maybe WorkflowTypeFilter
y__))
instance Data.ProtoLens.Field.HasField ListClosedWorkflowExecutionsRequest "typeFilter" Proto.Temporal.Api.Filter.V1.Message.WorkflowTypeFilter where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "typeFilter"
-> (WorkflowTypeFilter -> f WorkflowTypeFilter)
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
fieldOf Proxy# "typeFilter"
_
    = ((Maybe ListClosedWorkflowExecutionsRequest'Filters
  -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
 -> ListClosedWorkflowExecutionsRequest
 -> f ListClosedWorkflowExecutionsRequest)
-> ((WorkflowTypeFilter -> f WorkflowTypeFilter)
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
-> (WorkflowTypeFilter -> f WorkflowTypeFilter)
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListClosedWorkflowExecutionsRequest
 -> Maybe ListClosedWorkflowExecutionsRequest'Filters)
-> (ListClosedWorkflowExecutionsRequest
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest)
-> Lens
     ListClosedWorkflowExecutionsRequest
     ListClosedWorkflowExecutionsRequest
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListClosedWorkflowExecutionsRequest
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
_ListClosedWorkflowExecutionsRequest'filters
           (\ ListClosedWorkflowExecutionsRequest
x__ Maybe ListClosedWorkflowExecutionsRequest'Filters
y__
              -> ListClosedWorkflowExecutionsRequest
x__ {_ListClosedWorkflowExecutionsRequest'filters = y__}))
        (((Maybe WorkflowTypeFilter -> f (Maybe WorkflowTypeFilter))
 -> Maybe ListClosedWorkflowExecutionsRequest'Filters
 -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
-> ((WorkflowTypeFilter -> f WorkflowTypeFilter)
    -> Maybe WorkflowTypeFilter -> f (Maybe WorkflowTypeFilter))
-> (WorkflowTypeFilter -> f WorkflowTypeFilter)
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
-> f (Maybe ListClosedWorkflowExecutionsRequest'Filters)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe ListClosedWorkflowExecutionsRequest'Filters
 -> Maybe WorkflowTypeFilter)
-> (Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> Maybe WorkflowTypeFilter
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters)
-> Lens
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe WorkflowTypeFilter)
     (Maybe WorkflowTypeFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe ListClosedWorkflowExecutionsRequest'Filters
x__
                 -> case Maybe ListClosedWorkflowExecutionsRequest'Filters
x__ of
                      (Prelude.Just (ListClosedWorkflowExecutionsRequest'TypeFilter WorkflowTypeFilter
x__val))
                        -> WorkflowTypeFilter -> Maybe WorkflowTypeFilter
forall a. a -> Maybe a
Prelude.Just WorkflowTypeFilter
x__val
                      Maybe ListClosedWorkflowExecutionsRequest'Filters
_otherwise -> Maybe WorkflowTypeFilter
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe ListClosedWorkflowExecutionsRequest'Filters
_ Maybe WorkflowTypeFilter
y__
                 -> (WorkflowTypeFilter -> ListClosedWorkflowExecutionsRequest'Filters)
-> Maybe WorkflowTypeFilter
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowTypeFilter -> ListClosedWorkflowExecutionsRequest'Filters
ListClosedWorkflowExecutionsRequest'TypeFilter Maybe WorkflowTypeFilter
y__))
           (WorkflowTypeFilter
-> Lens' (Maybe WorkflowTypeFilter) WorkflowTypeFilter
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowTypeFilter
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField ListClosedWorkflowExecutionsRequest "maybe'statusFilter" (Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.StatusFilter) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'statusFilter"
-> (Maybe StatusFilter -> f (Maybe StatusFilter))
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
fieldOf Proxy# "maybe'statusFilter"
_
    = ((Maybe ListClosedWorkflowExecutionsRequest'Filters
  -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
 -> ListClosedWorkflowExecutionsRequest
 -> f ListClosedWorkflowExecutionsRequest)
-> ((Maybe StatusFilter -> f (Maybe StatusFilter))
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
-> (Maybe StatusFilter -> f (Maybe StatusFilter))
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListClosedWorkflowExecutionsRequest
 -> Maybe ListClosedWorkflowExecutionsRequest'Filters)
-> (ListClosedWorkflowExecutionsRequest
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest)
-> Lens
     ListClosedWorkflowExecutionsRequest
     ListClosedWorkflowExecutionsRequest
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListClosedWorkflowExecutionsRequest
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
_ListClosedWorkflowExecutionsRequest'filters
           (\ ListClosedWorkflowExecutionsRequest
x__ Maybe ListClosedWorkflowExecutionsRequest'Filters
y__
              -> ListClosedWorkflowExecutionsRequest
x__ {_ListClosedWorkflowExecutionsRequest'filters = y__}))
        ((Maybe ListClosedWorkflowExecutionsRequest'Filters
 -> Maybe StatusFilter)
-> (Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> Maybe StatusFilter
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters)
-> Lens
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe StatusFilter)
     (Maybe StatusFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe ListClosedWorkflowExecutionsRequest'Filters
x__
              -> case Maybe ListClosedWorkflowExecutionsRequest'Filters
x__ of
                   (Prelude.Just (ListClosedWorkflowExecutionsRequest'StatusFilter StatusFilter
x__val))
                     -> StatusFilter -> Maybe StatusFilter
forall a. a -> Maybe a
Prelude.Just StatusFilter
x__val
                   Maybe ListClosedWorkflowExecutionsRequest'Filters
_otherwise -> Maybe StatusFilter
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe ListClosedWorkflowExecutionsRequest'Filters
_ Maybe StatusFilter
y__
              -> (StatusFilter -> ListClosedWorkflowExecutionsRequest'Filters)
-> Maybe StatusFilter
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   StatusFilter -> ListClosedWorkflowExecutionsRequest'Filters
ListClosedWorkflowExecutionsRequest'StatusFilter Maybe StatusFilter
y__))
instance Data.ProtoLens.Field.HasField ListClosedWorkflowExecutionsRequest "statusFilter" Proto.Temporal.Api.Filter.V1.Message.StatusFilter where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "statusFilter"
-> (StatusFilter -> f StatusFilter)
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
fieldOf Proxy# "statusFilter"
_
    = ((Maybe ListClosedWorkflowExecutionsRequest'Filters
  -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
 -> ListClosedWorkflowExecutionsRequest
 -> f ListClosedWorkflowExecutionsRequest)
-> ((StatusFilter -> f StatusFilter)
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
-> (StatusFilter -> f StatusFilter)
-> ListClosedWorkflowExecutionsRequest
-> f ListClosedWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListClosedWorkflowExecutionsRequest
 -> Maybe ListClosedWorkflowExecutionsRequest'Filters)
-> (ListClosedWorkflowExecutionsRequest
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> ListClosedWorkflowExecutionsRequest)
-> Lens
     ListClosedWorkflowExecutionsRequest
     ListClosedWorkflowExecutionsRequest
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListClosedWorkflowExecutionsRequest
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
_ListClosedWorkflowExecutionsRequest'filters
           (\ ListClosedWorkflowExecutionsRequest
x__ Maybe ListClosedWorkflowExecutionsRequest'Filters
y__
              -> ListClosedWorkflowExecutionsRequest
x__ {_ListClosedWorkflowExecutionsRequest'filters = y__}))
        (((Maybe StatusFilter -> f (Maybe StatusFilter))
 -> Maybe ListClosedWorkflowExecutionsRequest'Filters
 -> f (Maybe ListClosedWorkflowExecutionsRequest'Filters))
-> ((StatusFilter -> f StatusFilter)
    -> Maybe StatusFilter -> f (Maybe StatusFilter))
-> (StatusFilter -> f StatusFilter)
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
-> f (Maybe ListClosedWorkflowExecutionsRequest'Filters)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe ListClosedWorkflowExecutionsRequest'Filters
 -> Maybe StatusFilter)
-> (Maybe ListClosedWorkflowExecutionsRequest'Filters
    -> Maybe StatusFilter
    -> Maybe ListClosedWorkflowExecutionsRequest'Filters)
-> Lens
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe ListClosedWorkflowExecutionsRequest'Filters)
     (Maybe StatusFilter)
     (Maybe StatusFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe ListClosedWorkflowExecutionsRequest'Filters
x__
                 -> case Maybe ListClosedWorkflowExecutionsRequest'Filters
x__ of
                      (Prelude.Just (ListClosedWorkflowExecutionsRequest'StatusFilter StatusFilter
x__val))
                        -> StatusFilter -> Maybe StatusFilter
forall a. a -> Maybe a
Prelude.Just StatusFilter
x__val
                      Maybe ListClosedWorkflowExecutionsRequest'Filters
_otherwise -> Maybe StatusFilter
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe ListClosedWorkflowExecutionsRequest'Filters
_ Maybe StatusFilter
y__
                 -> (StatusFilter -> ListClosedWorkflowExecutionsRequest'Filters)
-> Maybe StatusFilter
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      StatusFilter -> ListClosedWorkflowExecutionsRequest'Filters
ListClosedWorkflowExecutionsRequest'StatusFilter Maybe StatusFilter
y__))
           (StatusFilter -> Lens' (Maybe StatusFilter) StatusFilter
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens StatusFilter
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message ListClosedWorkflowExecutionsRequest where
  messageName :: Proxy ListClosedWorkflowExecutionsRequest -> Text
messageName Proxy ListClosedWorkflowExecutionsRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListClosedWorkflowExecutionsRequest"
  packedMessageDescriptor :: Proxy ListClosedWorkflowExecutionsRequest -> ByteString
packedMessageDescriptor Proxy ListClosedWorkflowExecutionsRequest
_
    = ByteString
"\n\
      \#ListClosedWorkflowExecutionsRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2*\n\
      \\DC1maximum_page_size\CAN\STX \SOH(\ENQR\SImaximumPageSize\DC2&\n\
      \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\DC2S\n\
      \\DC1start_time_filter\CAN\EOT \SOH(\v2'.temporal.api.filter.v1.StartTimeFilterR\SIstartTimeFilter\DC2\\\n\
      \\DLEexecution_filter\CAN\ENQ \SOH(\v2/.temporal.api.filter.v1.WorkflowExecutionFilterH\NULR\SIexecutionFilter\DC2M\n\
      \\vtype_filter\CAN\ACK \SOH(\v2*.temporal.api.filter.v1.WorkflowTypeFilterH\NULR\n\
      \typeFilter\DC2K\n\
      \\rstatus_filter\CAN\a \SOH(\v2$.temporal.api.filter.v1.StatusFilterH\NULR\fstatusFilterB\t\n\
      \\afilters"
  packedFileDescriptor :: Proxy ListClosedWorkflowExecutionsRequest -> ByteString
packedFileDescriptor Proxy ListClosedWorkflowExecutionsRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListClosedWorkflowExecutionsRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor ListClosedWorkflowExecutionsRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ListClosedWorkflowExecutionsRequest Text
-> FieldDescriptor ListClosedWorkflowExecutionsRequest
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
     ListClosedWorkflowExecutionsRequest
     ListClosedWorkflowExecutionsRequest
     Text
     Text
-> FieldAccessor ListClosedWorkflowExecutionsRequest 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 ListClosedWorkflowExecutionsRequest
        maximumPageSize__field_descriptor :: FieldDescriptor ListClosedWorkflowExecutionsRequest
maximumPageSize__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ListClosedWorkflowExecutionsRequest Int32
-> FieldDescriptor ListClosedWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"maximum_page_size"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     ListClosedWorkflowExecutionsRequest
     ListClosedWorkflowExecutionsRequest
     Int32
     Int32
-> FieldAccessor ListClosedWorkflowExecutionsRequest Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maximumPageSize")) ::
              Data.ProtoLens.FieldDescriptor ListClosedWorkflowExecutionsRequest
        nextPageToken__field_descriptor :: FieldDescriptor ListClosedWorkflowExecutionsRequest
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ListClosedWorkflowExecutionsRequest ByteString
-> FieldDescriptor ListClosedWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ListClosedWorkflowExecutionsRequest
     ListClosedWorkflowExecutionsRequest
     ByteString
     ByteString
-> FieldAccessor ListClosedWorkflowExecutionsRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ListClosedWorkflowExecutionsRequest
        startTimeFilter__field_descriptor :: FieldDescriptor ListClosedWorkflowExecutionsRequest
startTimeFilter__field_descriptor
          = String
-> FieldTypeDescriptor StartTimeFilter
-> FieldAccessor
     ListClosedWorkflowExecutionsRequest StartTimeFilter
-> FieldDescriptor ListClosedWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_time_filter"
              (MessageOrGroup -> FieldTypeDescriptor StartTimeFilter
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Filter.V1.Message.StartTimeFilter)
              (Lens
  ListClosedWorkflowExecutionsRequest
  ListClosedWorkflowExecutionsRequest
  (Maybe StartTimeFilter)
  (Maybe StartTimeFilter)
-> FieldAccessor
     ListClosedWorkflowExecutionsRequest StartTimeFilter
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startTimeFilter")) ::
              Data.ProtoLens.FieldDescriptor ListClosedWorkflowExecutionsRequest
        executionFilter__field_descriptor :: FieldDescriptor ListClosedWorkflowExecutionsRequest
executionFilter__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionFilter
-> FieldAccessor
     ListClosedWorkflowExecutionsRequest WorkflowExecutionFilter
-> FieldDescriptor ListClosedWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"execution_filter"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecutionFilter
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Filter.V1.Message.WorkflowExecutionFilter)
              (Lens'
  ListClosedWorkflowExecutionsRequest (Maybe WorkflowExecutionFilter)
-> FieldAccessor
     ListClosedWorkflowExecutionsRequest WorkflowExecutionFilter
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'executionFilter")) ::
              Data.ProtoLens.FieldDescriptor ListClosedWorkflowExecutionsRequest
        typeFilter__field_descriptor :: FieldDescriptor ListClosedWorkflowExecutionsRequest
typeFilter__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowTypeFilter
-> FieldAccessor
     ListClosedWorkflowExecutionsRequest WorkflowTypeFilter
-> FieldDescriptor ListClosedWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"type_filter"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowTypeFilter
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Filter.V1.Message.WorkflowTypeFilter)
              (Lens'
  ListClosedWorkflowExecutionsRequest (Maybe WorkflowTypeFilter)
-> FieldAccessor
     ListClosedWorkflowExecutionsRequest WorkflowTypeFilter
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'typeFilter")) ::
              Data.ProtoLens.FieldDescriptor ListClosedWorkflowExecutionsRequest
        statusFilter__field_descriptor :: FieldDescriptor ListClosedWorkflowExecutionsRequest
statusFilter__field_descriptor
          = String
-> FieldTypeDescriptor StatusFilter
-> FieldAccessor ListClosedWorkflowExecutionsRequest StatusFilter
-> FieldDescriptor ListClosedWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"status_filter"
              (MessageOrGroup -> FieldTypeDescriptor StatusFilter
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Filter.V1.Message.StatusFilter)
              (Lens' ListClosedWorkflowExecutionsRequest (Maybe StatusFilter)
-> FieldAccessor ListClosedWorkflowExecutionsRequest StatusFilter
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'statusFilter")) ::
              Data.ProtoLens.FieldDescriptor ListClosedWorkflowExecutionsRequest
      in
        [(Tag, FieldDescriptor ListClosedWorkflowExecutionsRequest)]
-> Map Tag (FieldDescriptor ListClosedWorkflowExecutionsRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListClosedWorkflowExecutionsRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListClosedWorkflowExecutionsRequest
maximumPageSize__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ListClosedWorkflowExecutionsRequest
nextPageToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ListClosedWorkflowExecutionsRequest
startTimeFilter__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ListClosedWorkflowExecutionsRequest
executionFilter__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ListClosedWorkflowExecutionsRequest
typeFilter__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor ListClosedWorkflowExecutionsRequest
statusFilter__field_descriptor)]
  unknownFields :: Lens' ListClosedWorkflowExecutionsRequest FieldSet
unknownFields
    = (ListClosedWorkflowExecutionsRequest -> FieldSet)
-> (ListClosedWorkflowExecutionsRequest
    -> FieldSet -> ListClosedWorkflowExecutionsRequest)
-> Lens' ListClosedWorkflowExecutionsRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListClosedWorkflowExecutionsRequest -> FieldSet
_ListClosedWorkflowExecutionsRequest'_unknownFields
        (\ ListClosedWorkflowExecutionsRequest
x__ FieldSet
y__
           -> ListClosedWorkflowExecutionsRequest
x__ {_ListClosedWorkflowExecutionsRequest'_unknownFields = y__})
  defMessage :: ListClosedWorkflowExecutionsRequest
defMessage
    = ListClosedWorkflowExecutionsRequest'_constructor
        {_ListClosedWorkflowExecutionsRequest'namespace :: Text
_ListClosedWorkflowExecutionsRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListClosedWorkflowExecutionsRequest'maximumPageSize :: Int32
_ListClosedWorkflowExecutionsRequest'maximumPageSize = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListClosedWorkflowExecutionsRequest'nextPageToken :: ByteString
_ListClosedWorkflowExecutionsRequest'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListClosedWorkflowExecutionsRequest'startTimeFilter :: Maybe StartTimeFilter
_ListClosedWorkflowExecutionsRequest'startTimeFilter = Maybe StartTimeFilter
forall a. Maybe a
Prelude.Nothing,
         _ListClosedWorkflowExecutionsRequest'filters :: Maybe ListClosedWorkflowExecutionsRequest'Filters
_ListClosedWorkflowExecutionsRequest'filters = Maybe ListClosedWorkflowExecutionsRequest'Filters
forall a. Maybe a
Prelude.Nothing,
         _ListClosedWorkflowExecutionsRequest'_unknownFields :: FieldSet
_ListClosedWorkflowExecutionsRequest'_unknownFields = []}
  parseMessage :: Parser ListClosedWorkflowExecutionsRequest
parseMessage
    = let
        loop ::
          ListClosedWorkflowExecutionsRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser ListClosedWorkflowExecutionsRequest
        loop :: ListClosedWorkflowExecutionsRequest
-> Parser ListClosedWorkflowExecutionsRequest
loop ListClosedWorkflowExecutionsRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
16
                          -> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"maximum_page_size"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"maximumPageSize") y x)
                        Word64
26
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                        Word64
34
                          -> do y <- Parser StartTimeFilter -> String -> Parser StartTimeFilter
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"start_time_filter"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startTimeFilter") y x)
                        Word64
42
                          -> do y <- Parser WorkflowExecutionFilter
-> String -> Parser WorkflowExecutionFilter
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"execution_filter"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"executionFilter") y x)
                        Word64
50
                          -> do y <- Parser WorkflowTypeFilter -> String -> Parser WorkflowTypeFilter
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"type_filter"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"typeFilter") y x)
                        Word64
58
                          -> do y <- Parser StatusFilter -> String -> Parser StatusFilter
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"status_filter"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"statusFilter") 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 ListClosedWorkflowExecutionsRequest
-> String -> Parser ListClosedWorkflowExecutionsRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ListClosedWorkflowExecutionsRequest
-> Parser ListClosedWorkflowExecutionsRequest
loop ListClosedWorkflowExecutionsRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ListClosedWorkflowExecutionsRequest"
  buildMessage :: ListClosedWorkflowExecutionsRequest -> Builder
buildMessage
    = \ ListClosedWorkflowExecutionsRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ListClosedWorkflowExecutionsRequest
  ListClosedWorkflowExecutionsRequest
  Text
  Text
-> ListClosedWorkflowExecutionsRequest -> 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") ListClosedWorkflowExecutionsRequest
_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 :: Int32
_v
                     = FoldLike
  Int32
  ListClosedWorkflowExecutionsRequest
  ListClosedWorkflowExecutionsRequest
  Int32
  Int32
-> ListClosedWorkflowExecutionsRequest -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maximumPageSize") ListClosedWorkflowExecutionsRequest
_x
                 in
                   if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
16)
                         ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: ByteString
_v
                        = FoldLike
  ByteString
  ListClosedWorkflowExecutionsRequest
  ListClosedWorkflowExecutionsRequest
  ByteString
  ByteString
-> ListClosedWorkflowExecutionsRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ListClosedWorkflowExecutionsRequest
_x
                    in
                      if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
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
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               ByteString
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe StartTimeFilter)
  ListClosedWorkflowExecutionsRequest
  ListClosedWorkflowExecutionsRequest
  (Maybe StartTimeFilter)
  (Maybe StartTimeFilter)
-> ListClosedWorkflowExecutionsRequest -> Maybe StartTimeFilter
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'startTimeFilter") ListClosedWorkflowExecutionsRequest
_x
                       of
                         Maybe StartTimeFilter
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just StartTimeFilter
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (StartTimeFilter -> ByteString) -> StartTimeFilter -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   StartTimeFilter -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage StartTimeFilter
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe ListClosedWorkflowExecutionsRequest'Filters)
  ListClosedWorkflowExecutionsRequest
  ListClosedWorkflowExecutionsRequest
  (Maybe ListClosedWorkflowExecutionsRequest'Filters)
  (Maybe ListClosedWorkflowExecutionsRequest'Filters)
-> ListClosedWorkflowExecutionsRequest
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'filters") ListClosedWorkflowExecutionsRequest
_x
                          of
                            Maybe ListClosedWorkflowExecutionsRequest'Filters
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just (ListClosedWorkflowExecutionsRequest'ExecutionFilter WorkflowExecutionFilter
v))
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (WorkflowExecutionFilter -> ByteString)
-> WorkflowExecutionFilter
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      WorkflowExecutionFilter -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionFilter
v)
                            (Prelude.Just (ListClosedWorkflowExecutionsRequest'TypeFilter WorkflowTypeFilter
v))
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                   ((ByteString -> Builder)
-> (WorkflowTypeFilter -> ByteString)
-> WorkflowTypeFilter
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      WorkflowTypeFilter -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowTypeFilter
v)
                            (Prelude.Just (ListClosedWorkflowExecutionsRequest'StatusFilter StatusFilter
v))
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                   ((ByteString -> Builder)
-> (StatusFilter -> ByteString) -> StatusFilter -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      StatusFilter -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage StatusFilter
v))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  ListClosedWorkflowExecutionsRequest
  ListClosedWorkflowExecutionsRequest
  FieldSet
  FieldSet
-> ListClosedWorkflowExecutionsRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListClosedWorkflowExecutionsRequest
  ListClosedWorkflowExecutionsRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListClosedWorkflowExecutionsRequest FieldSet
Data.ProtoLens.unknownFields ListClosedWorkflowExecutionsRequest
_x))))))
instance Control.DeepSeq.NFData ListClosedWorkflowExecutionsRequest where
  rnf :: ListClosedWorkflowExecutionsRequest -> ()
rnf
    = \ ListClosedWorkflowExecutionsRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListClosedWorkflowExecutionsRequest -> FieldSet
_ListClosedWorkflowExecutionsRequest'_unknownFields ListClosedWorkflowExecutionsRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListClosedWorkflowExecutionsRequest -> Text
_ListClosedWorkflowExecutionsRequest'namespace ListClosedWorkflowExecutionsRequest
x__)
                (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListClosedWorkflowExecutionsRequest -> Int32
_ListClosedWorkflowExecutionsRequest'maximumPageSize ListClosedWorkflowExecutionsRequest
x__)
                   (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ListClosedWorkflowExecutionsRequest -> ByteString
_ListClosedWorkflowExecutionsRequest'nextPageToken ListClosedWorkflowExecutionsRequest
x__)
                      (Maybe StartTimeFilter -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ListClosedWorkflowExecutionsRequest -> Maybe StartTimeFilter
_ListClosedWorkflowExecutionsRequest'startTimeFilter ListClosedWorkflowExecutionsRequest
x__)
                         (Maybe ListClosedWorkflowExecutionsRequest'Filters -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ListClosedWorkflowExecutionsRequest
-> Maybe ListClosedWorkflowExecutionsRequest'Filters
_ListClosedWorkflowExecutionsRequest'filters ListClosedWorkflowExecutionsRequest
x__) ())))))
instance Control.DeepSeq.NFData ListClosedWorkflowExecutionsRequest'Filters where
  rnf :: ListClosedWorkflowExecutionsRequest'Filters -> ()
rnf (ListClosedWorkflowExecutionsRequest'ExecutionFilter WorkflowExecutionFilter
x__)
    = WorkflowExecutionFilter -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowExecutionFilter
x__
  rnf (ListClosedWorkflowExecutionsRequest'TypeFilter WorkflowTypeFilter
x__)
    = WorkflowTypeFilter -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowTypeFilter
x__
  rnf (ListClosedWorkflowExecutionsRequest'StatusFilter StatusFilter
x__)
    = StatusFilter -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf StatusFilter
x__
_ListClosedWorkflowExecutionsRequest'ExecutionFilter ::
  Data.ProtoLens.Prism.Prism' ListClosedWorkflowExecutionsRequest'Filters Proto.Temporal.Api.Filter.V1.Message.WorkflowExecutionFilter
_ListClosedWorkflowExecutionsRequest'ExecutionFilter :: Prism'
  ListClosedWorkflowExecutionsRequest'Filters WorkflowExecutionFilter
_ListClosedWorkflowExecutionsRequest'ExecutionFilter
  = (WorkflowExecutionFilter
 -> ListClosedWorkflowExecutionsRequest'Filters)
-> (ListClosedWorkflowExecutionsRequest'Filters
    -> Maybe WorkflowExecutionFilter)
-> Prism'
     ListClosedWorkflowExecutionsRequest'Filters WorkflowExecutionFilter
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowExecutionFilter
-> ListClosedWorkflowExecutionsRequest'Filters
ListClosedWorkflowExecutionsRequest'ExecutionFilter
      (\ ListClosedWorkflowExecutionsRequest'Filters
p__
         -> case ListClosedWorkflowExecutionsRequest'Filters
p__ of
              (ListClosedWorkflowExecutionsRequest'ExecutionFilter WorkflowExecutionFilter
p__val)
                -> WorkflowExecutionFilter -> Maybe WorkflowExecutionFilter
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionFilter
p__val
              ListClosedWorkflowExecutionsRequest'Filters
_otherwise -> Maybe WorkflowExecutionFilter
forall a. Maybe a
Prelude.Nothing)
_ListClosedWorkflowExecutionsRequest'TypeFilter ::
  Data.ProtoLens.Prism.Prism' ListClosedWorkflowExecutionsRequest'Filters Proto.Temporal.Api.Filter.V1.Message.WorkflowTypeFilter
_ListClosedWorkflowExecutionsRequest'TypeFilter :: Prism'
  ListClosedWorkflowExecutionsRequest'Filters WorkflowTypeFilter
_ListClosedWorkflowExecutionsRequest'TypeFilter
  = (WorkflowTypeFilter -> ListClosedWorkflowExecutionsRequest'Filters)
-> (ListClosedWorkflowExecutionsRequest'Filters
    -> Maybe WorkflowTypeFilter)
-> Prism'
     ListClosedWorkflowExecutionsRequest'Filters WorkflowTypeFilter
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowTypeFilter -> ListClosedWorkflowExecutionsRequest'Filters
ListClosedWorkflowExecutionsRequest'TypeFilter
      (\ ListClosedWorkflowExecutionsRequest'Filters
p__
         -> case ListClosedWorkflowExecutionsRequest'Filters
p__ of
              (ListClosedWorkflowExecutionsRequest'TypeFilter WorkflowTypeFilter
p__val)
                -> WorkflowTypeFilter -> Maybe WorkflowTypeFilter
forall a. a -> Maybe a
Prelude.Just WorkflowTypeFilter
p__val
              ListClosedWorkflowExecutionsRequest'Filters
_otherwise -> Maybe WorkflowTypeFilter
forall a. Maybe a
Prelude.Nothing)
_ListClosedWorkflowExecutionsRequest'StatusFilter ::
  Data.ProtoLens.Prism.Prism' ListClosedWorkflowExecutionsRequest'Filters Proto.Temporal.Api.Filter.V1.Message.StatusFilter
_ListClosedWorkflowExecutionsRequest'StatusFilter :: Prism' ListClosedWorkflowExecutionsRequest'Filters StatusFilter
_ListClosedWorkflowExecutionsRequest'StatusFilter
  = (StatusFilter -> ListClosedWorkflowExecutionsRequest'Filters)
-> (ListClosedWorkflowExecutionsRequest'Filters
    -> Maybe StatusFilter)
-> Prism' ListClosedWorkflowExecutionsRequest'Filters StatusFilter
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      StatusFilter -> ListClosedWorkflowExecutionsRequest'Filters
ListClosedWorkflowExecutionsRequest'StatusFilter
      (\ ListClosedWorkflowExecutionsRequest'Filters
p__
         -> case ListClosedWorkflowExecutionsRequest'Filters
p__ of
              (ListClosedWorkflowExecutionsRequest'StatusFilter StatusFilter
p__val)
                -> StatusFilter -> Maybe StatusFilter
forall a. a -> Maybe a
Prelude.Just StatusFilter
p__val
              ListClosedWorkflowExecutionsRequest'Filters
_otherwise -> Maybe StatusFilter
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.executions' @:: Lens' ListClosedWorkflowExecutionsResponse [Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'executions' @:: Lens' ListClosedWorkflowExecutionsResponse (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ListClosedWorkflowExecutionsResponse Data.ByteString.ByteString@ -}
data ListClosedWorkflowExecutionsResponse
  = ListClosedWorkflowExecutionsResponse'_constructor {ListClosedWorkflowExecutionsResponse
-> Vector WorkflowExecutionInfo
_ListClosedWorkflowExecutionsResponse'executions :: !(Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo),
                                                       ListClosedWorkflowExecutionsResponse -> ByteString
_ListClosedWorkflowExecutionsResponse'nextPageToken :: !Data.ByteString.ByteString,
                                                       ListClosedWorkflowExecutionsResponse -> FieldSet
_ListClosedWorkflowExecutionsResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Bool
(ListClosedWorkflowExecutionsResponse
 -> ListClosedWorkflowExecutionsResponse -> Bool)
-> (ListClosedWorkflowExecutionsResponse
    -> ListClosedWorkflowExecutionsResponse -> Bool)
-> Eq ListClosedWorkflowExecutionsResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Bool
== :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Bool
$c/= :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Bool
/= :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Bool
Prelude.Eq, Eq ListClosedWorkflowExecutionsResponse
Eq ListClosedWorkflowExecutionsResponse =>
(ListClosedWorkflowExecutionsResponse
 -> ListClosedWorkflowExecutionsResponse -> Ordering)
-> (ListClosedWorkflowExecutionsResponse
    -> ListClosedWorkflowExecutionsResponse -> Bool)
-> (ListClosedWorkflowExecutionsResponse
    -> ListClosedWorkflowExecutionsResponse -> Bool)
-> (ListClosedWorkflowExecutionsResponse
    -> ListClosedWorkflowExecutionsResponse -> Bool)
-> (ListClosedWorkflowExecutionsResponse
    -> ListClosedWorkflowExecutionsResponse -> Bool)
-> (ListClosedWorkflowExecutionsResponse
    -> ListClosedWorkflowExecutionsResponse
    -> ListClosedWorkflowExecutionsResponse)
-> (ListClosedWorkflowExecutionsResponse
    -> ListClosedWorkflowExecutionsResponse
    -> ListClosedWorkflowExecutionsResponse)
-> Ord ListClosedWorkflowExecutionsResponse
ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Bool
ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Ordering
ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse
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 :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Ordering
compare :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Ordering
$c< :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Bool
< :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Bool
$c<= :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Bool
<= :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Bool
$c> :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Bool
> :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Bool
$c>= :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Bool
>= :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse -> Bool
$cmax :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse
max :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse
$cmin :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse
min :: ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse
-> ListClosedWorkflowExecutionsResponse
Prelude.Ord)
instance Prelude.Show ListClosedWorkflowExecutionsResponse where
  showsPrec :: Int -> ListClosedWorkflowExecutionsResponse -> ShowS
showsPrec Int
_ ListClosedWorkflowExecutionsResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListClosedWorkflowExecutionsResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListClosedWorkflowExecutionsResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListClosedWorkflowExecutionsResponse "executions" [Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "executions"
-> ([WorkflowExecutionInfo] -> f [WorkflowExecutionInfo])
-> ListClosedWorkflowExecutionsResponse
-> f ListClosedWorkflowExecutionsResponse
fieldOf Proxy# "executions"
_
    = ((Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo))
 -> ListClosedWorkflowExecutionsResponse
 -> f ListClosedWorkflowExecutionsResponse)
-> (([WorkflowExecutionInfo] -> f [WorkflowExecutionInfo])
    -> Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> ([WorkflowExecutionInfo] -> f [WorkflowExecutionInfo])
-> ListClosedWorkflowExecutionsResponse
-> f ListClosedWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListClosedWorkflowExecutionsResponse
 -> Vector WorkflowExecutionInfo)
-> (ListClosedWorkflowExecutionsResponse
    -> Vector WorkflowExecutionInfo
    -> ListClosedWorkflowExecutionsResponse)
-> Lens
     ListClosedWorkflowExecutionsResponse
     ListClosedWorkflowExecutionsResponse
     (Vector WorkflowExecutionInfo)
     (Vector WorkflowExecutionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListClosedWorkflowExecutionsResponse
-> Vector WorkflowExecutionInfo
_ListClosedWorkflowExecutionsResponse'executions
           (\ ListClosedWorkflowExecutionsResponse
x__ Vector WorkflowExecutionInfo
y__
              -> ListClosedWorkflowExecutionsResponse
x__ {_ListClosedWorkflowExecutionsResponse'executions = y__}))
        ((Vector WorkflowExecutionInfo -> [WorkflowExecutionInfo])
-> (Vector WorkflowExecutionInfo
    -> [WorkflowExecutionInfo] -> Vector WorkflowExecutionInfo)
-> Lens
     (Vector WorkflowExecutionInfo)
     (Vector WorkflowExecutionInfo)
     [WorkflowExecutionInfo]
     [WorkflowExecutionInfo]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector WorkflowExecutionInfo -> [WorkflowExecutionInfo]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector WorkflowExecutionInfo
_ [WorkflowExecutionInfo]
y__ -> [WorkflowExecutionInfo] -> Vector WorkflowExecutionInfo
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [WorkflowExecutionInfo]
y__))
instance Data.ProtoLens.Field.HasField ListClosedWorkflowExecutionsResponse "vec'executions" (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'executions"
-> (Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> ListClosedWorkflowExecutionsResponse
-> f ListClosedWorkflowExecutionsResponse
fieldOf Proxy# "vec'executions"
_
    = ((Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo))
 -> ListClosedWorkflowExecutionsResponse
 -> f ListClosedWorkflowExecutionsResponse)
-> ((Vector WorkflowExecutionInfo
     -> f (Vector WorkflowExecutionInfo))
    -> Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> (Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> ListClosedWorkflowExecutionsResponse
-> f ListClosedWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListClosedWorkflowExecutionsResponse
 -> Vector WorkflowExecutionInfo)
-> (ListClosedWorkflowExecutionsResponse
    -> Vector WorkflowExecutionInfo
    -> ListClosedWorkflowExecutionsResponse)
-> Lens
     ListClosedWorkflowExecutionsResponse
     ListClosedWorkflowExecutionsResponse
     (Vector WorkflowExecutionInfo)
     (Vector WorkflowExecutionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListClosedWorkflowExecutionsResponse
-> Vector WorkflowExecutionInfo
_ListClosedWorkflowExecutionsResponse'executions
           (\ ListClosedWorkflowExecutionsResponse
x__ Vector WorkflowExecutionInfo
y__
              -> ListClosedWorkflowExecutionsResponse
x__ {_ListClosedWorkflowExecutionsResponse'executions = y__}))
        (Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo))
-> Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListClosedWorkflowExecutionsResponse "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ListClosedWorkflowExecutionsResponse
-> f ListClosedWorkflowExecutionsResponse
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ListClosedWorkflowExecutionsResponse
 -> f ListClosedWorkflowExecutionsResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ListClosedWorkflowExecutionsResponse
-> f ListClosedWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListClosedWorkflowExecutionsResponse -> ByteString)
-> (ListClosedWorkflowExecutionsResponse
    -> ByteString -> ListClosedWorkflowExecutionsResponse)
-> Lens
     ListClosedWorkflowExecutionsResponse
     ListClosedWorkflowExecutionsResponse
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListClosedWorkflowExecutionsResponse -> ByteString
_ListClosedWorkflowExecutionsResponse'nextPageToken
           (\ ListClosedWorkflowExecutionsResponse
x__ ByteString
y__
              -> ListClosedWorkflowExecutionsResponse
x__
                   {_ListClosedWorkflowExecutionsResponse'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListClosedWorkflowExecutionsResponse where
  messageName :: Proxy ListClosedWorkflowExecutionsResponse -> Text
messageName Proxy ListClosedWorkflowExecutionsResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListClosedWorkflowExecutionsResponse"
  packedMessageDescriptor :: Proxy ListClosedWorkflowExecutionsResponse -> ByteString
packedMessageDescriptor Proxy ListClosedWorkflowExecutionsResponse
_
    = ByteString
"\n\
      \$ListClosedWorkflowExecutionsResponse\DC2O\n\
      \\n\
      \executions\CAN\SOH \ETX(\v2/.temporal.api.workflow.v1.WorkflowExecutionInfoR\n\
      \executions\DC2&\n\
      \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken"
  packedFileDescriptor :: Proxy ListClosedWorkflowExecutionsResponse -> ByteString
packedFileDescriptor Proxy ListClosedWorkflowExecutionsResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListClosedWorkflowExecutionsResponse)
fieldsByTag
    = let
        executions__field_descriptor :: FieldDescriptor ListClosedWorkflowExecutionsResponse
executions__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionInfo
-> FieldAccessor
     ListClosedWorkflowExecutionsResponse WorkflowExecutionInfo
-> FieldDescriptor ListClosedWorkflowExecutionsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"executions"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecutionInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo)
              (Packing
-> Lens'
     ListClosedWorkflowExecutionsResponse [WorkflowExecutionInfo]
-> FieldAccessor
     ListClosedWorkflowExecutionsResponse WorkflowExecutionInfo
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 @"executions")) ::
              Data.ProtoLens.FieldDescriptor ListClosedWorkflowExecutionsResponse
        nextPageToken__field_descriptor :: FieldDescriptor ListClosedWorkflowExecutionsResponse
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ListClosedWorkflowExecutionsResponse ByteString
-> FieldDescriptor ListClosedWorkflowExecutionsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ListClosedWorkflowExecutionsResponse
     ListClosedWorkflowExecutionsResponse
     ByteString
     ByteString
-> FieldAccessor ListClosedWorkflowExecutionsResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ListClosedWorkflowExecutionsResponse
      in
        [(Tag, FieldDescriptor ListClosedWorkflowExecutionsResponse)]
-> Map Tag (FieldDescriptor ListClosedWorkflowExecutionsResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListClosedWorkflowExecutionsResponse
executions__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListClosedWorkflowExecutionsResponse
nextPageToken__field_descriptor)]
  unknownFields :: Lens' ListClosedWorkflowExecutionsResponse FieldSet
unknownFields
    = (ListClosedWorkflowExecutionsResponse -> FieldSet)
-> (ListClosedWorkflowExecutionsResponse
    -> FieldSet -> ListClosedWorkflowExecutionsResponse)
-> Lens' ListClosedWorkflowExecutionsResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListClosedWorkflowExecutionsResponse -> FieldSet
_ListClosedWorkflowExecutionsResponse'_unknownFields
        (\ ListClosedWorkflowExecutionsResponse
x__ FieldSet
y__
           -> ListClosedWorkflowExecutionsResponse
x__
                {_ListClosedWorkflowExecutionsResponse'_unknownFields = y__})
  defMessage :: ListClosedWorkflowExecutionsResponse
defMessage
    = ListClosedWorkflowExecutionsResponse'_constructor
        {_ListClosedWorkflowExecutionsResponse'executions :: Vector WorkflowExecutionInfo
_ListClosedWorkflowExecutionsResponse'executions = Vector WorkflowExecutionInfo
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ListClosedWorkflowExecutionsResponse'nextPageToken :: ByteString
_ListClosedWorkflowExecutionsResponse'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListClosedWorkflowExecutionsResponse'_unknownFields :: FieldSet
_ListClosedWorkflowExecutionsResponse'_unknownFields = []}
  parseMessage :: Parser ListClosedWorkflowExecutionsResponse
parseMessage
    = let
        loop ::
          ListClosedWorkflowExecutionsResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo
             -> Data.ProtoLens.Encoding.Bytes.Parser ListClosedWorkflowExecutionsResponse
        loop :: ListClosedWorkflowExecutionsResponse
-> Growing Vector RealWorld WorkflowExecutionInfo
-> Parser ListClosedWorkflowExecutionsResponse
loop ListClosedWorkflowExecutionsResponse
x Growing Vector RealWorld WorkflowExecutionInfo
mutable'executions
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'executions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                mutable'executions)
                      (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'executions") frozen'executions
                              x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser WorkflowExecutionInfo
-> String -> Parser WorkflowExecutionInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"executions"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'executions y)
                                loop x v
                        Word64
18
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                                  mutable'executions
                        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'executions
      in
        Parser ListClosedWorkflowExecutionsResponse
-> String -> Parser ListClosedWorkflowExecutionsResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'executions <- IO (Growing Vector RealWorld WorkflowExecutionInfo)
-> Parser (Growing Vector RealWorld WorkflowExecutionInfo)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld WorkflowExecutionInfo)
IO (Growing Vector (PrimState IO) WorkflowExecutionInfo)
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'executions)
          String
"ListClosedWorkflowExecutionsResponse"
  buildMessage :: ListClosedWorkflowExecutionsResponse -> Builder
buildMessage
    = \ ListClosedWorkflowExecutionsResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((WorkflowExecutionInfo -> Builder)
-> Vector WorkflowExecutionInfo -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ WorkflowExecutionInfo
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (WorkflowExecutionInfo -> ByteString)
-> WorkflowExecutionInfo
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           WorkflowExecutionInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionInfo
_v))
                (FoldLike
  (Vector WorkflowExecutionInfo)
  ListClosedWorkflowExecutionsResponse
  ListClosedWorkflowExecutionsResponse
  (Vector WorkflowExecutionInfo)
  (Vector WorkflowExecutionInfo)
-> ListClosedWorkflowExecutionsResponse
-> Vector WorkflowExecutionInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'executions") ListClosedWorkflowExecutionsResponse
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: ByteString
_v
                     = FoldLike
  ByteString
  ListClosedWorkflowExecutionsResponse
  ListClosedWorkflowExecutionsResponse
  ByteString
  ByteString
-> ListClosedWorkflowExecutionsResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ListClosedWorkflowExecutionsResponse
_x
                 in
                   if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
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
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            ByteString
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ListClosedWorkflowExecutionsResponse
  ListClosedWorkflowExecutionsResponse
  FieldSet
  FieldSet
-> ListClosedWorkflowExecutionsResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListClosedWorkflowExecutionsResponse
  ListClosedWorkflowExecutionsResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListClosedWorkflowExecutionsResponse FieldSet
Data.ProtoLens.unknownFields ListClosedWorkflowExecutionsResponse
_x)))
instance Control.DeepSeq.NFData ListClosedWorkflowExecutionsResponse where
  rnf :: ListClosedWorkflowExecutionsResponse -> ()
rnf
    = \ ListClosedWorkflowExecutionsResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListClosedWorkflowExecutionsResponse -> FieldSet
_ListClosedWorkflowExecutionsResponse'_unknownFields ListClosedWorkflowExecutionsResponse
x__)
             (Vector WorkflowExecutionInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListClosedWorkflowExecutionsResponse
-> Vector WorkflowExecutionInfo
_ListClosedWorkflowExecutionsResponse'executions ListClosedWorkflowExecutionsResponse
x__)
                (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListClosedWorkflowExecutionsResponse -> ByteString
_ListClosedWorkflowExecutionsResponse'nextPageToken ListClosedWorkflowExecutionsResponse
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.pageSize' @:: Lens' ListNamespacesRequest Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ListNamespacesRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespaceFilter' @:: Lens' ListNamespacesRequest Proto.Temporal.Api.Namespace.V1.Message.NamespaceFilter@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'namespaceFilter' @:: Lens' ListNamespacesRequest (Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceFilter)@ -}
data ListNamespacesRequest
  = ListNamespacesRequest'_constructor {ListNamespacesRequest -> Int32
_ListNamespacesRequest'pageSize :: !Data.Int.Int32,
                                        ListNamespacesRequest -> ByteString
_ListNamespacesRequest'nextPageToken :: !Data.ByteString.ByteString,
                                        ListNamespacesRequest -> Maybe NamespaceFilter
_ListNamespacesRequest'namespaceFilter :: !(Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceFilter),
                                        ListNamespacesRequest -> FieldSet
_ListNamespacesRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListNamespacesRequest -> ListNamespacesRequest -> Bool
(ListNamespacesRequest -> ListNamespacesRequest -> Bool)
-> (ListNamespacesRequest -> ListNamespacesRequest -> Bool)
-> Eq ListNamespacesRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListNamespacesRequest -> ListNamespacesRequest -> Bool
== :: ListNamespacesRequest -> ListNamespacesRequest -> Bool
$c/= :: ListNamespacesRequest -> ListNamespacesRequest -> Bool
/= :: ListNamespacesRequest -> ListNamespacesRequest -> Bool
Prelude.Eq, Eq ListNamespacesRequest
Eq ListNamespacesRequest =>
(ListNamespacesRequest -> ListNamespacesRequest -> Ordering)
-> (ListNamespacesRequest -> ListNamespacesRequest -> Bool)
-> (ListNamespacesRequest -> ListNamespacesRequest -> Bool)
-> (ListNamespacesRequest -> ListNamespacesRequest -> Bool)
-> (ListNamespacesRequest -> ListNamespacesRequest -> Bool)
-> (ListNamespacesRequest
    -> ListNamespacesRequest -> ListNamespacesRequest)
-> (ListNamespacesRequest
    -> ListNamespacesRequest -> ListNamespacesRequest)
-> Ord ListNamespacesRequest
ListNamespacesRequest -> ListNamespacesRequest -> Bool
ListNamespacesRequest -> ListNamespacesRequest -> Ordering
ListNamespacesRequest
-> ListNamespacesRequest -> ListNamespacesRequest
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 :: ListNamespacesRequest -> ListNamespacesRequest -> Ordering
compare :: ListNamespacesRequest -> ListNamespacesRequest -> Ordering
$c< :: ListNamespacesRequest -> ListNamespacesRequest -> Bool
< :: ListNamespacesRequest -> ListNamespacesRequest -> Bool
$c<= :: ListNamespacesRequest -> ListNamespacesRequest -> Bool
<= :: ListNamespacesRequest -> ListNamespacesRequest -> Bool
$c> :: ListNamespacesRequest -> ListNamespacesRequest -> Bool
> :: ListNamespacesRequest -> ListNamespacesRequest -> Bool
$c>= :: ListNamespacesRequest -> ListNamespacesRequest -> Bool
>= :: ListNamespacesRequest -> ListNamespacesRequest -> Bool
$cmax :: ListNamespacesRequest
-> ListNamespacesRequest -> ListNamespacesRequest
max :: ListNamespacesRequest
-> ListNamespacesRequest -> ListNamespacesRequest
$cmin :: ListNamespacesRequest
-> ListNamespacesRequest -> ListNamespacesRequest
min :: ListNamespacesRequest
-> ListNamespacesRequest -> ListNamespacesRequest
Prelude.Ord)
instance Prelude.Show ListNamespacesRequest where
  showsPrec :: Int -> ListNamespacesRequest -> ShowS
showsPrec Int
_ ListNamespacesRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListNamespacesRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListNamespacesRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListNamespacesRequest "pageSize" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "pageSize"
-> (Int32 -> f Int32)
-> ListNamespacesRequest
-> f ListNamespacesRequest
fieldOf Proxy# "pageSize"
_
    = ((Int32 -> f Int32)
 -> ListNamespacesRequest -> f ListNamespacesRequest)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ListNamespacesRequest
-> f ListNamespacesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListNamespacesRequest -> Int32)
-> (ListNamespacesRequest -> Int32 -> ListNamespacesRequest)
-> Lens ListNamespacesRequest ListNamespacesRequest Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListNamespacesRequest -> Int32
_ListNamespacesRequest'pageSize
           (\ ListNamespacesRequest
x__ Int32
y__ -> ListNamespacesRequest
x__ {_ListNamespacesRequest'pageSize = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListNamespacesRequest "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ListNamespacesRequest
-> f ListNamespacesRequest
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ListNamespacesRequest -> f ListNamespacesRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ListNamespacesRequest
-> f ListNamespacesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListNamespacesRequest -> ByteString)
-> (ListNamespacesRequest -> ByteString -> ListNamespacesRequest)
-> Lens
     ListNamespacesRequest ListNamespacesRequest ByteString ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListNamespacesRequest -> ByteString
_ListNamespacesRequest'nextPageToken
           (\ ListNamespacesRequest
x__ ByteString
y__ -> ListNamespacesRequest
x__ {_ListNamespacesRequest'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListNamespacesRequest "namespaceFilter" Proto.Temporal.Api.Namespace.V1.Message.NamespaceFilter where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceFilter"
-> (NamespaceFilter -> f NamespaceFilter)
-> ListNamespacesRequest
-> f ListNamespacesRequest
fieldOf Proxy# "namespaceFilter"
_
    = ((Maybe NamespaceFilter -> f (Maybe NamespaceFilter))
 -> ListNamespacesRequest -> f ListNamespacesRequest)
-> ((NamespaceFilter -> f NamespaceFilter)
    -> Maybe NamespaceFilter -> f (Maybe NamespaceFilter))
-> (NamespaceFilter -> f NamespaceFilter)
-> ListNamespacesRequest
-> f ListNamespacesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListNamespacesRequest -> Maybe NamespaceFilter)
-> (ListNamespacesRequest
    -> Maybe NamespaceFilter -> ListNamespacesRequest)
-> Lens
     ListNamespacesRequest
     ListNamespacesRequest
     (Maybe NamespaceFilter)
     (Maybe NamespaceFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListNamespacesRequest -> Maybe NamespaceFilter
_ListNamespacesRequest'namespaceFilter
           (\ ListNamespacesRequest
x__ Maybe NamespaceFilter
y__ -> ListNamespacesRequest
x__ {_ListNamespacesRequest'namespaceFilter = y__}))
        (NamespaceFilter -> Lens' (Maybe NamespaceFilter) NamespaceFilter
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NamespaceFilter
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ListNamespacesRequest "maybe'namespaceFilter" (Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceFilter) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'namespaceFilter"
-> (Maybe NamespaceFilter -> f (Maybe NamespaceFilter))
-> ListNamespacesRequest
-> f ListNamespacesRequest
fieldOf Proxy# "maybe'namespaceFilter"
_
    = ((Maybe NamespaceFilter -> f (Maybe NamespaceFilter))
 -> ListNamespacesRequest -> f ListNamespacesRequest)
-> ((Maybe NamespaceFilter -> f (Maybe NamespaceFilter))
    -> Maybe NamespaceFilter -> f (Maybe NamespaceFilter))
-> (Maybe NamespaceFilter -> f (Maybe NamespaceFilter))
-> ListNamespacesRequest
-> f ListNamespacesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListNamespacesRequest -> Maybe NamespaceFilter)
-> (ListNamespacesRequest
    -> Maybe NamespaceFilter -> ListNamespacesRequest)
-> Lens
     ListNamespacesRequest
     ListNamespacesRequest
     (Maybe NamespaceFilter)
     (Maybe NamespaceFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListNamespacesRequest -> Maybe NamespaceFilter
_ListNamespacesRequest'namespaceFilter
           (\ ListNamespacesRequest
x__ Maybe NamespaceFilter
y__ -> ListNamespacesRequest
x__ {_ListNamespacesRequest'namespaceFilter = y__}))
        (Maybe NamespaceFilter -> f (Maybe NamespaceFilter))
-> Maybe NamespaceFilter -> f (Maybe NamespaceFilter)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListNamespacesRequest where
  messageName :: Proxy ListNamespacesRequest -> Text
messageName Proxy ListNamespacesRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListNamespacesRequest"
  packedMessageDescriptor :: Proxy ListNamespacesRequest -> ByteString
packedMessageDescriptor Proxy ListNamespacesRequest
_
    = ByteString
"\n\
      \\NAKListNamespacesRequest\DC2\ESC\n\
      \\tpage_size\CAN\SOH \SOH(\ENQR\bpageSize\DC2&\n\
      \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken\DC2U\n\
      \\DLEnamespace_filter\CAN\ETX \SOH(\v2*.temporal.api.namespace.v1.NamespaceFilterR\SInamespaceFilter"
  packedFileDescriptor :: Proxy ListNamespacesRequest -> ByteString
packedFileDescriptor Proxy ListNamespacesRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListNamespacesRequest)
fieldsByTag
    = let
        pageSize__field_descriptor :: FieldDescriptor ListNamespacesRequest
pageSize__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ListNamespacesRequest Int32
-> FieldDescriptor ListNamespacesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"page_size"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens ListNamespacesRequest ListNamespacesRequest Int32 Int32
-> FieldAccessor ListNamespacesRequest Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pageSize")) ::
              Data.ProtoLens.FieldDescriptor ListNamespacesRequest
        nextPageToken__field_descriptor :: FieldDescriptor ListNamespacesRequest
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ListNamespacesRequest ByteString
-> FieldDescriptor ListNamespacesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ListNamespacesRequest ListNamespacesRequest ByteString ByteString
-> FieldAccessor ListNamespacesRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ListNamespacesRequest
        namespaceFilter__field_descriptor :: FieldDescriptor ListNamespacesRequest
namespaceFilter__field_descriptor
          = String
-> FieldTypeDescriptor NamespaceFilter
-> FieldAccessor ListNamespacesRequest NamespaceFilter
-> FieldDescriptor ListNamespacesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace_filter"
              (MessageOrGroup -> FieldTypeDescriptor NamespaceFilter
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Namespace.V1.Message.NamespaceFilter)
              (Lens
  ListNamespacesRequest
  ListNamespacesRequest
  (Maybe NamespaceFilter)
  (Maybe NamespaceFilter)
-> FieldAccessor ListNamespacesRequest NamespaceFilter
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'namespaceFilter")) ::
              Data.ProtoLens.FieldDescriptor ListNamespacesRequest
      in
        [(Tag, FieldDescriptor ListNamespacesRequest)]
-> Map Tag (FieldDescriptor ListNamespacesRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListNamespacesRequest
pageSize__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListNamespacesRequest
nextPageToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ListNamespacesRequest
namespaceFilter__field_descriptor)]
  unknownFields :: Lens' ListNamespacesRequest FieldSet
unknownFields
    = (ListNamespacesRequest -> FieldSet)
-> (ListNamespacesRequest -> FieldSet -> ListNamespacesRequest)
-> Lens' ListNamespacesRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListNamespacesRequest -> FieldSet
_ListNamespacesRequest'_unknownFields
        (\ ListNamespacesRequest
x__ FieldSet
y__ -> ListNamespacesRequest
x__ {_ListNamespacesRequest'_unknownFields = y__})
  defMessage :: ListNamespacesRequest
defMessage
    = ListNamespacesRequest'_constructor
        {_ListNamespacesRequest'pageSize :: Int32
_ListNamespacesRequest'pageSize = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListNamespacesRequest'nextPageToken :: ByteString
_ListNamespacesRequest'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListNamespacesRequest'namespaceFilter :: Maybe NamespaceFilter
_ListNamespacesRequest'namespaceFilter = Maybe NamespaceFilter
forall a. Maybe a
Prelude.Nothing,
         _ListNamespacesRequest'_unknownFields :: FieldSet
_ListNamespacesRequest'_unknownFields = []}
  parseMessage :: Parser ListNamespacesRequest
parseMessage
    = let
        loop ::
          ListNamespacesRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser ListNamespacesRequest
        loop :: ListNamespacesRequest -> Parser ListNamespacesRequest
loop ListNamespacesRequest
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 Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"page_size"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"pageSize") y x)
                        Word64
18
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                        Word64
26
                          -> do y <- Parser NamespaceFilter -> String -> Parser NamespaceFilter
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"namespace_filter"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"namespaceFilter") 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 ListNamespacesRequest
-> String -> Parser ListNamespacesRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ListNamespacesRequest -> Parser ListNamespacesRequest
loop ListNamespacesRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ListNamespacesRequest"
  buildMessage :: ListNamespacesRequest -> Builder
buildMessage
    = \ ListNamespacesRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int32
_v = FoldLike
  Int32 ListNamespacesRequest ListNamespacesRequest Int32 Int32
-> ListNamespacesRequest -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pageSize") ListNamespacesRequest
_x
              in
                if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
8)
                      ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: ByteString
_v
                     = FoldLike
  ByteString
  ListNamespacesRequest
  ListNamespacesRequest
  ByteString
  ByteString
-> ListNamespacesRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ListNamespacesRequest
_x
                 in
                   if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
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
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            ByteString
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe NamespaceFilter)
  ListNamespacesRequest
  ListNamespacesRequest
  (Maybe NamespaceFilter)
  (Maybe NamespaceFilter)
-> ListNamespacesRequest -> Maybe NamespaceFilter
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'namespaceFilter") ListNamespacesRequest
_x
                    of
                      Maybe NamespaceFilter
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just NamespaceFilter
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (NamespaceFilter -> ByteString) -> NamespaceFilter -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                NamespaceFilter -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NamespaceFilter
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  ListNamespacesRequest
  ListNamespacesRequest
  FieldSet
  FieldSet
-> ListNamespacesRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListNamespacesRequest
  ListNamespacesRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListNamespacesRequest FieldSet
Data.ProtoLens.unknownFields ListNamespacesRequest
_x))))
instance Control.DeepSeq.NFData ListNamespacesRequest where
  rnf :: ListNamespacesRequest -> ()
rnf
    = \ ListNamespacesRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListNamespacesRequest -> FieldSet
_ListNamespacesRequest'_unknownFields ListNamespacesRequest
x__)
             (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListNamespacesRequest -> Int32
_ListNamespacesRequest'pageSize ListNamespacesRequest
x__)
                (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListNamespacesRequest -> ByteString
_ListNamespacesRequest'nextPageToken ListNamespacesRequest
x__)
                   (Maybe NamespaceFilter -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ListNamespacesRequest -> Maybe NamespaceFilter
_ListNamespacesRequest'namespaceFilter ListNamespacesRequest
x__) ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespaces' @:: Lens' ListNamespacesResponse [DescribeNamespaceResponse]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'namespaces' @:: Lens' ListNamespacesResponse (Data.Vector.Vector DescribeNamespaceResponse)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ListNamespacesResponse Data.ByteString.ByteString@ -}
data ListNamespacesResponse
  = ListNamespacesResponse'_constructor {ListNamespacesResponse -> Vector DescribeNamespaceResponse
_ListNamespacesResponse'namespaces :: !(Data.Vector.Vector DescribeNamespaceResponse),
                                         ListNamespacesResponse -> ByteString
_ListNamespacesResponse'nextPageToken :: !Data.ByteString.ByteString,
                                         ListNamespacesResponse -> FieldSet
_ListNamespacesResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListNamespacesResponse -> ListNamespacesResponse -> Bool
(ListNamespacesResponse -> ListNamespacesResponse -> Bool)
-> (ListNamespacesResponse -> ListNamespacesResponse -> Bool)
-> Eq ListNamespacesResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListNamespacesResponse -> ListNamespacesResponse -> Bool
== :: ListNamespacesResponse -> ListNamespacesResponse -> Bool
$c/= :: ListNamespacesResponse -> ListNamespacesResponse -> Bool
/= :: ListNamespacesResponse -> ListNamespacesResponse -> Bool
Prelude.Eq, Eq ListNamespacesResponse
Eq ListNamespacesResponse =>
(ListNamespacesResponse -> ListNamespacesResponse -> Ordering)
-> (ListNamespacesResponse -> ListNamespacesResponse -> Bool)
-> (ListNamespacesResponse -> ListNamespacesResponse -> Bool)
-> (ListNamespacesResponse -> ListNamespacesResponse -> Bool)
-> (ListNamespacesResponse -> ListNamespacesResponse -> Bool)
-> (ListNamespacesResponse
    -> ListNamespacesResponse -> ListNamespacesResponse)
-> (ListNamespacesResponse
    -> ListNamespacesResponse -> ListNamespacesResponse)
-> Ord ListNamespacesResponse
ListNamespacesResponse -> ListNamespacesResponse -> Bool
ListNamespacesResponse -> ListNamespacesResponse -> Ordering
ListNamespacesResponse
-> ListNamespacesResponse -> ListNamespacesResponse
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 :: ListNamespacesResponse -> ListNamespacesResponse -> Ordering
compare :: ListNamespacesResponse -> ListNamespacesResponse -> Ordering
$c< :: ListNamespacesResponse -> ListNamespacesResponse -> Bool
< :: ListNamespacesResponse -> ListNamespacesResponse -> Bool
$c<= :: ListNamespacesResponse -> ListNamespacesResponse -> Bool
<= :: ListNamespacesResponse -> ListNamespacesResponse -> Bool
$c> :: ListNamespacesResponse -> ListNamespacesResponse -> Bool
> :: ListNamespacesResponse -> ListNamespacesResponse -> Bool
$c>= :: ListNamespacesResponse -> ListNamespacesResponse -> Bool
>= :: ListNamespacesResponse -> ListNamespacesResponse -> Bool
$cmax :: ListNamespacesResponse
-> ListNamespacesResponse -> ListNamespacesResponse
max :: ListNamespacesResponse
-> ListNamespacesResponse -> ListNamespacesResponse
$cmin :: ListNamespacesResponse
-> ListNamespacesResponse -> ListNamespacesResponse
min :: ListNamespacesResponse
-> ListNamespacesResponse -> ListNamespacesResponse
Prelude.Ord)
instance Prelude.Show ListNamespacesResponse where
  showsPrec :: Int -> ListNamespacesResponse -> ShowS
showsPrec Int
_ ListNamespacesResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListNamespacesResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListNamespacesResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListNamespacesResponse "namespaces" [DescribeNamespaceResponse] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaces"
-> ([DescribeNamespaceResponse] -> f [DescribeNamespaceResponse])
-> ListNamespacesResponse
-> f ListNamespacesResponse
fieldOf Proxy# "namespaces"
_
    = ((Vector DescribeNamespaceResponse
  -> f (Vector DescribeNamespaceResponse))
 -> ListNamespacesResponse -> f ListNamespacesResponse)
-> (([DescribeNamespaceResponse] -> f [DescribeNamespaceResponse])
    -> Vector DescribeNamespaceResponse
    -> f (Vector DescribeNamespaceResponse))
-> ([DescribeNamespaceResponse] -> f [DescribeNamespaceResponse])
-> ListNamespacesResponse
-> f ListNamespacesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListNamespacesResponse -> Vector DescribeNamespaceResponse)
-> (ListNamespacesResponse
    -> Vector DescribeNamespaceResponse -> ListNamespacesResponse)
-> Lens
     ListNamespacesResponse
     ListNamespacesResponse
     (Vector DescribeNamespaceResponse)
     (Vector DescribeNamespaceResponse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListNamespacesResponse -> Vector DescribeNamespaceResponse
_ListNamespacesResponse'namespaces
           (\ ListNamespacesResponse
x__ Vector DescribeNamespaceResponse
y__ -> ListNamespacesResponse
x__ {_ListNamespacesResponse'namespaces = y__}))
        ((Vector DescribeNamespaceResponse -> [DescribeNamespaceResponse])
-> (Vector DescribeNamespaceResponse
    -> [DescribeNamespaceResponse] -> Vector DescribeNamespaceResponse)
-> Lens
     (Vector DescribeNamespaceResponse)
     (Vector DescribeNamespaceResponse)
     [DescribeNamespaceResponse]
     [DescribeNamespaceResponse]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector DescribeNamespaceResponse -> [DescribeNamespaceResponse]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector DescribeNamespaceResponse
_ [DescribeNamespaceResponse]
y__ -> [DescribeNamespaceResponse] -> Vector DescribeNamespaceResponse
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [DescribeNamespaceResponse]
y__))
instance Data.ProtoLens.Field.HasField ListNamespacesResponse "vec'namespaces" (Data.Vector.Vector DescribeNamespaceResponse) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'namespaces"
-> (Vector DescribeNamespaceResponse
    -> f (Vector DescribeNamespaceResponse))
-> ListNamespacesResponse
-> f ListNamespacesResponse
fieldOf Proxy# "vec'namespaces"
_
    = ((Vector DescribeNamespaceResponse
  -> f (Vector DescribeNamespaceResponse))
 -> ListNamespacesResponse -> f ListNamespacesResponse)
-> ((Vector DescribeNamespaceResponse
     -> f (Vector DescribeNamespaceResponse))
    -> Vector DescribeNamespaceResponse
    -> f (Vector DescribeNamespaceResponse))
-> (Vector DescribeNamespaceResponse
    -> f (Vector DescribeNamespaceResponse))
-> ListNamespacesResponse
-> f ListNamespacesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListNamespacesResponse -> Vector DescribeNamespaceResponse)
-> (ListNamespacesResponse
    -> Vector DescribeNamespaceResponse -> ListNamespacesResponse)
-> Lens
     ListNamespacesResponse
     ListNamespacesResponse
     (Vector DescribeNamespaceResponse)
     (Vector DescribeNamespaceResponse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListNamespacesResponse -> Vector DescribeNamespaceResponse
_ListNamespacesResponse'namespaces
           (\ ListNamespacesResponse
x__ Vector DescribeNamespaceResponse
y__ -> ListNamespacesResponse
x__ {_ListNamespacesResponse'namespaces = y__}))
        (Vector DescribeNamespaceResponse
 -> f (Vector DescribeNamespaceResponse))
-> Vector DescribeNamespaceResponse
-> f (Vector DescribeNamespaceResponse)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListNamespacesResponse "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ListNamespacesResponse
-> f ListNamespacesResponse
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ListNamespacesResponse -> f ListNamespacesResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ListNamespacesResponse
-> f ListNamespacesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListNamespacesResponse -> ByteString)
-> (ListNamespacesResponse -> ByteString -> ListNamespacesResponse)
-> Lens
     ListNamespacesResponse ListNamespacesResponse ByteString ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListNamespacesResponse -> ByteString
_ListNamespacesResponse'nextPageToken
           (\ ListNamespacesResponse
x__ ByteString
y__ -> ListNamespacesResponse
x__ {_ListNamespacesResponse'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListNamespacesResponse where
  messageName :: Proxy ListNamespacesResponse -> Text
messageName Proxy ListNamespacesResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListNamespacesResponse"
  packedMessageDescriptor :: Proxy ListNamespacesResponse -> ByteString
packedMessageDescriptor Proxy ListNamespacesResponse
_
    = ByteString
"\n\
      \\SYNListNamespacesResponse\DC2Z\n\
      \\n\
      \namespaces\CAN\SOH \ETX(\v2:.temporal.api.workflowservice.v1.DescribeNamespaceResponseR\n\
      \namespaces\DC2&\n\
      \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken"
  packedFileDescriptor :: Proxy ListNamespacesResponse -> ByteString
packedFileDescriptor Proxy ListNamespacesResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListNamespacesResponse)
fieldsByTag
    = let
        namespaces__field_descriptor :: FieldDescriptor ListNamespacesResponse
namespaces__field_descriptor
          = String
-> FieldTypeDescriptor DescribeNamespaceResponse
-> FieldAccessor ListNamespacesResponse DescribeNamespaceResponse
-> FieldDescriptor ListNamespacesResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespaces"
              (MessageOrGroup -> FieldTypeDescriptor DescribeNamespaceResponse
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor DescribeNamespaceResponse)
              (Packing
-> Lens' ListNamespacesResponse [DescribeNamespaceResponse]
-> FieldAccessor ListNamespacesResponse DescribeNamespaceResponse
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 @"namespaces")) ::
              Data.ProtoLens.FieldDescriptor ListNamespacesResponse
        nextPageToken__field_descriptor :: FieldDescriptor ListNamespacesResponse
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ListNamespacesResponse ByteString
-> FieldDescriptor ListNamespacesResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ListNamespacesResponse ListNamespacesResponse ByteString ByteString
-> FieldAccessor ListNamespacesResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ListNamespacesResponse
      in
        [(Tag, FieldDescriptor ListNamespacesResponse)]
-> Map Tag (FieldDescriptor ListNamespacesResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListNamespacesResponse
namespaces__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListNamespacesResponse
nextPageToken__field_descriptor)]
  unknownFields :: Lens' ListNamespacesResponse FieldSet
unknownFields
    = (ListNamespacesResponse -> FieldSet)
-> (ListNamespacesResponse -> FieldSet -> ListNamespacesResponse)
-> Lens' ListNamespacesResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListNamespacesResponse -> FieldSet
_ListNamespacesResponse'_unknownFields
        (\ ListNamespacesResponse
x__ FieldSet
y__ -> ListNamespacesResponse
x__ {_ListNamespacesResponse'_unknownFields = y__})
  defMessage :: ListNamespacesResponse
defMessage
    = ListNamespacesResponse'_constructor
        {_ListNamespacesResponse'namespaces :: Vector DescribeNamespaceResponse
_ListNamespacesResponse'namespaces = Vector DescribeNamespaceResponse
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ListNamespacesResponse'nextPageToken :: ByteString
_ListNamespacesResponse'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListNamespacesResponse'_unknownFields :: FieldSet
_ListNamespacesResponse'_unknownFields = []}
  parseMessage :: Parser ListNamespacesResponse
parseMessage
    = let
        loop ::
          ListNamespacesResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld DescribeNamespaceResponse
             -> Data.ProtoLens.Encoding.Bytes.Parser ListNamespacesResponse
        loop :: ListNamespacesResponse
-> Growing Vector RealWorld DescribeNamespaceResponse
-> Parser ListNamespacesResponse
loop ListNamespacesResponse
x Growing Vector RealWorld DescribeNamespaceResponse
mutable'namespaces
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'namespaces <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                mutable'namespaces)
                      (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'namespaces") frozen'namespaces
                              x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser DescribeNamespaceResponse
-> String -> Parser DescribeNamespaceResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"namespaces"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'namespaces y)
                                loop x v
                        Word64
18
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                                  mutable'namespaces
                        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'namespaces
      in
        Parser ListNamespacesResponse
-> String -> Parser ListNamespacesResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'namespaces <- IO (Growing Vector RealWorld DescribeNamespaceResponse)
-> Parser (Growing Vector RealWorld DescribeNamespaceResponse)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld DescribeNamespaceResponse)
IO (Growing Vector (PrimState IO) DescribeNamespaceResponse)
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'namespaces)
          String
"ListNamespacesResponse"
  buildMessage :: ListNamespacesResponse -> Builder
buildMessage
    = \ ListNamespacesResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((DescribeNamespaceResponse -> Builder)
-> Vector DescribeNamespaceResponse -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ DescribeNamespaceResponse
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (DescribeNamespaceResponse -> ByteString)
-> DescribeNamespaceResponse
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           DescribeNamespaceResponse -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage DescribeNamespaceResponse
_v))
                (FoldLike
  (Vector DescribeNamespaceResponse)
  ListNamespacesResponse
  ListNamespacesResponse
  (Vector DescribeNamespaceResponse)
  (Vector DescribeNamespaceResponse)
-> ListNamespacesResponse -> Vector DescribeNamespaceResponse
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'namespaces") ListNamespacesResponse
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: ByteString
_v
                     = FoldLike
  ByteString
  ListNamespacesResponse
  ListNamespacesResponse
  ByteString
  ByteString
-> ListNamespacesResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ListNamespacesResponse
_x
                 in
                   if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
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
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            ByteString
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ListNamespacesResponse
  ListNamespacesResponse
  FieldSet
  FieldSet
-> ListNamespacesResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListNamespacesResponse
  ListNamespacesResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListNamespacesResponse FieldSet
Data.ProtoLens.unknownFields ListNamespacesResponse
_x)))
instance Control.DeepSeq.NFData ListNamespacesResponse where
  rnf :: ListNamespacesResponse -> ()
rnf
    = \ ListNamespacesResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListNamespacesResponse -> FieldSet
_ListNamespacesResponse'_unknownFields ListNamespacesResponse
x__)
             (Vector DescribeNamespaceResponse -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListNamespacesResponse -> Vector DescribeNamespaceResponse
_ListNamespacesResponse'namespaces ListNamespacesResponse
x__)
                (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListNamespacesResponse -> ByteString
_ListNamespacesResponse'nextPageToken ListNamespacesResponse
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' ListOpenWorkflowExecutionsRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maximumPageSize' @:: Lens' ListOpenWorkflowExecutionsRequest Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ListOpenWorkflowExecutionsRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.startTimeFilter' @:: Lens' ListOpenWorkflowExecutionsRequest Proto.Temporal.Api.Filter.V1.Message.StartTimeFilter@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'startTimeFilter' @:: Lens' ListOpenWorkflowExecutionsRequest (Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.StartTimeFilter)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'filters' @:: Lens' ListOpenWorkflowExecutionsRequest (Prelude.Maybe ListOpenWorkflowExecutionsRequest'Filters)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'executionFilter' @:: Lens' ListOpenWorkflowExecutionsRequest (Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.WorkflowExecutionFilter)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.executionFilter' @:: Lens' ListOpenWorkflowExecutionsRequest Proto.Temporal.Api.Filter.V1.Message.WorkflowExecutionFilter@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'typeFilter' @:: Lens' ListOpenWorkflowExecutionsRequest (Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.WorkflowTypeFilter)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.typeFilter' @:: Lens' ListOpenWorkflowExecutionsRequest Proto.Temporal.Api.Filter.V1.Message.WorkflowTypeFilter@ -}
data ListOpenWorkflowExecutionsRequest
  = ListOpenWorkflowExecutionsRequest'_constructor {ListOpenWorkflowExecutionsRequest -> Text
_ListOpenWorkflowExecutionsRequest'namespace :: !Data.Text.Text,
                                                    ListOpenWorkflowExecutionsRequest -> Int32
_ListOpenWorkflowExecutionsRequest'maximumPageSize :: !Data.Int.Int32,
                                                    ListOpenWorkflowExecutionsRequest -> ByteString
_ListOpenWorkflowExecutionsRequest'nextPageToken :: !Data.ByteString.ByteString,
                                                    ListOpenWorkflowExecutionsRequest -> Maybe StartTimeFilter
_ListOpenWorkflowExecutionsRequest'startTimeFilter :: !(Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.StartTimeFilter),
                                                    ListOpenWorkflowExecutionsRequest
-> Maybe ListOpenWorkflowExecutionsRequest'Filters
_ListOpenWorkflowExecutionsRequest'filters :: !(Prelude.Maybe ListOpenWorkflowExecutionsRequest'Filters),
                                                    ListOpenWorkflowExecutionsRequest -> FieldSet
_ListOpenWorkflowExecutionsRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Bool
(ListOpenWorkflowExecutionsRequest
 -> ListOpenWorkflowExecutionsRequest -> Bool)
-> (ListOpenWorkflowExecutionsRequest
    -> ListOpenWorkflowExecutionsRequest -> Bool)
-> Eq ListOpenWorkflowExecutionsRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Bool
== :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Bool
$c/= :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Bool
/= :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Bool
Prelude.Eq, Eq ListOpenWorkflowExecutionsRequest
Eq ListOpenWorkflowExecutionsRequest =>
(ListOpenWorkflowExecutionsRequest
 -> ListOpenWorkflowExecutionsRequest -> Ordering)
-> (ListOpenWorkflowExecutionsRequest
    -> ListOpenWorkflowExecutionsRequest -> Bool)
-> (ListOpenWorkflowExecutionsRequest
    -> ListOpenWorkflowExecutionsRequest -> Bool)
-> (ListOpenWorkflowExecutionsRequest
    -> ListOpenWorkflowExecutionsRequest -> Bool)
-> (ListOpenWorkflowExecutionsRequest
    -> ListOpenWorkflowExecutionsRequest -> Bool)
-> (ListOpenWorkflowExecutionsRequest
    -> ListOpenWorkflowExecutionsRequest
    -> ListOpenWorkflowExecutionsRequest)
-> (ListOpenWorkflowExecutionsRequest
    -> ListOpenWorkflowExecutionsRequest
    -> ListOpenWorkflowExecutionsRequest)
-> Ord ListOpenWorkflowExecutionsRequest
ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Bool
ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Ordering
ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest
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 :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Ordering
compare :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Ordering
$c< :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Bool
< :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Bool
$c<= :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Bool
<= :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Bool
$c> :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Bool
> :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Bool
$c>= :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Bool
>= :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest -> Bool
$cmax :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest
max :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest
$cmin :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest
min :: ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest
-> ListOpenWorkflowExecutionsRequest
Prelude.Ord)
instance Prelude.Show ListOpenWorkflowExecutionsRequest where
  showsPrec :: Int -> ListOpenWorkflowExecutionsRequest -> ShowS
showsPrec Int
_ ListOpenWorkflowExecutionsRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListOpenWorkflowExecutionsRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListOpenWorkflowExecutionsRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data ListOpenWorkflowExecutionsRequest'Filters
  = ListOpenWorkflowExecutionsRequest'ExecutionFilter !Proto.Temporal.Api.Filter.V1.Message.WorkflowExecutionFilter |
    ListOpenWorkflowExecutionsRequest'TypeFilter !Proto.Temporal.Api.Filter.V1.Message.WorkflowTypeFilter
  deriving stock (Int -> ListOpenWorkflowExecutionsRequest'Filters -> ShowS
[ListOpenWorkflowExecutionsRequest'Filters] -> ShowS
ListOpenWorkflowExecutionsRequest'Filters -> String
(Int -> ListOpenWorkflowExecutionsRequest'Filters -> ShowS)
-> (ListOpenWorkflowExecutionsRequest'Filters -> String)
-> ([ListOpenWorkflowExecutionsRequest'Filters] -> ShowS)
-> Show ListOpenWorkflowExecutionsRequest'Filters
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ListOpenWorkflowExecutionsRequest'Filters -> ShowS
showsPrec :: Int -> ListOpenWorkflowExecutionsRequest'Filters -> ShowS
$cshow :: ListOpenWorkflowExecutionsRequest'Filters -> String
show :: ListOpenWorkflowExecutionsRequest'Filters -> String
$cshowList :: [ListOpenWorkflowExecutionsRequest'Filters] -> ShowS
showList :: [ListOpenWorkflowExecutionsRequest'Filters] -> ShowS
Prelude.Show, ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Bool
(ListOpenWorkflowExecutionsRequest'Filters
 -> ListOpenWorkflowExecutionsRequest'Filters -> Bool)
-> (ListOpenWorkflowExecutionsRequest'Filters
    -> ListOpenWorkflowExecutionsRequest'Filters -> Bool)
-> Eq ListOpenWorkflowExecutionsRequest'Filters
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Bool
== :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Bool
$c/= :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Bool
/= :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Bool
Prelude.Eq, Eq ListOpenWorkflowExecutionsRequest'Filters
Eq ListOpenWorkflowExecutionsRequest'Filters =>
(ListOpenWorkflowExecutionsRequest'Filters
 -> ListOpenWorkflowExecutionsRequest'Filters -> Ordering)
-> (ListOpenWorkflowExecutionsRequest'Filters
    -> ListOpenWorkflowExecutionsRequest'Filters -> Bool)
-> (ListOpenWorkflowExecutionsRequest'Filters
    -> ListOpenWorkflowExecutionsRequest'Filters -> Bool)
-> (ListOpenWorkflowExecutionsRequest'Filters
    -> ListOpenWorkflowExecutionsRequest'Filters -> Bool)
-> (ListOpenWorkflowExecutionsRequest'Filters
    -> ListOpenWorkflowExecutionsRequest'Filters -> Bool)
-> (ListOpenWorkflowExecutionsRequest'Filters
    -> ListOpenWorkflowExecutionsRequest'Filters
    -> ListOpenWorkflowExecutionsRequest'Filters)
-> (ListOpenWorkflowExecutionsRequest'Filters
    -> ListOpenWorkflowExecutionsRequest'Filters
    -> ListOpenWorkflowExecutionsRequest'Filters)
-> Ord ListOpenWorkflowExecutionsRequest'Filters
ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Bool
ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Ordering
ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters
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 :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Ordering
compare :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Ordering
$c< :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Bool
< :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Bool
$c<= :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Bool
<= :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Bool
$c> :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Bool
> :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Bool
$c>= :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Bool
>= :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters -> Bool
$cmax :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters
max :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters
$cmin :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters
min :: ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters
-> ListOpenWorkflowExecutionsRequest'Filters
Prelude.Ord)
instance Data.ProtoLens.Field.HasField ListOpenWorkflowExecutionsRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ListOpenWorkflowExecutionsRequest
 -> f ListOpenWorkflowExecutionsRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListOpenWorkflowExecutionsRequest -> Text)
-> (ListOpenWorkflowExecutionsRequest
    -> Text -> ListOpenWorkflowExecutionsRequest)
-> Lens
     ListOpenWorkflowExecutionsRequest
     ListOpenWorkflowExecutionsRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListOpenWorkflowExecutionsRequest -> Text
_ListOpenWorkflowExecutionsRequest'namespace
           (\ ListOpenWorkflowExecutionsRequest
x__ Text
y__
              -> ListOpenWorkflowExecutionsRequest
x__ {_ListOpenWorkflowExecutionsRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListOpenWorkflowExecutionsRequest "maximumPageSize" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maximumPageSize"
-> (Int32 -> f Int32)
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
fieldOf Proxy# "maximumPageSize"
_
    = ((Int32 -> f Int32)
 -> ListOpenWorkflowExecutionsRequest
 -> f ListOpenWorkflowExecutionsRequest)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListOpenWorkflowExecutionsRequest -> Int32)
-> (ListOpenWorkflowExecutionsRequest
    -> Int32 -> ListOpenWorkflowExecutionsRequest)
-> Lens
     ListOpenWorkflowExecutionsRequest
     ListOpenWorkflowExecutionsRequest
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListOpenWorkflowExecutionsRequest -> Int32
_ListOpenWorkflowExecutionsRequest'maximumPageSize
           (\ ListOpenWorkflowExecutionsRequest
x__ Int32
y__
              -> ListOpenWorkflowExecutionsRequest
x__ {_ListOpenWorkflowExecutionsRequest'maximumPageSize = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListOpenWorkflowExecutionsRequest "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ListOpenWorkflowExecutionsRequest
 -> f ListOpenWorkflowExecutionsRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListOpenWorkflowExecutionsRequest -> ByteString)
-> (ListOpenWorkflowExecutionsRequest
    -> ByteString -> ListOpenWorkflowExecutionsRequest)
-> Lens
     ListOpenWorkflowExecutionsRequest
     ListOpenWorkflowExecutionsRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListOpenWorkflowExecutionsRequest -> ByteString
_ListOpenWorkflowExecutionsRequest'nextPageToken
           (\ ListOpenWorkflowExecutionsRequest
x__ ByteString
y__
              -> ListOpenWorkflowExecutionsRequest
x__ {_ListOpenWorkflowExecutionsRequest'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListOpenWorkflowExecutionsRequest "startTimeFilter" Proto.Temporal.Api.Filter.V1.Message.StartTimeFilter where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startTimeFilter"
-> (StartTimeFilter -> f StartTimeFilter)
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
fieldOf Proxy# "startTimeFilter"
_
    = ((Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
 -> ListOpenWorkflowExecutionsRequest
 -> f ListOpenWorkflowExecutionsRequest)
-> ((StartTimeFilter -> f StartTimeFilter)
    -> Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
-> (StartTimeFilter -> f StartTimeFilter)
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListOpenWorkflowExecutionsRequest -> Maybe StartTimeFilter)
-> (ListOpenWorkflowExecutionsRequest
    -> Maybe StartTimeFilter -> ListOpenWorkflowExecutionsRequest)
-> Lens
     ListOpenWorkflowExecutionsRequest
     ListOpenWorkflowExecutionsRequest
     (Maybe StartTimeFilter)
     (Maybe StartTimeFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListOpenWorkflowExecutionsRequest -> Maybe StartTimeFilter
_ListOpenWorkflowExecutionsRequest'startTimeFilter
           (\ ListOpenWorkflowExecutionsRequest
x__ Maybe StartTimeFilter
y__
              -> ListOpenWorkflowExecutionsRequest
x__ {_ListOpenWorkflowExecutionsRequest'startTimeFilter = y__}))
        (StartTimeFilter -> Lens' (Maybe StartTimeFilter) StartTimeFilter
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens StartTimeFilter
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ListOpenWorkflowExecutionsRequest "maybe'startTimeFilter" (Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.StartTimeFilter) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startTimeFilter"
-> (Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
fieldOf Proxy# "maybe'startTimeFilter"
_
    = ((Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
 -> ListOpenWorkflowExecutionsRequest
 -> f ListOpenWorkflowExecutionsRequest)
-> ((Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
    -> Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
-> (Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListOpenWorkflowExecutionsRequest -> Maybe StartTimeFilter)
-> (ListOpenWorkflowExecutionsRequest
    -> Maybe StartTimeFilter -> ListOpenWorkflowExecutionsRequest)
-> Lens
     ListOpenWorkflowExecutionsRequest
     ListOpenWorkflowExecutionsRequest
     (Maybe StartTimeFilter)
     (Maybe StartTimeFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListOpenWorkflowExecutionsRequest -> Maybe StartTimeFilter
_ListOpenWorkflowExecutionsRequest'startTimeFilter
           (\ ListOpenWorkflowExecutionsRequest
x__ Maybe StartTimeFilter
y__
              -> ListOpenWorkflowExecutionsRequest
x__ {_ListOpenWorkflowExecutionsRequest'startTimeFilter = y__}))
        (Maybe StartTimeFilter -> f (Maybe StartTimeFilter))
-> Maybe StartTimeFilter -> f (Maybe StartTimeFilter)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListOpenWorkflowExecutionsRequest "maybe'filters" (Prelude.Maybe ListOpenWorkflowExecutionsRequest'Filters) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'filters"
-> (Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
fieldOf Proxy# "maybe'filters"
_
    = ((Maybe ListOpenWorkflowExecutionsRequest'Filters
  -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
 -> ListOpenWorkflowExecutionsRequest
 -> f ListOpenWorkflowExecutionsRequest)
-> ((Maybe ListOpenWorkflowExecutionsRequest'Filters
     -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
    -> Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
-> (Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListOpenWorkflowExecutionsRequest
 -> Maybe ListOpenWorkflowExecutionsRequest'Filters)
-> (ListOpenWorkflowExecutionsRequest
    -> Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> ListOpenWorkflowExecutionsRequest)
-> Lens
     ListOpenWorkflowExecutionsRequest
     ListOpenWorkflowExecutionsRequest
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListOpenWorkflowExecutionsRequest
-> Maybe ListOpenWorkflowExecutionsRequest'Filters
_ListOpenWorkflowExecutionsRequest'filters
           (\ ListOpenWorkflowExecutionsRequest
x__ Maybe ListOpenWorkflowExecutionsRequest'Filters
y__
              -> ListOpenWorkflowExecutionsRequest
x__ {_ListOpenWorkflowExecutionsRequest'filters = y__}))
        (Maybe ListOpenWorkflowExecutionsRequest'Filters
 -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
-> Maybe ListOpenWorkflowExecutionsRequest'Filters
-> f (Maybe ListOpenWorkflowExecutionsRequest'Filters)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListOpenWorkflowExecutionsRequest "maybe'executionFilter" (Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.WorkflowExecutionFilter) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'executionFilter"
-> (Maybe WorkflowExecutionFilter
    -> f (Maybe WorkflowExecutionFilter))
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
fieldOf Proxy# "maybe'executionFilter"
_
    = ((Maybe ListOpenWorkflowExecutionsRequest'Filters
  -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
 -> ListOpenWorkflowExecutionsRequest
 -> f ListOpenWorkflowExecutionsRequest)
-> ((Maybe WorkflowExecutionFilter
     -> f (Maybe WorkflowExecutionFilter))
    -> Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
-> (Maybe WorkflowExecutionFilter
    -> f (Maybe WorkflowExecutionFilter))
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListOpenWorkflowExecutionsRequest
 -> Maybe ListOpenWorkflowExecutionsRequest'Filters)
-> (ListOpenWorkflowExecutionsRequest
    -> Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> ListOpenWorkflowExecutionsRequest)
-> Lens
     ListOpenWorkflowExecutionsRequest
     ListOpenWorkflowExecutionsRequest
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListOpenWorkflowExecutionsRequest
-> Maybe ListOpenWorkflowExecutionsRequest'Filters
_ListOpenWorkflowExecutionsRequest'filters
           (\ ListOpenWorkflowExecutionsRequest
x__ Maybe ListOpenWorkflowExecutionsRequest'Filters
y__
              -> ListOpenWorkflowExecutionsRequest
x__ {_ListOpenWorkflowExecutionsRequest'filters = y__}))
        ((Maybe ListOpenWorkflowExecutionsRequest'Filters
 -> Maybe WorkflowExecutionFilter)
-> (Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> Maybe WorkflowExecutionFilter
    -> Maybe ListOpenWorkflowExecutionsRequest'Filters)
-> Lens
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
     (Maybe WorkflowExecutionFilter)
     (Maybe WorkflowExecutionFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe ListOpenWorkflowExecutionsRequest'Filters
x__
              -> case Maybe ListOpenWorkflowExecutionsRequest'Filters
x__ of
                   (Prelude.Just (ListOpenWorkflowExecutionsRequest'ExecutionFilter WorkflowExecutionFilter
x__val))
                     -> WorkflowExecutionFilter -> Maybe WorkflowExecutionFilter
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionFilter
x__val
                   Maybe ListOpenWorkflowExecutionsRequest'Filters
_otherwise -> Maybe WorkflowExecutionFilter
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe ListOpenWorkflowExecutionsRequest'Filters
_ Maybe WorkflowExecutionFilter
y__
              -> (WorkflowExecutionFilter
 -> ListOpenWorkflowExecutionsRequest'Filters)
-> Maybe WorkflowExecutionFilter
-> Maybe ListOpenWorkflowExecutionsRequest'Filters
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowExecutionFilter
-> ListOpenWorkflowExecutionsRequest'Filters
ListOpenWorkflowExecutionsRequest'ExecutionFilter Maybe WorkflowExecutionFilter
y__))
instance Data.ProtoLens.Field.HasField ListOpenWorkflowExecutionsRequest "executionFilter" Proto.Temporal.Api.Filter.V1.Message.WorkflowExecutionFilter where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "executionFilter"
-> (WorkflowExecutionFilter -> f WorkflowExecutionFilter)
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
fieldOf Proxy# "executionFilter"
_
    = ((Maybe ListOpenWorkflowExecutionsRequest'Filters
  -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
 -> ListOpenWorkflowExecutionsRequest
 -> f ListOpenWorkflowExecutionsRequest)
-> ((WorkflowExecutionFilter -> f WorkflowExecutionFilter)
    -> Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
-> (WorkflowExecutionFilter -> f WorkflowExecutionFilter)
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListOpenWorkflowExecutionsRequest
 -> Maybe ListOpenWorkflowExecutionsRequest'Filters)
-> (ListOpenWorkflowExecutionsRequest
    -> Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> ListOpenWorkflowExecutionsRequest)
-> Lens
     ListOpenWorkflowExecutionsRequest
     ListOpenWorkflowExecutionsRequest
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListOpenWorkflowExecutionsRequest
-> Maybe ListOpenWorkflowExecutionsRequest'Filters
_ListOpenWorkflowExecutionsRequest'filters
           (\ ListOpenWorkflowExecutionsRequest
x__ Maybe ListOpenWorkflowExecutionsRequest'Filters
y__
              -> ListOpenWorkflowExecutionsRequest
x__ {_ListOpenWorkflowExecutionsRequest'filters = y__}))
        (((Maybe WorkflowExecutionFilter
  -> f (Maybe WorkflowExecutionFilter))
 -> Maybe ListOpenWorkflowExecutionsRequest'Filters
 -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
-> ((WorkflowExecutionFilter -> f WorkflowExecutionFilter)
    -> Maybe WorkflowExecutionFilter
    -> f (Maybe WorkflowExecutionFilter))
-> (WorkflowExecutionFilter -> f WorkflowExecutionFilter)
-> Maybe ListOpenWorkflowExecutionsRequest'Filters
-> f (Maybe ListOpenWorkflowExecutionsRequest'Filters)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe ListOpenWorkflowExecutionsRequest'Filters
 -> Maybe WorkflowExecutionFilter)
-> (Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> Maybe WorkflowExecutionFilter
    -> Maybe ListOpenWorkflowExecutionsRequest'Filters)
-> Lens
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
     (Maybe WorkflowExecutionFilter)
     (Maybe WorkflowExecutionFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe ListOpenWorkflowExecutionsRequest'Filters
x__
                 -> case Maybe ListOpenWorkflowExecutionsRequest'Filters
x__ of
                      (Prelude.Just (ListOpenWorkflowExecutionsRequest'ExecutionFilter WorkflowExecutionFilter
x__val))
                        -> WorkflowExecutionFilter -> Maybe WorkflowExecutionFilter
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionFilter
x__val
                      Maybe ListOpenWorkflowExecutionsRequest'Filters
_otherwise -> Maybe WorkflowExecutionFilter
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe ListOpenWorkflowExecutionsRequest'Filters
_ Maybe WorkflowExecutionFilter
y__
                 -> (WorkflowExecutionFilter
 -> ListOpenWorkflowExecutionsRequest'Filters)
-> Maybe WorkflowExecutionFilter
-> Maybe ListOpenWorkflowExecutionsRequest'Filters
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowExecutionFilter
-> ListOpenWorkflowExecutionsRequest'Filters
ListOpenWorkflowExecutionsRequest'ExecutionFilter Maybe WorkflowExecutionFilter
y__))
           (WorkflowExecutionFilter
-> Lens' (Maybe WorkflowExecutionFilter) WorkflowExecutionFilter
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionFilter
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField ListOpenWorkflowExecutionsRequest "maybe'typeFilter" (Prelude.Maybe Proto.Temporal.Api.Filter.V1.Message.WorkflowTypeFilter) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'typeFilter"
-> (Maybe WorkflowTypeFilter -> f (Maybe WorkflowTypeFilter))
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
fieldOf Proxy# "maybe'typeFilter"
_
    = ((Maybe ListOpenWorkflowExecutionsRequest'Filters
  -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
 -> ListOpenWorkflowExecutionsRequest
 -> f ListOpenWorkflowExecutionsRequest)
-> ((Maybe WorkflowTypeFilter -> f (Maybe WorkflowTypeFilter))
    -> Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
-> (Maybe WorkflowTypeFilter -> f (Maybe WorkflowTypeFilter))
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListOpenWorkflowExecutionsRequest
 -> Maybe ListOpenWorkflowExecutionsRequest'Filters)
-> (ListOpenWorkflowExecutionsRequest
    -> Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> ListOpenWorkflowExecutionsRequest)
-> Lens
     ListOpenWorkflowExecutionsRequest
     ListOpenWorkflowExecutionsRequest
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListOpenWorkflowExecutionsRequest
-> Maybe ListOpenWorkflowExecutionsRequest'Filters
_ListOpenWorkflowExecutionsRequest'filters
           (\ ListOpenWorkflowExecutionsRequest
x__ Maybe ListOpenWorkflowExecutionsRequest'Filters
y__
              -> ListOpenWorkflowExecutionsRequest
x__ {_ListOpenWorkflowExecutionsRequest'filters = y__}))
        ((Maybe ListOpenWorkflowExecutionsRequest'Filters
 -> Maybe WorkflowTypeFilter)
-> (Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> Maybe WorkflowTypeFilter
    -> Maybe ListOpenWorkflowExecutionsRequest'Filters)
-> Lens
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
     (Maybe WorkflowTypeFilter)
     (Maybe WorkflowTypeFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe ListOpenWorkflowExecutionsRequest'Filters
x__
              -> case Maybe ListOpenWorkflowExecutionsRequest'Filters
x__ of
                   (Prelude.Just (ListOpenWorkflowExecutionsRequest'TypeFilter WorkflowTypeFilter
x__val))
                     -> WorkflowTypeFilter -> Maybe WorkflowTypeFilter
forall a. a -> Maybe a
Prelude.Just WorkflowTypeFilter
x__val
                   Maybe ListOpenWorkflowExecutionsRequest'Filters
_otherwise -> Maybe WorkflowTypeFilter
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe ListOpenWorkflowExecutionsRequest'Filters
_ Maybe WorkflowTypeFilter
y__
              -> (WorkflowTypeFilter -> ListOpenWorkflowExecutionsRequest'Filters)
-> Maybe WorkflowTypeFilter
-> Maybe ListOpenWorkflowExecutionsRequest'Filters
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap WorkflowTypeFilter -> ListOpenWorkflowExecutionsRequest'Filters
ListOpenWorkflowExecutionsRequest'TypeFilter Maybe WorkflowTypeFilter
y__))
instance Data.ProtoLens.Field.HasField ListOpenWorkflowExecutionsRequest "typeFilter" Proto.Temporal.Api.Filter.V1.Message.WorkflowTypeFilter where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "typeFilter"
-> (WorkflowTypeFilter -> f WorkflowTypeFilter)
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
fieldOf Proxy# "typeFilter"
_
    = ((Maybe ListOpenWorkflowExecutionsRequest'Filters
  -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
 -> ListOpenWorkflowExecutionsRequest
 -> f ListOpenWorkflowExecutionsRequest)
-> ((WorkflowTypeFilter -> f WorkflowTypeFilter)
    -> Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
-> (WorkflowTypeFilter -> f WorkflowTypeFilter)
-> ListOpenWorkflowExecutionsRequest
-> f ListOpenWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListOpenWorkflowExecutionsRequest
 -> Maybe ListOpenWorkflowExecutionsRequest'Filters)
-> (ListOpenWorkflowExecutionsRequest
    -> Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> ListOpenWorkflowExecutionsRequest)
-> Lens
     ListOpenWorkflowExecutionsRequest
     ListOpenWorkflowExecutionsRequest
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListOpenWorkflowExecutionsRequest
-> Maybe ListOpenWorkflowExecutionsRequest'Filters
_ListOpenWorkflowExecutionsRequest'filters
           (\ ListOpenWorkflowExecutionsRequest
x__ Maybe ListOpenWorkflowExecutionsRequest'Filters
y__
              -> ListOpenWorkflowExecutionsRequest
x__ {_ListOpenWorkflowExecutionsRequest'filters = y__}))
        (((Maybe WorkflowTypeFilter -> f (Maybe WorkflowTypeFilter))
 -> Maybe ListOpenWorkflowExecutionsRequest'Filters
 -> f (Maybe ListOpenWorkflowExecutionsRequest'Filters))
-> ((WorkflowTypeFilter -> f WorkflowTypeFilter)
    -> Maybe WorkflowTypeFilter -> f (Maybe WorkflowTypeFilter))
-> (WorkflowTypeFilter -> f WorkflowTypeFilter)
-> Maybe ListOpenWorkflowExecutionsRequest'Filters
-> f (Maybe ListOpenWorkflowExecutionsRequest'Filters)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe ListOpenWorkflowExecutionsRequest'Filters
 -> Maybe WorkflowTypeFilter)
-> (Maybe ListOpenWorkflowExecutionsRequest'Filters
    -> Maybe WorkflowTypeFilter
    -> Maybe ListOpenWorkflowExecutionsRequest'Filters)
-> Lens
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
     (Maybe ListOpenWorkflowExecutionsRequest'Filters)
     (Maybe WorkflowTypeFilter)
     (Maybe WorkflowTypeFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe ListOpenWorkflowExecutionsRequest'Filters
x__
                 -> case Maybe ListOpenWorkflowExecutionsRequest'Filters
x__ of
                      (Prelude.Just (ListOpenWorkflowExecutionsRequest'TypeFilter WorkflowTypeFilter
x__val))
                        -> WorkflowTypeFilter -> Maybe WorkflowTypeFilter
forall a. a -> Maybe a
Prelude.Just WorkflowTypeFilter
x__val
                      Maybe ListOpenWorkflowExecutionsRequest'Filters
_otherwise -> Maybe WorkflowTypeFilter
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe ListOpenWorkflowExecutionsRequest'Filters
_ Maybe WorkflowTypeFilter
y__
                 -> (WorkflowTypeFilter -> ListOpenWorkflowExecutionsRequest'Filters)
-> Maybe WorkflowTypeFilter
-> Maybe ListOpenWorkflowExecutionsRequest'Filters
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap WorkflowTypeFilter -> ListOpenWorkflowExecutionsRequest'Filters
ListOpenWorkflowExecutionsRequest'TypeFilter Maybe WorkflowTypeFilter
y__))
           (WorkflowTypeFilter
-> Lens' (Maybe WorkflowTypeFilter) WorkflowTypeFilter
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowTypeFilter
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message ListOpenWorkflowExecutionsRequest where
  messageName :: Proxy ListOpenWorkflowExecutionsRequest -> Text
messageName Proxy ListOpenWorkflowExecutionsRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListOpenWorkflowExecutionsRequest"
  packedMessageDescriptor :: Proxy ListOpenWorkflowExecutionsRequest -> ByteString
packedMessageDescriptor Proxy ListOpenWorkflowExecutionsRequest
_
    = ByteString
"\n\
      \!ListOpenWorkflowExecutionsRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2*\n\
      \\DC1maximum_page_size\CAN\STX \SOH(\ENQR\SImaximumPageSize\DC2&\n\
      \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\DC2S\n\
      \\DC1start_time_filter\CAN\EOT \SOH(\v2'.temporal.api.filter.v1.StartTimeFilterR\SIstartTimeFilter\DC2\\\n\
      \\DLEexecution_filter\CAN\ENQ \SOH(\v2/.temporal.api.filter.v1.WorkflowExecutionFilterH\NULR\SIexecutionFilter\DC2M\n\
      \\vtype_filter\CAN\ACK \SOH(\v2*.temporal.api.filter.v1.WorkflowTypeFilterH\NULR\n\
      \typeFilterB\t\n\
      \\afilters"
  packedFileDescriptor :: Proxy ListOpenWorkflowExecutionsRequest -> ByteString
packedFileDescriptor Proxy ListOpenWorkflowExecutionsRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListOpenWorkflowExecutionsRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor ListOpenWorkflowExecutionsRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ListOpenWorkflowExecutionsRequest Text
-> FieldDescriptor ListOpenWorkflowExecutionsRequest
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
     ListOpenWorkflowExecutionsRequest
     ListOpenWorkflowExecutionsRequest
     Text
     Text
-> FieldAccessor ListOpenWorkflowExecutionsRequest 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 ListOpenWorkflowExecutionsRequest
        maximumPageSize__field_descriptor :: FieldDescriptor ListOpenWorkflowExecutionsRequest
maximumPageSize__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ListOpenWorkflowExecutionsRequest Int32
-> FieldDescriptor ListOpenWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"maximum_page_size"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     ListOpenWorkflowExecutionsRequest
     ListOpenWorkflowExecutionsRequest
     Int32
     Int32
-> FieldAccessor ListOpenWorkflowExecutionsRequest Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maximumPageSize")) ::
              Data.ProtoLens.FieldDescriptor ListOpenWorkflowExecutionsRequest
        nextPageToken__field_descriptor :: FieldDescriptor ListOpenWorkflowExecutionsRequest
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ListOpenWorkflowExecutionsRequest ByteString
-> FieldDescriptor ListOpenWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ListOpenWorkflowExecutionsRequest
     ListOpenWorkflowExecutionsRequest
     ByteString
     ByteString
-> FieldAccessor ListOpenWorkflowExecutionsRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ListOpenWorkflowExecutionsRequest
        startTimeFilter__field_descriptor :: FieldDescriptor ListOpenWorkflowExecutionsRequest
startTimeFilter__field_descriptor
          = String
-> FieldTypeDescriptor StartTimeFilter
-> FieldAccessor ListOpenWorkflowExecutionsRequest StartTimeFilter
-> FieldDescriptor ListOpenWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_time_filter"
              (MessageOrGroup -> FieldTypeDescriptor StartTimeFilter
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Filter.V1.Message.StartTimeFilter)
              (Lens
  ListOpenWorkflowExecutionsRequest
  ListOpenWorkflowExecutionsRequest
  (Maybe StartTimeFilter)
  (Maybe StartTimeFilter)
-> FieldAccessor ListOpenWorkflowExecutionsRequest StartTimeFilter
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startTimeFilter")) ::
              Data.ProtoLens.FieldDescriptor ListOpenWorkflowExecutionsRequest
        executionFilter__field_descriptor :: FieldDescriptor ListOpenWorkflowExecutionsRequest
executionFilter__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionFilter
-> FieldAccessor
     ListOpenWorkflowExecutionsRequest WorkflowExecutionFilter
-> FieldDescriptor ListOpenWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"execution_filter"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecutionFilter
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Filter.V1.Message.WorkflowExecutionFilter)
              (Lens'
  ListOpenWorkflowExecutionsRequest (Maybe WorkflowExecutionFilter)
-> FieldAccessor
     ListOpenWorkflowExecutionsRequest WorkflowExecutionFilter
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'executionFilter")) ::
              Data.ProtoLens.FieldDescriptor ListOpenWorkflowExecutionsRequest
        typeFilter__field_descriptor :: FieldDescriptor ListOpenWorkflowExecutionsRequest
typeFilter__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowTypeFilter
-> FieldAccessor
     ListOpenWorkflowExecutionsRequest WorkflowTypeFilter
-> FieldDescriptor ListOpenWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"type_filter"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowTypeFilter
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Filter.V1.Message.WorkflowTypeFilter)
              (Lens' ListOpenWorkflowExecutionsRequest (Maybe WorkflowTypeFilter)
-> FieldAccessor
     ListOpenWorkflowExecutionsRequest WorkflowTypeFilter
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'typeFilter")) ::
              Data.ProtoLens.FieldDescriptor ListOpenWorkflowExecutionsRequest
      in
        [(Tag, FieldDescriptor ListOpenWorkflowExecutionsRequest)]
-> Map Tag (FieldDescriptor ListOpenWorkflowExecutionsRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListOpenWorkflowExecutionsRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListOpenWorkflowExecutionsRequest
maximumPageSize__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ListOpenWorkflowExecutionsRequest
nextPageToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ListOpenWorkflowExecutionsRequest
startTimeFilter__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ListOpenWorkflowExecutionsRequest
executionFilter__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ListOpenWorkflowExecutionsRequest
typeFilter__field_descriptor)]
  unknownFields :: Lens' ListOpenWorkflowExecutionsRequest FieldSet
unknownFields
    = (ListOpenWorkflowExecutionsRequest -> FieldSet)
-> (ListOpenWorkflowExecutionsRequest
    -> FieldSet -> ListOpenWorkflowExecutionsRequest)
-> Lens' ListOpenWorkflowExecutionsRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListOpenWorkflowExecutionsRequest -> FieldSet
_ListOpenWorkflowExecutionsRequest'_unknownFields
        (\ ListOpenWorkflowExecutionsRequest
x__ FieldSet
y__
           -> ListOpenWorkflowExecutionsRequest
x__ {_ListOpenWorkflowExecutionsRequest'_unknownFields = y__})
  defMessage :: ListOpenWorkflowExecutionsRequest
defMessage
    = ListOpenWorkflowExecutionsRequest'_constructor
        {_ListOpenWorkflowExecutionsRequest'namespace :: Text
_ListOpenWorkflowExecutionsRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListOpenWorkflowExecutionsRequest'maximumPageSize :: Int32
_ListOpenWorkflowExecutionsRequest'maximumPageSize = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListOpenWorkflowExecutionsRequest'nextPageToken :: ByteString
_ListOpenWorkflowExecutionsRequest'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListOpenWorkflowExecutionsRequest'startTimeFilter :: Maybe StartTimeFilter
_ListOpenWorkflowExecutionsRequest'startTimeFilter = Maybe StartTimeFilter
forall a. Maybe a
Prelude.Nothing,
         _ListOpenWorkflowExecutionsRequest'filters :: Maybe ListOpenWorkflowExecutionsRequest'Filters
_ListOpenWorkflowExecutionsRequest'filters = Maybe ListOpenWorkflowExecutionsRequest'Filters
forall a. Maybe a
Prelude.Nothing,
         _ListOpenWorkflowExecutionsRequest'_unknownFields :: FieldSet
_ListOpenWorkflowExecutionsRequest'_unknownFields = []}
  parseMessage :: Parser ListOpenWorkflowExecutionsRequest
parseMessage
    = let
        loop ::
          ListOpenWorkflowExecutionsRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser ListOpenWorkflowExecutionsRequest
        loop :: ListOpenWorkflowExecutionsRequest
-> Parser ListOpenWorkflowExecutionsRequest
loop ListOpenWorkflowExecutionsRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
16
                          -> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"maximum_page_size"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"maximumPageSize") y x)
                        Word64
26
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                        Word64
34
                          -> do y <- Parser StartTimeFilter -> String -> Parser StartTimeFilter
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"start_time_filter"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startTimeFilter") y x)
                        Word64
42
                          -> do y <- Parser WorkflowExecutionFilter
-> String -> Parser WorkflowExecutionFilter
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"execution_filter"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"executionFilter") y x)
                        Word64
50
                          -> do y <- Parser WorkflowTypeFilter -> String -> Parser WorkflowTypeFilter
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"type_filter"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"typeFilter") 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 ListOpenWorkflowExecutionsRequest
-> String -> Parser ListOpenWorkflowExecutionsRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ListOpenWorkflowExecutionsRequest
-> Parser ListOpenWorkflowExecutionsRequest
loop ListOpenWorkflowExecutionsRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ListOpenWorkflowExecutionsRequest"
  buildMessage :: ListOpenWorkflowExecutionsRequest -> Builder
buildMessage
    = \ ListOpenWorkflowExecutionsRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ListOpenWorkflowExecutionsRequest
  ListOpenWorkflowExecutionsRequest
  Text
  Text
-> ListOpenWorkflowExecutionsRequest -> 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") ListOpenWorkflowExecutionsRequest
_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 :: Int32
_v
                     = FoldLike
  Int32
  ListOpenWorkflowExecutionsRequest
  ListOpenWorkflowExecutionsRequest
  Int32
  Int32
-> ListOpenWorkflowExecutionsRequest -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maximumPageSize") ListOpenWorkflowExecutionsRequest
_x
                 in
                   if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
16)
                         ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: ByteString
_v
                        = FoldLike
  ByteString
  ListOpenWorkflowExecutionsRequest
  ListOpenWorkflowExecutionsRequest
  ByteString
  ByteString
-> ListOpenWorkflowExecutionsRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ListOpenWorkflowExecutionsRequest
_x
                    in
                      if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
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
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               ByteString
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe StartTimeFilter)
  ListOpenWorkflowExecutionsRequest
  ListOpenWorkflowExecutionsRequest
  (Maybe StartTimeFilter)
  (Maybe StartTimeFilter)
-> ListOpenWorkflowExecutionsRequest -> Maybe StartTimeFilter
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'startTimeFilter") ListOpenWorkflowExecutionsRequest
_x
                       of
                         Maybe StartTimeFilter
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just StartTimeFilter
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (StartTimeFilter -> ByteString) -> StartTimeFilter -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   StartTimeFilter -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage StartTimeFilter
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe ListOpenWorkflowExecutionsRequest'Filters)
  ListOpenWorkflowExecutionsRequest
  ListOpenWorkflowExecutionsRequest
  (Maybe ListOpenWorkflowExecutionsRequest'Filters)
  (Maybe ListOpenWorkflowExecutionsRequest'Filters)
-> ListOpenWorkflowExecutionsRequest
-> Maybe ListOpenWorkflowExecutionsRequest'Filters
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'filters") ListOpenWorkflowExecutionsRequest
_x
                          of
                            Maybe ListOpenWorkflowExecutionsRequest'Filters
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just (ListOpenWorkflowExecutionsRequest'ExecutionFilter WorkflowExecutionFilter
v))
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (WorkflowExecutionFilter -> ByteString)
-> WorkflowExecutionFilter
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      WorkflowExecutionFilter -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionFilter
v)
                            (Prelude.Just (ListOpenWorkflowExecutionsRequest'TypeFilter WorkflowTypeFilter
v))
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                   ((ByteString -> Builder)
-> (WorkflowTypeFilter -> ByteString)
-> WorkflowTypeFilter
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      WorkflowTypeFilter -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowTypeFilter
v))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  ListOpenWorkflowExecutionsRequest
  ListOpenWorkflowExecutionsRequest
  FieldSet
  FieldSet
-> ListOpenWorkflowExecutionsRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListOpenWorkflowExecutionsRequest
  ListOpenWorkflowExecutionsRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListOpenWorkflowExecutionsRequest FieldSet
Data.ProtoLens.unknownFields ListOpenWorkflowExecutionsRequest
_x))))))
instance Control.DeepSeq.NFData ListOpenWorkflowExecutionsRequest where
  rnf :: ListOpenWorkflowExecutionsRequest -> ()
rnf
    = \ ListOpenWorkflowExecutionsRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListOpenWorkflowExecutionsRequest -> FieldSet
_ListOpenWorkflowExecutionsRequest'_unknownFields ListOpenWorkflowExecutionsRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListOpenWorkflowExecutionsRequest -> Text
_ListOpenWorkflowExecutionsRequest'namespace ListOpenWorkflowExecutionsRequest
x__)
                (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListOpenWorkflowExecutionsRequest -> Int32
_ListOpenWorkflowExecutionsRequest'maximumPageSize ListOpenWorkflowExecutionsRequest
x__)
                   (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ListOpenWorkflowExecutionsRequest -> ByteString
_ListOpenWorkflowExecutionsRequest'nextPageToken ListOpenWorkflowExecutionsRequest
x__)
                      (Maybe StartTimeFilter -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ListOpenWorkflowExecutionsRequest -> Maybe StartTimeFilter
_ListOpenWorkflowExecutionsRequest'startTimeFilter ListOpenWorkflowExecutionsRequest
x__)
                         (Maybe ListOpenWorkflowExecutionsRequest'Filters -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ListOpenWorkflowExecutionsRequest
-> Maybe ListOpenWorkflowExecutionsRequest'Filters
_ListOpenWorkflowExecutionsRequest'filters ListOpenWorkflowExecutionsRequest
x__) ())))))
instance Control.DeepSeq.NFData ListOpenWorkflowExecutionsRequest'Filters where
  rnf :: ListOpenWorkflowExecutionsRequest'Filters -> ()
rnf (ListOpenWorkflowExecutionsRequest'ExecutionFilter WorkflowExecutionFilter
x__)
    = WorkflowExecutionFilter -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowExecutionFilter
x__
  rnf (ListOpenWorkflowExecutionsRequest'TypeFilter WorkflowTypeFilter
x__)
    = WorkflowTypeFilter -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowTypeFilter
x__
_ListOpenWorkflowExecutionsRequest'ExecutionFilter ::
  Data.ProtoLens.Prism.Prism' ListOpenWorkflowExecutionsRequest'Filters Proto.Temporal.Api.Filter.V1.Message.WorkflowExecutionFilter
_ListOpenWorkflowExecutionsRequest'ExecutionFilter :: Prism'
  ListOpenWorkflowExecutionsRequest'Filters WorkflowExecutionFilter
_ListOpenWorkflowExecutionsRequest'ExecutionFilter
  = (WorkflowExecutionFilter
 -> ListOpenWorkflowExecutionsRequest'Filters)
-> (ListOpenWorkflowExecutionsRequest'Filters
    -> Maybe WorkflowExecutionFilter)
-> Prism'
     ListOpenWorkflowExecutionsRequest'Filters WorkflowExecutionFilter
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowExecutionFilter
-> ListOpenWorkflowExecutionsRequest'Filters
ListOpenWorkflowExecutionsRequest'ExecutionFilter
      (\ ListOpenWorkflowExecutionsRequest'Filters
p__
         -> case ListOpenWorkflowExecutionsRequest'Filters
p__ of
              (ListOpenWorkflowExecutionsRequest'ExecutionFilter WorkflowExecutionFilter
p__val)
                -> WorkflowExecutionFilter -> Maybe WorkflowExecutionFilter
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionFilter
p__val
              ListOpenWorkflowExecutionsRequest'Filters
_otherwise -> Maybe WorkflowExecutionFilter
forall a. Maybe a
Prelude.Nothing)
_ListOpenWorkflowExecutionsRequest'TypeFilter ::
  Data.ProtoLens.Prism.Prism' ListOpenWorkflowExecutionsRequest'Filters Proto.Temporal.Api.Filter.V1.Message.WorkflowTypeFilter
_ListOpenWorkflowExecutionsRequest'TypeFilter :: Prism' ListOpenWorkflowExecutionsRequest'Filters WorkflowTypeFilter
_ListOpenWorkflowExecutionsRequest'TypeFilter
  = (WorkflowTypeFilter -> ListOpenWorkflowExecutionsRequest'Filters)
-> (ListOpenWorkflowExecutionsRequest'Filters
    -> Maybe WorkflowTypeFilter)
-> Prism'
     ListOpenWorkflowExecutionsRequest'Filters WorkflowTypeFilter
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowTypeFilter -> ListOpenWorkflowExecutionsRequest'Filters
ListOpenWorkflowExecutionsRequest'TypeFilter
      (\ ListOpenWorkflowExecutionsRequest'Filters
p__
         -> case ListOpenWorkflowExecutionsRequest'Filters
p__ of
              (ListOpenWorkflowExecutionsRequest'TypeFilter WorkflowTypeFilter
p__val)
                -> WorkflowTypeFilter -> Maybe WorkflowTypeFilter
forall a. a -> Maybe a
Prelude.Just WorkflowTypeFilter
p__val
              ListOpenWorkflowExecutionsRequest'Filters
_otherwise -> Maybe WorkflowTypeFilter
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.executions' @:: Lens' ListOpenWorkflowExecutionsResponse [Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'executions' @:: Lens' ListOpenWorkflowExecutionsResponse (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ListOpenWorkflowExecutionsResponse Data.ByteString.ByteString@ -}
data ListOpenWorkflowExecutionsResponse
  = ListOpenWorkflowExecutionsResponse'_constructor {ListOpenWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo
_ListOpenWorkflowExecutionsResponse'executions :: !(Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo),
                                                     ListOpenWorkflowExecutionsResponse -> ByteString
_ListOpenWorkflowExecutionsResponse'nextPageToken :: !Data.ByteString.ByteString,
                                                     ListOpenWorkflowExecutionsResponse -> FieldSet
_ListOpenWorkflowExecutionsResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Bool
(ListOpenWorkflowExecutionsResponse
 -> ListOpenWorkflowExecutionsResponse -> Bool)
-> (ListOpenWorkflowExecutionsResponse
    -> ListOpenWorkflowExecutionsResponse -> Bool)
-> Eq ListOpenWorkflowExecutionsResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Bool
== :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Bool
$c/= :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Bool
/= :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Bool
Prelude.Eq, Eq ListOpenWorkflowExecutionsResponse
Eq ListOpenWorkflowExecutionsResponse =>
(ListOpenWorkflowExecutionsResponse
 -> ListOpenWorkflowExecutionsResponse -> Ordering)
-> (ListOpenWorkflowExecutionsResponse
    -> ListOpenWorkflowExecutionsResponse -> Bool)
-> (ListOpenWorkflowExecutionsResponse
    -> ListOpenWorkflowExecutionsResponse -> Bool)
-> (ListOpenWorkflowExecutionsResponse
    -> ListOpenWorkflowExecutionsResponse -> Bool)
-> (ListOpenWorkflowExecutionsResponse
    -> ListOpenWorkflowExecutionsResponse -> Bool)
-> (ListOpenWorkflowExecutionsResponse
    -> ListOpenWorkflowExecutionsResponse
    -> ListOpenWorkflowExecutionsResponse)
-> (ListOpenWorkflowExecutionsResponse
    -> ListOpenWorkflowExecutionsResponse
    -> ListOpenWorkflowExecutionsResponse)
-> Ord ListOpenWorkflowExecutionsResponse
ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Bool
ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Ordering
ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse
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 :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Ordering
compare :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Ordering
$c< :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Bool
< :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Bool
$c<= :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Bool
<= :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Bool
$c> :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Bool
> :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Bool
$c>= :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Bool
>= :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse -> Bool
$cmax :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse
max :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse
$cmin :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse
min :: ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse
-> ListOpenWorkflowExecutionsResponse
Prelude.Ord)
instance Prelude.Show ListOpenWorkflowExecutionsResponse where
  showsPrec :: Int -> ListOpenWorkflowExecutionsResponse -> ShowS
showsPrec Int
_ ListOpenWorkflowExecutionsResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListOpenWorkflowExecutionsResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListOpenWorkflowExecutionsResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListOpenWorkflowExecutionsResponse "executions" [Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "executions"
-> ([WorkflowExecutionInfo] -> f [WorkflowExecutionInfo])
-> ListOpenWorkflowExecutionsResponse
-> f ListOpenWorkflowExecutionsResponse
fieldOf Proxy# "executions"
_
    = ((Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo))
 -> ListOpenWorkflowExecutionsResponse
 -> f ListOpenWorkflowExecutionsResponse)
-> (([WorkflowExecutionInfo] -> f [WorkflowExecutionInfo])
    -> Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> ([WorkflowExecutionInfo] -> f [WorkflowExecutionInfo])
-> ListOpenWorkflowExecutionsResponse
-> f ListOpenWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListOpenWorkflowExecutionsResponse
 -> Vector WorkflowExecutionInfo)
-> (ListOpenWorkflowExecutionsResponse
    -> Vector WorkflowExecutionInfo
    -> ListOpenWorkflowExecutionsResponse)
-> Lens
     ListOpenWorkflowExecutionsResponse
     ListOpenWorkflowExecutionsResponse
     (Vector WorkflowExecutionInfo)
     (Vector WorkflowExecutionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListOpenWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo
_ListOpenWorkflowExecutionsResponse'executions
           (\ ListOpenWorkflowExecutionsResponse
x__ Vector WorkflowExecutionInfo
y__
              -> ListOpenWorkflowExecutionsResponse
x__ {_ListOpenWorkflowExecutionsResponse'executions = y__}))
        ((Vector WorkflowExecutionInfo -> [WorkflowExecutionInfo])
-> (Vector WorkflowExecutionInfo
    -> [WorkflowExecutionInfo] -> Vector WorkflowExecutionInfo)
-> Lens
     (Vector WorkflowExecutionInfo)
     (Vector WorkflowExecutionInfo)
     [WorkflowExecutionInfo]
     [WorkflowExecutionInfo]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector WorkflowExecutionInfo -> [WorkflowExecutionInfo]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector WorkflowExecutionInfo
_ [WorkflowExecutionInfo]
y__ -> [WorkflowExecutionInfo] -> Vector WorkflowExecutionInfo
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [WorkflowExecutionInfo]
y__))
instance Data.ProtoLens.Field.HasField ListOpenWorkflowExecutionsResponse "vec'executions" (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'executions"
-> (Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> ListOpenWorkflowExecutionsResponse
-> f ListOpenWorkflowExecutionsResponse
fieldOf Proxy# "vec'executions"
_
    = ((Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo))
 -> ListOpenWorkflowExecutionsResponse
 -> f ListOpenWorkflowExecutionsResponse)
-> ((Vector WorkflowExecutionInfo
     -> f (Vector WorkflowExecutionInfo))
    -> Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> (Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> ListOpenWorkflowExecutionsResponse
-> f ListOpenWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListOpenWorkflowExecutionsResponse
 -> Vector WorkflowExecutionInfo)
-> (ListOpenWorkflowExecutionsResponse
    -> Vector WorkflowExecutionInfo
    -> ListOpenWorkflowExecutionsResponse)
-> Lens
     ListOpenWorkflowExecutionsResponse
     ListOpenWorkflowExecutionsResponse
     (Vector WorkflowExecutionInfo)
     (Vector WorkflowExecutionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListOpenWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo
_ListOpenWorkflowExecutionsResponse'executions
           (\ ListOpenWorkflowExecutionsResponse
x__ Vector WorkflowExecutionInfo
y__
              -> ListOpenWorkflowExecutionsResponse
x__ {_ListOpenWorkflowExecutionsResponse'executions = y__}))
        (Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo))
-> Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListOpenWorkflowExecutionsResponse "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ListOpenWorkflowExecutionsResponse
-> f ListOpenWorkflowExecutionsResponse
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ListOpenWorkflowExecutionsResponse
 -> f ListOpenWorkflowExecutionsResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ListOpenWorkflowExecutionsResponse
-> f ListOpenWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListOpenWorkflowExecutionsResponse -> ByteString)
-> (ListOpenWorkflowExecutionsResponse
    -> ByteString -> ListOpenWorkflowExecutionsResponse)
-> Lens
     ListOpenWorkflowExecutionsResponse
     ListOpenWorkflowExecutionsResponse
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListOpenWorkflowExecutionsResponse -> ByteString
_ListOpenWorkflowExecutionsResponse'nextPageToken
           (\ ListOpenWorkflowExecutionsResponse
x__ ByteString
y__
              -> ListOpenWorkflowExecutionsResponse
x__ {_ListOpenWorkflowExecutionsResponse'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListOpenWorkflowExecutionsResponse where
  messageName :: Proxy ListOpenWorkflowExecutionsResponse -> Text
messageName Proxy ListOpenWorkflowExecutionsResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListOpenWorkflowExecutionsResponse"
  packedMessageDescriptor :: Proxy ListOpenWorkflowExecutionsResponse -> ByteString
packedMessageDescriptor Proxy ListOpenWorkflowExecutionsResponse
_
    = ByteString
"\n\
      \\"ListOpenWorkflowExecutionsResponse\DC2O\n\
      \\n\
      \executions\CAN\SOH \ETX(\v2/.temporal.api.workflow.v1.WorkflowExecutionInfoR\n\
      \executions\DC2&\n\
      \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken"
  packedFileDescriptor :: Proxy ListOpenWorkflowExecutionsResponse -> ByteString
packedFileDescriptor Proxy ListOpenWorkflowExecutionsResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListOpenWorkflowExecutionsResponse)
fieldsByTag
    = let
        executions__field_descriptor :: FieldDescriptor ListOpenWorkflowExecutionsResponse
executions__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionInfo
-> FieldAccessor
     ListOpenWorkflowExecutionsResponse WorkflowExecutionInfo
-> FieldDescriptor ListOpenWorkflowExecutionsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"executions"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecutionInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo)
              (Packing
-> Lens' ListOpenWorkflowExecutionsResponse [WorkflowExecutionInfo]
-> FieldAccessor
     ListOpenWorkflowExecutionsResponse WorkflowExecutionInfo
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 @"executions")) ::
              Data.ProtoLens.FieldDescriptor ListOpenWorkflowExecutionsResponse
        nextPageToken__field_descriptor :: FieldDescriptor ListOpenWorkflowExecutionsResponse
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ListOpenWorkflowExecutionsResponse ByteString
-> FieldDescriptor ListOpenWorkflowExecutionsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ListOpenWorkflowExecutionsResponse
     ListOpenWorkflowExecutionsResponse
     ByteString
     ByteString
-> FieldAccessor ListOpenWorkflowExecutionsResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ListOpenWorkflowExecutionsResponse
      in
        [(Tag, FieldDescriptor ListOpenWorkflowExecutionsResponse)]
-> Map Tag (FieldDescriptor ListOpenWorkflowExecutionsResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListOpenWorkflowExecutionsResponse
executions__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListOpenWorkflowExecutionsResponse
nextPageToken__field_descriptor)]
  unknownFields :: Lens' ListOpenWorkflowExecutionsResponse FieldSet
unknownFields
    = (ListOpenWorkflowExecutionsResponse -> FieldSet)
-> (ListOpenWorkflowExecutionsResponse
    -> FieldSet -> ListOpenWorkflowExecutionsResponse)
-> Lens' ListOpenWorkflowExecutionsResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListOpenWorkflowExecutionsResponse -> FieldSet
_ListOpenWorkflowExecutionsResponse'_unknownFields
        (\ ListOpenWorkflowExecutionsResponse
x__ FieldSet
y__
           -> ListOpenWorkflowExecutionsResponse
x__ {_ListOpenWorkflowExecutionsResponse'_unknownFields = y__})
  defMessage :: ListOpenWorkflowExecutionsResponse
defMessage
    = ListOpenWorkflowExecutionsResponse'_constructor
        {_ListOpenWorkflowExecutionsResponse'executions :: Vector WorkflowExecutionInfo
_ListOpenWorkflowExecutionsResponse'executions = Vector WorkflowExecutionInfo
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ListOpenWorkflowExecutionsResponse'nextPageToken :: ByteString
_ListOpenWorkflowExecutionsResponse'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListOpenWorkflowExecutionsResponse'_unknownFields :: FieldSet
_ListOpenWorkflowExecutionsResponse'_unknownFields = []}
  parseMessage :: Parser ListOpenWorkflowExecutionsResponse
parseMessage
    = let
        loop ::
          ListOpenWorkflowExecutionsResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo
             -> Data.ProtoLens.Encoding.Bytes.Parser ListOpenWorkflowExecutionsResponse
        loop :: ListOpenWorkflowExecutionsResponse
-> Growing Vector RealWorld WorkflowExecutionInfo
-> Parser ListOpenWorkflowExecutionsResponse
loop ListOpenWorkflowExecutionsResponse
x Growing Vector RealWorld WorkflowExecutionInfo
mutable'executions
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'executions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                mutable'executions)
                      (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'executions") frozen'executions
                              x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser WorkflowExecutionInfo
-> String -> Parser WorkflowExecutionInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"executions"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'executions y)
                                loop x v
                        Word64
18
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                                  mutable'executions
                        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'executions
      in
        Parser ListOpenWorkflowExecutionsResponse
-> String -> Parser ListOpenWorkflowExecutionsResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'executions <- IO (Growing Vector RealWorld WorkflowExecutionInfo)
-> Parser (Growing Vector RealWorld WorkflowExecutionInfo)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld WorkflowExecutionInfo)
IO (Growing Vector (PrimState IO) WorkflowExecutionInfo)
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'executions)
          String
"ListOpenWorkflowExecutionsResponse"
  buildMessage :: ListOpenWorkflowExecutionsResponse -> Builder
buildMessage
    = \ ListOpenWorkflowExecutionsResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((WorkflowExecutionInfo -> Builder)
-> Vector WorkflowExecutionInfo -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ WorkflowExecutionInfo
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (WorkflowExecutionInfo -> ByteString)
-> WorkflowExecutionInfo
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           WorkflowExecutionInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionInfo
_v))
                (FoldLike
  (Vector WorkflowExecutionInfo)
  ListOpenWorkflowExecutionsResponse
  ListOpenWorkflowExecutionsResponse
  (Vector WorkflowExecutionInfo)
  (Vector WorkflowExecutionInfo)
-> ListOpenWorkflowExecutionsResponse
-> Vector WorkflowExecutionInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'executions") ListOpenWorkflowExecutionsResponse
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: ByteString
_v
                     = FoldLike
  ByteString
  ListOpenWorkflowExecutionsResponse
  ListOpenWorkflowExecutionsResponse
  ByteString
  ByteString
-> ListOpenWorkflowExecutionsResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ListOpenWorkflowExecutionsResponse
_x
                 in
                   if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
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
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            ByteString
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ListOpenWorkflowExecutionsResponse
  ListOpenWorkflowExecutionsResponse
  FieldSet
  FieldSet
-> ListOpenWorkflowExecutionsResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListOpenWorkflowExecutionsResponse
  ListOpenWorkflowExecutionsResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListOpenWorkflowExecutionsResponse FieldSet
Data.ProtoLens.unknownFields ListOpenWorkflowExecutionsResponse
_x)))
instance Control.DeepSeq.NFData ListOpenWorkflowExecutionsResponse where
  rnf :: ListOpenWorkflowExecutionsResponse -> ()
rnf
    = \ ListOpenWorkflowExecutionsResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListOpenWorkflowExecutionsResponse -> FieldSet
_ListOpenWorkflowExecutionsResponse'_unknownFields ListOpenWorkflowExecutionsResponse
x__)
             (Vector WorkflowExecutionInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListOpenWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo
_ListOpenWorkflowExecutionsResponse'executions ListOpenWorkflowExecutionsResponse
x__)
                (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListOpenWorkflowExecutionsResponse -> ByteString
_ListOpenWorkflowExecutionsResponse'nextPageToken ListOpenWorkflowExecutionsResponse
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' ListScheduleMatchingTimesRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.scheduleId' @:: Lens' ListScheduleMatchingTimesRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.startTime' @:: Lens' ListScheduleMatchingTimesRequest Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'startTime' @:: Lens' ListScheduleMatchingTimesRequest (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.endTime' @:: Lens' ListScheduleMatchingTimesRequest Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'endTime' @:: Lens' ListScheduleMatchingTimesRequest (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@ -}
data ListScheduleMatchingTimesRequest
  = ListScheduleMatchingTimesRequest'_constructor {ListScheduleMatchingTimesRequest -> Text
_ListScheduleMatchingTimesRequest'namespace :: !Data.Text.Text,
                                                   ListScheduleMatchingTimesRequest -> Text
_ListScheduleMatchingTimesRequest'scheduleId :: !Data.Text.Text,
                                                   ListScheduleMatchingTimesRequest -> Maybe Timestamp
_ListScheduleMatchingTimesRequest'startTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                                   ListScheduleMatchingTimesRequest -> Maybe Timestamp
_ListScheduleMatchingTimesRequest'endTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                                   ListScheduleMatchingTimesRequest -> FieldSet
_ListScheduleMatchingTimesRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Bool
(ListScheduleMatchingTimesRequest
 -> ListScheduleMatchingTimesRequest -> Bool)
-> (ListScheduleMatchingTimesRequest
    -> ListScheduleMatchingTimesRequest -> Bool)
-> Eq ListScheduleMatchingTimesRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Bool
== :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Bool
$c/= :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Bool
/= :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Bool
Prelude.Eq, Eq ListScheduleMatchingTimesRequest
Eq ListScheduleMatchingTimesRequest =>
(ListScheduleMatchingTimesRequest
 -> ListScheduleMatchingTimesRequest -> Ordering)
-> (ListScheduleMatchingTimesRequest
    -> ListScheduleMatchingTimesRequest -> Bool)
-> (ListScheduleMatchingTimesRequest
    -> ListScheduleMatchingTimesRequest -> Bool)
-> (ListScheduleMatchingTimesRequest
    -> ListScheduleMatchingTimesRequest -> Bool)
-> (ListScheduleMatchingTimesRequest
    -> ListScheduleMatchingTimesRequest -> Bool)
-> (ListScheduleMatchingTimesRequest
    -> ListScheduleMatchingTimesRequest
    -> ListScheduleMatchingTimesRequest)
-> (ListScheduleMatchingTimesRequest
    -> ListScheduleMatchingTimesRequest
    -> ListScheduleMatchingTimesRequest)
-> Ord ListScheduleMatchingTimesRequest
ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Bool
ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Ordering
ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest
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 :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Ordering
compare :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Ordering
$c< :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Bool
< :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Bool
$c<= :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Bool
<= :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Bool
$c> :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Bool
> :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Bool
$c>= :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Bool
>= :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest -> Bool
$cmax :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest
max :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest
$cmin :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest
min :: ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest
-> ListScheduleMatchingTimesRequest
Prelude.Ord)
instance Prelude.Show ListScheduleMatchingTimesRequest where
  showsPrec :: Int -> ListScheduleMatchingTimesRequest -> ShowS
showsPrec Int
_ ListScheduleMatchingTimesRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListScheduleMatchingTimesRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListScheduleMatchingTimesRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListScheduleMatchingTimesRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ListScheduleMatchingTimesRequest
-> f ListScheduleMatchingTimesRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ListScheduleMatchingTimesRequest
 -> f ListScheduleMatchingTimesRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ListScheduleMatchingTimesRequest
-> f ListScheduleMatchingTimesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListScheduleMatchingTimesRequest -> Text)
-> (ListScheduleMatchingTimesRequest
    -> Text -> ListScheduleMatchingTimesRequest)
-> Lens
     ListScheduleMatchingTimesRequest
     ListScheduleMatchingTimesRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListScheduleMatchingTimesRequest -> Text
_ListScheduleMatchingTimesRequest'namespace
           (\ ListScheduleMatchingTimesRequest
x__ Text
y__
              -> ListScheduleMatchingTimesRequest
x__ {_ListScheduleMatchingTimesRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListScheduleMatchingTimesRequest "scheduleId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleId"
-> (Text -> f Text)
-> ListScheduleMatchingTimesRequest
-> f ListScheduleMatchingTimesRequest
fieldOf Proxy# "scheduleId"
_
    = ((Text -> f Text)
 -> ListScheduleMatchingTimesRequest
 -> f ListScheduleMatchingTimesRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ListScheduleMatchingTimesRequest
-> f ListScheduleMatchingTimesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListScheduleMatchingTimesRequest -> Text)
-> (ListScheduleMatchingTimesRequest
    -> Text -> ListScheduleMatchingTimesRequest)
-> Lens
     ListScheduleMatchingTimesRequest
     ListScheduleMatchingTimesRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListScheduleMatchingTimesRequest -> Text
_ListScheduleMatchingTimesRequest'scheduleId
           (\ ListScheduleMatchingTimesRequest
x__ Text
y__
              -> ListScheduleMatchingTimesRequest
x__ {_ListScheduleMatchingTimesRequest'scheduleId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListScheduleMatchingTimesRequest "startTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startTime"
-> (Timestamp -> f Timestamp)
-> ListScheduleMatchingTimesRequest
-> f ListScheduleMatchingTimesRequest
fieldOf Proxy# "startTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> ListScheduleMatchingTimesRequest
 -> f ListScheduleMatchingTimesRequest)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> ListScheduleMatchingTimesRequest
-> f ListScheduleMatchingTimesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListScheduleMatchingTimesRequest -> Maybe Timestamp)
-> (ListScheduleMatchingTimesRequest
    -> Maybe Timestamp -> ListScheduleMatchingTimesRequest)
-> Lens
     ListScheduleMatchingTimesRequest
     ListScheduleMatchingTimesRequest
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListScheduleMatchingTimesRequest -> Maybe Timestamp
_ListScheduleMatchingTimesRequest'startTime
           (\ ListScheduleMatchingTimesRequest
x__ Maybe Timestamp
y__
              -> ListScheduleMatchingTimesRequest
x__ {_ListScheduleMatchingTimesRequest'startTime = y__}))
        (Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ListScheduleMatchingTimesRequest "maybe'startTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> ListScheduleMatchingTimesRequest
-> f ListScheduleMatchingTimesRequest
fieldOf Proxy# "maybe'startTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> ListScheduleMatchingTimesRequest
 -> f ListScheduleMatchingTimesRequest)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> ListScheduleMatchingTimesRequest
-> f ListScheduleMatchingTimesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListScheduleMatchingTimesRequest -> Maybe Timestamp)
-> (ListScheduleMatchingTimesRequest
    -> Maybe Timestamp -> ListScheduleMatchingTimesRequest)
-> Lens
     ListScheduleMatchingTimesRequest
     ListScheduleMatchingTimesRequest
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListScheduleMatchingTimesRequest -> Maybe Timestamp
_ListScheduleMatchingTimesRequest'startTime
           (\ ListScheduleMatchingTimesRequest
x__ Maybe Timestamp
y__
              -> ListScheduleMatchingTimesRequest
x__ {_ListScheduleMatchingTimesRequest'startTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListScheduleMatchingTimesRequest "endTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "endTime"
-> (Timestamp -> f Timestamp)
-> ListScheduleMatchingTimesRequest
-> f ListScheduleMatchingTimesRequest
fieldOf Proxy# "endTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> ListScheduleMatchingTimesRequest
 -> f ListScheduleMatchingTimesRequest)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> ListScheduleMatchingTimesRequest
-> f ListScheduleMatchingTimesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListScheduleMatchingTimesRequest -> Maybe Timestamp)
-> (ListScheduleMatchingTimesRequest
    -> Maybe Timestamp -> ListScheduleMatchingTimesRequest)
-> Lens
     ListScheduleMatchingTimesRequest
     ListScheduleMatchingTimesRequest
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListScheduleMatchingTimesRequest -> Maybe Timestamp
_ListScheduleMatchingTimesRequest'endTime
           (\ ListScheduleMatchingTimesRequest
x__ Maybe Timestamp
y__
              -> ListScheduleMatchingTimesRequest
x__ {_ListScheduleMatchingTimesRequest'endTime = 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 ListScheduleMatchingTimesRequest "maybe'endTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'endTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> ListScheduleMatchingTimesRequest
-> f ListScheduleMatchingTimesRequest
fieldOf Proxy# "maybe'endTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> ListScheduleMatchingTimesRequest
 -> f ListScheduleMatchingTimesRequest)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> ListScheduleMatchingTimesRequest
-> f ListScheduleMatchingTimesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListScheduleMatchingTimesRequest -> Maybe Timestamp)
-> (ListScheduleMatchingTimesRequest
    -> Maybe Timestamp -> ListScheduleMatchingTimesRequest)
-> Lens
     ListScheduleMatchingTimesRequest
     ListScheduleMatchingTimesRequest
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListScheduleMatchingTimesRequest -> Maybe Timestamp
_ListScheduleMatchingTimesRequest'endTime
           (\ ListScheduleMatchingTimesRequest
x__ Maybe Timestamp
y__
              -> ListScheduleMatchingTimesRequest
x__ {_ListScheduleMatchingTimesRequest'endTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListScheduleMatchingTimesRequest where
  messageName :: Proxy ListScheduleMatchingTimesRequest -> Text
messageName Proxy ListScheduleMatchingTimesRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListScheduleMatchingTimesRequest"
  packedMessageDescriptor :: Proxy ListScheduleMatchingTimesRequest -> ByteString
packedMessageDescriptor Proxy ListScheduleMatchingTimesRequest
_
    = ByteString
"\n\
      \ ListScheduleMatchingTimesRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
      \\vschedule_id\CAN\STX \SOH(\tR\n\
      \scheduleId\DC29\n\
      \\n\
      \start_time\CAN\ETX \SOH(\v2\SUB.google.protobuf.TimestampR\tstartTime\DC25\n\
      \\bend_time\CAN\EOT \SOH(\v2\SUB.google.protobuf.TimestampR\aendTime"
  packedFileDescriptor :: Proxy ListScheduleMatchingTimesRequest -> ByteString
packedFileDescriptor Proxy ListScheduleMatchingTimesRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListScheduleMatchingTimesRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor ListScheduleMatchingTimesRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ListScheduleMatchingTimesRequest Text
-> FieldDescriptor ListScheduleMatchingTimesRequest
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
     ListScheduleMatchingTimesRequest
     ListScheduleMatchingTimesRequest
     Text
     Text
-> FieldAccessor ListScheduleMatchingTimesRequest 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 ListScheduleMatchingTimesRequest
        scheduleId__field_descriptor :: FieldDescriptor ListScheduleMatchingTimesRequest
scheduleId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ListScheduleMatchingTimesRequest Text
-> FieldDescriptor ListScheduleMatchingTimesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule_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
     ListScheduleMatchingTimesRequest
     ListScheduleMatchingTimesRequest
     Text
     Text
-> FieldAccessor ListScheduleMatchingTimesRequest 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 @"scheduleId")) ::
              Data.ProtoLens.FieldDescriptor ListScheduleMatchingTimesRequest
        startTime__field_descriptor :: FieldDescriptor ListScheduleMatchingTimesRequest
startTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor ListScheduleMatchingTimesRequest Timestamp
-> FieldDescriptor ListScheduleMatchingTimesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_time"
              (MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
              (Lens
  ListScheduleMatchingTimesRequest
  ListScheduleMatchingTimesRequest
  (Maybe Timestamp)
  (Maybe Timestamp)
-> FieldAccessor ListScheduleMatchingTimesRequest Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startTime")) ::
              Data.ProtoLens.FieldDescriptor ListScheduleMatchingTimesRequest
        endTime__field_descriptor :: FieldDescriptor ListScheduleMatchingTimesRequest
endTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor ListScheduleMatchingTimesRequest Timestamp
-> FieldDescriptor ListScheduleMatchingTimesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"end_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
  ListScheduleMatchingTimesRequest
  ListScheduleMatchingTimesRequest
  (Maybe Timestamp)
  (Maybe Timestamp)
-> FieldAccessor ListScheduleMatchingTimesRequest 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'endTime")) ::
              Data.ProtoLens.FieldDescriptor ListScheduleMatchingTimesRequest
      in
        [(Tag, FieldDescriptor ListScheduleMatchingTimesRequest)]
-> Map Tag (FieldDescriptor ListScheduleMatchingTimesRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListScheduleMatchingTimesRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListScheduleMatchingTimesRequest
scheduleId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ListScheduleMatchingTimesRequest
startTime__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ListScheduleMatchingTimesRequest
endTime__field_descriptor)]
  unknownFields :: Lens' ListScheduleMatchingTimesRequest FieldSet
unknownFields
    = (ListScheduleMatchingTimesRequest -> FieldSet)
-> (ListScheduleMatchingTimesRequest
    -> FieldSet -> ListScheduleMatchingTimesRequest)
-> Lens' ListScheduleMatchingTimesRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListScheduleMatchingTimesRequest -> FieldSet
_ListScheduleMatchingTimesRequest'_unknownFields
        (\ ListScheduleMatchingTimesRequest
x__ FieldSet
y__
           -> ListScheduleMatchingTimesRequest
x__ {_ListScheduleMatchingTimesRequest'_unknownFields = y__})
  defMessage :: ListScheduleMatchingTimesRequest
defMessage
    = ListScheduleMatchingTimesRequest'_constructor
        {_ListScheduleMatchingTimesRequest'namespace :: Text
_ListScheduleMatchingTimesRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListScheduleMatchingTimesRequest'scheduleId :: Text
_ListScheduleMatchingTimesRequest'scheduleId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListScheduleMatchingTimesRequest'startTime :: Maybe Timestamp
_ListScheduleMatchingTimesRequest'startTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _ListScheduleMatchingTimesRequest'endTime :: Maybe Timestamp
_ListScheduleMatchingTimesRequest'endTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _ListScheduleMatchingTimesRequest'_unknownFields :: FieldSet
_ListScheduleMatchingTimesRequest'_unknownFields = []}
  parseMessage :: Parser ListScheduleMatchingTimesRequest
parseMessage
    = let
        loop ::
          ListScheduleMatchingTimesRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser ListScheduleMatchingTimesRequest
        loop :: ListScheduleMatchingTimesRequest
-> Parser ListScheduleMatchingTimesRequest
loop ListScheduleMatchingTimesRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
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
"schedule_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"scheduleId") y x)
                        Word64
26
                          -> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"start_time"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"startTime") y x)
                        Word64
34
                          -> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"end_time"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"endTime") 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 ListScheduleMatchingTimesRequest
-> String -> Parser ListScheduleMatchingTimesRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ListScheduleMatchingTimesRequest
-> Parser ListScheduleMatchingTimesRequest
loop ListScheduleMatchingTimesRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ListScheduleMatchingTimesRequest"
  buildMessage :: ListScheduleMatchingTimesRequest -> Builder
buildMessage
    = \ ListScheduleMatchingTimesRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ListScheduleMatchingTimesRequest
  ListScheduleMatchingTimesRequest
  Text
  Text
-> ListScheduleMatchingTimesRequest -> 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") ListScheduleMatchingTimesRequest
_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
  ListScheduleMatchingTimesRequest
  ListScheduleMatchingTimesRequest
  Text
  Text
-> ListScheduleMatchingTimesRequest -> 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 @"scheduleId") ListScheduleMatchingTimesRequest
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe Timestamp)
  ListScheduleMatchingTimesRequest
  ListScheduleMatchingTimesRequest
  (Maybe Timestamp)
  (Maybe Timestamp)
-> ListScheduleMatchingTimesRequest -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                          (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startTime") ListScheduleMatchingTimesRequest
_x
                    of
                      Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just Timestamp
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe Timestamp)
  ListScheduleMatchingTimesRequest
  ListScheduleMatchingTimesRequest
  (Maybe Timestamp)
  (Maybe Timestamp)
-> ListScheduleMatchingTimesRequest -> 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'endTime") ListScheduleMatchingTimesRequest
_x
                       of
                         Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just Timestamp
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  ListScheduleMatchingTimesRequest
  ListScheduleMatchingTimesRequest
  FieldSet
  FieldSet
-> ListScheduleMatchingTimesRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListScheduleMatchingTimesRequest
  ListScheduleMatchingTimesRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListScheduleMatchingTimesRequest FieldSet
Data.ProtoLens.unknownFields ListScheduleMatchingTimesRequest
_x)))))
instance Control.DeepSeq.NFData ListScheduleMatchingTimesRequest where
  rnf :: ListScheduleMatchingTimesRequest -> ()
rnf
    = \ ListScheduleMatchingTimesRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListScheduleMatchingTimesRequest -> FieldSet
_ListScheduleMatchingTimesRequest'_unknownFields ListScheduleMatchingTimesRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListScheduleMatchingTimesRequest -> Text
_ListScheduleMatchingTimesRequest'namespace ListScheduleMatchingTimesRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListScheduleMatchingTimesRequest -> Text
_ListScheduleMatchingTimesRequest'scheduleId ListScheduleMatchingTimesRequest
x__)
                   (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ListScheduleMatchingTimesRequest -> Maybe Timestamp
_ListScheduleMatchingTimesRequest'startTime ListScheduleMatchingTimesRequest
x__)
                      (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ListScheduleMatchingTimesRequest -> Maybe Timestamp
_ListScheduleMatchingTimesRequest'endTime ListScheduleMatchingTimesRequest
x__) ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.startTime' @:: Lens' ListScheduleMatchingTimesResponse [Proto.Google.Protobuf.Timestamp.Timestamp]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'startTime' @:: Lens' ListScheduleMatchingTimesResponse (Data.Vector.Vector Proto.Google.Protobuf.Timestamp.Timestamp)@ -}
data ListScheduleMatchingTimesResponse
  = ListScheduleMatchingTimesResponse'_constructor {ListScheduleMatchingTimesResponse -> Vector Timestamp
_ListScheduleMatchingTimesResponse'startTime :: !(Data.Vector.Vector Proto.Google.Protobuf.Timestamp.Timestamp),
                                                    ListScheduleMatchingTimesResponse -> FieldSet
_ListScheduleMatchingTimesResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Bool
(ListScheduleMatchingTimesResponse
 -> ListScheduleMatchingTimesResponse -> Bool)
-> (ListScheduleMatchingTimesResponse
    -> ListScheduleMatchingTimesResponse -> Bool)
-> Eq ListScheduleMatchingTimesResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Bool
== :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Bool
$c/= :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Bool
/= :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Bool
Prelude.Eq, Eq ListScheduleMatchingTimesResponse
Eq ListScheduleMatchingTimesResponse =>
(ListScheduleMatchingTimesResponse
 -> ListScheduleMatchingTimesResponse -> Ordering)
-> (ListScheduleMatchingTimesResponse
    -> ListScheduleMatchingTimesResponse -> Bool)
-> (ListScheduleMatchingTimesResponse
    -> ListScheduleMatchingTimesResponse -> Bool)
-> (ListScheduleMatchingTimesResponse
    -> ListScheduleMatchingTimesResponse -> Bool)
-> (ListScheduleMatchingTimesResponse
    -> ListScheduleMatchingTimesResponse -> Bool)
-> (ListScheduleMatchingTimesResponse
    -> ListScheduleMatchingTimesResponse
    -> ListScheduleMatchingTimesResponse)
-> (ListScheduleMatchingTimesResponse
    -> ListScheduleMatchingTimesResponse
    -> ListScheduleMatchingTimesResponse)
-> Ord ListScheduleMatchingTimesResponse
ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Bool
ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Ordering
ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse
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 :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Ordering
compare :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Ordering
$c< :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Bool
< :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Bool
$c<= :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Bool
<= :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Bool
$c> :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Bool
> :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Bool
$c>= :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Bool
>= :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse -> Bool
$cmax :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse
max :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse
$cmin :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse
min :: ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse
-> ListScheduleMatchingTimesResponse
Prelude.Ord)
instance Prelude.Show ListScheduleMatchingTimesResponse where
  showsPrec :: Int -> ListScheduleMatchingTimesResponse -> ShowS
showsPrec Int
_ ListScheduleMatchingTimesResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListScheduleMatchingTimesResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListScheduleMatchingTimesResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListScheduleMatchingTimesResponse "startTime" [Proto.Google.Protobuf.Timestamp.Timestamp] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startTime"
-> ([Timestamp] -> f [Timestamp])
-> ListScheduleMatchingTimesResponse
-> f ListScheduleMatchingTimesResponse
fieldOf Proxy# "startTime"
_
    = ((Vector Timestamp -> f (Vector Timestamp))
 -> ListScheduleMatchingTimesResponse
 -> f ListScheduleMatchingTimesResponse)
-> (([Timestamp] -> f [Timestamp])
    -> Vector Timestamp -> f (Vector Timestamp))
-> ([Timestamp] -> f [Timestamp])
-> ListScheduleMatchingTimesResponse
-> f ListScheduleMatchingTimesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListScheduleMatchingTimesResponse -> Vector Timestamp)
-> (ListScheduleMatchingTimesResponse
    -> Vector Timestamp -> ListScheduleMatchingTimesResponse)
-> Lens
     ListScheduleMatchingTimesResponse
     ListScheduleMatchingTimesResponse
     (Vector Timestamp)
     (Vector Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListScheduleMatchingTimesResponse -> Vector Timestamp
_ListScheduleMatchingTimesResponse'startTime
           (\ ListScheduleMatchingTimesResponse
x__ Vector Timestamp
y__
              -> ListScheduleMatchingTimesResponse
x__ {_ListScheduleMatchingTimesResponse'startTime = y__}))
        ((Vector Timestamp -> [Timestamp])
-> (Vector Timestamp -> [Timestamp] -> Vector Timestamp)
-> Lens
     (Vector Timestamp) (Vector Timestamp) [Timestamp] [Timestamp]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Timestamp -> [Timestamp]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Timestamp
_ [Timestamp]
y__ -> [Timestamp] -> Vector Timestamp
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Timestamp]
y__))
instance Data.ProtoLens.Field.HasField ListScheduleMatchingTimesResponse "vec'startTime" (Data.Vector.Vector Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'startTime"
-> (Vector Timestamp -> f (Vector Timestamp))
-> ListScheduleMatchingTimesResponse
-> f ListScheduleMatchingTimesResponse
fieldOf Proxy# "vec'startTime"
_
    = ((Vector Timestamp -> f (Vector Timestamp))
 -> ListScheduleMatchingTimesResponse
 -> f ListScheduleMatchingTimesResponse)
-> ((Vector Timestamp -> f (Vector Timestamp))
    -> Vector Timestamp -> f (Vector Timestamp))
-> (Vector Timestamp -> f (Vector Timestamp))
-> ListScheduleMatchingTimesResponse
-> f ListScheduleMatchingTimesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListScheduleMatchingTimesResponse -> Vector Timestamp)
-> (ListScheduleMatchingTimesResponse
    -> Vector Timestamp -> ListScheduleMatchingTimesResponse)
-> Lens
     ListScheduleMatchingTimesResponse
     ListScheduleMatchingTimesResponse
     (Vector Timestamp)
     (Vector Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListScheduleMatchingTimesResponse -> Vector Timestamp
_ListScheduleMatchingTimesResponse'startTime
           (\ ListScheduleMatchingTimesResponse
x__ Vector Timestamp
y__
              -> ListScheduleMatchingTimesResponse
x__ {_ListScheduleMatchingTimesResponse'startTime = y__}))
        (Vector Timestamp -> f (Vector Timestamp))
-> Vector Timestamp -> f (Vector Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListScheduleMatchingTimesResponse where
  messageName :: Proxy ListScheduleMatchingTimesResponse -> Text
messageName Proxy ListScheduleMatchingTimesResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListScheduleMatchingTimesResponse"
  packedMessageDescriptor :: Proxy ListScheduleMatchingTimesResponse -> ByteString
packedMessageDescriptor Proxy ListScheduleMatchingTimesResponse
_
    = ByteString
"\n\
      \!ListScheduleMatchingTimesResponse\DC29\n\
      \\n\
      \start_time\CAN\SOH \ETX(\v2\SUB.google.protobuf.TimestampR\tstartTime"
  packedFileDescriptor :: Proxy ListScheduleMatchingTimesResponse -> ByteString
packedFileDescriptor Proxy ListScheduleMatchingTimesResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListScheduleMatchingTimesResponse)
fieldsByTag
    = let
        startTime__field_descriptor :: FieldDescriptor ListScheduleMatchingTimesResponse
startTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor ListScheduleMatchingTimesResponse Timestamp
-> FieldDescriptor ListScheduleMatchingTimesResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_time"
              (MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
              (Packing
-> Lens' ListScheduleMatchingTimesResponse [Timestamp]
-> FieldAccessor ListScheduleMatchingTimesResponse Timestamp
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 @"startTime")) ::
              Data.ProtoLens.FieldDescriptor ListScheduleMatchingTimesResponse
      in
        [(Tag, FieldDescriptor ListScheduleMatchingTimesResponse)]
-> Map Tag (FieldDescriptor ListScheduleMatchingTimesResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListScheduleMatchingTimesResponse
startTime__field_descriptor)]
  unknownFields :: Lens' ListScheduleMatchingTimesResponse FieldSet
unknownFields
    = (ListScheduleMatchingTimesResponse -> FieldSet)
-> (ListScheduleMatchingTimesResponse
    -> FieldSet -> ListScheduleMatchingTimesResponse)
-> Lens' ListScheduleMatchingTimesResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListScheduleMatchingTimesResponse -> FieldSet
_ListScheduleMatchingTimesResponse'_unknownFields
        (\ ListScheduleMatchingTimesResponse
x__ FieldSet
y__
           -> ListScheduleMatchingTimesResponse
x__ {_ListScheduleMatchingTimesResponse'_unknownFields = y__})
  defMessage :: ListScheduleMatchingTimesResponse
defMessage
    = ListScheduleMatchingTimesResponse'_constructor
        {_ListScheduleMatchingTimesResponse'startTime :: Vector Timestamp
_ListScheduleMatchingTimesResponse'startTime = Vector Timestamp
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ListScheduleMatchingTimesResponse'_unknownFields :: FieldSet
_ListScheduleMatchingTimesResponse'_unknownFields = []}
  parseMessage :: Parser ListScheduleMatchingTimesResponse
parseMessage
    = let
        loop ::
          ListScheduleMatchingTimesResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Google.Protobuf.Timestamp.Timestamp
             -> Data.ProtoLens.Encoding.Bytes.Parser ListScheduleMatchingTimesResponse
        loop :: ListScheduleMatchingTimesResponse
-> Growing Vector RealWorld Timestamp
-> Parser ListScheduleMatchingTimesResponse
loop ListScheduleMatchingTimesResponse
x Growing Vector RealWorld Timestamp
mutable'startTime
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'startTime <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                            (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                               mutable'startTime)
                      (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'startTime") frozen'startTime x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"start_time"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'startTime y)
                                loop x v
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
                                  mutable'startTime
      in
        Parser ListScheduleMatchingTimesResponse
-> String -> Parser ListScheduleMatchingTimesResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'startTime <- IO (Growing Vector RealWorld Timestamp)
-> Parser (Growing Vector RealWorld Timestamp)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                     IO (Growing Vector RealWorld Timestamp)
IO (Growing Vector (PrimState IO) Timestamp)
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'startTime)
          String
"ListScheduleMatchingTimesResponse"
  buildMessage :: ListScheduleMatchingTimesResponse -> Builder
buildMessage
    = \ ListScheduleMatchingTimesResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((Timestamp -> Builder) -> Vector Timestamp -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ Timestamp
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
                (FoldLike
  (Vector Timestamp)
  ListScheduleMatchingTimesResponse
  ListScheduleMatchingTimesResponse
  (Vector Timestamp)
  (Vector Timestamp)
-> ListScheduleMatchingTimesResponse -> Vector 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 @"vec'startTime") ListScheduleMatchingTimesResponse
_x))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  ListScheduleMatchingTimesResponse
  ListScheduleMatchingTimesResponse
  FieldSet
  FieldSet
-> ListScheduleMatchingTimesResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListScheduleMatchingTimesResponse
  ListScheduleMatchingTimesResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListScheduleMatchingTimesResponse FieldSet
Data.ProtoLens.unknownFields ListScheduleMatchingTimesResponse
_x))
instance Control.DeepSeq.NFData ListScheduleMatchingTimesResponse where
  rnf :: ListScheduleMatchingTimesResponse -> ()
rnf
    = \ ListScheduleMatchingTimesResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListScheduleMatchingTimesResponse -> FieldSet
_ListScheduleMatchingTimesResponse'_unknownFields ListScheduleMatchingTimesResponse
x__)
             (Vector Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListScheduleMatchingTimesResponse -> Vector Timestamp
_ListScheduleMatchingTimesResponse'startTime ListScheduleMatchingTimesResponse
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' ListSchedulesRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maximumPageSize' @:: Lens' ListSchedulesRequest Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ListSchedulesRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.query' @:: Lens' ListSchedulesRequest Data.Text.Text@ -}
data ListSchedulesRequest
  = ListSchedulesRequest'_constructor {ListSchedulesRequest -> Text
_ListSchedulesRequest'namespace :: !Data.Text.Text,
                                       ListSchedulesRequest -> Int32
_ListSchedulesRequest'maximumPageSize :: !Data.Int.Int32,
                                       ListSchedulesRequest -> ByteString
_ListSchedulesRequest'nextPageToken :: !Data.ByteString.ByteString,
                                       ListSchedulesRequest -> Text
_ListSchedulesRequest'query :: !Data.Text.Text,
                                       ListSchedulesRequest -> FieldSet
_ListSchedulesRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListSchedulesRequest -> ListSchedulesRequest -> Bool
(ListSchedulesRequest -> ListSchedulesRequest -> Bool)
-> (ListSchedulesRequest -> ListSchedulesRequest -> Bool)
-> Eq ListSchedulesRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListSchedulesRequest -> ListSchedulesRequest -> Bool
== :: ListSchedulesRequest -> ListSchedulesRequest -> Bool
$c/= :: ListSchedulesRequest -> ListSchedulesRequest -> Bool
/= :: ListSchedulesRequest -> ListSchedulesRequest -> Bool
Prelude.Eq, Eq ListSchedulesRequest
Eq ListSchedulesRequest =>
(ListSchedulesRequest -> ListSchedulesRequest -> Ordering)
-> (ListSchedulesRequest -> ListSchedulesRequest -> Bool)
-> (ListSchedulesRequest -> ListSchedulesRequest -> Bool)
-> (ListSchedulesRequest -> ListSchedulesRequest -> Bool)
-> (ListSchedulesRequest -> ListSchedulesRequest -> Bool)
-> (ListSchedulesRequest
    -> ListSchedulesRequest -> ListSchedulesRequest)
-> (ListSchedulesRequest
    -> ListSchedulesRequest -> ListSchedulesRequest)
-> Ord ListSchedulesRequest
ListSchedulesRequest -> ListSchedulesRequest -> Bool
ListSchedulesRequest -> ListSchedulesRequest -> Ordering
ListSchedulesRequest
-> ListSchedulesRequest -> ListSchedulesRequest
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 :: ListSchedulesRequest -> ListSchedulesRequest -> Ordering
compare :: ListSchedulesRequest -> ListSchedulesRequest -> Ordering
$c< :: ListSchedulesRequest -> ListSchedulesRequest -> Bool
< :: ListSchedulesRequest -> ListSchedulesRequest -> Bool
$c<= :: ListSchedulesRequest -> ListSchedulesRequest -> Bool
<= :: ListSchedulesRequest -> ListSchedulesRequest -> Bool
$c> :: ListSchedulesRequest -> ListSchedulesRequest -> Bool
> :: ListSchedulesRequest -> ListSchedulesRequest -> Bool
$c>= :: ListSchedulesRequest -> ListSchedulesRequest -> Bool
>= :: ListSchedulesRequest -> ListSchedulesRequest -> Bool
$cmax :: ListSchedulesRequest
-> ListSchedulesRequest -> ListSchedulesRequest
max :: ListSchedulesRequest
-> ListSchedulesRequest -> ListSchedulesRequest
$cmin :: ListSchedulesRequest
-> ListSchedulesRequest -> ListSchedulesRequest
min :: ListSchedulesRequest
-> ListSchedulesRequest -> ListSchedulesRequest
Prelude.Ord)
instance Prelude.Show ListSchedulesRequest where
  showsPrec :: Int -> ListSchedulesRequest -> ShowS
showsPrec Int
_ ListSchedulesRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListSchedulesRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListSchedulesRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListSchedulesRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ListSchedulesRequest
-> f ListSchedulesRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ListSchedulesRequest -> f ListSchedulesRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ListSchedulesRequest
-> f ListSchedulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListSchedulesRequest -> Text)
-> (ListSchedulesRequest -> Text -> ListSchedulesRequest)
-> Lens ListSchedulesRequest ListSchedulesRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListSchedulesRequest -> Text
_ListSchedulesRequest'namespace
           (\ ListSchedulesRequest
x__ Text
y__ -> ListSchedulesRequest
x__ {_ListSchedulesRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListSchedulesRequest "maximumPageSize" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maximumPageSize"
-> (Int32 -> f Int32)
-> ListSchedulesRequest
-> f ListSchedulesRequest
fieldOf Proxy# "maximumPageSize"
_
    = ((Int32 -> f Int32)
 -> ListSchedulesRequest -> f ListSchedulesRequest)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ListSchedulesRequest
-> f ListSchedulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListSchedulesRequest -> Int32)
-> (ListSchedulesRequest -> Int32 -> ListSchedulesRequest)
-> Lens ListSchedulesRequest ListSchedulesRequest Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListSchedulesRequest -> Int32
_ListSchedulesRequest'maximumPageSize
           (\ ListSchedulesRequest
x__ Int32
y__ -> ListSchedulesRequest
x__ {_ListSchedulesRequest'maximumPageSize = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListSchedulesRequest "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ListSchedulesRequest
-> f ListSchedulesRequest
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ListSchedulesRequest -> f ListSchedulesRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ListSchedulesRequest
-> f ListSchedulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListSchedulesRequest -> ByteString)
-> (ListSchedulesRequest -> ByteString -> ListSchedulesRequest)
-> Lens
     ListSchedulesRequest ListSchedulesRequest ByteString ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListSchedulesRequest -> ByteString
_ListSchedulesRequest'nextPageToken
           (\ ListSchedulesRequest
x__ ByteString
y__ -> ListSchedulesRequest
x__ {_ListSchedulesRequest'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListSchedulesRequest "query" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "query"
-> (Text -> f Text)
-> ListSchedulesRequest
-> f ListSchedulesRequest
fieldOf Proxy# "query"
_
    = ((Text -> f Text)
 -> ListSchedulesRequest -> f ListSchedulesRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ListSchedulesRequest
-> f ListSchedulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListSchedulesRequest -> Text)
-> (ListSchedulesRequest -> Text -> ListSchedulesRequest)
-> Lens ListSchedulesRequest ListSchedulesRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListSchedulesRequest -> Text
_ListSchedulesRequest'query
           (\ ListSchedulesRequest
x__ Text
y__ -> ListSchedulesRequest
x__ {_ListSchedulesRequest'query = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListSchedulesRequest where
  messageName :: Proxy ListSchedulesRequest -> Text
messageName Proxy ListSchedulesRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListSchedulesRequest"
  packedMessageDescriptor :: Proxy ListSchedulesRequest -> ByteString
packedMessageDescriptor Proxy ListSchedulesRequest
_
    = ByteString
"\n\
      \\DC4ListSchedulesRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2*\n\
      \\DC1maximum_page_size\CAN\STX \SOH(\ENQR\SImaximumPageSize\DC2&\n\
      \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\DC2\DC4\n\
      \\ENQquery\CAN\EOT \SOH(\tR\ENQquery"
  packedFileDescriptor :: Proxy ListSchedulesRequest -> ByteString
packedFileDescriptor Proxy ListSchedulesRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListSchedulesRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor ListSchedulesRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ListSchedulesRequest Text
-> FieldDescriptor ListSchedulesRequest
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 ListSchedulesRequest ListSchedulesRequest Text Text
-> FieldAccessor ListSchedulesRequest 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 ListSchedulesRequest
        maximumPageSize__field_descriptor :: FieldDescriptor ListSchedulesRequest
maximumPageSize__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ListSchedulesRequest Int32
-> FieldDescriptor ListSchedulesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"maximum_page_size"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens ListSchedulesRequest ListSchedulesRequest Int32 Int32
-> FieldAccessor ListSchedulesRequest Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maximumPageSize")) ::
              Data.ProtoLens.FieldDescriptor ListSchedulesRequest
        nextPageToken__field_descriptor :: FieldDescriptor ListSchedulesRequest
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ListSchedulesRequest ByteString
-> FieldDescriptor ListSchedulesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ListSchedulesRequest ListSchedulesRequest ByteString ByteString
-> FieldAccessor ListSchedulesRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ListSchedulesRequest
        query__field_descriptor :: FieldDescriptor ListSchedulesRequest
query__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ListSchedulesRequest Text
-> FieldDescriptor ListSchedulesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"query"
              (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 ListSchedulesRequest ListSchedulesRequest Text Text
-> FieldAccessor ListSchedulesRequest 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 @"query")) ::
              Data.ProtoLens.FieldDescriptor ListSchedulesRequest
      in
        [(Tag, FieldDescriptor ListSchedulesRequest)]
-> Map Tag (FieldDescriptor ListSchedulesRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListSchedulesRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListSchedulesRequest
maximumPageSize__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ListSchedulesRequest
nextPageToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ListSchedulesRequest
query__field_descriptor)]
  unknownFields :: Lens' ListSchedulesRequest FieldSet
unknownFields
    = (ListSchedulesRequest -> FieldSet)
-> (ListSchedulesRequest -> FieldSet -> ListSchedulesRequest)
-> Lens' ListSchedulesRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListSchedulesRequest -> FieldSet
_ListSchedulesRequest'_unknownFields
        (\ ListSchedulesRequest
x__ FieldSet
y__ -> ListSchedulesRequest
x__ {_ListSchedulesRequest'_unknownFields = y__})
  defMessage :: ListSchedulesRequest
defMessage
    = ListSchedulesRequest'_constructor
        {_ListSchedulesRequest'namespace :: Text
_ListSchedulesRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListSchedulesRequest'maximumPageSize :: Int32
_ListSchedulesRequest'maximumPageSize = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListSchedulesRequest'nextPageToken :: ByteString
_ListSchedulesRequest'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListSchedulesRequest'query :: Text
_ListSchedulesRequest'query = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListSchedulesRequest'_unknownFields :: FieldSet
_ListSchedulesRequest'_unknownFields = []}
  parseMessage :: Parser ListSchedulesRequest
parseMessage
    = let
        loop ::
          ListSchedulesRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser ListSchedulesRequest
        loop :: ListSchedulesRequest -> Parser ListSchedulesRequest
loop ListSchedulesRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
16
                          -> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"maximum_page_size"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"maximumPageSize") y x)
                        Word64
26
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"query"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"query") 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 ListSchedulesRequest
-> String -> Parser ListSchedulesRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ListSchedulesRequest -> Parser ListSchedulesRequest
loop ListSchedulesRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ListSchedulesRequest"
  buildMessage :: ListSchedulesRequest -> Builder
buildMessage
    = \ ListSchedulesRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike Text ListSchedulesRequest ListSchedulesRequest Text Text
-> ListSchedulesRequest -> 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") ListSchedulesRequest
_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 :: Int32
_v
                     = FoldLike
  Int32 ListSchedulesRequest ListSchedulesRequest Int32 Int32
-> ListSchedulesRequest -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maximumPageSize") ListSchedulesRequest
_x
                 in
                   if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
16)
                         ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: ByteString
_v
                        = FoldLike
  ByteString
  ListSchedulesRequest
  ListSchedulesRequest
  ByteString
  ByteString
-> ListSchedulesRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ListSchedulesRequest
_x
                    in
                      if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
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
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               ByteString
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Text
_v = FoldLike Text ListSchedulesRequest ListSchedulesRequest Text Text
-> ListSchedulesRequest -> 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 @"query") ListSchedulesRequest
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  ListSchedulesRequest
  ListSchedulesRequest
  FieldSet
  FieldSet
-> ListSchedulesRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListSchedulesRequest
  ListSchedulesRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListSchedulesRequest FieldSet
Data.ProtoLens.unknownFields ListSchedulesRequest
_x)))))
instance Control.DeepSeq.NFData ListSchedulesRequest where
  rnf :: ListSchedulesRequest -> ()
rnf
    = \ ListSchedulesRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListSchedulesRequest -> FieldSet
_ListSchedulesRequest'_unknownFields ListSchedulesRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListSchedulesRequest -> Text
_ListSchedulesRequest'namespace ListSchedulesRequest
x__)
                (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListSchedulesRequest -> Int32
_ListSchedulesRequest'maximumPageSize ListSchedulesRequest
x__)
                   (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ListSchedulesRequest -> ByteString
_ListSchedulesRequest'nextPageToken ListSchedulesRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (ListSchedulesRequest -> Text
_ListSchedulesRequest'query ListSchedulesRequest
x__) ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.schedules' @:: Lens' ListSchedulesResponse [Proto.Temporal.Api.Schedule.V1.Message.ScheduleListEntry]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'schedules' @:: Lens' ListSchedulesResponse (Data.Vector.Vector Proto.Temporal.Api.Schedule.V1.Message.ScheduleListEntry)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ListSchedulesResponse Data.ByteString.ByteString@ -}
data ListSchedulesResponse
  = ListSchedulesResponse'_constructor {ListSchedulesResponse -> Vector ScheduleListEntry
_ListSchedulesResponse'schedules :: !(Data.Vector.Vector Proto.Temporal.Api.Schedule.V1.Message.ScheduleListEntry),
                                        ListSchedulesResponse -> ByteString
_ListSchedulesResponse'nextPageToken :: !Data.ByteString.ByteString,
                                        ListSchedulesResponse -> FieldSet
_ListSchedulesResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListSchedulesResponse -> ListSchedulesResponse -> Bool
(ListSchedulesResponse -> ListSchedulesResponse -> Bool)
-> (ListSchedulesResponse -> ListSchedulesResponse -> Bool)
-> Eq ListSchedulesResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListSchedulesResponse -> ListSchedulesResponse -> Bool
== :: ListSchedulesResponse -> ListSchedulesResponse -> Bool
$c/= :: ListSchedulesResponse -> ListSchedulesResponse -> Bool
/= :: ListSchedulesResponse -> ListSchedulesResponse -> Bool
Prelude.Eq, Eq ListSchedulesResponse
Eq ListSchedulesResponse =>
(ListSchedulesResponse -> ListSchedulesResponse -> Ordering)
-> (ListSchedulesResponse -> ListSchedulesResponse -> Bool)
-> (ListSchedulesResponse -> ListSchedulesResponse -> Bool)
-> (ListSchedulesResponse -> ListSchedulesResponse -> Bool)
-> (ListSchedulesResponse -> ListSchedulesResponse -> Bool)
-> (ListSchedulesResponse
    -> ListSchedulesResponse -> ListSchedulesResponse)
-> (ListSchedulesResponse
    -> ListSchedulesResponse -> ListSchedulesResponse)
-> Ord ListSchedulesResponse
ListSchedulesResponse -> ListSchedulesResponse -> Bool
ListSchedulesResponse -> ListSchedulesResponse -> Ordering
ListSchedulesResponse
-> ListSchedulesResponse -> ListSchedulesResponse
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 :: ListSchedulesResponse -> ListSchedulesResponse -> Ordering
compare :: ListSchedulesResponse -> ListSchedulesResponse -> Ordering
$c< :: ListSchedulesResponse -> ListSchedulesResponse -> Bool
< :: ListSchedulesResponse -> ListSchedulesResponse -> Bool
$c<= :: ListSchedulesResponse -> ListSchedulesResponse -> Bool
<= :: ListSchedulesResponse -> ListSchedulesResponse -> Bool
$c> :: ListSchedulesResponse -> ListSchedulesResponse -> Bool
> :: ListSchedulesResponse -> ListSchedulesResponse -> Bool
$c>= :: ListSchedulesResponse -> ListSchedulesResponse -> Bool
>= :: ListSchedulesResponse -> ListSchedulesResponse -> Bool
$cmax :: ListSchedulesResponse
-> ListSchedulesResponse -> ListSchedulesResponse
max :: ListSchedulesResponse
-> ListSchedulesResponse -> ListSchedulesResponse
$cmin :: ListSchedulesResponse
-> ListSchedulesResponse -> ListSchedulesResponse
min :: ListSchedulesResponse
-> ListSchedulesResponse -> ListSchedulesResponse
Prelude.Ord)
instance Prelude.Show ListSchedulesResponse where
  showsPrec :: Int -> ListSchedulesResponse -> ShowS
showsPrec Int
_ ListSchedulesResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListSchedulesResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListSchedulesResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListSchedulesResponse "schedules" [Proto.Temporal.Api.Schedule.V1.Message.ScheduleListEntry] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "schedules"
-> ([ScheduleListEntry] -> f [ScheduleListEntry])
-> ListSchedulesResponse
-> f ListSchedulesResponse
fieldOf Proxy# "schedules"
_
    = ((Vector ScheduleListEntry -> f (Vector ScheduleListEntry))
 -> ListSchedulesResponse -> f ListSchedulesResponse)
-> (([ScheduleListEntry] -> f [ScheduleListEntry])
    -> Vector ScheduleListEntry -> f (Vector ScheduleListEntry))
-> ([ScheduleListEntry] -> f [ScheduleListEntry])
-> ListSchedulesResponse
-> f ListSchedulesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListSchedulesResponse -> Vector ScheduleListEntry)
-> (ListSchedulesResponse
    -> Vector ScheduleListEntry -> ListSchedulesResponse)
-> Lens
     ListSchedulesResponse
     ListSchedulesResponse
     (Vector ScheduleListEntry)
     (Vector ScheduleListEntry)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListSchedulesResponse -> Vector ScheduleListEntry
_ListSchedulesResponse'schedules
           (\ ListSchedulesResponse
x__ Vector ScheduleListEntry
y__ -> ListSchedulesResponse
x__ {_ListSchedulesResponse'schedules = y__}))
        ((Vector ScheduleListEntry -> [ScheduleListEntry])
-> (Vector ScheduleListEntry
    -> [ScheduleListEntry] -> Vector ScheduleListEntry)
-> Lens
     (Vector ScheduleListEntry)
     (Vector ScheduleListEntry)
     [ScheduleListEntry]
     [ScheduleListEntry]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector ScheduleListEntry -> [ScheduleListEntry]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector ScheduleListEntry
_ [ScheduleListEntry]
y__ -> [ScheduleListEntry] -> Vector ScheduleListEntry
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [ScheduleListEntry]
y__))
instance Data.ProtoLens.Field.HasField ListSchedulesResponse "vec'schedules" (Data.Vector.Vector Proto.Temporal.Api.Schedule.V1.Message.ScheduleListEntry) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'schedules"
-> (Vector ScheduleListEntry -> f (Vector ScheduleListEntry))
-> ListSchedulesResponse
-> f ListSchedulesResponse
fieldOf Proxy# "vec'schedules"
_
    = ((Vector ScheduleListEntry -> f (Vector ScheduleListEntry))
 -> ListSchedulesResponse -> f ListSchedulesResponse)
-> ((Vector ScheduleListEntry -> f (Vector ScheduleListEntry))
    -> Vector ScheduleListEntry -> f (Vector ScheduleListEntry))
-> (Vector ScheduleListEntry -> f (Vector ScheduleListEntry))
-> ListSchedulesResponse
-> f ListSchedulesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListSchedulesResponse -> Vector ScheduleListEntry)
-> (ListSchedulesResponse
    -> Vector ScheduleListEntry -> ListSchedulesResponse)
-> Lens
     ListSchedulesResponse
     ListSchedulesResponse
     (Vector ScheduleListEntry)
     (Vector ScheduleListEntry)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListSchedulesResponse -> Vector ScheduleListEntry
_ListSchedulesResponse'schedules
           (\ ListSchedulesResponse
x__ Vector ScheduleListEntry
y__ -> ListSchedulesResponse
x__ {_ListSchedulesResponse'schedules = y__}))
        (Vector ScheduleListEntry -> f (Vector ScheduleListEntry))
-> Vector ScheduleListEntry -> f (Vector ScheduleListEntry)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListSchedulesResponse "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ListSchedulesResponse
-> f ListSchedulesResponse
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ListSchedulesResponse -> f ListSchedulesResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ListSchedulesResponse
-> f ListSchedulesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListSchedulesResponse -> ByteString)
-> (ListSchedulesResponse -> ByteString -> ListSchedulesResponse)
-> Lens
     ListSchedulesResponse ListSchedulesResponse ByteString ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListSchedulesResponse -> ByteString
_ListSchedulesResponse'nextPageToken
           (\ ListSchedulesResponse
x__ ByteString
y__ -> ListSchedulesResponse
x__ {_ListSchedulesResponse'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListSchedulesResponse where
  messageName :: Proxy ListSchedulesResponse -> Text
messageName Proxy ListSchedulesResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListSchedulesResponse"
  packedMessageDescriptor :: Proxy ListSchedulesResponse -> ByteString
packedMessageDescriptor Proxy ListSchedulesResponse
_
    = ByteString
"\n\
      \\NAKListSchedulesResponse\DC2I\n\
      \\tschedules\CAN\SOH \ETX(\v2+.temporal.api.schedule.v1.ScheduleListEntryR\tschedules\DC2&\n\
      \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken"
  packedFileDescriptor :: Proxy ListSchedulesResponse -> ByteString
packedFileDescriptor Proxy ListSchedulesResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListSchedulesResponse)
fieldsByTag
    = let
        schedules__field_descriptor :: FieldDescriptor ListSchedulesResponse
schedules__field_descriptor
          = String
-> FieldTypeDescriptor ScheduleListEntry
-> FieldAccessor ListSchedulesResponse ScheduleListEntry
-> FieldDescriptor ListSchedulesResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedules"
              (MessageOrGroup -> FieldTypeDescriptor ScheduleListEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Schedule.V1.Message.ScheduleListEntry)
              (Packing
-> Lens' ListSchedulesResponse [ScheduleListEntry]
-> FieldAccessor ListSchedulesResponse ScheduleListEntry
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 @"schedules")) ::
              Data.ProtoLens.FieldDescriptor ListSchedulesResponse
        nextPageToken__field_descriptor :: FieldDescriptor ListSchedulesResponse
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ListSchedulesResponse ByteString
-> FieldDescriptor ListSchedulesResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ListSchedulesResponse ListSchedulesResponse ByteString ByteString
-> FieldAccessor ListSchedulesResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ListSchedulesResponse
      in
        [(Tag, FieldDescriptor ListSchedulesResponse)]
-> Map Tag (FieldDescriptor ListSchedulesResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListSchedulesResponse
schedules__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListSchedulesResponse
nextPageToken__field_descriptor)]
  unknownFields :: Lens' ListSchedulesResponse FieldSet
unknownFields
    = (ListSchedulesResponse -> FieldSet)
-> (ListSchedulesResponse -> FieldSet -> ListSchedulesResponse)
-> Lens' ListSchedulesResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListSchedulesResponse -> FieldSet
_ListSchedulesResponse'_unknownFields
        (\ ListSchedulesResponse
x__ FieldSet
y__ -> ListSchedulesResponse
x__ {_ListSchedulesResponse'_unknownFields = y__})
  defMessage :: ListSchedulesResponse
defMessage
    = ListSchedulesResponse'_constructor
        {_ListSchedulesResponse'schedules :: Vector ScheduleListEntry
_ListSchedulesResponse'schedules = Vector ScheduleListEntry
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ListSchedulesResponse'nextPageToken :: ByteString
_ListSchedulesResponse'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListSchedulesResponse'_unknownFields :: FieldSet
_ListSchedulesResponse'_unknownFields = []}
  parseMessage :: Parser ListSchedulesResponse
parseMessage
    = let
        loop ::
          ListSchedulesResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Schedule.V1.Message.ScheduleListEntry
             -> Data.ProtoLens.Encoding.Bytes.Parser ListSchedulesResponse
        loop :: ListSchedulesResponse
-> Growing Vector RealWorld ScheduleListEntry
-> Parser ListSchedulesResponse
loop ListSchedulesResponse
x Growing Vector RealWorld ScheduleListEntry
mutable'schedules
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'schedules <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                            (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                               mutable'schedules)
                      (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'schedules") frozen'schedules x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser ScheduleListEntry -> String -> Parser ScheduleListEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"schedules"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'schedules y)
                                loop x v
                        Word64
18
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                                  mutable'schedules
                        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'schedules
      in
        Parser ListSchedulesResponse
-> String -> Parser ListSchedulesResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'schedules <- IO (Growing Vector RealWorld ScheduleListEntry)
-> Parser (Growing Vector RealWorld ScheduleListEntry)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                     IO (Growing Vector RealWorld ScheduleListEntry)
IO (Growing Vector (PrimState IO) ScheduleListEntry)
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'schedules)
          String
"ListSchedulesResponse"
  buildMessage :: ListSchedulesResponse -> Builder
buildMessage
    = \ ListSchedulesResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((ScheduleListEntry -> Builder)
-> Vector ScheduleListEntry -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ ScheduleListEntry
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (ScheduleListEntry -> ByteString)
-> ScheduleListEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           ScheduleListEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ScheduleListEntry
_v))
                (FoldLike
  (Vector ScheduleListEntry)
  ListSchedulesResponse
  ListSchedulesResponse
  (Vector ScheduleListEntry)
  (Vector ScheduleListEntry)
-> ListSchedulesResponse -> Vector ScheduleListEntry
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'schedules") ListSchedulesResponse
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: ByteString
_v
                     = FoldLike
  ByteString
  ListSchedulesResponse
  ListSchedulesResponse
  ByteString
  ByteString
-> ListSchedulesResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ListSchedulesResponse
_x
                 in
                   if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
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
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            ByteString
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ListSchedulesResponse
  ListSchedulesResponse
  FieldSet
  FieldSet
-> ListSchedulesResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListSchedulesResponse
  ListSchedulesResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListSchedulesResponse FieldSet
Data.ProtoLens.unknownFields ListSchedulesResponse
_x)))
instance Control.DeepSeq.NFData ListSchedulesResponse where
  rnf :: ListSchedulesResponse -> ()
rnf
    = \ ListSchedulesResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListSchedulesResponse -> FieldSet
_ListSchedulesResponse'_unknownFields ListSchedulesResponse
x__)
             (Vector ScheduleListEntry -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListSchedulesResponse -> Vector ScheduleListEntry
_ListSchedulesResponse'schedules ListSchedulesResponse
x__)
                (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListSchedulesResponse -> ByteString
_ListSchedulesResponse'nextPageToken ListSchedulesResponse
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' ListTaskQueuePartitionsRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueue' @:: Lens' ListTaskQueuePartitionsRequest Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'taskQueue' @:: Lens' ListTaskQueuePartitionsRequest (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)@ -}
data ListTaskQueuePartitionsRequest
  = ListTaskQueuePartitionsRequest'_constructor {ListTaskQueuePartitionsRequest -> Text
_ListTaskQueuePartitionsRequest'namespace :: !Data.Text.Text,
                                                 ListTaskQueuePartitionsRequest -> Maybe TaskQueue
_ListTaskQueuePartitionsRequest'taskQueue :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue),
                                                 ListTaskQueuePartitionsRequest -> FieldSet
_ListTaskQueuePartitionsRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Bool
(ListTaskQueuePartitionsRequest
 -> ListTaskQueuePartitionsRequest -> Bool)
-> (ListTaskQueuePartitionsRequest
    -> ListTaskQueuePartitionsRequest -> Bool)
-> Eq ListTaskQueuePartitionsRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Bool
== :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Bool
$c/= :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Bool
/= :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Bool
Prelude.Eq, Eq ListTaskQueuePartitionsRequest
Eq ListTaskQueuePartitionsRequest =>
(ListTaskQueuePartitionsRequest
 -> ListTaskQueuePartitionsRequest -> Ordering)
-> (ListTaskQueuePartitionsRequest
    -> ListTaskQueuePartitionsRequest -> Bool)
-> (ListTaskQueuePartitionsRequest
    -> ListTaskQueuePartitionsRequest -> Bool)
-> (ListTaskQueuePartitionsRequest
    -> ListTaskQueuePartitionsRequest -> Bool)
-> (ListTaskQueuePartitionsRequest
    -> ListTaskQueuePartitionsRequest -> Bool)
-> (ListTaskQueuePartitionsRequest
    -> ListTaskQueuePartitionsRequest
    -> ListTaskQueuePartitionsRequest)
-> (ListTaskQueuePartitionsRequest
    -> ListTaskQueuePartitionsRequest
    -> ListTaskQueuePartitionsRequest)
-> Ord ListTaskQueuePartitionsRequest
ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Bool
ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Ordering
ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> ListTaskQueuePartitionsRequest
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 :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Ordering
compare :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Ordering
$c< :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Bool
< :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Bool
$c<= :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Bool
<= :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Bool
$c> :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Bool
> :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Bool
$c>= :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Bool
>= :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> Bool
$cmax :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> ListTaskQueuePartitionsRequest
max :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> ListTaskQueuePartitionsRequest
$cmin :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> ListTaskQueuePartitionsRequest
min :: ListTaskQueuePartitionsRequest
-> ListTaskQueuePartitionsRequest -> ListTaskQueuePartitionsRequest
Prelude.Ord)
instance Prelude.Show ListTaskQueuePartitionsRequest where
  showsPrec :: Int -> ListTaskQueuePartitionsRequest -> ShowS
showsPrec Int
_ ListTaskQueuePartitionsRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListTaskQueuePartitionsRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListTaskQueuePartitionsRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListTaskQueuePartitionsRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ListTaskQueuePartitionsRequest
-> f ListTaskQueuePartitionsRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ListTaskQueuePartitionsRequest
 -> f ListTaskQueuePartitionsRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ListTaskQueuePartitionsRequest
-> f ListTaskQueuePartitionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListTaskQueuePartitionsRequest -> Text)
-> (ListTaskQueuePartitionsRequest
    -> Text -> ListTaskQueuePartitionsRequest)
-> Lens
     ListTaskQueuePartitionsRequest
     ListTaskQueuePartitionsRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListTaskQueuePartitionsRequest -> Text
_ListTaskQueuePartitionsRequest'namespace
           (\ ListTaskQueuePartitionsRequest
x__ Text
y__
              -> ListTaskQueuePartitionsRequest
x__ {_ListTaskQueuePartitionsRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListTaskQueuePartitionsRequest "taskQueue" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (TaskQueue -> f TaskQueue)
-> ListTaskQueuePartitionsRequest
-> f ListTaskQueuePartitionsRequest
fieldOf Proxy# "taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> ListTaskQueuePartitionsRequest
 -> f ListTaskQueuePartitionsRequest)
-> ((TaskQueue -> f TaskQueue)
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (TaskQueue -> f TaskQueue)
-> ListTaskQueuePartitionsRequest
-> f ListTaskQueuePartitionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListTaskQueuePartitionsRequest -> Maybe TaskQueue)
-> (ListTaskQueuePartitionsRequest
    -> Maybe TaskQueue -> ListTaskQueuePartitionsRequest)
-> Lens
     ListTaskQueuePartitionsRequest
     ListTaskQueuePartitionsRequest
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListTaskQueuePartitionsRequest -> Maybe TaskQueue
_ListTaskQueuePartitionsRequest'taskQueue
           (\ ListTaskQueuePartitionsRequest
x__ Maybe TaskQueue
y__
              -> ListTaskQueuePartitionsRequest
x__ {_ListTaskQueuePartitionsRequest'taskQueue = y__}))
        (TaskQueue -> Lens' (Maybe TaskQueue) TaskQueue
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TaskQueue
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ListTaskQueuePartitionsRequest "maybe'taskQueue" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'taskQueue"
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> ListTaskQueuePartitionsRequest
-> f ListTaskQueuePartitionsRequest
fieldOf Proxy# "maybe'taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> ListTaskQueuePartitionsRequest
 -> f ListTaskQueuePartitionsRequest)
-> ((Maybe TaskQueue -> f (Maybe TaskQueue))
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> ListTaskQueuePartitionsRequest
-> f ListTaskQueuePartitionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListTaskQueuePartitionsRequest -> Maybe TaskQueue)
-> (ListTaskQueuePartitionsRequest
    -> Maybe TaskQueue -> ListTaskQueuePartitionsRequest)
-> Lens
     ListTaskQueuePartitionsRequest
     ListTaskQueuePartitionsRequest
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListTaskQueuePartitionsRequest -> Maybe TaskQueue
_ListTaskQueuePartitionsRequest'taskQueue
           (\ ListTaskQueuePartitionsRequest
x__ Maybe TaskQueue
y__
              -> ListTaskQueuePartitionsRequest
x__ {_ListTaskQueuePartitionsRequest'taskQueue = y__}))
        (Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListTaskQueuePartitionsRequest where
  messageName :: Proxy ListTaskQueuePartitionsRequest -> Text
messageName Proxy ListTaskQueuePartitionsRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListTaskQueuePartitionsRequest"
  packedMessageDescriptor :: Proxy ListTaskQueuePartitionsRequest -> ByteString
packedMessageDescriptor Proxy ListTaskQueuePartitionsRequest
_
    = ByteString
"\n\
      \\RSListTaskQueuePartitionsRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2C\n\
      \\n\
      \task_queue\CAN\STX \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue"
  packedFileDescriptor :: Proxy ListTaskQueuePartitionsRequest -> ByteString
packedFileDescriptor Proxy ListTaskQueuePartitionsRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListTaskQueuePartitionsRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor ListTaskQueuePartitionsRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ListTaskQueuePartitionsRequest Text
-> FieldDescriptor ListTaskQueuePartitionsRequest
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
     ListTaskQueuePartitionsRequest
     ListTaskQueuePartitionsRequest
     Text
     Text
-> FieldAccessor ListTaskQueuePartitionsRequest 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 ListTaskQueuePartitionsRequest
        taskQueue__field_descriptor :: FieldDescriptor ListTaskQueuePartitionsRequest
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueue
-> FieldAccessor ListTaskQueuePartitionsRequest TaskQueue
-> FieldDescriptor ListTaskQueuePartitionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_queue"
              (MessageOrGroup -> FieldTypeDescriptor TaskQueue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)
              (Lens
  ListTaskQueuePartitionsRequest
  ListTaskQueuePartitionsRequest
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> FieldAccessor ListTaskQueuePartitionsRequest TaskQueue
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue")) ::
              Data.ProtoLens.FieldDescriptor ListTaskQueuePartitionsRequest
      in
        [(Tag, FieldDescriptor ListTaskQueuePartitionsRequest)]
-> Map Tag (FieldDescriptor ListTaskQueuePartitionsRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListTaskQueuePartitionsRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListTaskQueuePartitionsRequest
taskQueue__field_descriptor)]
  unknownFields :: Lens' ListTaskQueuePartitionsRequest FieldSet
unknownFields
    = (ListTaskQueuePartitionsRequest -> FieldSet)
-> (ListTaskQueuePartitionsRequest
    -> FieldSet -> ListTaskQueuePartitionsRequest)
-> Lens' ListTaskQueuePartitionsRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListTaskQueuePartitionsRequest -> FieldSet
_ListTaskQueuePartitionsRequest'_unknownFields
        (\ ListTaskQueuePartitionsRequest
x__ FieldSet
y__
           -> ListTaskQueuePartitionsRequest
x__ {_ListTaskQueuePartitionsRequest'_unknownFields = y__})
  defMessage :: ListTaskQueuePartitionsRequest
defMessage
    = ListTaskQueuePartitionsRequest'_constructor
        {_ListTaskQueuePartitionsRequest'namespace :: Text
_ListTaskQueuePartitionsRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListTaskQueuePartitionsRequest'taskQueue :: Maybe TaskQueue
_ListTaskQueuePartitionsRequest'taskQueue = Maybe TaskQueue
forall a. Maybe a
Prelude.Nothing,
         _ListTaskQueuePartitionsRequest'_unknownFields :: FieldSet
_ListTaskQueuePartitionsRequest'_unknownFields = []}
  parseMessage :: Parser ListTaskQueuePartitionsRequest
parseMessage
    = let
        loop ::
          ListTaskQueuePartitionsRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser ListTaskQueuePartitionsRequest
        loop :: ListTaskQueuePartitionsRequest
-> Parser ListTaskQueuePartitionsRequest
loop ListTaskQueuePartitionsRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser TaskQueue -> String -> Parser TaskQueue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"task_queue"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskQueue") y x)
                        Word64
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 ListTaskQueuePartitionsRequest
-> String -> Parser ListTaskQueuePartitionsRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ListTaskQueuePartitionsRequest
-> Parser ListTaskQueuePartitionsRequest
loop ListTaskQueuePartitionsRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ListTaskQueuePartitionsRequest"
  buildMessage :: ListTaskQueuePartitionsRequest -> Builder
buildMessage
    = \ ListTaskQueuePartitionsRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ListTaskQueuePartitionsRequest
  ListTaskQueuePartitionsRequest
  Text
  Text
-> ListTaskQueuePartitionsRequest -> 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") ListTaskQueuePartitionsRequest
_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 TaskQueue)
  ListTaskQueuePartitionsRequest
  ListTaskQueuePartitionsRequest
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> ListTaskQueuePartitionsRequest -> Maybe TaskQueue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue") ListTaskQueuePartitionsRequest
_x
                 of
                   Maybe TaskQueue
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just TaskQueue
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (TaskQueue -> ByteString) -> TaskQueue -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             TaskQueue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueue
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ListTaskQueuePartitionsRequest
  ListTaskQueuePartitionsRequest
  FieldSet
  FieldSet
-> ListTaskQueuePartitionsRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListTaskQueuePartitionsRequest
  ListTaskQueuePartitionsRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListTaskQueuePartitionsRequest FieldSet
Data.ProtoLens.unknownFields ListTaskQueuePartitionsRequest
_x)))
instance Control.DeepSeq.NFData ListTaskQueuePartitionsRequest where
  rnf :: ListTaskQueuePartitionsRequest -> ()
rnf
    = \ ListTaskQueuePartitionsRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListTaskQueuePartitionsRequest -> FieldSet
_ListTaskQueuePartitionsRequest'_unknownFields ListTaskQueuePartitionsRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListTaskQueuePartitionsRequest -> Text
_ListTaskQueuePartitionsRequest'namespace ListTaskQueuePartitionsRequest
x__)
                (Maybe TaskQueue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListTaskQueuePartitionsRequest -> Maybe TaskQueue
_ListTaskQueuePartitionsRequest'taskQueue ListTaskQueuePartitionsRequest
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.activityTaskQueuePartitions' @:: Lens' ListTaskQueuePartitionsResponse [Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueuePartitionMetadata]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'activityTaskQueuePartitions' @:: Lens' ListTaskQueuePartitionsResponse (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueuePartitionMetadata)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowTaskQueuePartitions' @:: Lens' ListTaskQueuePartitionsResponse [Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueuePartitionMetadata]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'workflowTaskQueuePartitions' @:: Lens' ListTaskQueuePartitionsResponse (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueuePartitionMetadata)@ -}
data ListTaskQueuePartitionsResponse
  = ListTaskQueuePartitionsResponse'_constructor {ListTaskQueuePartitionsResponse
-> Vector TaskQueuePartitionMetadata
_ListTaskQueuePartitionsResponse'activityTaskQueuePartitions :: !(Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueuePartitionMetadata),
                                                  ListTaskQueuePartitionsResponse
-> Vector TaskQueuePartitionMetadata
_ListTaskQueuePartitionsResponse'workflowTaskQueuePartitions :: !(Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueuePartitionMetadata),
                                                  ListTaskQueuePartitionsResponse -> FieldSet
_ListTaskQueuePartitionsResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Bool
(ListTaskQueuePartitionsResponse
 -> ListTaskQueuePartitionsResponse -> Bool)
-> (ListTaskQueuePartitionsResponse
    -> ListTaskQueuePartitionsResponse -> Bool)
-> Eq ListTaskQueuePartitionsResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Bool
== :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Bool
$c/= :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Bool
/= :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Bool
Prelude.Eq, Eq ListTaskQueuePartitionsResponse
Eq ListTaskQueuePartitionsResponse =>
(ListTaskQueuePartitionsResponse
 -> ListTaskQueuePartitionsResponse -> Ordering)
-> (ListTaskQueuePartitionsResponse
    -> ListTaskQueuePartitionsResponse -> Bool)
-> (ListTaskQueuePartitionsResponse
    -> ListTaskQueuePartitionsResponse -> Bool)
-> (ListTaskQueuePartitionsResponse
    -> ListTaskQueuePartitionsResponse -> Bool)
-> (ListTaskQueuePartitionsResponse
    -> ListTaskQueuePartitionsResponse -> Bool)
-> (ListTaskQueuePartitionsResponse
    -> ListTaskQueuePartitionsResponse
    -> ListTaskQueuePartitionsResponse)
-> (ListTaskQueuePartitionsResponse
    -> ListTaskQueuePartitionsResponse
    -> ListTaskQueuePartitionsResponse)
-> Ord ListTaskQueuePartitionsResponse
ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Bool
ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Ordering
ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse
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 :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Ordering
compare :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Ordering
$c< :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Bool
< :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Bool
$c<= :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Bool
<= :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Bool
$c> :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Bool
> :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Bool
$c>= :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Bool
>= :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse -> Bool
$cmax :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse
max :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse
$cmin :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse
min :: ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse
-> ListTaskQueuePartitionsResponse
Prelude.Ord)
instance Prelude.Show ListTaskQueuePartitionsResponse where
  showsPrec :: Int -> ListTaskQueuePartitionsResponse -> ShowS
showsPrec Int
_ ListTaskQueuePartitionsResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListTaskQueuePartitionsResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListTaskQueuePartitionsResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListTaskQueuePartitionsResponse "activityTaskQueuePartitions" [Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueuePartitionMetadata] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityTaskQueuePartitions"
-> ([TaskQueuePartitionMetadata] -> f [TaskQueuePartitionMetadata])
-> ListTaskQueuePartitionsResponse
-> f ListTaskQueuePartitionsResponse
fieldOf Proxy# "activityTaskQueuePartitions"
_
    = ((Vector TaskQueuePartitionMetadata
  -> f (Vector TaskQueuePartitionMetadata))
 -> ListTaskQueuePartitionsResponse
 -> f ListTaskQueuePartitionsResponse)
-> (([TaskQueuePartitionMetadata]
     -> f [TaskQueuePartitionMetadata])
    -> Vector TaskQueuePartitionMetadata
    -> f (Vector TaskQueuePartitionMetadata))
-> ([TaskQueuePartitionMetadata] -> f [TaskQueuePartitionMetadata])
-> ListTaskQueuePartitionsResponse
-> f ListTaskQueuePartitionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListTaskQueuePartitionsResponse
 -> Vector TaskQueuePartitionMetadata)
-> (ListTaskQueuePartitionsResponse
    -> Vector TaskQueuePartitionMetadata
    -> ListTaskQueuePartitionsResponse)
-> Lens
     ListTaskQueuePartitionsResponse
     ListTaskQueuePartitionsResponse
     (Vector TaskQueuePartitionMetadata)
     (Vector TaskQueuePartitionMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListTaskQueuePartitionsResponse
-> Vector TaskQueuePartitionMetadata
_ListTaskQueuePartitionsResponse'activityTaskQueuePartitions
           (\ ListTaskQueuePartitionsResponse
x__ Vector TaskQueuePartitionMetadata
y__
              -> ListTaskQueuePartitionsResponse
x__
                   {_ListTaskQueuePartitionsResponse'activityTaskQueuePartitions = y__}))
        ((Vector TaskQueuePartitionMetadata -> [TaskQueuePartitionMetadata])
-> (Vector TaskQueuePartitionMetadata
    -> [TaskQueuePartitionMetadata]
    -> Vector TaskQueuePartitionMetadata)
-> Lens
     (Vector TaskQueuePartitionMetadata)
     (Vector TaskQueuePartitionMetadata)
     [TaskQueuePartitionMetadata]
     [TaskQueuePartitionMetadata]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector TaskQueuePartitionMetadata -> [TaskQueuePartitionMetadata]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector TaskQueuePartitionMetadata
_ [TaskQueuePartitionMetadata]
y__ -> [TaskQueuePartitionMetadata] -> Vector TaskQueuePartitionMetadata
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [TaskQueuePartitionMetadata]
y__))
instance Data.ProtoLens.Field.HasField ListTaskQueuePartitionsResponse "vec'activityTaskQueuePartitions" (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueuePartitionMetadata) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'activityTaskQueuePartitions"
-> (Vector TaskQueuePartitionMetadata
    -> f (Vector TaskQueuePartitionMetadata))
-> ListTaskQueuePartitionsResponse
-> f ListTaskQueuePartitionsResponse
fieldOf Proxy# "vec'activityTaskQueuePartitions"
_
    = ((Vector TaskQueuePartitionMetadata
  -> f (Vector TaskQueuePartitionMetadata))
 -> ListTaskQueuePartitionsResponse
 -> f ListTaskQueuePartitionsResponse)
-> ((Vector TaskQueuePartitionMetadata
     -> f (Vector TaskQueuePartitionMetadata))
    -> Vector TaskQueuePartitionMetadata
    -> f (Vector TaskQueuePartitionMetadata))
-> (Vector TaskQueuePartitionMetadata
    -> f (Vector TaskQueuePartitionMetadata))
-> ListTaskQueuePartitionsResponse
-> f ListTaskQueuePartitionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListTaskQueuePartitionsResponse
 -> Vector TaskQueuePartitionMetadata)
-> (ListTaskQueuePartitionsResponse
    -> Vector TaskQueuePartitionMetadata
    -> ListTaskQueuePartitionsResponse)
-> Lens
     ListTaskQueuePartitionsResponse
     ListTaskQueuePartitionsResponse
     (Vector TaskQueuePartitionMetadata)
     (Vector TaskQueuePartitionMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListTaskQueuePartitionsResponse
-> Vector TaskQueuePartitionMetadata
_ListTaskQueuePartitionsResponse'activityTaskQueuePartitions
           (\ ListTaskQueuePartitionsResponse
x__ Vector TaskQueuePartitionMetadata
y__
              -> ListTaskQueuePartitionsResponse
x__
                   {_ListTaskQueuePartitionsResponse'activityTaskQueuePartitions = y__}))
        (Vector TaskQueuePartitionMetadata
 -> f (Vector TaskQueuePartitionMetadata))
-> Vector TaskQueuePartitionMetadata
-> f (Vector TaskQueuePartitionMetadata)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListTaskQueuePartitionsResponse "workflowTaskQueuePartitions" [Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueuePartitionMetadata] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskQueuePartitions"
-> ([TaskQueuePartitionMetadata] -> f [TaskQueuePartitionMetadata])
-> ListTaskQueuePartitionsResponse
-> f ListTaskQueuePartitionsResponse
fieldOf Proxy# "workflowTaskQueuePartitions"
_
    = ((Vector TaskQueuePartitionMetadata
  -> f (Vector TaskQueuePartitionMetadata))
 -> ListTaskQueuePartitionsResponse
 -> f ListTaskQueuePartitionsResponse)
-> (([TaskQueuePartitionMetadata]
     -> f [TaskQueuePartitionMetadata])
    -> Vector TaskQueuePartitionMetadata
    -> f (Vector TaskQueuePartitionMetadata))
-> ([TaskQueuePartitionMetadata] -> f [TaskQueuePartitionMetadata])
-> ListTaskQueuePartitionsResponse
-> f ListTaskQueuePartitionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListTaskQueuePartitionsResponse
 -> Vector TaskQueuePartitionMetadata)
-> (ListTaskQueuePartitionsResponse
    -> Vector TaskQueuePartitionMetadata
    -> ListTaskQueuePartitionsResponse)
-> Lens
     ListTaskQueuePartitionsResponse
     ListTaskQueuePartitionsResponse
     (Vector TaskQueuePartitionMetadata)
     (Vector TaskQueuePartitionMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListTaskQueuePartitionsResponse
-> Vector TaskQueuePartitionMetadata
_ListTaskQueuePartitionsResponse'workflowTaskQueuePartitions
           (\ ListTaskQueuePartitionsResponse
x__ Vector TaskQueuePartitionMetadata
y__
              -> ListTaskQueuePartitionsResponse
x__
                   {_ListTaskQueuePartitionsResponse'workflowTaskQueuePartitions = y__}))
        ((Vector TaskQueuePartitionMetadata -> [TaskQueuePartitionMetadata])
-> (Vector TaskQueuePartitionMetadata
    -> [TaskQueuePartitionMetadata]
    -> Vector TaskQueuePartitionMetadata)
-> Lens
     (Vector TaskQueuePartitionMetadata)
     (Vector TaskQueuePartitionMetadata)
     [TaskQueuePartitionMetadata]
     [TaskQueuePartitionMetadata]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector TaskQueuePartitionMetadata -> [TaskQueuePartitionMetadata]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector TaskQueuePartitionMetadata
_ [TaskQueuePartitionMetadata]
y__ -> [TaskQueuePartitionMetadata] -> Vector TaskQueuePartitionMetadata
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [TaskQueuePartitionMetadata]
y__))
instance Data.ProtoLens.Field.HasField ListTaskQueuePartitionsResponse "vec'workflowTaskQueuePartitions" (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueuePartitionMetadata) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'workflowTaskQueuePartitions"
-> (Vector TaskQueuePartitionMetadata
    -> f (Vector TaskQueuePartitionMetadata))
-> ListTaskQueuePartitionsResponse
-> f ListTaskQueuePartitionsResponse
fieldOf Proxy# "vec'workflowTaskQueuePartitions"
_
    = ((Vector TaskQueuePartitionMetadata
  -> f (Vector TaskQueuePartitionMetadata))
 -> ListTaskQueuePartitionsResponse
 -> f ListTaskQueuePartitionsResponse)
-> ((Vector TaskQueuePartitionMetadata
     -> f (Vector TaskQueuePartitionMetadata))
    -> Vector TaskQueuePartitionMetadata
    -> f (Vector TaskQueuePartitionMetadata))
-> (Vector TaskQueuePartitionMetadata
    -> f (Vector TaskQueuePartitionMetadata))
-> ListTaskQueuePartitionsResponse
-> f ListTaskQueuePartitionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListTaskQueuePartitionsResponse
 -> Vector TaskQueuePartitionMetadata)
-> (ListTaskQueuePartitionsResponse
    -> Vector TaskQueuePartitionMetadata
    -> ListTaskQueuePartitionsResponse)
-> Lens
     ListTaskQueuePartitionsResponse
     ListTaskQueuePartitionsResponse
     (Vector TaskQueuePartitionMetadata)
     (Vector TaskQueuePartitionMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListTaskQueuePartitionsResponse
-> Vector TaskQueuePartitionMetadata
_ListTaskQueuePartitionsResponse'workflowTaskQueuePartitions
           (\ ListTaskQueuePartitionsResponse
x__ Vector TaskQueuePartitionMetadata
y__
              -> ListTaskQueuePartitionsResponse
x__
                   {_ListTaskQueuePartitionsResponse'workflowTaskQueuePartitions = y__}))
        (Vector TaskQueuePartitionMetadata
 -> f (Vector TaskQueuePartitionMetadata))
-> Vector TaskQueuePartitionMetadata
-> f (Vector TaskQueuePartitionMetadata)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListTaskQueuePartitionsResponse where
  messageName :: Proxy ListTaskQueuePartitionsResponse -> Text
messageName Proxy ListTaskQueuePartitionsResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListTaskQueuePartitionsResponse"
  packedMessageDescriptor :: Proxy ListTaskQueuePartitionsResponse -> ByteString
packedMessageDescriptor Proxy ListTaskQueuePartitionsResponse
_
    = ByteString
"\n\
      \\USListTaskQueuePartitionsResponse\DC2z\n\
      \\RSactivity_task_queue_partitions\CAN\SOH \ETX(\v25.temporal.api.taskqueue.v1.TaskQueuePartitionMetadataR\ESCactivityTaskQueuePartitions\DC2z\n\
      \\RSworkflow_task_queue_partitions\CAN\STX \ETX(\v25.temporal.api.taskqueue.v1.TaskQueuePartitionMetadataR\ESCworkflowTaskQueuePartitions"
  packedFileDescriptor :: Proxy ListTaskQueuePartitionsResponse -> ByteString
packedFileDescriptor Proxy ListTaskQueuePartitionsResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListTaskQueuePartitionsResponse)
fieldsByTag
    = let
        activityTaskQueuePartitions__field_descriptor :: FieldDescriptor ListTaskQueuePartitionsResponse
activityTaskQueuePartitions__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueuePartitionMetadata
-> FieldAccessor
     ListTaskQueuePartitionsResponse TaskQueuePartitionMetadata
-> FieldDescriptor ListTaskQueuePartitionsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_task_queue_partitions"
              (MessageOrGroup -> FieldTypeDescriptor TaskQueuePartitionMetadata
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueuePartitionMetadata)
              (Packing
-> Lens'
     ListTaskQueuePartitionsResponse [TaskQueuePartitionMetadata]
-> FieldAccessor
     ListTaskQueuePartitionsResponse TaskQueuePartitionMetadata
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 @"activityTaskQueuePartitions")) ::
              Data.ProtoLens.FieldDescriptor ListTaskQueuePartitionsResponse
        workflowTaskQueuePartitions__field_descriptor :: FieldDescriptor ListTaskQueuePartitionsResponse
workflowTaskQueuePartitions__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueuePartitionMetadata
-> FieldAccessor
     ListTaskQueuePartitionsResponse TaskQueuePartitionMetadata
-> FieldDescriptor ListTaskQueuePartitionsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_queue_partitions"
              (MessageOrGroup -> FieldTypeDescriptor TaskQueuePartitionMetadata
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueuePartitionMetadata)
              (Packing
-> Lens'
     ListTaskQueuePartitionsResponse [TaskQueuePartitionMetadata]
-> FieldAccessor
     ListTaskQueuePartitionsResponse TaskQueuePartitionMetadata
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 @"workflowTaskQueuePartitions")) ::
              Data.ProtoLens.FieldDescriptor ListTaskQueuePartitionsResponse
      in
        [(Tag, FieldDescriptor ListTaskQueuePartitionsResponse)]
-> Map Tag (FieldDescriptor ListTaskQueuePartitionsResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, 
            FieldDescriptor ListTaskQueuePartitionsResponse
activityTaskQueuePartitions__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, 
            FieldDescriptor ListTaskQueuePartitionsResponse
workflowTaskQueuePartitions__field_descriptor)]
  unknownFields :: Lens' ListTaskQueuePartitionsResponse FieldSet
unknownFields
    = (ListTaskQueuePartitionsResponse -> FieldSet)
-> (ListTaskQueuePartitionsResponse
    -> FieldSet -> ListTaskQueuePartitionsResponse)
-> Lens' ListTaskQueuePartitionsResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListTaskQueuePartitionsResponse -> FieldSet
_ListTaskQueuePartitionsResponse'_unknownFields
        (\ ListTaskQueuePartitionsResponse
x__ FieldSet
y__
           -> ListTaskQueuePartitionsResponse
x__ {_ListTaskQueuePartitionsResponse'_unknownFields = y__})
  defMessage :: ListTaskQueuePartitionsResponse
defMessage
    = ListTaskQueuePartitionsResponse'_constructor
        {_ListTaskQueuePartitionsResponse'activityTaskQueuePartitions :: Vector TaskQueuePartitionMetadata
_ListTaskQueuePartitionsResponse'activityTaskQueuePartitions = Vector TaskQueuePartitionMetadata
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ListTaskQueuePartitionsResponse'workflowTaskQueuePartitions :: Vector TaskQueuePartitionMetadata
_ListTaskQueuePartitionsResponse'workflowTaskQueuePartitions = Vector TaskQueuePartitionMetadata
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ListTaskQueuePartitionsResponse'_unknownFields :: FieldSet
_ListTaskQueuePartitionsResponse'_unknownFields = []}
  parseMessage :: Parser ListTaskQueuePartitionsResponse
parseMessage
    = let
        loop ::
          ListTaskQueuePartitionsResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueuePartitionMetadata
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueuePartitionMetadata
                -> Data.ProtoLens.Encoding.Bytes.Parser ListTaskQueuePartitionsResponse
        loop :: ListTaskQueuePartitionsResponse
-> Growing Vector RealWorld TaskQueuePartitionMetadata
-> Growing Vector RealWorld TaskQueuePartitionMetadata
-> Parser ListTaskQueuePartitionsResponse
loop
          ListTaskQueuePartitionsResponse
x
          Growing Vector RealWorld TaskQueuePartitionMetadata
mutable'activityTaskQueuePartitions
          Growing Vector RealWorld TaskQueuePartitionMetadata
mutable'workflowTaskQueuePartitions
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'activityTaskQueuePartitions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                              (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                                 mutable'activityTaskQueuePartitions)
                      frozen'workflowTaskQueuePartitions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                              (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                                 mutable'workflowTaskQueuePartitions)
                      (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'activityTaskQueuePartitions")
                              frozen'activityTaskQueuePartitions
                              (Lens.Family2.set
                                 (Data.ProtoLens.Field.field @"vec'workflowTaskQueuePartitions")
                                 frozen'workflowTaskQueuePartitions x)))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser TaskQueuePartitionMetadata
-> String -> Parser TaskQueuePartitionMetadata
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"activity_task_queue_partitions"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'activityTaskQueuePartitions y)
                                loop x v mutable'workflowTaskQueuePartitions
                        Word64
18
                          -> do !y <- Parser TaskQueuePartitionMetadata
-> String -> Parser TaskQueuePartitionMetadata
forall a. Parser a -> String -> Parser a
(Data.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_queue_partitions"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'workflowTaskQueuePartitions y)
                                loop x mutable'activityTaskQueuePartitions v
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
                                  mutable'activityTaskQueuePartitions
                                  mutable'workflowTaskQueuePartitions
      in
        Parser ListTaskQueuePartitionsResponse
-> String -> Parser ListTaskQueuePartitionsResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'activityTaskQueuePartitions <- IO (Growing Vector RealWorld TaskQueuePartitionMetadata)
-> Parser (Growing Vector RealWorld TaskQueuePartitionMetadata)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                       IO (Growing Vector RealWorld TaskQueuePartitionMetadata)
IO (Growing Vector (PrimState IO) TaskQueuePartitionMetadata)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              mutable'workflowTaskQueuePartitions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                       Data.ProtoLens.Encoding.Growing.new
              loop
                Data.ProtoLens.defMessage mutable'activityTaskQueuePartitions
                mutable'workflowTaskQueuePartitions)
          String
"ListTaskQueuePartitionsResponse"
  buildMessage :: ListTaskQueuePartitionsResponse -> Builder
buildMessage
    = \ ListTaskQueuePartitionsResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((TaskQueuePartitionMetadata -> Builder)
-> Vector TaskQueuePartitionMetadata -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ TaskQueuePartitionMetadata
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (TaskQueuePartitionMetadata -> ByteString)
-> TaskQueuePartitionMetadata
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           TaskQueuePartitionMetadata -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueuePartitionMetadata
_v))
                (FoldLike
  (Vector TaskQueuePartitionMetadata)
  ListTaskQueuePartitionsResponse
  ListTaskQueuePartitionsResponse
  (Vector TaskQueuePartitionMetadata)
  (Vector TaskQueuePartitionMetadata)
-> ListTaskQueuePartitionsResponse
-> Vector TaskQueuePartitionMetadata
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'activityTaskQueuePartitions")
                   ListTaskQueuePartitionsResponse
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                ((TaskQueuePartitionMetadata -> Builder)
-> Vector TaskQueuePartitionMetadata -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                   (\ TaskQueuePartitionMetadata
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                           ((ByteString -> Builder)
-> (TaskQueuePartitionMetadata -> ByteString)
-> TaskQueuePartitionMetadata
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ ByteString
bs
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                              TaskQueuePartitionMetadata -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueuePartitionMetadata
_v))
                   (FoldLike
  (Vector TaskQueuePartitionMetadata)
  ListTaskQueuePartitionsResponse
  ListTaskQueuePartitionsResponse
  (Vector TaskQueuePartitionMetadata)
  (Vector TaskQueuePartitionMetadata)
-> ListTaskQueuePartitionsResponse
-> Vector TaskQueuePartitionMetadata
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'workflowTaskQueuePartitions")
                      ListTaskQueuePartitionsResponse
_x))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ListTaskQueuePartitionsResponse
  ListTaskQueuePartitionsResponse
  FieldSet
  FieldSet
-> ListTaskQueuePartitionsResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListTaskQueuePartitionsResponse
  ListTaskQueuePartitionsResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListTaskQueuePartitionsResponse FieldSet
Data.ProtoLens.unknownFields ListTaskQueuePartitionsResponse
_x)))
instance Control.DeepSeq.NFData ListTaskQueuePartitionsResponse where
  rnf :: ListTaskQueuePartitionsResponse -> ()
rnf
    = \ ListTaskQueuePartitionsResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListTaskQueuePartitionsResponse -> FieldSet
_ListTaskQueuePartitionsResponse'_unknownFields ListTaskQueuePartitionsResponse
x__)
             (Vector TaskQueuePartitionMetadata -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListTaskQueuePartitionsResponse
-> Vector TaskQueuePartitionMetadata
_ListTaskQueuePartitionsResponse'activityTaskQueuePartitions ListTaskQueuePartitionsResponse
x__)
                (Vector TaskQueuePartitionMetadata -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListTaskQueuePartitionsResponse
-> Vector TaskQueuePartitionMetadata
_ListTaskQueuePartitionsResponse'workflowTaskQueuePartitions ListTaskQueuePartitionsResponse
x__)
                   ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' ListWorkflowExecutionsRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.pageSize' @:: Lens' ListWorkflowExecutionsRequest Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ListWorkflowExecutionsRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.query' @:: Lens' ListWorkflowExecutionsRequest Data.Text.Text@ -}
data ListWorkflowExecutionsRequest
  = ListWorkflowExecutionsRequest'_constructor {ListWorkflowExecutionsRequest -> Text
_ListWorkflowExecutionsRequest'namespace :: !Data.Text.Text,
                                                ListWorkflowExecutionsRequest -> Int32
_ListWorkflowExecutionsRequest'pageSize :: !Data.Int.Int32,
                                                ListWorkflowExecutionsRequest -> ByteString
_ListWorkflowExecutionsRequest'nextPageToken :: !Data.ByteString.ByteString,
                                                ListWorkflowExecutionsRequest -> Text
_ListWorkflowExecutionsRequest'query :: !Data.Text.Text,
                                                ListWorkflowExecutionsRequest -> FieldSet
_ListWorkflowExecutionsRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Bool
(ListWorkflowExecutionsRequest
 -> ListWorkflowExecutionsRequest -> Bool)
-> (ListWorkflowExecutionsRequest
    -> ListWorkflowExecutionsRequest -> Bool)
-> Eq ListWorkflowExecutionsRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Bool
== :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Bool
$c/= :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Bool
/= :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Bool
Prelude.Eq, Eq ListWorkflowExecutionsRequest
Eq ListWorkflowExecutionsRequest =>
(ListWorkflowExecutionsRequest
 -> ListWorkflowExecutionsRequest -> Ordering)
-> (ListWorkflowExecutionsRequest
    -> ListWorkflowExecutionsRequest -> Bool)
-> (ListWorkflowExecutionsRequest
    -> ListWorkflowExecutionsRequest -> Bool)
-> (ListWorkflowExecutionsRequest
    -> ListWorkflowExecutionsRequest -> Bool)
-> (ListWorkflowExecutionsRequest
    -> ListWorkflowExecutionsRequest -> Bool)
-> (ListWorkflowExecutionsRequest
    -> ListWorkflowExecutionsRequest -> ListWorkflowExecutionsRequest)
-> (ListWorkflowExecutionsRequest
    -> ListWorkflowExecutionsRequest -> ListWorkflowExecutionsRequest)
-> Ord ListWorkflowExecutionsRequest
ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Bool
ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Ordering
ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> ListWorkflowExecutionsRequest
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 :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Ordering
compare :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Ordering
$c< :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Bool
< :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Bool
$c<= :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Bool
<= :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Bool
$c> :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Bool
> :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Bool
$c>= :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Bool
>= :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> Bool
$cmax :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> ListWorkflowExecutionsRequest
max :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> ListWorkflowExecutionsRequest
$cmin :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> ListWorkflowExecutionsRequest
min :: ListWorkflowExecutionsRequest
-> ListWorkflowExecutionsRequest -> ListWorkflowExecutionsRequest
Prelude.Ord)
instance Prelude.Show ListWorkflowExecutionsRequest where
  showsPrec :: Int -> ListWorkflowExecutionsRequest -> ShowS
showsPrec Int
_ ListWorkflowExecutionsRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListWorkflowExecutionsRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListWorkflowExecutionsRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListWorkflowExecutionsRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ListWorkflowExecutionsRequest
-> f ListWorkflowExecutionsRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ListWorkflowExecutionsRequest
 -> f ListWorkflowExecutionsRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ListWorkflowExecutionsRequest
-> f ListWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListWorkflowExecutionsRequest -> Text)
-> (ListWorkflowExecutionsRequest
    -> Text -> ListWorkflowExecutionsRequest)
-> Lens
     ListWorkflowExecutionsRequest
     ListWorkflowExecutionsRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListWorkflowExecutionsRequest -> Text
_ListWorkflowExecutionsRequest'namespace
           (\ ListWorkflowExecutionsRequest
x__ Text
y__
              -> ListWorkflowExecutionsRequest
x__ {_ListWorkflowExecutionsRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListWorkflowExecutionsRequest "pageSize" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "pageSize"
-> (Int32 -> f Int32)
-> ListWorkflowExecutionsRequest
-> f ListWorkflowExecutionsRequest
fieldOf Proxy# "pageSize"
_
    = ((Int32 -> f Int32)
 -> ListWorkflowExecutionsRequest
 -> f ListWorkflowExecutionsRequest)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ListWorkflowExecutionsRequest
-> f ListWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListWorkflowExecutionsRequest -> Int32)
-> (ListWorkflowExecutionsRequest
    -> Int32 -> ListWorkflowExecutionsRequest)
-> Lens
     ListWorkflowExecutionsRequest
     ListWorkflowExecutionsRequest
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListWorkflowExecutionsRequest -> Int32
_ListWorkflowExecutionsRequest'pageSize
           (\ ListWorkflowExecutionsRequest
x__ Int32
y__ -> ListWorkflowExecutionsRequest
x__ {_ListWorkflowExecutionsRequest'pageSize = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListWorkflowExecutionsRequest "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ListWorkflowExecutionsRequest
-> f ListWorkflowExecutionsRequest
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ListWorkflowExecutionsRequest
 -> f ListWorkflowExecutionsRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ListWorkflowExecutionsRequest
-> f ListWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListWorkflowExecutionsRequest -> ByteString)
-> (ListWorkflowExecutionsRequest
    -> ByteString -> ListWorkflowExecutionsRequest)
-> Lens
     ListWorkflowExecutionsRequest
     ListWorkflowExecutionsRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListWorkflowExecutionsRequest -> ByteString
_ListWorkflowExecutionsRequest'nextPageToken
           (\ ListWorkflowExecutionsRequest
x__ ByteString
y__
              -> ListWorkflowExecutionsRequest
x__ {_ListWorkflowExecutionsRequest'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListWorkflowExecutionsRequest "query" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "query"
-> (Text -> f Text)
-> ListWorkflowExecutionsRequest
-> f ListWorkflowExecutionsRequest
fieldOf Proxy# "query"
_
    = ((Text -> f Text)
 -> ListWorkflowExecutionsRequest
 -> f ListWorkflowExecutionsRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ListWorkflowExecutionsRequest
-> f ListWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListWorkflowExecutionsRequest -> Text)
-> (ListWorkflowExecutionsRequest
    -> Text -> ListWorkflowExecutionsRequest)
-> Lens
     ListWorkflowExecutionsRequest
     ListWorkflowExecutionsRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListWorkflowExecutionsRequest -> Text
_ListWorkflowExecutionsRequest'query
           (\ ListWorkflowExecutionsRequest
x__ Text
y__ -> ListWorkflowExecutionsRequest
x__ {_ListWorkflowExecutionsRequest'query = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListWorkflowExecutionsRequest where
  messageName :: Proxy ListWorkflowExecutionsRequest -> Text
messageName Proxy ListWorkflowExecutionsRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListWorkflowExecutionsRequest"
  packedMessageDescriptor :: Proxy ListWorkflowExecutionsRequest -> ByteString
packedMessageDescriptor Proxy ListWorkflowExecutionsRequest
_
    = ByteString
"\n\
      \\GSListWorkflowExecutionsRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\ESC\n\
      \\tpage_size\CAN\STX \SOH(\ENQR\bpageSize\DC2&\n\
      \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\DC2\DC4\n\
      \\ENQquery\CAN\EOT \SOH(\tR\ENQquery"
  packedFileDescriptor :: Proxy ListWorkflowExecutionsRequest -> ByteString
packedFileDescriptor Proxy ListWorkflowExecutionsRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListWorkflowExecutionsRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor ListWorkflowExecutionsRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ListWorkflowExecutionsRequest Text
-> FieldDescriptor ListWorkflowExecutionsRequest
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
     ListWorkflowExecutionsRequest
     ListWorkflowExecutionsRequest
     Text
     Text
-> FieldAccessor ListWorkflowExecutionsRequest 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 ListWorkflowExecutionsRequest
        pageSize__field_descriptor :: FieldDescriptor ListWorkflowExecutionsRequest
pageSize__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ListWorkflowExecutionsRequest Int32
-> FieldDescriptor ListWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"page_size"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     ListWorkflowExecutionsRequest
     ListWorkflowExecutionsRequest
     Int32
     Int32
-> FieldAccessor ListWorkflowExecutionsRequest Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pageSize")) ::
              Data.ProtoLens.FieldDescriptor ListWorkflowExecutionsRequest
        nextPageToken__field_descriptor :: FieldDescriptor ListWorkflowExecutionsRequest
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ListWorkflowExecutionsRequest ByteString
-> FieldDescriptor ListWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ListWorkflowExecutionsRequest
     ListWorkflowExecutionsRequest
     ByteString
     ByteString
-> FieldAccessor ListWorkflowExecutionsRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ListWorkflowExecutionsRequest
        query__field_descriptor :: FieldDescriptor ListWorkflowExecutionsRequest
query__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ListWorkflowExecutionsRequest Text
-> FieldDescriptor ListWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"query"
              (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
     ListWorkflowExecutionsRequest
     ListWorkflowExecutionsRequest
     Text
     Text
-> FieldAccessor ListWorkflowExecutionsRequest 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 @"query")) ::
              Data.ProtoLens.FieldDescriptor ListWorkflowExecutionsRequest
      in
        [(Tag, FieldDescriptor ListWorkflowExecutionsRequest)]
-> Map Tag (FieldDescriptor ListWorkflowExecutionsRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListWorkflowExecutionsRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListWorkflowExecutionsRequest
pageSize__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ListWorkflowExecutionsRequest
nextPageToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ListWorkflowExecutionsRequest
query__field_descriptor)]
  unknownFields :: Lens' ListWorkflowExecutionsRequest FieldSet
unknownFields
    = (ListWorkflowExecutionsRequest -> FieldSet)
-> (ListWorkflowExecutionsRequest
    -> FieldSet -> ListWorkflowExecutionsRequest)
-> Lens' ListWorkflowExecutionsRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListWorkflowExecutionsRequest -> FieldSet
_ListWorkflowExecutionsRequest'_unknownFields
        (\ ListWorkflowExecutionsRequest
x__ FieldSet
y__
           -> ListWorkflowExecutionsRequest
x__ {_ListWorkflowExecutionsRequest'_unknownFields = y__})
  defMessage :: ListWorkflowExecutionsRequest
defMessage
    = ListWorkflowExecutionsRequest'_constructor
        {_ListWorkflowExecutionsRequest'namespace :: Text
_ListWorkflowExecutionsRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListWorkflowExecutionsRequest'pageSize :: Int32
_ListWorkflowExecutionsRequest'pageSize = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListWorkflowExecutionsRequest'nextPageToken :: ByteString
_ListWorkflowExecutionsRequest'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListWorkflowExecutionsRequest'query :: Text
_ListWorkflowExecutionsRequest'query = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListWorkflowExecutionsRequest'_unknownFields :: FieldSet
_ListWorkflowExecutionsRequest'_unknownFields = []}
  parseMessage :: Parser ListWorkflowExecutionsRequest
parseMessage
    = let
        loop ::
          ListWorkflowExecutionsRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser ListWorkflowExecutionsRequest
        loop :: ListWorkflowExecutionsRequest
-> Parser ListWorkflowExecutionsRequest
loop ListWorkflowExecutionsRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
16
                          -> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"page_size"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"pageSize") y x)
                        Word64
26
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"query"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"query") 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 ListWorkflowExecutionsRequest
-> String -> Parser ListWorkflowExecutionsRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ListWorkflowExecutionsRequest
-> Parser ListWorkflowExecutionsRequest
loop ListWorkflowExecutionsRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ListWorkflowExecutionsRequest"
  buildMessage :: ListWorkflowExecutionsRequest -> Builder
buildMessage
    = \ ListWorkflowExecutionsRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ListWorkflowExecutionsRequest
  ListWorkflowExecutionsRequest
  Text
  Text
-> ListWorkflowExecutionsRequest -> 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") ListWorkflowExecutionsRequest
_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 :: Int32
_v = FoldLike
  Int32
  ListWorkflowExecutionsRequest
  ListWorkflowExecutionsRequest
  Int32
  Int32
-> ListWorkflowExecutionsRequest -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pageSize") ListWorkflowExecutionsRequest
_x
                 in
                   if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
16)
                         ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: ByteString
_v
                        = FoldLike
  ByteString
  ListWorkflowExecutionsRequest
  ListWorkflowExecutionsRequest
  ByteString
  ByteString
-> ListWorkflowExecutionsRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ListWorkflowExecutionsRequest
_x
                    in
                      if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
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
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               ByteString
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Text
_v = FoldLike
  Text
  ListWorkflowExecutionsRequest
  ListWorkflowExecutionsRequest
  Text
  Text
-> ListWorkflowExecutionsRequest -> 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 @"query") ListWorkflowExecutionsRequest
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  ListWorkflowExecutionsRequest
  ListWorkflowExecutionsRequest
  FieldSet
  FieldSet
-> ListWorkflowExecutionsRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListWorkflowExecutionsRequest
  ListWorkflowExecutionsRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListWorkflowExecutionsRequest FieldSet
Data.ProtoLens.unknownFields ListWorkflowExecutionsRequest
_x)))))
instance Control.DeepSeq.NFData ListWorkflowExecutionsRequest where
  rnf :: ListWorkflowExecutionsRequest -> ()
rnf
    = \ ListWorkflowExecutionsRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListWorkflowExecutionsRequest -> FieldSet
_ListWorkflowExecutionsRequest'_unknownFields ListWorkflowExecutionsRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListWorkflowExecutionsRequest -> Text
_ListWorkflowExecutionsRequest'namespace ListWorkflowExecutionsRequest
x__)
                (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListWorkflowExecutionsRequest -> Int32
_ListWorkflowExecutionsRequest'pageSize ListWorkflowExecutionsRequest
x__)
                   (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ListWorkflowExecutionsRequest -> ByteString
_ListWorkflowExecutionsRequest'nextPageToken ListWorkflowExecutionsRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ListWorkflowExecutionsRequest -> Text
_ListWorkflowExecutionsRequest'query ListWorkflowExecutionsRequest
x__) ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.executions' @:: Lens' ListWorkflowExecutionsResponse [Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'executions' @:: Lens' ListWorkflowExecutionsResponse (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ListWorkflowExecutionsResponse Data.ByteString.ByteString@ -}
data ListWorkflowExecutionsResponse
  = ListWorkflowExecutionsResponse'_constructor {ListWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo
_ListWorkflowExecutionsResponse'executions :: !(Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo),
                                                 ListWorkflowExecutionsResponse -> ByteString
_ListWorkflowExecutionsResponse'nextPageToken :: !Data.ByteString.ByteString,
                                                 ListWorkflowExecutionsResponse -> FieldSet
_ListWorkflowExecutionsResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Bool
(ListWorkflowExecutionsResponse
 -> ListWorkflowExecutionsResponse -> Bool)
-> (ListWorkflowExecutionsResponse
    -> ListWorkflowExecutionsResponse -> Bool)
-> Eq ListWorkflowExecutionsResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Bool
== :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Bool
$c/= :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Bool
/= :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Bool
Prelude.Eq, Eq ListWorkflowExecutionsResponse
Eq ListWorkflowExecutionsResponse =>
(ListWorkflowExecutionsResponse
 -> ListWorkflowExecutionsResponse -> Ordering)
-> (ListWorkflowExecutionsResponse
    -> ListWorkflowExecutionsResponse -> Bool)
-> (ListWorkflowExecutionsResponse
    -> ListWorkflowExecutionsResponse -> Bool)
-> (ListWorkflowExecutionsResponse
    -> ListWorkflowExecutionsResponse -> Bool)
-> (ListWorkflowExecutionsResponse
    -> ListWorkflowExecutionsResponse -> Bool)
-> (ListWorkflowExecutionsResponse
    -> ListWorkflowExecutionsResponse
    -> ListWorkflowExecutionsResponse)
-> (ListWorkflowExecutionsResponse
    -> ListWorkflowExecutionsResponse
    -> ListWorkflowExecutionsResponse)
-> Ord ListWorkflowExecutionsResponse
ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Bool
ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Ordering
ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> ListWorkflowExecutionsResponse
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 :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Ordering
compare :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Ordering
$c< :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Bool
< :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Bool
$c<= :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Bool
<= :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Bool
$c> :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Bool
> :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Bool
$c>= :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Bool
>= :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> Bool
$cmax :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> ListWorkflowExecutionsResponse
max :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> ListWorkflowExecutionsResponse
$cmin :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> ListWorkflowExecutionsResponse
min :: ListWorkflowExecutionsResponse
-> ListWorkflowExecutionsResponse -> ListWorkflowExecutionsResponse
Prelude.Ord)
instance Prelude.Show ListWorkflowExecutionsResponse where
  showsPrec :: Int -> ListWorkflowExecutionsResponse -> ShowS
showsPrec Int
_ ListWorkflowExecutionsResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ListWorkflowExecutionsResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ListWorkflowExecutionsResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ListWorkflowExecutionsResponse "executions" [Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "executions"
-> ([WorkflowExecutionInfo] -> f [WorkflowExecutionInfo])
-> ListWorkflowExecutionsResponse
-> f ListWorkflowExecutionsResponse
fieldOf Proxy# "executions"
_
    = ((Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo))
 -> ListWorkflowExecutionsResponse
 -> f ListWorkflowExecutionsResponse)
-> (([WorkflowExecutionInfo] -> f [WorkflowExecutionInfo])
    -> Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> ([WorkflowExecutionInfo] -> f [WorkflowExecutionInfo])
-> ListWorkflowExecutionsResponse
-> f ListWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo)
-> (ListWorkflowExecutionsResponse
    -> Vector WorkflowExecutionInfo -> ListWorkflowExecutionsResponse)
-> Lens
     ListWorkflowExecutionsResponse
     ListWorkflowExecutionsResponse
     (Vector WorkflowExecutionInfo)
     (Vector WorkflowExecutionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo
_ListWorkflowExecutionsResponse'executions
           (\ ListWorkflowExecutionsResponse
x__ Vector WorkflowExecutionInfo
y__
              -> ListWorkflowExecutionsResponse
x__ {_ListWorkflowExecutionsResponse'executions = y__}))
        ((Vector WorkflowExecutionInfo -> [WorkflowExecutionInfo])
-> (Vector WorkflowExecutionInfo
    -> [WorkflowExecutionInfo] -> Vector WorkflowExecutionInfo)
-> Lens
     (Vector WorkflowExecutionInfo)
     (Vector WorkflowExecutionInfo)
     [WorkflowExecutionInfo]
     [WorkflowExecutionInfo]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector WorkflowExecutionInfo -> [WorkflowExecutionInfo]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector WorkflowExecutionInfo
_ [WorkflowExecutionInfo]
y__ -> [WorkflowExecutionInfo] -> Vector WorkflowExecutionInfo
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [WorkflowExecutionInfo]
y__))
instance Data.ProtoLens.Field.HasField ListWorkflowExecutionsResponse "vec'executions" (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'executions"
-> (Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> ListWorkflowExecutionsResponse
-> f ListWorkflowExecutionsResponse
fieldOf Proxy# "vec'executions"
_
    = ((Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo))
 -> ListWorkflowExecutionsResponse
 -> f ListWorkflowExecutionsResponse)
-> ((Vector WorkflowExecutionInfo
     -> f (Vector WorkflowExecutionInfo))
    -> Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> (Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> ListWorkflowExecutionsResponse
-> f ListWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo)
-> (ListWorkflowExecutionsResponse
    -> Vector WorkflowExecutionInfo -> ListWorkflowExecutionsResponse)
-> Lens
     ListWorkflowExecutionsResponse
     ListWorkflowExecutionsResponse
     (Vector WorkflowExecutionInfo)
     (Vector WorkflowExecutionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo
_ListWorkflowExecutionsResponse'executions
           (\ ListWorkflowExecutionsResponse
x__ Vector WorkflowExecutionInfo
y__
              -> ListWorkflowExecutionsResponse
x__ {_ListWorkflowExecutionsResponse'executions = y__}))
        (Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo))
-> Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ListWorkflowExecutionsResponse "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ListWorkflowExecutionsResponse
-> f ListWorkflowExecutionsResponse
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ListWorkflowExecutionsResponse
 -> f ListWorkflowExecutionsResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ListWorkflowExecutionsResponse
-> f ListWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ListWorkflowExecutionsResponse -> ByteString)
-> (ListWorkflowExecutionsResponse
    -> ByteString -> ListWorkflowExecutionsResponse)
-> Lens
     ListWorkflowExecutionsResponse
     ListWorkflowExecutionsResponse
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ListWorkflowExecutionsResponse -> ByteString
_ListWorkflowExecutionsResponse'nextPageToken
           (\ ListWorkflowExecutionsResponse
x__ ByteString
y__
              -> ListWorkflowExecutionsResponse
x__ {_ListWorkflowExecutionsResponse'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ListWorkflowExecutionsResponse where
  messageName :: Proxy ListWorkflowExecutionsResponse -> Text
messageName Proxy ListWorkflowExecutionsResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ListWorkflowExecutionsResponse"
  packedMessageDescriptor :: Proxy ListWorkflowExecutionsResponse -> ByteString
packedMessageDescriptor Proxy ListWorkflowExecutionsResponse
_
    = ByteString
"\n\
      \\RSListWorkflowExecutionsResponse\DC2O\n\
      \\n\
      \executions\CAN\SOH \ETX(\v2/.temporal.api.workflow.v1.WorkflowExecutionInfoR\n\
      \executions\DC2&\n\
      \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken"
  packedFileDescriptor :: Proxy ListWorkflowExecutionsResponse -> ByteString
packedFileDescriptor Proxy ListWorkflowExecutionsResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ListWorkflowExecutionsResponse)
fieldsByTag
    = let
        executions__field_descriptor :: FieldDescriptor ListWorkflowExecutionsResponse
executions__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionInfo
-> FieldAccessor
     ListWorkflowExecutionsResponse WorkflowExecutionInfo
-> FieldDescriptor ListWorkflowExecutionsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"executions"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecutionInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo)
              (Packing
-> Lens' ListWorkflowExecutionsResponse [WorkflowExecutionInfo]
-> FieldAccessor
     ListWorkflowExecutionsResponse WorkflowExecutionInfo
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 @"executions")) ::
              Data.ProtoLens.FieldDescriptor ListWorkflowExecutionsResponse
        nextPageToken__field_descriptor :: FieldDescriptor ListWorkflowExecutionsResponse
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ListWorkflowExecutionsResponse ByteString
-> FieldDescriptor ListWorkflowExecutionsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ListWorkflowExecutionsResponse
     ListWorkflowExecutionsResponse
     ByteString
     ByteString
-> FieldAccessor ListWorkflowExecutionsResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ListWorkflowExecutionsResponse
      in
        [(Tag, FieldDescriptor ListWorkflowExecutionsResponse)]
-> Map Tag (FieldDescriptor ListWorkflowExecutionsResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ListWorkflowExecutionsResponse
executions__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ListWorkflowExecutionsResponse
nextPageToken__field_descriptor)]
  unknownFields :: Lens' ListWorkflowExecutionsResponse FieldSet
unknownFields
    = (ListWorkflowExecutionsResponse -> FieldSet)
-> (ListWorkflowExecutionsResponse
    -> FieldSet -> ListWorkflowExecutionsResponse)
-> Lens' ListWorkflowExecutionsResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ListWorkflowExecutionsResponse -> FieldSet
_ListWorkflowExecutionsResponse'_unknownFields
        (\ ListWorkflowExecutionsResponse
x__ FieldSet
y__
           -> ListWorkflowExecutionsResponse
x__ {_ListWorkflowExecutionsResponse'_unknownFields = y__})
  defMessage :: ListWorkflowExecutionsResponse
defMessage
    = ListWorkflowExecutionsResponse'_constructor
        {_ListWorkflowExecutionsResponse'executions :: Vector WorkflowExecutionInfo
_ListWorkflowExecutionsResponse'executions = Vector WorkflowExecutionInfo
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ListWorkflowExecutionsResponse'nextPageToken :: ByteString
_ListWorkflowExecutionsResponse'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ListWorkflowExecutionsResponse'_unknownFields :: FieldSet
_ListWorkflowExecutionsResponse'_unknownFields = []}
  parseMessage :: Parser ListWorkflowExecutionsResponse
parseMessage
    = let
        loop ::
          ListWorkflowExecutionsResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo
             -> Data.ProtoLens.Encoding.Bytes.Parser ListWorkflowExecutionsResponse
        loop :: ListWorkflowExecutionsResponse
-> Growing Vector RealWorld WorkflowExecutionInfo
-> Parser ListWorkflowExecutionsResponse
loop ListWorkflowExecutionsResponse
x Growing Vector RealWorld WorkflowExecutionInfo
mutable'executions
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'executions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                mutable'executions)
                      (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'executions") frozen'executions
                              x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser WorkflowExecutionInfo
-> String -> Parser WorkflowExecutionInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"executions"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'executions y)
                                loop x v
                        Word64
18
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                                  mutable'executions
                        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'executions
      in
        Parser ListWorkflowExecutionsResponse
-> String -> Parser ListWorkflowExecutionsResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'executions <- IO (Growing Vector RealWorld WorkflowExecutionInfo)
-> Parser (Growing Vector RealWorld WorkflowExecutionInfo)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld WorkflowExecutionInfo)
IO (Growing Vector (PrimState IO) WorkflowExecutionInfo)
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'executions)
          String
"ListWorkflowExecutionsResponse"
  buildMessage :: ListWorkflowExecutionsResponse -> Builder
buildMessage
    = \ ListWorkflowExecutionsResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((WorkflowExecutionInfo -> Builder)
-> Vector WorkflowExecutionInfo -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ WorkflowExecutionInfo
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (WorkflowExecutionInfo -> ByteString)
-> WorkflowExecutionInfo
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           WorkflowExecutionInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionInfo
_v))
                (FoldLike
  (Vector WorkflowExecutionInfo)
  ListWorkflowExecutionsResponse
  ListWorkflowExecutionsResponse
  (Vector WorkflowExecutionInfo)
  (Vector WorkflowExecutionInfo)
-> ListWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'executions") ListWorkflowExecutionsResponse
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: ByteString
_v
                     = FoldLike
  ByteString
  ListWorkflowExecutionsResponse
  ListWorkflowExecutionsResponse
  ByteString
  ByteString
-> ListWorkflowExecutionsResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ListWorkflowExecutionsResponse
_x
                 in
                   if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
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
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            ByteString
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ListWorkflowExecutionsResponse
  ListWorkflowExecutionsResponse
  FieldSet
  FieldSet
-> ListWorkflowExecutionsResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ListWorkflowExecutionsResponse
  ListWorkflowExecutionsResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ListWorkflowExecutionsResponse FieldSet
Data.ProtoLens.unknownFields ListWorkflowExecutionsResponse
_x)))
instance Control.DeepSeq.NFData ListWorkflowExecutionsResponse where
  rnf :: ListWorkflowExecutionsResponse -> ()
rnf
    = \ ListWorkflowExecutionsResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ListWorkflowExecutionsResponse -> FieldSet
_ListWorkflowExecutionsResponse'_unknownFields ListWorkflowExecutionsResponse
x__)
             (Vector WorkflowExecutionInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ListWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo
_ListWorkflowExecutionsResponse'executions ListWorkflowExecutionsResponse
x__)
                (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ListWorkflowExecutionsResponse -> ByteString
_ListWorkflowExecutionsResponse'nextPageToken ListWorkflowExecutionsResponse
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' PatchScheduleRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.scheduleId' @:: Lens' PatchScheduleRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.patch' @:: Lens' PatchScheduleRequest Proto.Temporal.Api.Schedule.V1.Message.SchedulePatch@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'patch' @:: Lens' PatchScheduleRequest (Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.SchedulePatch)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' PatchScheduleRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.requestId' @:: Lens' PatchScheduleRequest Data.Text.Text@ -}
data PatchScheduleRequest
  = PatchScheduleRequest'_constructor {PatchScheduleRequest -> Text
_PatchScheduleRequest'namespace :: !Data.Text.Text,
                                       PatchScheduleRequest -> Text
_PatchScheduleRequest'scheduleId :: !Data.Text.Text,
                                       PatchScheduleRequest -> Maybe SchedulePatch
_PatchScheduleRequest'patch :: !(Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.SchedulePatch),
                                       PatchScheduleRequest -> Text
_PatchScheduleRequest'identity :: !Data.Text.Text,
                                       PatchScheduleRequest -> Text
_PatchScheduleRequest'requestId :: !Data.Text.Text,
                                       PatchScheduleRequest -> FieldSet
_PatchScheduleRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (PatchScheduleRequest -> PatchScheduleRequest -> Bool
(PatchScheduleRequest -> PatchScheduleRequest -> Bool)
-> (PatchScheduleRequest -> PatchScheduleRequest -> Bool)
-> Eq PatchScheduleRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PatchScheduleRequest -> PatchScheduleRequest -> Bool
== :: PatchScheduleRequest -> PatchScheduleRequest -> Bool
$c/= :: PatchScheduleRequest -> PatchScheduleRequest -> Bool
/= :: PatchScheduleRequest -> PatchScheduleRequest -> Bool
Prelude.Eq, Eq PatchScheduleRequest
Eq PatchScheduleRequest =>
(PatchScheduleRequest -> PatchScheduleRequest -> Ordering)
-> (PatchScheduleRequest -> PatchScheduleRequest -> Bool)
-> (PatchScheduleRequest -> PatchScheduleRequest -> Bool)
-> (PatchScheduleRequest -> PatchScheduleRequest -> Bool)
-> (PatchScheduleRequest -> PatchScheduleRequest -> Bool)
-> (PatchScheduleRequest
    -> PatchScheduleRequest -> PatchScheduleRequest)
-> (PatchScheduleRequest
    -> PatchScheduleRequest -> PatchScheduleRequest)
-> Ord PatchScheduleRequest
PatchScheduleRequest -> PatchScheduleRequest -> Bool
PatchScheduleRequest -> PatchScheduleRequest -> Ordering
PatchScheduleRequest
-> PatchScheduleRequest -> PatchScheduleRequest
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 :: PatchScheduleRequest -> PatchScheduleRequest -> Ordering
compare :: PatchScheduleRequest -> PatchScheduleRequest -> Ordering
$c< :: PatchScheduleRequest -> PatchScheduleRequest -> Bool
< :: PatchScheduleRequest -> PatchScheduleRequest -> Bool
$c<= :: PatchScheduleRequest -> PatchScheduleRequest -> Bool
<= :: PatchScheduleRequest -> PatchScheduleRequest -> Bool
$c> :: PatchScheduleRequest -> PatchScheduleRequest -> Bool
> :: PatchScheduleRequest -> PatchScheduleRequest -> Bool
$c>= :: PatchScheduleRequest -> PatchScheduleRequest -> Bool
>= :: PatchScheduleRequest -> PatchScheduleRequest -> Bool
$cmax :: PatchScheduleRequest
-> PatchScheduleRequest -> PatchScheduleRequest
max :: PatchScheduleRequest
-> PatchScheduleRequest -> PatchScheduleRequest
$cmin :: PatchScheduleRequest
-> PatchScheduleRequest -> PatchScheduleRequest
min :: PatchScheduleRequest
-> PatchScheduleRequest -> PatchScheduleRequest
Prelude.Ord)
instance Prelude.Show PatchScheduleRequest where
  showsPrec :: Int -> PatchScheduleRequest -> ShowS
showsPrec Int
_ PatchScheduleRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (PatchScheduleRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PatchScheduleRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField PatchScheduleRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> PatchScheduleRequest
-> f PatchScheduleRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> PatchScheduleRequest -> f PatchScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PatchScheduleRequest
-> f PatchScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PatchScheduleRequest -> Text)
-> (PatchScheduleRequest -> Text -> PatchScheduleRequest)
-> Lens PatchScheduleRequest PatchScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PatchScheduleRequest -> Text
_PatchScheduleRequest'namespace
           (\ PatchScheduleRequest
x__ Text
y__ -> PatchScheduleRequest
x__ {_PatchScheduleRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PatchScheduleRequest "scheduleId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleId"
-> (Text -> f Text)
-> PatchScheduleRequest
-> f PatchScheduleRequest
fieldOf Proxy# "scheduleId"
_
    = ((Text -> f Text)
 -> PatchScheduleRequest -> f PatchScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PatchScheduleRequest
-> f PatchScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PatchScheduleRequest -> Text)
-> (PatchScheduleRequest -> Text -> PatchScheduleRequest)
-> Lens PatchScheduleRequest PatchScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PatchScheduleRequest -> Text
_PatchScheduleRequest'scheduleId
           (\ PatchScheduleRequest
x__ Text
y__ -> PatchScheduleRequest
x__ {_PatchScheduleRequest'scheduleId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PatchScheduleRequest "patch" Proto.Temporal.Api.Schedule.V1.Message.SchedulePatch where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "patch"
-> (SchedulePatch -> f SchedulePatch)
-> PatchScheduleRequest
-> f PatchScheduleRequest
fieldOf Proxy# "patch"
_
    = ((Maybe SchedulePatch -> f (Maybe SchedulePatch))
 -> PatchScheduleRequest -> f PatchScheduleRequest)
-> ((SchedulePatch -> f SchedulePatch)
    -> Maybe SchedulePatch -> f (Maybe SchedulePatch))
-> (SchedulePatch -> f SchedulePatch)
-> PatchScheduleRequest
-> f PatchScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PatchScheduleRequest -> Maybe SchedulePatch)
-> (PatchScheduleRequest
    -> Maybe SchedulePatch -> PatchScheduleRequest)
-> Lens
     PatchScheduleRequest
     PatchScheduleRequest
     (Maybe SchedulePatch)
     (Maybe SchedulePatch)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PatchScheduleRequest -> Maybe SchedulePatch
_PatchScheduleRequest'patch
           (\ PatchScheduleRequest
x__ Maybe SchedulePatch
y__ -> PatchScheduleRequest
x__ {_PatchScheduleRequest'patch = y__}))
        (SchedulePatch -> Lens' (Maybe SchedulePatch) SchedulePatch
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SchedulePatch
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PatchScheduleRequest "maybe'patch" (Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.SchedulePatch) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'patch"
-> (Maybe SchedulePatch -> f (Maybe SchedulePatch))
-> PatchScheduleRequest
-> f PatchScheduleRequest
fieldOf Proxy# "maybe'patch"
_
    = ((Maybe SchedulePatch -> f (Maybe SchedulePatch))
 -> PatchScheduleRequest -> f PatchScheduleRequest)
-> ((Maybe SchedulePatch -> f (Maybe SchedulePatch))
    -> Maybe SchedulePatch -> f (Maybe SchedulePatch))
-> (Maybe SchedulePatch -> f (Maybe SchedulePatch))
-> PatchScheduleRequest
-> f PatchScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PatchScheduleRequest -> Maybe SchedulePatch)
-> (PatchScheduleRequest
    -> Maybe SchedulePatch -> PatchScheduleRequest)
-> Lens
     PatchScheduleRequest
     PatchScheduleRequest
     (Maybe SchedulePatch)
     (Maybe SchedulePatch)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PatchScheduleRequest -> Maybe SchedulePatch
_PatchScheduleRequest'patch
           (\ PatchScheduleRequest
x__ Maybe SchedulePatch
y__ -> PatchScheduleRequest
x__ {_PatchScheduleRequest'patch = y__}))
        (Maybe SchedulePatch -> f (Maybe SchedulePatch))
-> Maybe SchedulePatch -> f (Maybe SchedulePatch)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PatchScheduleRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> PatchScheduleRequest
-> f PatchScheduleRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> PatchScheduleRequest -> f PatchScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PatchScheduleRequest
-> f PatchScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PatchScheduleRequest -> Text)
-> (PatchScheduleRequest -> Text -> PatchScheduleRequest)
-> Lens PatchScheduleRequest PatchScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PatchScheduleRequest -> Text
_PatchScheduleRequest'identity
           (\ PatchScheduleRequest
x__ Text
y__ -> PatchScheduleRequest
x__ {_PatchScheduleRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PatchScheduleRequest "requestId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestId"
-> (Text -> f Text)
-> PatchScheduleRequest
-> f PatchScheduleRequest
fieldOf Proxy# "requestId"
_
    = ((Text -> f Text)
 -> PatchScheduleRequest -> f PatchScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PatchScheduleRequest
-> f PatchScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PatchScheduleRequest -> Text)
-> (PatchScheduleRequest -> Text -> PatchScheduleRequest)
-> Lens PatchScheduleRequest PatchScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PatchScheduleRequest -> Text
_PatchScheduleRequest'requestId
           (\ PatchScheduleRequest
x__ Text
y__ -> PatchScheduleRequest
x__ {_PatchScheduleRequest'requestId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message PatchScheduleRequest where
  messageName :: Proxy PatchScheduleRequest -> Text
messageName Proxy PatchScheduleRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.PatchScheduleRequest"
  packedMessageDescriptor :: Proxy PatchScheduleRequest -> ByteString
packedMessageDescriptor Proxy PatchScheduleRequest
_
    = ByteString
"\n\
      \\DC4PatchScheduleRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
      \\vschedule_id\CAN\STX \SOH(\tR\n\
      \scheduleId\DC2=\n\
      \\ENQpatch\CAN\ETX \SOH(\v2'.temporal.api.schedule.v1.SchedulePatchR\ENQpatch\DC2\SUB\n\
      \\bidentity\CAN\EOT \SOH(\tR\bidentity\DC2\GS\n\
      \\n\
      \request_id\CAN\ENQ \SOH(\tR\trequestId"
  packedFileDescriptor :: Proxy PatchScheduleRequest -> ByteString
packedFileDescriptor Proxy PatchScheduleRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor PatchScheduleRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor PatchScheduleRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PatchScheduleRequest Text
-> FieldDescriptor PatchScheduleRequest
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 PatchScheduleRequest PatchScheduleRequest Text Text
-> FieldAccessor PatchScheduleRequest 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 PatchScheduleRequest
        scheduleId__field_descriptor :: FieldDescriptor PatchScheduleRequest
scheduleId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PatchScheduleRequest Text
-> FieldDescriptor PatchScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule_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 PatchScheduleRequest PatchScheduleRequest Text Text
-> FieldAccessor PatchScheduleRequest 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 @"scheduleId")) ::
              Data.ProtoLens.FieldDescriptor PatchScheduleRequest
        patch__field_descriptor :: FieldDescriptor PatchScheduleRequest
patch__field_descriptor
          = String
-> FieldTypeDescriptor SchedulePatch
-> FieldAccessor PatchScheduleRequest SchedulePatch
-> FieldDescriptor PatchScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"patch"
              (MessageOrGroup -> FieldTypeDescriptor SchedulePatch
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Schedule.V1.Message.SchedulePatch)
              (Lens
  PatchScheduleRequest
  PatchScheduleRequest
  (Maybe SchedulePatch)
  (Maybe SchedulePatch)
-> FieldAccessor PatchScheduleRequest SchedulePatch
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'patch")) ::
              Data.ProtoLens.FieldDescriptor PatchScheduleRequest
        identity__field_descriptor :: FieldDescriptor PatchScheduleRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PatchScheduleRequest Text
-> FieldDescriptor PatchScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens PatchScheduleRequest PatchScheduleRequest Text Text
-> FieldAccessor PatchScheduleRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor PatchScheduleRequest
        requestId__field_descriptor :: FieldDescriptor PatchScheduleRequest
requestId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PatchScheduleRequest Text
-> FieldDescriptor PatchScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens PatchScheduleRequest PatchScheduleRequest Text Text
-> FieldAccessor PatchScheduleRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId")) ::
              Data.ProtoLens.FieldDescriptor PatchScheduleRequest
      in
        [(Tag, FieldDescriptor PatchScheduleRequest)]
-> Map Tag (FieldDescriptor PatchScheduleRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor PatchScheduleRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor PatchScheduleRequest
scheduleId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor PatchScheduleRequest
patch__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor PatchScheduleRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor PatchScheduleRequest
requestId__field_descriptor)]
  unknownFields :: Lens' PatchScheduleRequest FieldSet
unknownFields
    = (PatchScheduleRequest -> FieldSet)
-> (PatchScheduleRequest -> FieldSet -> PatchScheduleRequest)
-> Lens' PatchScheduleRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        PatchScheduleRequest -> FieldSet
_PatchScheduleRequest'_unknownFields
        (\ PatchScheduleRequest
x__ FieldSet
y__ -> PatchScheduleRequest
x__ {_PatchScheduleRequest'_unknownFields = y__})
  defMessage :: PatchScheduleRequest
defMessage
    = PatchScheduleRequest'_constructor
        {_PatchScheduleRequest'namespace :: Text
_PatchScheduleRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PatchScheduleRequest'scheduleId :: Text
_PatchScheduleRequest'scheduleId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PatchScheduleRequest'patch :: Maybe SchedulePatch
_PatchScheduleRequest'patch = Maybe SchedulePatch
forall a. Maybe a
Prelude.Nothing,
         _PatchScheduleRequest'identity :: Text
_PatchScheduleRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PatchScheduleRequest'requestId :: Text
_PatchScheduleRequest'requestId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PatchScheduleRequest'_unknownFields :: FieldSet
_PatchScheduleRequest'_unknownFields = []}
  parseMessage :: Parser PatchScheduleRequest
parseMessage
    = let
        loop ::
          PatchScheduleRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser PatchScheduleRequest
        loop :: PatchScheduleRequest -> Parser PatchScheduleRequest
loop PatchScheduleRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
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
"schedule_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"scheduleId") y x)
                        Word64
26
                          -> do y <- Parser SchedulePatch -> String -> Parser SchedulePatch
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"patch"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"patch") y x)
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
42
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"request_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser PatchScheduleRequest
-> String -> Parser PatchScheduleRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do PatchScheduleRequest -> Parser PatchScheduleRequest
loop PatchScheduleRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"PatchScheduleRequest"
  buildMessage :: PatchScheduleRequest -> Builder
buildMessage
    = \ PatchScheduleRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike Text PatchScheduleRequest PatchScheduleRequest Text Text
-> PatchScheduleRequest -> 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") PatchScheduleRequest
_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 PatchScheduleRequest PatchScheduleRequest Text Text
-> PatchScheduleRequest -> 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 @"scheduleId") PatchScheduleRequest
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe SchedulePatch)
  PatchScheduleRequest
  PatchScheduleRequest
  (Maybe SchedulePatch)
  (Maybe SchedulePatch)
-> PatchScheduleRequest -> Maybe SchedulePatch
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'patch") PatchScheduleRequest
_x
                    of
                      Maybe SchedulePatch
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just SchedulePatch
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (SchedulePatch -> ByteString) -> SchedulePatch -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                SchedulePatch -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage SchedulePatch
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Text
_v = FoldLike Text PatchScheduleRequest PatchScheduleRequest Text Text
-> PatchScheduleRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") PatchScheduleRequest
_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 PatchScheduleRequest PatchScheduleRequest Text Text
-> PatchScheduleRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId") PatchScheduleRequest
_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))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  PatchScheduleRequest
  PatchScheduleRequest
  FieldSet
  FieldSet
-> PatchScheduleRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  PatchScheduleRequest
  PatchScheduleRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PatchScheduleRequest FieldSet
Data.ProtoLens.unknownFields PatchScheduleRequest
_x))))))
instance Control.DeepSeq.NFData PatchScheduleRequest where
  rnf :: PatchScheduleRequest -> ()
rnf
    = \ PatchScheduleRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (PatchScheduleRequest -> FieldSet
_PatchScheduleRequest'_unknownFields PatchScheduleRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (PatchScheduleRequest -> Text
_PatchScheduleRequest'namespace PatchScheduleRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (PatchScheduleRequest -> Text
_PatchScheduleRequest'scheduleId PatchScheduleRequest
x__)
                   (Maybe SchedulePatch -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (PatchScheduleRequest -> Maybe SchedulePatch
_PatchScheduleRequest'patch PatchScheduleRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (PatchScheduleRequest -> Text
_PatchScheduleRequest'identity PatchScheduleRequest
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (PatchScheduleRequest -> Text
_PatchScheduleRequest'requestId PatchScheduleRequest
x__) ())))))
{- | Fields :
      -}
data PatchScheduleResponse
  = PatchScheduleResponse'_constructor {PatchScheduleResponse -> FieldSet
_PatchScheduleResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (PatchScheduleResponse -> PatchScheduleResponse -> Bool
(PatchScheduleResponse -> PatchScheduleResponse -> Bool)
-> (PatchScheduleResponse -> PatchScheduleResponse -> Bool)
-> Eq PatchScheduleResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PatchScheduleResponse -> PatchScheduleResponse -> Bool
== :: PatchScheduleResponse -> PatchScheduleResponse -> Bool
$c/= :: PatchScheduleResponse -> PatchScheduleResponse -> Bool
/= :: PatchScheduleResponse -> PatchScheduleResponse -> Bool
Prelude.Eq, Eq PatchScheduleResponse
Eq PatchScheduleResponse =>
(PatchScheduleResponse -> PatchScheduleResponse -> Ordering)
-> (PatchScheduleResponse -> PatchScheduleResponse -> Bool)
-> (PatchScheduleResponse -> PatchScheduleResponse -> Bool)
-> (PatchScheduleResponse -> PatchScheduleResponse -> Bool)
-> (PatchScheduleResponse -> PatchScheduleResponse -> Bool)
-> (PatchScheduleResponse
    -> PatchScheduleResponse -> PatchScheduleResponse)
-> (PatchScheduleResponse
    -> PatchScheduleResponse -> PatchScheduleResponse)
-> Ord PatchScheduleResponse
PatchScheduleResponse -> PatchScheduleResponse -> Bool
PatchScheduleResponse -> PatchScheduleResponse -> Ordering
PatchScheduleResponse
-> PatchScheduleResponse -> PatchScheduleResponse
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 :: PatchScheduleResponse -> PatchScheduleResponse -> Ordering
compare :: PatchScheduleResponse -> PatchScheduleResponse -> Ordering
$c< :: PatchScheduleResponse -> PatchScheduleResponse -> Bool
< :: PatchScheduleResponse -> PatchScheduleResponse -> Bool
$c<= :: PatchScheduleResponse -> PatchScheduleResponse -> Bool
<= :: PatchScheduleResponse -> PatchScheduleResponse -> Bool
$c> :: PatchScheduleResponse -> PatchScheduleResponse -> Bool
> :: PatchScheduleResponse -> PatchScheduleResponse -> Bool
$c>= :: PatchScheduleResponse -> PatchScheduleResponse -> Bool
>= :: PatchScheduleResponse -> PatchScheduleResponse -> Bool
$cmax :: PatchScheduleResponse
-> PatchScheduleResponse -> PatchScheduleResponse
max :: PatchScheduleResponse
-> PatchScheduleResponse -> PatchScheduleResponse
$cmin :: PatchScheduleResponse
-> PatchScheduleResponse -> PatchScheduleResponse
min :: PatchScheduleResponse
-> PatchScheduleResponse -> PatchScheduleResponse
Prelude.Ord)
instance Prelude.Show PatchScheduleResponse where
  showsPrec :: Int -> PatchScheduleResponse -> ShowS
showsPrec Int
_ PatchScheduleResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (PatchScheduleResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PatchScheduleResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message PatchScheduleResponse where
  messageName :: Proxy PatchScheduleResponse -> Text
messageName Proxy PatchScheduleResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.PatchScheduleResponse"
  packedMessageDescriptor :: Proxy PatchScheduleResponse -> ByteString
packedMessageDescriptor Proxy PatchScheduleResponse
_
    = ByteString
"\n\
      \\NAKPatchScheduleResponse"
  packedFileDescriptor :: Proxy PatchScheduleResponse -> ByteString
packedFileDescriptor Proxy PatchScheduleResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor PatchScheduleResponse)
fieldsByTag = let in [(Tag, FieldDescriptor PatchScheduleResponse)]
-> Map Tag (FieldDescriptor PatchScheduleResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' PatchScheduleResponse FieldSet
unknownFields
    = (PatchScheduleResponse -> FieldSet)
-> (PatchScheduleResponse -> FieldSet -> PatchScheduleResponse)
-> Lens' PatchScheduleResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        PatchScheduleResponse -> FieldSet
_PatchScheduleResponse'_unknownFields
        (\ PatchScheduleResponse
x__ FieldSet
y__ -> PatchScheduleResponse
x__ {_PatchScheduleResponse'_unknownFields = y__})
  defMessage :: PatchScheduleResponse
defMessage
    = PatchScheduleResponse'_constructor
        {_PatchScheduleResponse'_unknownFields :: FieldSet
_PatchScheduleResponse'_unknownFields = []}
  parseMessage :: Parser PatchScheduleResponse
parseMessage
    = let
        loop ::
          PatchScheduleResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser PatchScheduleResponse
        loop :: PatchScheduleResponse -> Parser PatchScheduleResponse
loop PatchScheduleResponse
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 PatchScheduleResponse
-> String -> Parser PatchScheduleResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do PatchScheduleResponse -> Parser PatchScheduleResponse
loop PatchScheduleResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"PatchScheduleResponse"
  buildMessage :: PatchScheduleResponse -> Builder
buildMessage
    = \ PatchScheduleResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  PatchScheduleResponse
  PatchScheduleResponse
  FieldSet
  FieldSet
-> PatchScheduleResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  PatchScheduleResponse
  PatchScheduleResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PatchScheduleResponse FieldSet
Data.ProtoLens.unknownFields PatchScheduleResponse
_x)
instance Control.DeepSeq.NFData PatchScheduleResponse where
  rnf :: PatchScheduleResponse -> ()
rnf
    = \ PatchScheduleResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (PatchScheduleResponse -> FieldSet
_PatchScheduleResponse'_unknownFields PatchScheduleResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' PollActivityTaskQueueRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueue' @:: Lens' PollActivityTaskQueueRequest Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'taskQueue' @:: Lens' PollActivityTaskQueueRequest (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' PollActivityTaskQueueRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueueMetadata' @:: Lens' PollActivityTaskQueueRequest Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueMetadata@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'taskQueueMetadata' @:: Lens' PollActivityTaskQueueRequest (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueMetadata)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workerVersionCapabilities' @:: Lens' PollActivityTaskQueueRequest Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workerVersionCapabilities' @:: Lens' PollActivityTaskQueueRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities)@ -}
data PollActivityTaskQueueRequest
  = PollActivityTaskQueueRequest'_constructor {PollActivityTaskQueueRequest -> Text
_PollActivityTaskQueueRequest'namespace :: !Data.Text.Text,
                                               PollActivityTaskQueueRequest -> Maybe TaskQueue
_PollActivityTaskQueueRequest'taskQueue :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue),
                                               PollActivityTaskQueueRequest -> Text
_PollActivityTaskQueueRequest'identity :: !Data.Text.Text,
                                               PollActivityTaskQueueRequest -> Maybe TaskQueueMetadata
_PollActivityTaskQueueRequest'taskQueueMetadata :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueMetadata),
                                               PollActivityTaskQueueRequest -> Maybe WorkerVersionCapabilities
_PollActivityTaskQueueRequest'workerVersionCapabilities :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities),
                                               PollActivityTaskQueueRequest -> FieldSet
_PollActivityTaskQueueRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Bool
(PollActivityTaskQueueRequest
 -> PollActivityTaskQueueRequest -> Bool)
-> (PollActivityTaskQueueRequest
    -> PollActivityTaskQueueRequest -> Bool)
-> Eq PollActivityTaskQueueRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Bool
== :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Bool
$c/= :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Bool
/= :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Bool
Prelude.Eq, Eq PollActivityTaskQueueRequest
Eq PollActivityTaskQueueRequest =>
(PollActivityTaskQueueRequest
 -> PollActivityTaskQueueRequest -> Ordering)
-> (PollActivityTaskQueueRequest
    -> PollActivityTaskQueueRequest -> Bool)
-> (PollActivityTaskQueueRequest
    -> PollActivityTaskQueueRequest -> Bool)
-> (PollActivityTaskQueueRequest
    -> PollActivityTaskQueueRequest -> Bool)
-> (PollActivityTaskQueueRequest
    -> PollActivityTaskQueueRequest -> Bool)
-> (PollActivityTaskQueueRequest
    -> PollActivityTaskQueueRequest -> PollActivityTaskQueueRequest)
-> (PollActivityTaskQueueRequest
    -> PollActivityTaskQueueRequest -> PollActivityTaskQueueRequest)
-> Ord PollActivityTaskQueueRequest
PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Bool
PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Ordering
PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> PollActivityTaskQueueRequest
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 :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Ordering
compare :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Ordering
$c< :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Bool
< :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Bool
$c<= :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Bool
<= :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Bool
$c> :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Bool
> :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Bool
$c>= :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Bool
>= :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> Bool
$cmax :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> PollActivityTaskQueueRequest
max :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> PollActivityTaskQueueRequest
$cmin :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> PollActivityTaskQueueRequest
min :: PollActivityTaskQueueRequest
-> PollActivityTaskQueueRequest -> PollActivityTaskQueueRequest
Prelude.Ord)
instance Prelude.Show PollActivityTaskQueueRequest where
  showsPrec :: Int -> PollActivityTaskQueueRequest -> ShowS
showsPrec Int
_ PollActivityTaskQueueRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (PollActivityTaskQueueRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PollActivityTaskQueueRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> PollActivityTaskQueueRequest -> f PollActivityTaskQueueRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueRequest -> Text)
-> (PollActivityTaskQueueRequest
    -> Text -> PollActivityTaskQueueRequest)
-> Lens
     PollActivityTaskQueueRequest PollActivityTaskQueueRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueRequest -> Text
_PollActivityTaskQueueRequest'namespace
           (\ PollActivityTaskQueueRequest
x__ Text
y__ -> PollActivityTaskQueueRequest
x__ {_PollActivityTaskQueueRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueRequest "taskQueue" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (TaskQueue -> f TaskQueue)
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
fieldOf Proxy# "taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> PollActivityTaskQueueRequest -> f PollActivityTaskQueueRequest)
-> ((TaskQueue -> f TaskQueue)
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (TaskQueue -> f TaskQueue)
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueRequest -> Maybe TaskQueue)
-> (PollActivityTaskQueueRequest
    -> Maybe TaskQueue -> PollActivityTaskQueueRequest)
-> Lens
     PollActivityTaskQueueRequest
     PollActivityTaskQueueRequest
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueRequest -> Maybe TaskQueue
_PollActivityTaskQueueRequest'taskQueue
           (\ PollActivityTaskQueueRequest
x__ Maybe TaskQueue
y__ -> PollActivityTaskQueueRequest
x__ {_PollActivityTaskQueueRequest'taskQueue = y__}))
        (TaskQueue -> Lens' (Maybe TaskQueue) TaskQueue
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TaskQueue
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueRequest "maybe'taskQueue" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'taskQueue"
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
fieldOf Proxy# "maybe'taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> PollActivityTaskQueueRequest -> f PollActivityTaskQueueRequest)
-> ((Maybe TaskQueue -> f (Maybe TaskQueue))
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueRequest -> Maybe TaskQueue)
-> (PollActivityTaskQueueRequest
    -> Maybe TaskQueue -> PollActivityTaskQueueRequest)
-> Lens
     PollActivityTaskQueueRequest
     PollActivityTaskQueueRequest
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueRequest -> Maybe TaskQueue
_PollActivityTaskQueueRequest'taskQueue
           (\ PollActivityTaskQueueRequest
x__ Maybe TaskQueue
y__ -> PollActivityTaskQueueRequest
x__ {_PollActivityTaskQueueRequest'taskQueue = y__}))
        (Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> PollActivityTaskQueueRequest -> f PollActivityTaskQueueRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueRequest -> Text)
-> (PollActivityTaskQueueRequest
    -> Text -> PollActivityTaskQueueRequest)
-> Lens
     PollActivityTaskQueueRequest PollActivityTaskQueueRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueRequest -> Text
_PollActivityTaskQueueRequest'identity
           (\ PollActivityTaskQueueRequest
x__ Text
y__ -> PollActivityTaskQueueRequest
x__ {_PollActivityTaskQueueRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueRequest "taskQueueMetadata" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueMetadata where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueueMetadata"
-> (TaskQueueMetadata -> f TaskQueueMetadata)
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
fieldOf Proxy# "taskQueueMetadata"
_
    = ((Maybe TaskQueueMetadata -> f (Maybe TaskQueueMetadata))
 -> PollActivityTaskQueueRequest -> f PollActivityTaskQueueRequest)
-> ((TaskQueueMetadata -> f TaskQueueMetadata)
    -> Maybe TaskQueueMetadata -> f (Maybe TaskQueueMetadata))
-> (TaskQueueMetadata -> f TaskQueueMetadata)
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueRequest -> Maybe TaskQueueMetadata)
-> (PollActivityTaskQueueRequest
    -> Maybe TaskQueueMetadata -> PollActivityTaskQueueRequest)
-> Lens
     PollActivityTaskQueueRequest
     PollActivityTaskQueueRequest
     (Maybe TaskQueueMetadata)
     (Maybe TaskQueueMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueRequest -> Maybe TaskQueueMetadata
_PollActivityTaskQueueRequest'taskQueueMetadata
           (\ PollActivityTaskQueueRequest
x__ Maybe TaskQueueMetadata
y__
              -> PollActivityTaskQueueRequest
x__ {_PollActivityTaskQueueRequest'taskQueueMetadata = y__}))
        (TaskQueueMetadata
-> Lens' (Maybe TaskQueueMetadata) TaskQueueMetadata
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TaskQueueMetadata
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueRequest "maybe'taskQueueMetadata" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueMetadata) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'taskQueueMetadata"
-> (Maybe TaskQueueMetadata -> f (Maybe TaskQueueMetadata))
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
fieldOf Proxy# "maybe'taskQueueMetadata"
_
    = ((Maybe TaskQueueMetadata -> f (Maybe TaskQueueMetadata))
 -> PollActivityTaskQueueRequest -> f PollActivityTaskQueueRequest)
-> ((Maybe TaskQueueMetadata -> f (Maybe TaskQueueMetadata))
    -> Maybe TaskQueueMetadata -> f (Maybe TaskQueueMetadata))
-> (Maybe TaskQueueMetadata -> f (Maybe TaskQueueMetadata))
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueRequest -> Maybe TaskQueueMetadata)
-> (PollActivityTaskQueueRequest
    -> Maybe TaskQueueMetadata -> PollActivityTaskQueueRequest)
-> Lens
     PollActivityTaskQueueRequest
     PollActivityTaskQueueRequest
     (Maybe TaskQueueMetadata)
     (Maybe TaskQueueMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueRequest -> Maybe TaskQueueMetadata
_PollActivityTaskQueueRequest'taskQueueMetadata
           (\ PollActivityTaskQueueRequest
x__ Maybe TaskQueueMetadata
y__
              -> PollActivityTaskQueueRequest
x__ {_PollActivityTaskQueueRequest'taskQueueMetadata = y__}))
        (Maybe TaskQueueMetadata -> f (Maybe TaskQueueMetadata))
-> Maybe TaskQueueMetadata -> f (Maybe TaskQueueMetadata)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueRequest "workerVersionCapabilities" Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerVersionCapabilities"
-> (WorkerVersionCapabilities -> f WorkerVersionCapabilities)
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
fieldOf Proxy# "workerVersionCapabilities"
_
    = ((Maybe WorkerVersionCapabilities
  -> f (Maybe WorkerVersionCapabilities))
 -> PollActivityTaskQueueRequest -> f PollActivityTaskQueueRequest)
-> ((WorkerVersionCapabilities -> f WorkerVersionCapabilities)
    -> Maybe WorkerVersionCapabilities
    -> f (Maybe WorkerVersionCapabilities))
-> (WorkerVersionCapabilities -> f WorkerVersionCapabilities)
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueRequest -> Maybe WorkerVersionCapabilities)
-> (PollActivityTaskQueueRequest
    -> Maybe WorkerVersionCapabilities -> PollActivityTaskQueueRequest)
-> Lens
     PollActivityTaskQueueRequest
     PollActivityTaskQueueRequest
     (Maybe WorkerVersionCapabilities)
     (Maybe WorkerVersionCapabilities)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueRequest -> Maybe WorkerVersionCapabilities
_PollActivityTaskQueueRequest'workerVersionCapabilities
           (\ PollActivityTaskQueueRequest
x__ Maybe WorkerVersionCapabilities
y__
              -> PollActivityTaskQueueRequest
x__
                   {_PollActivityTaskQueueRequest'workerVersionCapabilities = y__}))
        (WorkerVersionCapabilities
-> Lens'
     (Maybe WorkerVersionCapabilities) WorkerVersionCapabilities
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkerVersionCapabilities
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueRequest "maybe'workerVersionCapabilities" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workerVersionCapabilities"
-> (Maybe WorkerVersionCapabilities
    -> f (Maybe WorkerVersionCapabilities))
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
fieldOf Proxy# "maybe'workerVersionCapabilities"
_
    = ((Maybe WorkerVersionCapabilities
  -> f (Maybe WorkerVersionCapabilities))
 -> PollActivityTaskQueueRequest -> f PollActivityTaskQueueRequest)
-> ((Maybe WorkerVersionCapabilities
     -> f (Maybe WorkerVersionCapabilities))
    -> Maybe WorkerVersionCapabilities
    -> f (Maybe WorkerVersionCapabilities))
-> (Maybe WorkerVersionCapabilities
    -> f (Maybe WorkerVersionCapabilities))
-> PollActivityTaskQueueRequest
-> f PollActivityTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueRequest -> Maybe WorkerVersionCapabilities)
-> (PollActivityTaskQueueRequest
    -> Maybe WorkerVersionCapabilities -> PollActivityTaskQueueRequest)
-> Lens
     PollActivityTaskQueueRequest
     PollActivityTaskQueueRequest
     (Maybe WorkerVersionCapabilities)
     (Maybe WorkerVersionCapabilities)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueRequest -> Maybe WorkerVersionCapabilities
_PollActivityTaskQueueRequest'workerVersionCapabilities
           (\ PollActivityTaskQueueRequest
x__ Maybe WorkerVersionCapabilities
y__
              -> PollActivityTaskQueueRequest
x__
                   {_PollActivityTaskQueueRequest'workerVersionCapabilities = y__}))
        (Maybe WorkerVersionCapabilities
 -> f (Maybe WorkerVersionCapabilities))
-> Maybe WorkerVersionCapabilities
-> f (Maybe WorkerVersionCapabilities)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message PollActivityTaskQueueRequest where
  messageName :: Proxy PollActivityTaskQueueRequest -> Text
messageName Proxy PollActivityTaskQueueRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.PollActivityTaskQueueRequest"
  packedMessageDescriptor :: Proxy PollActivityTaskQueueRequest -> ByteString
packedMessageDescriptor Proxy PollActivityTaskQueueRequest
_
    = ByteString
"\n\
      \\FSPollActivityTaskQueueRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2C\n\
      \\n\
      \task_queue\CAN\STX \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC2\SUB\n\
      \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2\\\n\
      \\DC3task_queue_metadata\CAN\EOT \SOH(\v2,.temporal.api.taskqueue.v1.TaskQueueMetadataR\DC1taskQueueMetadata\DC2q\n\
      \\ESCworker_version_capabilities\CAN\ENQ \SOH(\v21.temporal.api.common.v1.WorkerVersionCapabilitiesR\EMworkerVersionCapabilities"
  packedFileDescriptor :: Proxy PollActivityTaskQueueRequest -> ByteString
packedFileDescriptor Proxy PollActivityTaskQueueRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor PollActivityTaskQueueRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor PollActivityTaskQueueRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PollActivityTaskQueueRequest Text
-> FieldDescriptor PollActivityTaskQueueRequest
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
     PollActivityTaskQueueRequest PollActivityTaskQueueRequest Text Text
-> FieldAccessor PollActivityTaskQueueRequest 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 PollActivityTaskQueueRequest
        taskQueue__field_descriptor :: FieldDescriptor PollActivityTaskQueueRequest
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueue
-> FieldAccessor PollActivityTaskQueueRequest TaskQueue
-> FieldDescriptor PollActivityTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_queue"
              (MessageOrGroup -> FieldTypeDescriptor TaskQueue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)
              (Lens
  PollActivityTaskQueueRequest
  PollActivityTaskQueueRequest
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> FieldAccessor PollActivityTaskQueueRequest TaskQueue
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueRequest
        identity__field_descriptor :: FieldDescriptor PollActivityTaskQueueRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PollActivityTaskQueueRequest Text
-> FieldDescriptor PollActivityTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     PollActivityTaskQueueRequest PollActivityTaskQueueRequest Text Text
-> FieldAccessor PollActivityTaskQueueRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueRequest
        taskQueueMetadata__field_descriptor :: FieldDescriptor PollActivityTaskQueueRequest
taskQueueMetadata__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueueMetadata
-> FieldAccessor PollActivityTaskQueueRequest TaskQueueMetadata
-> FieldDescriptor PollActivityTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_queue_metadata"
              (MessageOrGroup -> FieldTypeDescriptor TaskQueueMetadata
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueueMetadata)
              (Lens
  PollActivityTaskQueueRequest
  PollActivityTaskQueueRequest
  (Maybe TaskQueueMetadata)
  (Maybe TaskQueueMetadata)
-> FieldAccessor PollActivityTaskQueueRequest TaskQueueMetadata
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueueMetadata")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueRequest
        workerVersionCapabilities__field_descriptor :: FieldDescriptor PollActivityTaskQueueRequest
workerVersionCapabilities__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionCapabilities
-> FieldAccessor
     PollActivityTaskQueueRequest WorkerVersionCapabilities
-> FieldDescriptor PollActivityTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_version_capabilities"
              (MessageOrGroup -> FieldTypeDescriptor WorkerVersionCapabilities
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities)
              (Lens
  PollActivityTaskQueueRequest
  PollActivityTaskQueueRequest
  (Maybe WorkerVersionCapabilities)
  (Maybe WorkerVersionCapabilities)
-> FieldAccessor
     PollActivityTaskQueueRequest WorkerVersionCapabilities
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workerVersionCapabilities")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueRequest
      in
        [(Tag, FieldDescriptor PollActivityTaskQueueRequest)]
-> Map Tag (FieldDescriptor PollActivityTaskQueueRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor PollActivityTaskQueueRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor PollActivityTaskQueueRequest
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor PollActivityTaskQueueRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor PollActivityTaskQueueRequest
taskQueueMetadata__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, 
            FieldDescriptor PollActivityTaskQueueRequest
workerVersionCapabilities__field_descriptor)]
  unknownFields :: Lens' PollActivityTaskQueueRequest FieldSet
unknownFields
    = (PollActivityTaskQueueRequest -> FieldSet)
-> (PollActivityTaskQueueRequest
    -> FieldSet -> PollActivityTaskQueueRequest)
-> Lens' PollActivityTaskQueueRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        PollActivityTaskQueueRequest -> FieldSet
_PollActivityTaskQueueRequest'_unknownFields
        (\ PollActivityTaskQueueRequest
x__ FieldSet
y__
           -> PollActivityTaskQueueRequest
x__ {_PollActivityTaskQueueRequest'_unknownFields = y__})
  defMessage :: PollActivityTaskQueueRequest
defMessage
    = PollActivityTaskQueueRequest'_constructor
        {_PollActivityTaskQueueRequest'namespace :: Text
_PollActivityTaskQueueRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollActivityTaskQueueRequest'taskQueue :: Maybe TaskQueue
_PollActivityTaskQueueRequest'taskQueue = Maybe TaskQueue
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueRequest'identity :: Text
_PollActivityTaskQueueRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollActivityTaskQueueRequest'taskQueueMetadata :: Maybe TaskQueueMetadata
_PollActivityTaskQueueRequest'taskQueueMetadata = Maybe TaskQueueMetadata
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueRequest'workerVersionCapabilities :: Maybe WorkerVersionCapabilities
_PollActivityTaskQueueRequest'workerVersionCapabilities = Maybe WorkerVersionCapabilities
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueRequest'_unknownFields :: FieldSet
_PollActivityTaskQueueRequest'_unknownFields = []}
  parseMessage :: Parser PollActivityTaskQueueRequest
parseMessage
    = let
        loop ::
          PollActivityTaskQueueRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser PollActivityTaskQueueRequest
        loop :: PollActivityTaskQueueRequest -> Parser PollActivityTaskQueueRequest
loop PollActivityTaskQueueRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser TaskQueue -> String -> Parser TaskQueue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"task_queue"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskQueue") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
34
                          -> do y <- Parser TaskQueueMetadata -> String -> Parser TaskQueueMetadata
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"task_queue_metadata"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"taskQueueMetadata") y x)
                        Word64
42
                          -> do y <- Parser WorkerVersionCapabilities
-> String -> Parser WorkerVersionCapabilities
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"worker_version_capabilities"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerVersionCapabilities") 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 PollActivityTaskQueueRequest
-> String -> Parser PollActivityTaskQueueRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do PollActivityTaskQueueRequest -> Parser PollActivityTaskQueueRequest
loop PollActivityTaskQueueRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"PollActivityTaskQueueRequest"
  buildMessage :: PollActivityTaskQueueRequest -> Builder
buildMessage
    = \ PollActivityTaskQueueRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  PollActivityTaskQueueRequest
  PollActivityTaskQueueRequest
  Text
  Text
-> PollActivityTaskQueueRequest -> 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") PollActivityTaskQueueRequest
_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 TaskQueue)
  PollActivityTaskQueueRequest
  PollActivityTaskQueueRequest
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> PollActivityTaskQueueRequest -> Maybe TaskQueue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue") PollActivityTaskQueueRequest
_x
                 of
                   Maybe TaskQueue
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just TaskQueue
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (TaskQueue -> ByteString) -> TaskQueue -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             TaskQueue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueue
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v = FoldLike
  Text
  PollActivityTaskQueueRequest
  PollActivityTaskQueueRequest
  Text
  Text
-> PollActivityTaskQueueRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") PollActivityTaskQueueRequest
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe TaskQueueMetadata)
  PollActivityTaskQueueRequest
  PollActivityTaskQueueRequest
  (Maybe TaskQueueMetadata)
  (Maybe TaskQueueMetadata)
-> PollActivityTaskQueueRequest -> Maybe TaskQueueMetadata
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'taskQueueMetadata") PollActivityTaskQueueRequest
_x
                       of
                         Maybe TaskQueueMetadata
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just TaskQueueMetadata
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (TaskQueueMetadata -> ByteString)
-> TaskQueueMetadata
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   TaskQueueMetadata -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueueMetadata
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe WorkerVersionCapabilities)
  PollActivityTaskQueueRequest
  PollActivityTaskQueueRequest
  (Maybe WorkerVersionCapabilities)
  (Maybe WorkerVersionCapabilities)
-> PollActivityTaskQueueRequest -> Maybe WorkerVersionCapabilities
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'workerVersionCapabilities") PollActivityTaskQueueRequest
_x
                          of
                            Maybe WorkerVersionCapabilities
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just WorkerVersionCapabilities
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (WorkerVersionCapabilities -> ByteString)
-> WorkerVersionCapabilities
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      WorkerVersionCapabilities -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkerVersionCapabilities
_v))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  PollActivityTaskQueueRequest
  PollActivityTaskQueueRequest
  FieldSet
  FieldSet
-> PollActivityTaskQueueRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  PollActivityTaskQueueRequest
  PollActivityTaskQueueRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PollActivityTaskQueueRequest FieldSet
Data.ProtoLens.unknownFields PollActivityTaskQueueRequest
_x))))))
instance Control.DeepSeq.NFData PollActivityTaskQueueRequest where
  rnf :: PollActivityTaskQueueRequest -> ()
rnf
    = \ PollActivityTaskQueueRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (PollActivityTaskQueueRequest -> FieldSet
_PollActivityTaskQueueRequest'_unknownFields PollActivityTaskQueueRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (PollActivityTaskQueueRequest -> Text
_PollActivityTaskQueueRequest'namespace PollActivityTaskQueueRequest
x__)
                (Maybe TaskQueue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (PollActivityTaskQueueRequest -> Maybe TaskQueue
_PollActivityTaskQueueRequest'taskQueue PollActivityTaskQueueRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (PollActivityTaskQueueRequest -> Text
_PollActivityTaskQueueRequest'identity PollActivityTaskQueueRequest
x__)
                      (Maybe TaskQueueMetadata -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (PollActivityTaskQueueRequest -> Maybe TaskQueueMetadata
_PollActivityTaskQueueRequest'taskQueueMetadata PollActivityTaskQueueRequest
x__)
                         (Maybe WorkerVersionCapabilities -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (PollActivityTaskQueueRequest -> Maybe WorkerVersionCapabilities
_PollActivityTaskQueueRequest'workerVersionCapabilities PollActivityTaskQueueRequest
x__)
                            ())))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskToken' @:: Lens' PollActivityTaskQueueResponse Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowNamespace' @:: Lens' PollActivityTaskQueueResponse Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowType' @:: Lens' PollActivityTaskQueueResponse Proto.Temporal.Api.Common.V1.Message.WorkflowType@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowType' @:: Lens' PollActivityTaskQueueResponse (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowExecution' @:: Lens' PollActivityTaskQueueResponse Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowExecution' @:: Lens' PollActivityTaskQueueResponse (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.activityType' @:: Lens' PollActivityTaskQueueResponse Proto.Temporal.Api.Common.V1.Message.ActivityType@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'activityType' @:: Lens' PollActivityTaskQueueResponse (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.ActivityType)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.activityId' @:: Lens' PollActivityTaskQueueResponse Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.header' @:: Lens' PollActivityTaskQueueResponse Proto.Temporal.Api.Common.V1.Message.Header@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'header' @:: Lens' PollActivityTaskQueueResponse (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.input' @:: Lens' PollActivityTaskQueueResponse Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'input' @:: Lens' PollActivityTaskQueueResponse (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.heartbeatDetails' @:: Lens' PollActivityTaskQueueResponse Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'heartbeatDetails' @:: Lens' PollActivityTaskQueueResponse (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.scheduledTime' @:: Lens' PollActivityTaskQueueResponse Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'scheduledTime' @:: Lens' PollActivityTaskQueueResponse (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.currentAttemptScheduledTime' @:: Lens' PollActivityTaskQueueResponse Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'currentAttemptScheduledTime' @:: Lens' PollActivityTaskQueueResponse (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.startedTime' @:: Lens' PollActivityTaskQueueResponse Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'startedTime' @:: Lens' PollActivityTaskQueueResponse (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.attempt' @:: Lens' PollActivityTaskQueueResponse Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.scheduleToCloseTimeout' @:: Lens' PollActivityTaskQueueResponse Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'scheduleToCloseTimeout' @:: Lens' PollActivityTaskQueueResponse (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.startToCloseTimeout' @:: Lens' PollActivityTaskQueueResponse Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'startToCloseTimeout' @:: Lens' PollActivityTaskQueueResponse (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.heartbeatTimeout' @:: Lens' PollActivityTaskQueueResponse Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'heartbeatTimeout' @:: Lens' PollActivityTaskQueueResponse (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.retryPolicy' @:: Lens' PollActivityTaskQueueResponse Proto.Temporal.Api.Common.V1.Message.RetryPolicy@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'retryPolicy' @:: Lens' PollActivityTaskQueueResponse (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy)@ -}
data PollActivityTaskQueueResponse
  = PollActivityTaskQueueResponse'_constructor {PollActivityTaskQueueResponse -> ByteString
_PollActivityTaskQueueResponse'taskToken :: !Data.ByteString.ByteString,
                                                PollActivityTaskQueueResponse -> Text
_PollActivityTaskQueueResponse'workflowNamespace :: !Data.Text.Text,
                                                PollActivityTaskQueueResponse -> Maybe WorkflowType
_PollActivityTaskQueueResponse'workflowType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
                                                PollActivityTaskQueueResponse -> Maybe WorkflowExecution
_PollActivityTaskQueueResponse'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                PollActivityTaskQueueResponse -> Maybe ActivityType
_PollActivityTaskQueueResponse'activityType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.ActivityType),
                                                PollActivityTaskQueueResponse -> Text
_PollActivityTaskQueueResponse'activityId :: !Data.Text.Text,
                                                PollActivityTaskQueueResponse -> Maybe Header
_PollActivityTaskQueueResponse'header :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header),
                                                PollActivityTaskQueueResponse -> Maybe Payloads
_PollActivityTaskQueueResponse'input :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                PollActivityTaskQueueResponse -> Maybe Payloads
_PollActivityTaskQueueResponse'heartbeatDetails :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                PollActivityTaskQueueResponse -> Maybe Timestamp
_PollActivityTaskQueueResponse'scheduledTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                                PollActivityTaskQueueResponse -> Maybe Timestamp
_PollActivityTaskQueueResponse'currentAttemptScheduledTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                                PollActivityTaskQueueResponse -> Maybe Timestamp
_PollActivityTaskQueueResponse'startedTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                                PollActivityTaskQueueResponse -> Int32
_PollActivityTaskQueueResponse'attempt :: !Data.Int.Int32,
                                                PollActivityTaskQueueResponse -> Maybe Duration
_PollActivityTaskQueueResponse'scheduleToCloseTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                PollActivityTaskQueueResponse -> Maybe Duration
_PollActivityTaskQueueResponse'startToCloseTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                PollActivityTaskQueueResponse -> Maybe Duration
_PollActivityTaskQueueResponse'heartbeatTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                PollActivityTaskQueueResponse -> Maybe RetryPolicy
_PollActivityTaskQueueResponse'retryPolicy :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy),
                                                PollActivityTaskQueueResponse -> FieldSet
_PollActivityTaskQueueResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Bool
(PollActivityTaskQueueResponse
 -> PollActivityTaskQueueResponse -> Bool)
-> (PollActivityTaskQueueResponse
    -> PollActivityTaskQueueResponse -> Bool)
-> Eq PollActivityTaskQueueResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Bool
== :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Bool
$c/= :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Bool
/= :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Bool
Prelude.Eq, Eq PollActivityTaskQueueResponse
Eq PollActivityTaskQueueResponse =>
(PollActivityTaskQueueResponse
 -> PollActivityTaskQueueResponse -> Ordering)
-> (PollActivityTaskQueueResponse
    -> PollActivityTaskQueueResponse -> Bool)
-> (PollActivityTaskQueueResponse
    -> PollActivityTaskQueueResponse -> Bool)
-> (PollActivityTaskQueueResponse
    -> PollActivityTaskQueueResponse -> Bool)
-> (PollActivityTaskQueueResponse
    -> PollActivityTaskQueueResponse -> Bool)
-> (PollActivityTaskQueueResponse
    -> PollActivityTaskQueueResponse -> PollActivityTaskQueueResponse)
-> (PollActivityTaskQueueResponse
    -> PollActivityTaskQueueResponse -> PollActivityTaskQueueResponse)
-> Ord PollActivityTaskQueueResponse
PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Bool
PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Ordering
PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> PollActivityTaskQueueResponse
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 :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Ordering
compare :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Ordering
$c< :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Bool
< :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Bool
$c<= :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Bool
<= :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Bool
$c> :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Bool
> :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Bool
$c>= :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Bool
>= :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> Bool
$cmax :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> PollActivityTaskQueueResponse
max :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> PollActivityTaskQueueResponse
$cmin :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> PollActivityTaskQueueResponse
min :: PollActivityTaskQueueResponse
-> PollActivityTaskQueueResponse -> PollActivityTaskQueueResponse
Prelude.Ord)
instance Prelude.Show PollActivityTaskQueueResponse where
  showsPrec :: Int -> PollActivityTaskQueueResponse -> ShowS
showsPrec Int
_ PollActivityTaskQueueResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (PollActivityTaskQueueResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PollActivityTaskQueueResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "taskToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskToken"
-> (ByteString -> f ByteString)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "taskToken"
_
    = ((ByteString -> f ByteString)
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> ByteString)
-> (PollActivityTaskQueueResponse
    -> ByteString -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> ByteString
_PollActivityTaskQueueResponse'taskToken
           (\ PollActivityTaskQueueResponse
x__ ByteString
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'taskToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "workflowNamespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowNamespace"
-> (Text -> f Text)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "workflowNamespace"
_
    = ((Text -> f Text)
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Text)
-> (PollActivityTaskQueueResponse
    -> Text -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Text
_PollActivityTaskQueueResponse'workflowNamespace
           (\ PollActivityTaskQueueResponse
x__ Text
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'workflowNamespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "workflowType" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (WorkflowType -> f WorkflowType)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((WorkflowType -> f WorkflowType)
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe WorkflowType)
-> (PollActivityTaskQueueResponse
    -> Maybe WorkflowType -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe WorkflowType
_PollActivityTaskQueueResponse'workflowType
           (\ PollActivityTaskQueueResponse
x__ Maybe WorkflowType
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'workflowType = y__}))
        (WorkflowType -> Lens' (Maybe WorkflowType) WorkflowType
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowType
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "maybe'workflowType" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowType"
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "maybe'workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe WorkflowType)
-> (PollActivityTaskQueueResponse
    -> Maybe WorkflowType -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe WorkflowType
_PollActivityTaskQueueResponse'workflowType
           (\ PollActivityTaskQueueResponse
x__ Maybe WorkflowType
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'workflowType = y__}))
        (Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe WorkflowExecution)
-> (PollActivityTaskQueueResponse
    -> Maybe WorkflowExecution -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe WorkflowExecution
_PollActivityTaskQueueResponse'workflowExecution
           (\ PollActivityTaskQueueResponse
x__ Maybe WorkflowExecution
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'workflowExecution = y__}))
        (WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe WorkflowExecution)
-> (PollActivityTaskQueueResponse
    -> Maybe WorkflowExecution -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe WorkflowExecution
_PollActivityTaskQueueResponse'workflowExecution
           (\ PollActivityTaskQueueResponse
x__ Maybe WorkflowExecution
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "activityType" Proto.Temporal.Api.Common.V1.Message.ActivityType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityType"
-> (ActivityType -> f ActivityType)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "activityType"
_
    = ((Maybe ActivityType -> f (Maybe ActivityType))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((ActivityType -> f ActivityType)
    -> Maybe ActivityType -> f (Maybe ActivityType))
-> (ActivityType -> f ActivityType)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe ActivityType)
-> (PollActivityTaskQueueResponse
    -> Maybe ActivityType -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe ActivityType)
     (Maybe ActivityType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe ActivityType
_PollActivityTaskQueueResponse'activityType
           (\ PollActivityTaskQueueResponse
x__ Maybe ActivityType
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'activityType = y__}))
        (ActivityType -> Lens' (Maybe ActivityType) ActivityType
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ActivityType
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "maybe'activityType" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.ActivityType) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'activityType"
-> (Maybe ActivityType -> f (Maybe ActivityType))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "maybe'activityType"
_
    = ((Maybe ActivityType -> f (Maybe ActivityType))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Maybe ActivityType -> f (Maybe ActivityType))
    -> Maybe ActivityType -> f (Maybe ActivityType))
-> (Maybe ActivityType -> f (Maybe ActivityType))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe ActivityType)
-> (PollActivityTaskQueueResponse
    -> Maybe ActivityType -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe ActivityType)
     (Maybe ActivityType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe ActivityType
_PollActivityTaskQueueResponse'activityType
           (\ PollActivityTaskQueueResponse
x__ Maybe ActivityType
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'activityType = y__}))
        (Maybe ActivityType -> f (Maybe ActivityType))
-> Maybe ActivityType -> f (Maybe ActivityType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "activityId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityId"
-> (Text -> f Text)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "activityId"
_
    = ((Text -> f Text)
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Text)
-> (PollActivityTaskQueueResponse
    -> Text -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Text
_PollActivityTaskQueueResponse'activityId
           (\ PollActivityTaskQueueResponse
x__ Text
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'activityId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "header" Proto.Temporal.Api.Common.V1.Message.Header where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "header"
-> (Header -> f Header)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Header -> f Header) -> Maybe Header -> f (Maybe Header))
-> (Header -> f Header)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Header)
-> (PollActivityTaskQueueResponse
    -> Maybe Header -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Header
_PollActivityTaskQueueResponse'header
           (\ PollActivityTaskQueueResponse
x__ Maybe Header
y__ -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'header = y__}))
        (Header -> Lens' (Maybe Header) Header
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Header
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "maybe'header" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'header"
-> (Maybe Header -> f (Maybe Header))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "maybe'header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Maybe Header -> f (Maybe Header))
    -> Maybe Header -> f (Maybe Header))
-> (Maybe Header -> f (Maybe Header))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Header)
-> (PollActivityTaskQueueResponse
    -> Maybe Header -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Header
_PollActivityTaskQueueResponse'header
           (\ PollActivityTaskQueueResponse
x__ Maybe Header
y__ -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'header = y__}))
        (Maybe Header -> f (Maybe Header))
-> Maybe Header -> f (Maybe Header)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "input" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "input"
-> (Payloads -> f Payloads)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Payloads)
-> (PollActivityTaskQueueResponse
    -> Maybe Payloads -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Payloads
_PollActivityTaskQueueResponse'input
           (\ PollActivityTaskQueueResponse
x__ Maybe Payloads
y__ -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'input = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "maybe'input" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'input"
-> (Maybe Payloads -> f (Maybe Payloads))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "maybe'input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Payloads)
-> (PollActivityTaskQueueResponse
    -> Maybe Payloads -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Payloads
_PollActivityTaskQueueResponse'input
           (\ PollActivityTaskQueueResponse
x__ Maybe Payloads
y__ -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'input = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "heartbeatDetails" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "heartbeatDetails"
-> (Payloads -> f Payloads)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "heartbeatDetails"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Payloads)
-> (PollActivityTaskQueueResponse
    -> Maybe Payloads -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Payloads
_PollActivityTaskQueueResponse'heartbeatDetails
           (\ PollActivityTaskQueueResponse
x__ Maybe Payloads
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'heartbeatDetails = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "maybe'heartbeatDetails" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'heartbeatDetails"
-> (Maybe Payloads -> f (Maybe Payloads))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "maybe'heartbeatDetails"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Payloads)
-> (PollActivityTaskQueueResponse
    -> Maybe Payloads -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Payloads
_PollActivityTaskQueueResponse'heartbeatDetails
           (\ PollActivityTaskQueueResponse
x__ Maybe Payloads
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'heartbeatDetails = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "scheduledTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledTime"
-> (Timestamp -> f Timestamp)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "scheduledTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Timestamp)
-> (PollActivityTaskQueueResponse
    -> Maybe Timestamp -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Timestamp
_PollActivityTaskQueueResponse'scheduledTime
           (\ PollActivityTaskQueueResponse
x__ Maybe Timestamp
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'scheduledTime = y__}))
        (Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "maybe'scheduledTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduledTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "maybe'scheduledTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Timestamp)
-> (PollActivityTaskQueueResponse
    -> Maybe Timestamp -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Timestamp
_PollActivityTaskQueueResponse'scheduledTime
           (\ PollActivityTaskQueueResponse
x__ Maybe Timestamp
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'scheduledTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "currentAttemptScheduledTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "currentAttemptScheduledTime"
-> (Timestamp -> f Timestamp)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "currentAttemptScheduledTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Timestamp)
-> (PollActivityTaskQueueResponse
    -> Maybe Timestamp -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Timestamp
_PollActivityTaskQueueResponse'currentAttemptScheduledTime
           (\ PollActivityTaskQueueResponse
x__ Maybe Timestamp
y__
              -> PollActivityTaskQueueResponse
x__
                   {_PollActivityTaskQueueResponse'currentAttemptScheduledTime = 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 PollActivityTaskQueueResponse "maybe'currentAttemptScheduledTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'currentAttemptScheduledTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "maybe'currentAttemptScheduledTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Timestamp)
-> (PollActivityTaskQueueResponse
    -> Maybe Timestamp -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Timestamp
_PollActivityTaskQueueResponse'currentAttemptScheduledTime
           (\ PollActivityTaskQueueResponse
x__ Maybe Timestamp
y__
              -> PollActivityTaskQueueResponse
x__
                   {_PollActivityTaskQueueResponse'currentAttemptScheduledTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "startedTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedTime"
-> (Timestamp -> f Timestamp)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "startedTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Timestamp)
-> (PollActivityTaskQueueResponse
    -> Maybe Timestamp -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Timestamp
_PollActivityTaskQueueResponse'startedTime
           (\ PollActivityTaskQueueResponse
x__ Maybe Timestamp
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'startedTime = y__}))
        (Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "maybe'startedTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startedTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "maybe'startedTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Timestamp)
-> (PollActivityTaskQueueResponse
    -> Maybe Timestamp -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Timestamp
_PollActivityTaskQueueResponse'startedTime
           (\ PollActivityTaskQueueResponse
x__ Maybe Timestamp
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'startedTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "attempt" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attempt"
-> (Int32 -> f Int32)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "attempt"
_
    = ((Int32 -> f Int32)
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Int32)
-> (PollActivityTaskQueueResponse
    -> Int32 -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Int32
_PollActivityTaskQueueResponse'attempt
           (\ PollActivityTaskQueueResponse
x__ Int32
y__ -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'attempt = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "scheduleToCloseTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleToCloseTimeout"
-> (Duration -> f Duration)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "scheduleToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Duration)
-> (PollActivityTaskQueueResponse
    -> Maybe Duration -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Duration
_PollActivityTaskQueueResponse'scheduleToCloseTimeout
           (\ PollActivityTaskQueueResponse
x__ Maybe Duration
y__
              -> PollActivityTaskQueueResponse
x__
                   {_PollActivityTaskQueueResponse'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 PollActivityTaskQueueResponse "maybe'scheduleToCloseTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduleToCloseTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "maybe'scheduleToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Duration)
-> (PollActivityTaskQueueResponse
    -> Maybe Duration -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Duration
_PollActivityTaskQueueResponse'scheduleToCloseTimeout
           (\ PollActivityTaskQueueResponse
x__ Maybe Duration
y__
              -> PollActivityTaskQueueResponse
x__
                   {_PollActivityTaskQueueResponse'scheduleToCloseTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "startToCloseTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startToCloseTimeout"
-> (Duration -> f Duration)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "startToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Duration)
-> (PollActivityTaskQueueResponse
    -> Maybe Duration -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Duration
_PollActivityTaskQueueResponse'startToCloseTimeout
           (\ PollActivityTaskQueueResponse
x__ Maybe Duration
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'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 PollActivityTaskQueueResponse "maybe'startToCloseTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startToCloseTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "maybe'startToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Duration)
-> (PollActivityTaskQueueResponse
    -> Maybe Duration -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Duration
_PollActivityTaskQueueResponse'startToCloseTimeout
           (\ PollActivityTaskQueueResponse
x__ Maybe Duration
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'startToCloseTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "heartbeatTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "heartbeatTimeout"
-> (Duration -> f Duration)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "heartbeatTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Duration)
-> (PollActivityTaskQueueResponse
    -> Maybe Duration -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Duration
_PollActivityTaskQueueResponse'heartbeatTimeout
           (\ PollActivityTaskQueueResponse
x__ Maybe Duration
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'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 PollActivityTaskQueueResponse "maybe'heartbeatTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'heartbeatTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "maybe'heartbeatTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe Duration)
-> (PollActivityTaskQueueResponse
    -> Maybe Duration -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe Duration
_PollActivityTaskQueueResponse'heartbeatTimeout
           (\ PollActivityTaskQueueResponse
x__ Maybe Duration
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'heartbeatTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollActivityTaskQueueResponse "retryPolicy" Proto.Temporal.Api.Common.V1.Message.RetryPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryPolicy"
-> (RetryPolicy -> f RetryPolicy)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((RetryPolicy -> f RetryPolicy)
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (RetryPolicy -> f RetryPolicy)
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe RetryPolicy)
-> (PollActivityTaskQueueResponse
    -> Maybe RetryPolicy -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe RetryPolicy
_PollActivityTaskQueueResponse'retryPolicy
           (\ PollActivityTaskQueueResponse
x__ Maybe RetryPolicy
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'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 PollActivityTaskQueueResponse "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))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
fieldOf Proxy# "maybe'retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> PollActivityTaskQueueResponse
 -> f PollActivityTaskQueueResponse)
-> ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> PollActivityTaskQueueResponse
-> f PollActivityTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollActivityTaskQueueResponse -> Maybe RetryPolicy)
-> (PollActivityTaskQueueResponse
    -> Maybe RetryPolicy -> PollActivityTaskQueueResponse)
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollActivityTaskQueueResponse -> Maybe RetryPolicy
_PollActivityTaskQueueResponse'retryPolicy
           (\ PollActivityTaskQueueResponse
x__ Maybe RetryPolicy
y__
              -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'retryPolicy = y__}))
        (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> Maybe RetryPolicy -> f (Maybe RetryPolicy)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message PollActivityTaskQueueResponse where
  messageName :: Proxy PollActivityTaskQueueResponse -> Text
messageName Proxy PollActivityTaskQueueResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.PollActivityTaskQueueResponse"
  packedMessageDescriptor :: Proxy PollActivityTaskQueueResponse -> ByteString
packedMessageDescriptor Proxy PollActivityTaskQueueResponse
_
    = ByteString
"\n\
      \\GSPollActivityTaskQueueResponse\DC2\GS\n\
      \\n\
      \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2-\n\
      \\DC2workflow_namespace\CAN\STX \SOH(\tR\DC1workflowNamespace\DC2I\n\
      \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2X\n\
      \\DC2workflow_execution\CAN\EOT \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
      \\ractivity_type\CAN\ENQ \SOH(\v2$.temporal.api.common.v1.ActivityTypeR\factivityType\DC2\US\n\
      \\vactivity_id\CAN\ACK \SOH(\tR\n\
      \activityId\DC26\n\
      \\ACKheader\CAN\a \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC26\n\
      \\ENQinput\CAN\b \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2M\n\
      \\DC1heartbeat_details\CAN\t \SOH(\v2 .temporal.api.common.v1.PayloadsR\DLEheartbeatDetails\DC2A\n\
      \\SOscheduled_time\CAN\n\
      \ \SOH(\v2\SUB.google.protobuf.TimestampR\rscheduledTime\DC2_\n\
      \\RScurrent_attempt_scheduled_time\CAN\v \SOH(\v2\SUB.google.protobuf.TimestampR\ESCcurrentAttemptScheduledTime\DC2=\n\
      \\fstarted_time\CAN\f \SOH(\v2\SUB.google.protobuf.TimestampR\vstartedTime\DC2\CAN\n\
      \\aattempt\CAN\r \SOH(\ENQR\aattempt\DC2T\n\
      \\EMschedule_to_close_timeout\CAN\SO \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToCloseTimeout\DC2N\n\
      \\SYNstart_to_close_timeout\CAN\SI \SOH(\v2\EM.google.protobuf.DurationR\DC3startToCloseTimeout\DC2F\n\
      \\DC1heartbeat_timeout\CAN\DLE \SOH(\v2\EM.google.protobuf.DurationR\DLEheartbeatTimeout\DC2F\n\
      \\fretry_policy\CAN\DC1 \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy"
  packedFileDescriptor :: Proxy PollActivityTaskQueueResponse -> ByteString
packedFileDescriptor Proxy PollActivityTaskQueueResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor PollActivityTaskQueueResponse)
fieldsByTag
    = let
        taskToken__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
taskToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor PollActivityTaskQueueResponse ByteString
-> FieldDescriptor PollActivityTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     ByteString
     ByteString
-> FieldAccessor PollActivityTaskQueueResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueResponse
        workflowNamespace__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
workflowNamespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PollActivityTaskQueueResponse Text
-> FieldDescriptor PollActivityTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_namespace"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     Text
     Text
-> FieldAccessor PollActivityTaskQueueResponse 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 @"workflowNamespace")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueResponse
        workflowType__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor PollActivityTaskQueueResponse WorkflowType
-> FieldDescriptor PollActivityTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_type"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowType
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowType)
              (Lens
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> FieldAccessor PollActivityTaskQueueResponse WorkflowType
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowType")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueResponse
        workflowExecution__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor PollActivityTaskQueueResponse WorkflowExecution
-> FieldDescriptor PollActivityTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
              (Lens
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor PollActivityTaskQueueResponse WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueResponse
        activityType__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
activityType__field_descriptor
          = String
-> FieldTypeDescriptor ActivityType
-> FieldAccessor PollActivityTaskQueueResponse ActivityType
-> FieldDescriptor PollActivityTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_type"
              (MessageOrGroup -> FieldTypeDescriptor ActivityType
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.ActivityType)
              (Lens
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe ActivityType)
  (Maybe ActivityType)
-> FieldAccessor PollActivityTaskQueueResponse ActivityType
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'activityType")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueResponse
        activityId__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
activityId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PollActivityTaskQueueResponse Text
-> FieldDescriptor PollActivityTaskQueueResponse
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
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     Text
     Text
-> FieldAccessor PollActivityTaskQueueResponse 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 PollActivityTaskQueueResponse
        header__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
header__field_descriptor
          = String
-> FieldTypeDescriptor Header
-> FieldAccessor PollActivityTaskQueueResponse Header
-> FieldDescriptor PollActivityTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"header"
              (MessageOrGroup -> FieldTypeDescriptor Header
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Header)
              (Lens
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Header)
  (Maybe Header)
-> FieldAccessor PollActivityTaskQueueResponse Header
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'header")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueResponse
        input__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
input__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor PollActivityTaskQueueResponse Payloads
-> FieldDescriptor PollActivityTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"input"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor PollActivityTaskQueueResponse Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'input")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueResponse
        heartbeatDetails__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
heartbeatDetails__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor PollActivityTaskQueueResponse Payloads
-> FieldDescriptor PollActivityTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"heartbeat_details"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor PollActivityTaskQueueResponse Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'heartbeatDetails")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueResponse
        scheduledTime__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
scheduledTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor PollActivityTaskQueueResponse Timestamp
-> FieldDescriptor PollActivityTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_time"
              (MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
              (Lens
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Timestamp)
  (Maybe Timestamp)
-> FieldAccessor PollActivityTaskQueueResponse Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduledTime")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueResponse
        currentAttemptScheduledTime__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
currentAttemptScheduledTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor PollActivityTaskQueueResponse Timestamp
-> FieldDescriptor PollActivityTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"current_attempt_scheduled_time"
              (MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
              (Lens
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Timestamp)
  (Maybe Timestamp)
-> FieldAccessor PollActivityTaskQueueResponse 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'currentAttemptScheduledTime")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueResponse
        startedTime__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
startedTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor PollActivityTaskQueueResponse Timestamp
-> FieldDescriptor PollActivityTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_time"
              (MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
              (Lens
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Timestamp)
  (Maybe Timestamp)
-> FieldAccessor PollActivityTaskQueueResponse Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startedTime")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueResponse
        attempt__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
attempt__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor PollActivityTaskQueueResponse Int32
-> FieldDescriptor PollActivityTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"attempt"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     PollActivityTaskQueueResponse
     PollActivityTaskQueueResponse
     Int32
     Int32
-> FieldAccessor PollActivityTaskQueueResponse Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt")) ::
              Data.ProtoLens.FieldDescriptor PollActivityTaskQueueResponse
        scheduleToCloseTimeout__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
scheduleToCloseTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor PollActivityTaskQueueResponse Duration
-> FieldDescriptor PollActivityTaskQueueResponse
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
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor PollActivityTaskQueueResponse 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 PollActivityTaskQueueResponse
        startToCloseTimeout__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
startToCloseTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor PollActivityTaskQueueResponse Duration
-> FieldDescriptor PollActivityTaskQueueResponse
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
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor PollActivityTaskQueueResponse 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 PollActivityTaskQueueResponse
        heartbeatTimeout__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
heartbeatTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor PollActivityTaskQueueResponse Duration
-> FieldDescriptor PollActivityTaskQueueResponse
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
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor PollActivityTaskQueueResponse 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 PollActivityTaskQueueResponse
        retryPolicy__field_descriptor :: FieldDescriptor PollActivityTaskQueueResponse
retryPolicy__field_descriptor
          = String
-> FieldTypeDescriptor RetryPolicy
-> FieldAccessor PollActivityTaskQueueResponse RetryPolicy
-> FieldDescriptor PollActivityTaskQueueResponse
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
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> FieldAccessor PollActivityTaskQueueResponse 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 PollActivityTaskQueueResponse
      in
        [(Tag, FieldDescriptor PollActivityTaskQueueResponse)]
-> Map Tag (FieldDescriptor PollActivityTaskQueueResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor PollActivityTaskQueueResponse
taskToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor PollActivityTaskQueueResponse
workflowNamespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor PollActivityTaskQueueResponse
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor PollActivityTaskQueueResponse
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor PollActivityTaskQueueResponse
activityType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor PollActivityTaskQueueResponse
activityId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor PollActivityTaskQueueResponse
header__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor PollActivityTaskQueueResponse
input__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor PollActivityTaskQueueResponse
heartbeatDetails__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor PollActivityTaskQueueResponse
scheduledTime__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, 
            FieldDescriptor PollActivityTaskQueueResponse
currentAttemptScheduledTime__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor PollActivityTaskQueueResponse
startedTime__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor PollActivityTaskQueueResponse
attempt__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
14, FieldDescriptor PollActivityTaskQueueResponse
scheduleToCloseTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
15, FieldDescriptor PollActivityTaskQueueResponse
startToCloseTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
16, FieldDescriptor PollActivityTaskQueueResponse
heartbeatTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
17, FieldDescriptor PollActivityTaskQueueResponse
retryPolicy__field_descriptor)]
  unknownFields :: Lens' PollActivityTaskQueueResponse FieldSet
unknownFields
    = (PollActivityTaskQueueResponse -> FieldSet)
-> (PollActivityTaskQueueResponse
    -> FieldSet -> PollActivityTaskQueueResponse)
-> Lens' PollActivityTaskQueueResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        PollActivityTaskQueueResponse -> FieldSet
_PollActivityTaskQueueResponse'_unknownFields
        (\ PollActivityTaskQueueResponse
x__ FieldSet
y__
           -> PollActivityTaskQueueResponse
x__ {_PollActivityTaskQueueResponse'_unknownFields = y__})
  defMessage :: PollActivityTaskQueueResponse
defMessage
    = PollActivityTaskQueueResponse'_constructor
        {_PollActivityTaskQueueResponse'taskToken :: ByteString
_PollActivityTaskQueueResponse'taskToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollActivityTaskQueueResponse'workflowNamespace :: Text
_PollActivityTaskQueueResponse'workflowNamespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollActivityTaskQueueResponse'workflowType :: Maybe WorkflowType
_PollActivityTaskQueueResponse'workflowType = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueResponse'workflowExecution :: Maybe WorkflowExecution
_PollActivityTaskQueueResponse'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueResponse'activityType :: Maybe ActivityType
_PollActivityTaskQueueResponse'activityType = Maybe ActivityType
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueResponse'activityId :: Text
_PollActivityTaskQueueResponse'activityId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollActivityTaskQueueResponse'header :: Maybe Header
_PollActivityTaskQueueResponse'header = Maybe Header
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueResponse'input :: Maybe Payloads
_PollActivityTaskQueueResponse'input = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueResponse'heartbeatDetails :: Maybe Payloads
_PollActivityTaskQueueResponse'heartbeatDetails = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueResponse'scheduledTime :: Maybe Timestamp
_PollActivityTaskQueueResponse'scheduledTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueResponse'currentAttemptScheduledTime :: Maybe Timestamp
_PollActivityTaskQueueResponse'currentAttemptScheduledTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueResponse'startedTime :: Maybe Timestamp
_PollActivityTaskQueueResponse'startedTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueResponse'attempt :: Int32
_PollActivityTaskQueueResponse'attempt = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollActivityTaskQueueResponse'scheduleToCloseTimeout :: Maybe Duration
_PollActivityTaskQueueResponse'scheduleToCloseTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueResponse'startToCloseTimeout :: Maybe Duration
_PollActivityTaskQueueResponse'startToCloseTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueResponse'heartbeatTimeout :: Maybe Duration
_PollActivityTaskQueueResponse'heartbeatTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueResponse'retryPolicy :: Maybe RetryPolicy
_PollActivityTaskQueueResponse'retryPolicy = Maybe RetryPolicy
forall a. Maybe a
Prelude.Nothing,
         _PollActivityTaskQueueResponse'_unknownFields :: FieldSet
_PollActivityTaskQueueResponse'_unknownFields = []}
  parseMessage :: Parser PollActivityTaskQueueResponse
parseMessage
    = let
        loop ::
          PollActivityTaskQueueResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser PollActivityTaskQueueResponse
        loop :: PollActivityTaskQueueResponse
-> Parser PollActivityTaskQueueResponse
loop PollActivityTaskQueueResponse
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 ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"task_token"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskToken") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"workflow_namespace"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowNamespace") y x)
                        Word64
26
                          -> do y <- Parser WorkflowType -> String -> Parser WorkflowType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowType") y x)
                        Word64
34
                          -> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                        Word64
42
                          -> do y <- Parser ActivityType -> String -> Parser ActivityType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"activity_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"activityType") y x)
                        Word64
50
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"activity_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"activityId") y x)
                        Word64
58
                          -> do y <- Parser Header -> String -> Parser Header
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"header"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"header") y x)
                        Word64
66
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"input"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"input") y x)
                        Word64
74
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"heartbeat_details"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"heartbeatDetails") y x)
                        Word64
82
                          -> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"scheduled_time"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledTime") y x)
                        Word64
90
                          -> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"current_attempt_scheduled_time"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"currentAttemptScheduledTime") y
                                     x)
                        Word64
98
                          -> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"started_time"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"startedTime") y x)
                        Word64
104
                          -> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"attempt"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"attempt") y x)
                        Word64
114
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"schedule_to_close_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduleToCloseTimeout") y x)
                        Word64
122
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"start_to_close_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startToCloseTimeout") y x)
                        Word64
130
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"heartbeat_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"heartbeatTimeout") y x)
                        Word64
138
                          -> do y <- Parser RetryPolicy -> String -> Parser RetryPolicy
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"retry_policy"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"retryPolicy") y x)
                        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 PollActivityTaskQueueResponse
-> String -> Parser PollActivityTaskQueueResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do PollActivityTaskQueueResponse
-> Parser PollActivityTaskQueueResponse
loop PollActivityTaskQueueResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"PollActivityTaskQueueResponse"
  buildMessage :: PollActivityTaskQueueResponse -> Builder
buildMessage
    = \ PollActivityTaskQueueResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: ByteString
_v = FoldLike
  ByteString
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  ByteString
  ByteString
-> PollActivityTaskQueueResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken") PollActivityTaskQueueResponse
_x
              in
                if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
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
bs
                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         ByteString
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Text
_v
                     = FoldLike
  Text
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  Text
  Text
-> PollActivityTaskQueueResponse -> 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 @"workflowNamespace") PollActivityTaskQueueResponse
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe WorkflowType)
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> PollActivityTaskQueueResponse -> Maybe WorkflowType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                          (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowType") PollActivityTaskQueueResponse
_x
                    of
                      Maybe WorkflowType
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just WorkflowType
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (WorkflowType -> ByteString) -> WorkflowType -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                WorkflowType -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowType
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe WorkflowExecution)
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> PollActivityTaskQueueResponse -> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                             (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution") PollActivityTaskQueueResponse
_x
                       of
                         Maybe WorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just WorkflowExecution
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe ActivityType)
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe ActivityType)
  (Maybe ActivityType)
-> PollActivityTaskQueueResponse -> Maybe ActivityType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'activityType") PollActivityTaskQueueResponse
_x
                          of
                            Maybe ActivityType
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just ActivityType
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (ActivityType -> ByteString) -> ActivityType -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      ActivityType -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ActivityType
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v
                                 = FoldLike
  Text
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  Text
  Text
-> PollActivityTaskQueueResponse -> 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") PollActivityTaskQueueResponse
_x
                             in
                               if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                     ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        (\ ByteString
bs
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (case
                                    FoldLike
  (Maybe Header)
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Header)
  (Maybe Header)
-> PollActivityTaskQueueResponse -> Maybe Header
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                      (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'header") PollActivityTaskQueueResponse
_x
                                of
                                  Maybe Header
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  (Prelude.Just Header
_v)
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                         ((ByteString -> Builder)
-> (Header -> ByteString) -> Header -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                            (\ ByteString
bs
                                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                          (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                            Header -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Header
_v))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (case
                                       FoldLike
  (Maybe Payloads)
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Payloads)
  (Maybe Payloads)
-> PollActivityTaskQueueResponse -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'input") PollActivityTaskQueueResponse
_x
                                   of
                                     Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                     (Prelude.Just Payloads
_v)
                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                                            ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                               (\ ByteString
bs
                                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                             (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                               Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                                  (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (case
                                          FoldLike
  (Maybe Payloads)
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Payloads)
  (Maybe Payloads)
-> PollActivityTaskQueueResponse -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'heartbeatDetails")
                                            PollActivityTaskQueueResponse
_x
                                      of
                                        Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                        (Prelude.Just Payloads
_v)
                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
                                               ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                  (\ ByteString
bs
                                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                             ByteString
bs))
                                                  Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                                     (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (case
                                             FoldLike
  (Maybe Timestamp)
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Timestamp)
  (Maybe Timestamp)
-> PollActivityTaskQueueResponse -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduledTime")
                                               PollActivityTaskQueueResponse
_x
                                         of
                                           Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                           (Prelude.Just Timestamp
_v)
                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
                                                  ((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                     (\ ByteString
bs
                                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                   (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                ByteString
bs))
                                                     Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
                                        (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (case
                                                FoldLike
  (Maybe Timestamp)
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Timestamp)
  (Maybe Timestamp)
-> PollActivityTaskQueueResponse -> 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'currentAttemptScheduledTime")
                                                  PollActivityTaskQueueResponse
_x
                                            of
                                              Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                              (Prelude.Just Timestamp
_v)
                                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
90)
                                                     ((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                        (\ ByteString
bs
                                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                   ByteString
bs))
                                                        Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
                                           (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (case
                                                   FoldLike
  (Maybe Timestamp)
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Timestamp)
  (Maybe Timestamp)
-> PollActivityTaskQueueResponse -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                        @"maybe'startedTime")
                                                     PollActivityTaskQueueResponse
_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
98)
                                                        ((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                           (\ ByteString
bs
                                                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                         (ByteString -> Int
Data.ByteString.length
                                                                            ByteString
bs)))
                                                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                      ByteString
bs))
                                                           Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
                                              (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (let
                                                    _v :: Int32
_v
                                                      = FoldLike
  Int32
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  Int32
  Int32
-> PollActivityTaskQueueResponse -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                          (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt") PollActivityTaskQueueResponse
_x
                                                  in
                                                    if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
                                                         Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                        Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                    else
                                                        Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                             Word64
104)
                                                          ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                             Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                             Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                                                 (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (case
                                                         FoldLike
  (Maybe Duration)
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Duration)
  (Maybe Duration)
-> PollActivityTaskQueueResponse -> 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")
                                                           PollActivityTaskQueueResponse
_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
114)
                                                              ((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)
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Duration)
  (Maybe Duration)
-> PollActivityTaskQueueResponse -> 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")
                                                              PollActivityTaskQueueResponse
_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
122)
                                                                 ((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)
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe Duration)
  (Maybe Duration)
-> PollActivityTaskQueueResponse -> 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")
                                                                 PollActivityTaskQueueResponse
_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
130)
                                                                    ((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)
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> PollActivityTaskQueueResponse -> 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")
                                                                    PollActivityTaskQueueResponse
_x
                                                              of
                                                                Maybe RetryPolicy
Prelude.Nothing
                                                                  -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                                (Prelude.Just RetryPolicy
_v)
                                                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                          Word64
138)
                                                                       ((ByteString -> Builder)
-> (RetryPolicy -> ByteString) -> RetryPolicy -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                          (\ ByteString
bs
                                                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                        (ByteString -> Int
Data.ByteString.length
                                                                                           ByteString
bs)))
                                                                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                     ByteString
bs))
                                                                          RetryPolicy -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                          RetryPolicy
_v))
                                                             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                                                (FoldLike
  FieldSet
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  FieldSet
  FieldSet
-> PollActivityTaskQueueResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                   FoldLike
  FieldSet
  PollActivityTaskQueueResponse
  PollActivityTaskQueueResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PollActivityTaskQueueResponse FieldSet
Data.ProtoLens.unknownFields
                                                                   PollActivityTaskQueueResponse
_x))))))))))))))))))
instance Control.DeepSeq.NFData PollActivityTaskQueueResponse where
  rnf :: PollActivityTaskQueueResponse -> ()
rnf
    = \ PollActivityTaskQueueResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (PollActivityTaskQueueResponse -> FieldSet
_PollActivityTaskQueueResponse'_unknownFields PollActivityTaskQueueResponse
x__)
             (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (PollActivityTaskQueueResponse -> ByteString
_PollActivityTaskQueueResponse'taskToken PollActivityTaskQueueResponse
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (PollActivityTaskQueueResponse -> Text
_PollActivityTaskQueueResponse'workflowNamespace PollActivityTaskQueueResponse
x__)
                   (Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (PollActivityTaskQueueResponse -> Maybe WorkflowType
_PollActivityTaskQueueResponse'workflowType PollActivityTaskQueueResponse
x__)
                      (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (PollActivityTaskQueueResponse -> Maybe WorkflowExecution
_PollActivityTaskQueueResponse'workflowExecution PollActivityTaskQueueResponse
x__)
                         (Maybe ActivityType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (PollActivityTaskQueueResponse -> Maybe ActivityType
_PollActivityTaskQueueResponse'activityType PollActivityTaskQueueResponse
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (PollActivityTaskQueueResponse -> Text
_PollActivityTaskQueueResponse'activityId PollActivityTaskQueueResponse
x__)
                               (Maybe Header -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (PollActivityTaskQueueResponse -> Maybe Header
_PollActivityTaskQueueResponse'header PollActivityTaskQueueResponse
x__)
                                  (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (PollActivityTaskQueueResponse -> Maybe Payloads
_PollActivityTaskQueueResponse'input PollActivityTaskQueueResponse
x__)
                                     (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (PollActivityTaskQueueResponse -> Maybe Payloads
_PollActivityTaskQueueResponse'heartbeatDetails PollActivityTaskQueueResponse
x__)
                                        (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (PollActivityTaskQueueResponse -> Maybe Timestamp
_PollActivityTaskQueueResponse'scheduledTime PollActivityTaskQueueResponse
x__)
                                           (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (PollActivityTaskQueueResponse -> Maybe Timestamp
_PollActivityTaskQueueResponse'currentAttemptScheduledTime
                                                 PollActivityTaskQueueResponse
x__)
                                              (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (PollActivityTaskQueueResponse -> Maybe Timestamp
_PollActivityTaskQueueResponse'startedTime PollActivityTaskQueueResponse
x__)
                                                 (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (PollActivityTaskQueueResponse -> Int32
_PollActivityTaskQueueResponse'attempt PollActivityTaskQueueResponse
x__)
                                                    (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                       (PollActivityTaskQueueResponse -> Maybe Duration
_PollActivityTaskQueueResponse'scheduleToCloseTimeout
                                                          PollActivityTaskQueueResponse
x__)
                                                       (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                          (PollActivityTaskQueueResponse -> Maybe Duration
_PollActivityTaskQueueResponse'startToCloseTimeout
                                                             PollActivityTaskQueueResponse
x__)
                                                          (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                             (PollActivityTaskQueueResponse -> Maybe Duration
_PollActivityTaskQueueResponse'heartbeatTimeout
                                                                PollActivityTaskQueueResponse
x__)
                                                             (Maybe RetryPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                (PollActivityTaskQueueResponse -> Maybe RetryPolicy
_PollActivityTaskQueueResponse'retryPolicy
                                                                   PollActivityTaskQueueResponse
x__)
                                                                ())))))))))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' PollNexusTaskQueueRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' PollNexusTaskQueueRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueue' @:: Lens' PollNexusTaskQueueRequest Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'taskQueue' @:: Lens' PollNexusTaskQueueRequest (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workerVersionCapabilities' @:: Lens' PollNexusTaskQueueRequest Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workerVersionCapabilities' @:: Lens' PollNexusTaskQueueRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities)@ -}
data PollNexusTaskQueueRequest
  = PollNexusTaskQueueRequest'_constructor {PollNexusTaskQueueRequest -> Text
_PollNexusTaskQueueRequest'namespace :: !Data.Text.Text,
                                            PollNexusTaskQueueRequest -> Text
_PollNexusTaskQueueRequest'identity :: !Data.Text.Text,
                                            PollNexusTaskQueueRequest -> Maybe TaskQueue
_PollNexusTaskQueueRequest'taskQueue :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue),
                                            PollNexusTaskQueueRequest -> Maybe WorkerVersionCapabilities
_PollNexusTaskQueueRequest'workerVersionCapabilities :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities),
                                            PollNexusTaskQueueRequest -> FieldSet
_PollNexusTaskQueueRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool
(PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool)
-> (PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool)
-> Eq PollNexusTaskQueueRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool
== :: PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool
$c/= :: PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool
/= :: PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool
Prelude.Eq, Eq PollNexusTaskQueueRequest
Eq PollNexusTaskQueueRequest =>
(PollNexusTaskQueueRequest
 -> PollNexusTaskQueueRequest -> Ordering)
-> (PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool)
-> (PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool)
-> (PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool)
-> (PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool)
-> (PollNexusTaskQueueRequest
    -> PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest)
-> (PollNexusTaskQueueRequest
    -> PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest)
-> Ord PollNexusTaskQueueRequest
PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool
PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Ordering
PollNexusTaskQueueRequest
-> PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest
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 :: PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Ordering
compare :: PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Ordering
$c< :: PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool
< :: PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool
$c<= :: PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool
<= :: PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool
$c> :: PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool
> :: PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool
$c>= :: PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool
>= :: PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest -> Bool
$cmax :: PollNexusTaskQueueRequest
-> PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest
max :: PollNexusTaskQueueRequest
-> PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest
$cmin :: PollNexusTaskQueueRequest
-> PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest
min :: PollNexusTaskQueueRequest
-> PollNexusTaskQueueRequest -> PollNexusTaskQueueRequest
Prelude.Ord)
instance Prelude.Show PollNexusTaskQueueRequest where
  showsPrec :: Int -> PollNexusTaskQueueRequest -> ShowS
showsPrec Int
_ PollNexusTaskQueueRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (PollNexusTaskQueueRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PollNexusTaskQueueRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField PollNexusTaskQueueRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> PollNexusTaskQueueRequest
-> f PollNexusTaskQueueRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> PollNexusTaskQueueRequest -> f PollNexusTaskQueueRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PollNexusTaskQueueRequest
-> f PollNexusTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollNexusTaskQueueRequest -> Text)
-> (PollNexusTaskQueueRequest -> Text -> PollNexusTaskQueueRequest)
-> Lens
     PollNexusTaskQueueRequest PollNexusTaskQueueRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollNexusTaskQueueRequest -> Text
_PollNexusTaskQueueRequest'namespace
           (\ PollNexusTaskQueueRequest
x__ Text
y__ -> PollNexusTaskQueueRequest
x__ {_PollNexusTaskQueueRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollNexusTaskQueueRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> PollNexusTaskQueueRequest
-> f PollNexusTaskQueueRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> PollNexusTaskQueueRequest -> f PollNexusTaskQueueRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PollNexusTaskQueueRequest
-> f PollNexusTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollNexusTaskQueueRequest -> Text)
-> (PollNexusTaskQueueRequest -> Text -> PollNexusTaskQueueRequest)
-> Lens
     PollNexusTaskQueueRequest PollNexusTaskQueueRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollNexusTaskQueueRequest -> Text
_PollNexusTaskQueueRequest'identity
           (\ PollNexusTaskQueueRequest
x__ Text
y__ -> PollNexusTaskQueueRequest
x__ {_PollNexusTaskQueueRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollNexusTaskQueueRequest "taskQueue" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (TaskQueue -> f TaskQueue)
-> PollNexusTaskQueueRequest
-> f PollNexusTaskQueueRequest
fieldOf Proxy# "taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> PollNexusTaskQueueRequest -> f PollNexusTaskQueueRequest)
-> ((TaskQueue -> f TaskQueue)
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (TaskQueue -> f TaskQueue)
-> PollNexusTaskQueueRequest
-> f PollNexusTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollNexusTaskQueueRequest -> Maybe TaskQueue)
-> (PollNexusTaskQueueRequest
    -> Maybe TaskQueue -> PollNexusTaskQueueRequest)
-> Lens
     PollNexusTaskQueueRequest
     PollNexusTaskQueueRequest
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollNexusTaskQueueRequest -> Maybe TaskQueue
_PollNexusTaskQueueRequest'taskQueue
           (\ PollNexusTaskQueueRequest
x__ Maybe TaskQueue
y__ -> PollNexusTaskQueueRequest
x__ {_PollNexusTaskQueueRequest'taskQueue = y__}))
        (TaskQueue -> Lens' (Maybe TaskQueue) TaskQueue
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TaskQueue
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollNexusTaskQueueRequest "maybe'taskQueue" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'taskQueue"
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> PollNexusTaskQueueRequest
-> f PollNexusTaskQueueRequest
fieldOf Proxy# "maybe'taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> PollNexusTaskQueueRequest -> f PollNexusTaskQueueRequest)
-> ((Maybe TaskQueue -> f (Maybe TaskQueue))
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> PollNexusTaskQueueRequest
-> f PollNexusTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollNexusTaskQueueRequest -> Maybe TaskQueue)
-> (PollNexusTaskQueueRequest
    -> Maybe TaskQueue -> PollNexusTaskQueueRequest)
-> Lens
     PollNexusTaskQueueRequest
     PollNexusTaskQueueRequest
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollNexusTaskQueueRequest -> Maybe TaskQueue
_PollNexusTaskQueueRequest'taskQueue
           (\ PollNexusTaskQueueRequest
x__ Maybe TaskQueue
y__ -> PollNexusTaskQueueRequest
x__ {_PollNexusTaskQueueRequest'taskQueue = y__}))
        (Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollNexusTaskQueueRequest "workerVersionCapabilities" Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerVersionCapabilities"
-> (WorkerVersionCapabilities -> f WorkerVersionCapabilities)
-> PollNexusTaskQueueRequest
-> f PollNexusTaskQueueRequest
fieldOf Proxy# "workerVersionCapabilities"
_
    = ((Maybe WorkerVersionCapabilities
  -> f (Maybe WorkerVersionCapabilities))
 -> PollNexusTaskQueueRequest -> f PollNexusTaskQueueRequest)
-> ((WorkerVersionCapabilities -> f WorkerVersionCapabilities)
    -> Maybe WorkerVersionCapabilities
    -> f (Maybe WorkerVersionCapabilities))
-> (WorkerVersionCapabilities -> f WorkerVersionCapabilities)
-> PollNexusTaskQueueRequest
-> f PollNexusTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollNexusTaskQueueRequest -> Maybe WorkerVersionCapabilities)
-> (PollNexusTaskQueueRequest
    -> Maybe WorkerVersionCapabilities -> PollNexusTaskQueueRequest)
-> Lens
     PollNexusTaskQueueRequest
     PollNexusTaskQueueRequest
     (Maybe WorkerVersionCapabilities)
     (Maybe WorkerVersionCapabilities)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollNexusTaskQueueRequest -> Maybe WorkerVersionCapabilities
_PollNexusTaskQueueRequest'workerVersionCapabilities
           (\ PollNexusTaskQueueRequest
x__ Maybe WorkerVersionCapabilities
y__
              -> PollNexusTaskQueueRequest
x__
                   {_PollNexusTaskQueueRequest'workerVersionCapabilities = y__}))
        (WorkerVersionCapabilities
-> Lens'
     (Maybe WorkerVersionCapabilities) WorkerVersionCapabilities
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkerVersionCapabilities
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollNexusTaskQueueRequest "maybe'workerVersionCapabilities" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workerVersionCapabilities"
-> (Maybe WorkerVersionCapabilities
    -> f (Maybe WorkerVersionCapabilities))
-> PollNexusTaskQueueRequest
-> f PollNexusTaskQueueRequest
fieldOf Proxy# "maybe'workerVersionCapabilities"
_
    = ((Maybe WorkerVersionCapabilities
  -> f (Maybe WorkerVersionCapabilities))
 -> PollNexusTaskQueueRequest -> f PollNexusTaskQueueRequest)
-> ((Maybe WorkerVersionCapabilities
     -> f (Maybe WorkerVersionCapabilities))
    -> Maybe WorkerVersionCapabilities
    -> f (Maybe WorkerVersionCapabilities))
-> (Maybe WorkerVersionCapabilities
    -> f (Maybe WorkerVersionCapabilities))
-> PollNexusTaskQueueRequest
-> f PollNexusTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollNexusTaskQueueRequest -> Maybe WorkerVersionCapabilities)
-> (PollNexusTaskQueueRequest
    -> Maybe WorkerVersionCapabilities -> PollNexusTaskQueueRequest)
-> Lens
     PollNexusTaskQueueRequest
     PollNexusTaskQueueRequest
     (Maybe WorkerVersionCapabilities)
     (Maybe WorkerVersionCapabilities)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollNexusTaskQueueRequest -> Maybe WorkerVersionCapabilities
_PollNexusTaskQueueRequest'workerVersionCapabilities
           (\ PollNexusTaskQueueRequest
x__ Maybe WorkerVersionCapabilities
y__
              -> PollNexusTaskQueueRequest
x__
                   {_PollNexusTaskQueueRequest'workerVersionCapabilities = y__}))
        (Maybe WorkerVersionCapabilities
 -> f (Maybe WorkerVersionCapabilities))
-> Maybe WorkerVersionCapabilities
-> f (Maybe WorkerVersionCapabilities)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message PollNexusTaskQueueRequest where
  messageName :: Proxy PollNexusTaskQueueRequest -> Text
messageName Proxy PollNexusTaskQueueRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.PollNexusTaskQueueRequest"
  packedMessageDescriptor :: Proxy PollNexusTaskQueueRequest -> ByteString
packedMessageDescriptor Proxy PollNexusTaskQueueRequest
_
    = ByteString
"\n\
      \\EMPollNexusTaskQueueRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\SUB\n\
      \\bidentity\CAN\STX \SOH(\tR\bidentity\DC2C\n\
      \\n\
      \task_queue\CAN\ETX \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC2q\n\
      \\ESCworker_version_capabilities\CAN\EOT \SOH(\v21.temporal.api.common.v1.WorkerVersionCapabilitiesR\EMworkerVersionCapabilities"
  packedFileDescriptor :: Proxy PollNexusTaskQueueRequest -> ByteString
packedFileDescriptor Proxy PollNexusTaskQueueRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor PollNexusTaskQueueRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor PollNexusTaskQueueRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PollNexusTaskQueueRequest Text
-> FieldDescriptor PollNexusTaskQueueRequest
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
     PollNexusTaskQueueRequest PollNexusTaskQueueRequest Text Text
-> FieldAccessor PollNexusTaskQueueRequest 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 PollNexusTaskQueueRequest
        identity__field_descriptor :: FieldDescriptor PollNexusTaskQueueRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PollNexusTaskQueueRequest Text
-> FieldDescriptor PollNexusTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     PollNexusTaskQueueRequest PollNexusTaskQueueRequest Text Text
-> FieldAccessor PollNexusTaskQueueRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor PollNexusTaskQueueRequest
        taskQueue__field_descriptor :: FieldDescriptor PollNexusTaskQueueRequest
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueue
-> FieldAccessor PollNexusTaskQueueRequest TaskQueue
-> FieldDescriptor PollNexusTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_queue"
              (MessageOrGroup -> FieldTypeDescriptor TaskQueue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)
              (Lens
  PollNexusTaskQueueRequest
  PollNexusTaskQueueRequest
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> FieldAccessor PollNexusTaskQueueRequest TaskQueue
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue")) ::
              Data.ProtoLens.FieldDescriptor PollNexusTaskQueueRequest
        workerVersionCapabilities__field_descriptor :: FieldDescriptor PollNexusTaskQueueRequest
workerVersionCapabilities__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionCapabilities
-> FieldAccessor
     PollNexusTaskQueueRequest WorkerVersionCapabilities
-> FieldDescriptor PollNexusTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_version_capabilities"
              (MessageOrGroup -> FieldTypeDescriptor WorkerVersionCapabilities
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities)
              (Lens
  PollNexusTaskQueueRequest
  PollNexusTaskQueueRequest
  (Maybe WorkerVersionCapabilities)
  (Maybe WorkerVersionCapabilities)
-> FieldAccessor
     PollNexusTaskQueueRequest WorkerVersionCapabilities
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workerVersionCapabilities")) ::
              Data.ProtoLens.FieldDescriptor PollNexusTaskQueueRequest
      in
        [(Tag, FieldDescriptor PollNexusTaskQueueRequest)]
-> Map Tag (FieldDescriptor PollNexusTaskQueueRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor PollNexusTaskQueueRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor PollNexusTaskQueueRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor PollNexusTaskQueueRequest
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, 
            FieldDescriptor PollNexusTaskQueueRequest
workerVersionCapabilities__field_descriptor)]
  unknownFields :: Lens' PollNexusTaskQueueRequest FieldSet
unknownFields
    = (PollNexusTaskQueueRequest -> FieldSet)
-> (PollNexusTaskQueueRequest
    -> FieldSet -> PollNexusTaskQueueRequest)
-> Lens' PollNexusTaskQueueRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        PollNexusTaskQueueRequest -> FieldSet
_PollNexusTaskQueueRequest'_unknownFields
        (\ PollNexusTaskQueueRequest
x__ FieldSet
y__
           -> PollNexusTaskQueueRequest
x__ {_PollNexusTaskQueueRequest'_unknownFields = y__})
  defMessage :: PollNexusTaskQueueRequest
defMessage
    = PollNexusTaskQueueRequest'_constructor
        {_PollNexusTaskQueueRequest'namespace :: Text
_PollNexusTaskQueueRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollNexusTaskQueueRequest'identity :: Text
_PollNexusTaskQueueRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollNexusTaskQueueRequest'taskQueue :: Maybe TaskQueue
_PollNexusTaskQueueRequest'taskQueue = Maybe TaskQueue
forall a. Maybe a
Prelude.Nothing,
         _PollNexusTaskQueueRequest'workerVersionCapabilities :: Maybe WorkerVersionCapabilities
_PollNexusTaskQueueRequest'workerVersionCapabilities = Maybe WorkerVersionCapabilities
forall a. Maybe a
Prelude.Nothing,
         _PollNexusTaskQueueRequest'_unknownFields :: FieldSet
_PollNexusTaskQueueRequest'_unknownFields = []}
  parseMessage :: Parser PollNexusTaskQueueRequest
parseMessage
    = let
        loop ::
          PollNexusTaskQueueRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser PollNexusTaskQueueRequest
        loop :: PollNexusTaskQueueRequest -> Parser PollNexusTaskQueueRequest
loop PollNexusTaskQueueRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
26
                          -> do y <- Parser TaskQueue -> String -> Parser TaskQueue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"task_queue"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskQueue") y x)
                        Word64
34
                          -> do y <- Parser WorkerVersionCapabilities
-> String -> Parser WorkerVersionCapabilities
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"worker_version_capabilities"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerVersionCapabilities") 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 PollNexusTaskQueueRequest
-> String -> Parser PollNexusTaskQueueRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do PollNexusTaskQueueRequest -> Parser PollNexusTaskQueueRequest
loop PollNexusTaskQueueRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"PollNexusTaskQueueRequest"
  buildMessage :: PollNexusTaskQueueRequest -> Builder
buildMessage
    = \ PollNexusTaskQueueRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text PollNexusTaskQueueRequest PollNexusTaskQueueRequest Text Text
-> PollNexusTaskQueueRequest -> 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") PollNexusTaskQueueRequest
_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 PollNexusTaskQueueRequest PollNexusTaskQueueRequest Text Text
-> PollNexusTaskQueueRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") PollNexusTaskQueueRequest
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe TaskQueue)
  PollNexusTaskQueueRequest
  PollNexusTaskQueueRequest
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> PollNexusTaskQueueRequest -> Maybe TaskQueue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                          (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue") PollNexusTaskQueueRequest
_x
                    of
                      Maybe TaskQueue
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just TaskQueue
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (TaskQueue -> ByteString) -> TaskQueue -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                TaskQueue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueue
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe WorkerVersionCapabilities)
  PollNexusTaskQueueRequest
  PollNexusTaskQueueRequest
  (Maybe WorkerVersionCapabilities)
  (Maybe WorkerVersionCapabilities)
-> PollNexusTaskQueueRequest -> Maybe WorkerVersionCapabilities
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'workerVersionCapabilities") PollNexusTaskQueueRequest
_x
                       of
                         Maybe WorkerVersionCapabilities
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just WorkerVersionCapabilities
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (WorkerVersionCapabilities -> ByteString)
-> WorkerVersionCapabilities
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   WorkerVersionCapabilities -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkerVersionCapabilities
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  PollNexusTaskQueueRequest
  PollNexusTaskQueueRequest
  FieldSet
  FieldSet
-> PollNexusTaskQueueRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  PollNexusTaskQueueRequest
  PollNexusTaskQueueRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PollNexusTaskQueueRequest FieldSet
Data.ProtoLens.unknownFields PollNexusTaskQueueRequest
_x)))))
instance Control.DeepSeq.NFData PollNexusTaskQueueRequest where
  rnf :: PollNexusTaskQueueRequest -> ()
rnf
    = \ PollNexusTaskQueueRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (PollNexusTaskQueueRequest -> FieldSet
_PollNexusTaskQueueRequest'_unknownFields PollNexusTaskQueueRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (PollNexusTaskQueueRequest -> Text
_PollNexusTaskQueueRequest'namespace PollNexusTaskQueueRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (PollNexusTaskQueueRequest -> Text
_PollNexusTaskQueueRequest'identity PollNexusTaskQueueRequest
x__)
                   (Maybe TaskQueue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (PollNexusTaskQueueRequest -> Maybe TaskQueue
_PollNexusTaskQueueRequest'taskQueue PollNexusTaskQueueRequest
x__)
                      (Maybe WorkerVersionCapabilities -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (PollNexusTaskQueueRequest -> Maybe WorkerVersionCapabilities
_PollNexusTaskQueueRequest'workerVersionCapabilities PollNexusTaskQueueRequest
x__) ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskToken' @:: Lens' PollNexusTaskQueueResponse Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.request' @:: Lens' PollNexusTaskQueueResponse Proto.Temporal.Api.Nexus.V1.Message.Request@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'request' @:: Lens' PollNexusTaskQueueResponse (Prelude.Maybe Proto.Temporal.Api.Nexus.V1.Message.Request)@ -}
data PollNexusTaskQueueResponse
  = PollNexusTaskQueueResponse'_constructor {PollNexusTaskQueueResponse -> ByteString
_PollNexusTaskQueueResponse'taskToken :: !Data.ByteString.ByteString,
                                             PollNexusTaskQueueResponse -> Maybe Request
_PollNexusTaskQueueResponse'request :: !(Prelude.Maybe Proto.Temporal.Api.Nexus.V1.Message.Request),
                                             PollNexusTaskQueueResponse -> FieldSet
_PollNexusTaskQueueResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse -> Bool
(PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse -> Bool)
-> (PollNexusTaskQueueResponse
    -> PollNexusTaskQueueResponse -> Bool)
-> Eq PollNexusTaskQueueResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse -> Bool
== :: PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse -> Bool
$c/= :: PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse -> Bool
/= :: PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse -> Bool
Prelude.Eq, Eq PollNexusTaskQueueResponse
Eq PollNexusTaskQueueResponse =>
(PollNexusTaskQueueResponse
 -> PollNexusTaskQueueResponse -> Ordering)
-> (PollNexusTaskQueueResponse
    -> PollNexusTaskQueueResponse -> Bool)
-> (PollNexusTaskQueueResponse
    -> PollNexusTaskQueueResponse -> Bool)
-> (PollNexusTaskQueueResponse
    -> PollNexusTaskQueueResponse -> Bool)
-> (PollNexusTaskQueueResponse
    -> PollNexusTaskQueueResponse -> Bool)
-> (PollNexusTaskQueueResponse
    -> PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse)
-> (PollNexusTaskQueueResponse
    -> PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse)
-> Ord PollNexusTaskQueueResponse
PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse -> Bool
PollNexusTaskQueueResponse
-> PollNexusTaskQueueResponse -> Ordering
PollNexusTaskQueueResponse
-> PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse
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 :: PollNexusTaskQueueResponse
-> PollNexusTaskQueueResponse -> Ordering
compare :: PollNexusTaskQueueResponse
-> PollNexusTaskQueueResponse -> Ordering
$c< :: PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse -> Bool
< :: PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse -> Bool
$c<= :: PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse -> Bool
<= :: PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse -> Bool
$c> :: PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse -> Bool
> :: PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse -> Bool
$c>= :: PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse -> Bool
>= :: PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse -> Bool
$cmax :: PollNexusTaskQueueResponse
-> PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse
max :: PollNexusTaskQueueResponse
-> PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse
$cmin :: PollNexusTaskQueueResponse
-> PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse
min :: PollNexusTaskQueueResponse
-> PollNexusTaskQueueResponse -> PollNexusTaskQueueResponse
Prelude.Ord)
instance Prelude.Show PollNexusTaskQueueResponse where
  showsPrec :: Int -> PollNexusTaskQueueResponse -> ShowS
showsPrec Int
_ PollNexusTaskQueueResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (PollNexusTaskQueueResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PollNexusTaskQueueResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField PollNexusTaskQueueResponse "taskToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskToken"
-> (ByteString -> f ByteString)
-> PollNexusTaskQueueResponse
-> f PollNexusTaskQueueResponse
fieldOf Proxy# "taskToken"
_
    = ((ByteString -> f ByteString)
 -> PollNexusTaskQueueResponse -> f PollNexusTaskQueueResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> PollNexusTaskQueueResponse
-> f PollNexusTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollNexusTaskQueueResponse -> ByteString)
-> (PollNexusTaskQueueResponse
    -> ByteString -> PollNexusTaskQueueResponse)
-> Lens
     PollNexusTaskQueueResponse
     PollNexusTaskQueueResponse
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollNexusTaskQueueResponse -> ByteString
_PollNexusTaskQueueResponse'taskToken
           (\ PollNexusTaskQueueResponse
x__ ByteString
y__ -> PollNexusTaskQueueResponse
x__ {_PollNexusTaskQueueResponse'taskToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollNexusTaskQueueResponse "request" Proto.Temporal.Api.Nexus.V1.Message.Request where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "request"
-> (Request -> f Request)
-> PollNexusTaskQueueResponse
-> f PollNexusTaskQueueResponse
fieldOf Proxy# "request"
_
    = ((Maybe Request -> f (Maybe Request))
 -> PollNexusTaskQueueResponse -> f PollNexusTaskQueueResponse)
-> ((Request -> f Request) -> Maybe Request -> f (Maybe Request))
-> (Request -> f Request)
-> PollNexusTaskQueueResponse
-> f PollNexusTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollNexusTaskQueueResponse -> Maybe Request)
-> (PollNexusTaskQueueResponse
    -> Maybe Request -> PollNexusTaskQueueResponse)
-> Lens
     PollNexusTaskQueueResponse
     PollNexusTaskQueueResponse
     (Maybe Request)
     (Maybe Request)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollNexusTaskQueueResponse -> Maybe Request
_PollNexusTaskQueueResponse'request
           (\ PollNexusTaskQueueResponse
x__ Maybe Request
y__ -> PollNexusTaskQueueResponse
x__ {_PollNexusTaskQueueResponse'request = y__}))
        (Request -> Lens' (Maybe Request) Request
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Request
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollNexusTaskQueueResponse "maybe'request" (Prelude.Maybe Proto.Temporal.Api.Nexus.V1.Message.Request) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'request"
-> (Maybe Request -> f (Maybe Request))
-> PollNexusTaskQueueResponse
-> f PollNexusTaskQueueResponse
fieldOf Proxy# "maybe'request"
_
    = ((Maybe Request -> f (Maybe Request))
 -> PollNexusTaskQueueResponse -> f PollNexusTaskQueueResponse)
-> ((Maybe Request -> f (Maybe Request))
    -> Maybe Request -> f (Maybe Request))
-> (Maybe Request -> f (Maybe Request))
-> PollNexusTaskQueueResponse
-> f PollNexusTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollNexusTaskQueueResponse -> Maybe Request)
-> (PollNexusTaskQueueResponse
    -> Maybe Request -> PollNexusTaskQueueResponse)
-> Lens
     PollNexusTaskQueueResponse
     PollNexusTaskQueueResponse
     (Maybe Request)
     (Maybe Request)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollNexusTaskQueueResponse -> Maybe Request
_PollNexusTaskQueueResponse'request
           (\ PollNexusTaskQueueResponse
x__ Maybe Request
y__ -> PollNexusTaskQueueResponse
x__ {_PollNexusTaskQueueResponse'request = y__}))
        (Maybe Request -> f (Maybe Request))
-> Maybe Request -> f (Maybe Request)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message PollNexusTaskQueueResponse where
  messageName :: Proxy PollNexusTaskQueueResponse -> Text
messageName Proxy PollNexusTaskQueueResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.PollNexusTaskQueueResponse"
  packedMessageDescriptor :: Proxy PollNexusTaskQueueResponse -> ByteString
packedMessageDescriptor Proxy PollNexusTaskQueueResponse
_
    = ByteString
"\n\
      \\SUBPollNexusTaskQueueResponse\DC2\GS\n\
      \\n\
      \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC28\n\
      \\arequest\CAN\STX \SOH(\v2\RS.temporal.api.nexus.v1.RequestR\arequest"
  packedFileDescriptor :: Proxy PollNexusTaskQueueResponse -> ByteString
packedFileDescriptor Proxy PollNexusTaskQueueResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor PollNexusTaskQueueResponse)
fieldsByTag
    = let
        taskToken__field_descriptor :: FieldDescriptor PollNexusTaskQueueResponse
taskToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor PollNexusTaskQueueResponse ByteString
-> FieldDescriptor PollNexusTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     PollNexusTaskQueueResponse
     PollNexusTaskQueueResponse
     ByteString
     ByteString
-> FieldAccessor PollNexusTaskQueueResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken")) ::
              Data.ProtoLens.FieldDescriptor PollNexusTaskQueueResponse
        request__field_descriptor :: FieldDescriptor PollNexusTaskQueueResponse
request__field_descriptor
          = String
-> FieldTypeDescriptor Request
-> FieldAccessor PollNexusTaskQueueResponse Request
-> FieldDescriptor PollNexusTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request"
              (MessageOrGroup -> FieldTypeDescriptor Request
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Nexus.V1.Message.Request)
              (Lens
  PollNexusTaskQueueResponse
  PollNexusTaskQueueResponse
  (Maybe Request)
  (Maybe Request)
-> FieldAccessor PollNexusTaskQueueResponse Request
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'request")) ::
              Data.ProtoLens.FieldDescriptor PollNexusTaskQueueResponse
      in
        [(Tag, FieldDescriptor PollNexusTaskQueueResponse)]
-> Map Tag (FieldDescriptor PollNexusTaskQueueResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor PollNexusTaskQueueResponse
taskToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor PollNexusTaskQueueResponse
request__field_descriptor)]
  unknownFields :: Lens' PollNexusTaskQueueResponse FieldSet
unknownFields
    = (PollNexusTaskQueueResponse -> FieldSet)
-> (PollNexusTaskQueueResponse
    -> FieldSet -> PollNexusTaskQueueResponse)
-> Lens' PollNexusTaskQueueResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        PollNexusTaskQueueResponse -> FieldSet
_PollNexusTaskQueueResponse'_unknownFields
        (\ PollNexusTaskQueueResponse
x__ FieldSet
y__
           -> PollNexusTaskQueueResponse
x__ {_PollNexusTaskQueueResponse'_unknownFields = y__})
  defMessage :: PollNexusTaskQueueResponse
defMessage
    = PollNexusTaskQueueResponse'_constructor
        {_PollNexusTaskQueueResponse'taskToken :: ByteString
_PollNexusTaskQueueResponse'taskToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollNexusTaskQueueResponse'request :: Maybe Request
_PollNexusTaskQueueResponse'request = Maybe Request
forall a. Maybe a
Prelude.Nothing,
         _PollNexusTaskQueueResponse'_unknownFields :: FieldSet
_PollNexusTaskQueueResponse'_unknownFields = []}
  parseMessage :: Parser PollNexusTaskQueueResponse
parseMessage
    = let
        loop ::
          PollNexusTaskQueueResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser PollNexusTaskQueueResponse
        loop :: PollNexusTaskQueueResponse -> Parser PollNexusTaskQueueResponse
loop PollNexusTaskQueueResponse
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 ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"task_token"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskToken") y x)
                        Word64
18
                          -> do y <- Parser Request -> String -> Parser Request
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"request"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"request") y x)
                        Word64
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 PollNexusTaskQueueResponse
-> String -> Parser PollNexusTaskQueueResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do PollNexusTaskQueueResponse -> Parser PollNexusTaskQueueResponse
loop PollNexusTaskQueueResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"PollNexusTaskQueueResponse"
  buildMessage :: PollNexusTaskQueueResponse -> Builder
buildMessage
    = \ PollNexusTaskQueueResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: ByteString
_v = FoldLike
  ByteString
  PollNexusTaskQueueResponse
  PollNexusTaskQueueResponse
  ByteString
  ByteString
-> PollNexusTaskQueueResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken") PollNexusTaskQueueResponse
_x
              in
                if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
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
bs
                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         ByteString
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe Request)
  PollNexusTaskQueueResponse
  PollNexusTaskQueueResponse
  (Maybe Request)
  (Maybe Request)
-> PollNexusTaskQueueResponse -> Maybe Request
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'request") PollNexusTaskQueueResponse
_x
                 of
                   Maybe Request
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just Request
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (Request -> ByteString) -> Request -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             Request -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Request
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  PollNexusTaskQueueResponse
  PollNexusTaskQueueResponse
  FieldSet
  FieldSet
-> PollNexusTaskQueueResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  PollNexusTaskQueueResponse
  PollNexusTaskQueueResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PollNexusTaskQueueResponse FieldSet
Data.ProtoLens.unknownFields PollNexusTaskQueueResponse
_x)))
instance Control.DeepSeq.NFData PollNexusTaskQueueResponse where
  rnf :: PollNexusTaskQueueResponse -> ()
rnf
    = \ PollNexusTaskQueueResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (PollNexusTaskQueueResponse -> FieldSet
_PollNexusTaskQueueResponse'_unknownFields PollNexusTaskQueueResponse
x__)
             (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (PollNexusTaskQueueResponse -> ByteString
_PollNexusTaskQueueResponse'taskToken PollNexusTaskQueueResponse
x__)
                (Maybe Request -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (PollNexusTaskQueueResponse -> Maybe Request
_PollNexusTaskQueueResponse'request PollNexusTaskQueueResponse
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' PollWorkflowExecutionUpdateRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.updateRef' @:: Lens' PollWorkflowExecutionUpdateRequest Proto.Temporal.Api.Update.V1.Message.UpdateRef@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'updateRef' @:: Lens' PollWorkflowExecutionUpdateRequest (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.UpdateRef)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' PollWorkflowExecutionUpdateRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.waitPolicy' @:: Lens' PollWorkflowExecutionUpdateRequest Proto.Temporal.Api.Update.V1.Message.WaitPolicy@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'waitPolicy' @:: Lens' PollWorkflowExecutionUpdateRequest (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.WaitPolicy)@ -}
data PollWorkflowExecutionUpdateRequest
  = PollWorkflowExecutionUpdateRequest'_constructor {PollWorkflowExecutionUpdateRequest -> Text
_PollWorkflowExecutionUpdateRequest'namespace :: !Data.Text.Text,
                                                     PollWorkflowExecutionUpdateRequest -> Maybe UpdateRef
_PollWorkflowExecutionUpdateRequest'updateRef :: !(Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.UpdateRef),
                                                     PollWorkflowExecutionUpdateRequest -> Text
_PollWorkflowExecutionUpdateRequest'identity :: !Data.Text.Text,
                                                     PollWorkflowExecutionUpdateRequest -> Maybe WaitPolicy
_PollWorkflowExecutionUpdateRequest'waitPolicy :: !(Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.WaitPolicy),
                                                     PollWorkflowExecutionUpdateRequest -> FieldSet
_PollWorkflowExecutionUpdateRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Bool
(PollWorkflowExecutionUpdateRequest
 -> PollWorkflowExecutionUpdateRequest -> Bool)
-> (PollWorkflowExecutionUpdateRequest
    -> PollWorkflowExecutionUpdateRequest -> Bool)
-> Eq PollWorkflowExecutionUpdateRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Bool
== :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Bool
$c/= :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Bool
/= :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Bool
Prelude.Eq, Eq PollWorkflowExecutionUpdateRequest
Eq PollWorkflowExecutionUpdateRequest =>
(PollWorkflowExecutionUpdateRequest
 -> PollWorkflowExecutionUpdateRequest -> Ordering)
-> (PollWorkflowExecutionUpdateRequest
    -> PollWorkflowExecutionUpdateRequest -> Bool)
-> (PollWorkflowExecutionUpdateRequest
    -> PollWorkflowExecutionUpdateRequest -> Bool)
-> (PollWorkflowExecutionUpdateRequest
    -> PollWorkflowExecutionUpdateRequest -> Bool)
-> (PollWorkflowExecutionUpdateRequest
    -> PollWorkflowExecutionUpdateRequest -> Bool)
-> (PollWorkflowExecutionUpdateRequest
    -> PollWorkflowExecutionUpdateRequest
    -> PollWorkflowExecutionUpdateRequest)
-> (PollWorkflowExecutionUpdateRequest
    -> PollWorkflowExecutionUpdateRequest
    -> PollWorkflowExecutionUpdateRequest)
-> Ord PollWorkflowExecutionUpdateRequest
PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Bool
PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Ordering
PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest
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 :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Ordering
compare :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Ordering
$c< :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Bool
< :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Bool
$c<= :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Bool
<= :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Bool
$c> :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Bool
> :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Bool
$c>= :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Bool
>= :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest -> Bool
$cmax :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest
max :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest
$cmin :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest
min :: PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest
-> PollWorkflowExecutionUpdateRequest
Prelude.Ord)
instance Prelude.Show PollWorkflowExecutionUpdateRequest where
  showsPrec :: Int -> PollWorkflowExecutionUpdateRequest -> ShowS
showsPrec Int
_ PollWorkflowExecutionUpdateRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (PollWorkflowExecutionUpdateRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PollWorkflowExecutionUpdateRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField PollWorkflowExecutionUpdateRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> PollWorkflowExecutionUpdateRequest
-> f PollWorkflowExecutionUpdateRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> PollWorkflowExecutionUpdateRequest
 -> f PollWorkflowExecutionUpdateRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PollWorkflowExecutionUpdateRequest
-> f PollWorkflowExecutionUpdateRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowExecutionUpdateRequest -> Text)
-> (PollWorkflowExecutionUpdateRequest
    -> Text -> PollWorkflowExecutionUpdateRequest)
-> Lens
     PollWorkflowExecutionUpdateRequest
     PollWorkflowExecutionUpdateRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowExecutionUpdateRequest -> Text
_PollWorkflowExecutionUpdateRequest'namespace
           (\ PollWorkflowExecutionUpdateRequest
x__ Text
y__
              -> PollWorkflowExecutionUpdateRequest
x__ {_PollWorkflowExecutionUpdateRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowExecutionUpdateRequest "updateRef" Proto.Temporal.Api.Update.V1.Message.UpdateRef where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "updateRef"
-> (UpdateRef -> f UpdateRef)
-> PollWorkflowExecutionUpdateRequest
-> f PollWorkflowExecutionUpdateRequest
fieldOf Proxy# "updateRef"
_
    = ((Maybe UpdateRef -> f (Maybe UpdateRef))
 -> PollWorkflowExecutionUpdateRequest
 -> f PollWorkflowExecutionUpdateRequest)
-> ((UpdateRef -> f UpdateRef)
    -> Maybe UpdateRef -> f (Maybe UpdateRef))
-> (UpdateRef -> f UpdateRef)
-> PollWorkflowExecutionUpdateRequest
-> f PollWorkflowExecutionUpdateRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowExecutionUpdateRequest -> Maybe UpdateRef)
-> (PollWorkflowExecutionUpdateRequest
    -> Maybe UpdateRef -> PollWorkflowExecutionUpdateRequest)
-> Lens
     PollWorkflowExecutionUpdateRequest
     PollWorkflowExecutionUpdateRequest
     (Maybe UpdateRef)
     (Maybe UpdateRef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowExecutionUpdateRequest -> Maybe UpdateRef
_PollWorkflowExecutionUpdateRequest'updateRef
           (\ PollWorkflowExecutionUpdateRequest
x__ Maybe UpdateRef
y__
              -> PollWorkflowExecutionUpdateRequest
x__ {_PollWorkflowExecutionUpdateRequest'updateRef = y__}))
        (UpdateRef -> Lens' (Maybe UpdateRef) UpdateRef
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateRef
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollWorkflowExecutionUpdateRequest "maybe'updateRef" (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.UpdateRef) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'updateRef"
-> (Maybe UpdateRef -> f (Maybe UpdateRef))
-> PollWorkflowExecutionUpdateRequest
-> f PollWorkflowExecutionUpdateRequest
fieldOf Proxy# "maybe'updateRef"
_
    = ((Maybe UpdateRef -> f (Maybe UpdateRef))
 -> PollWorkflowExecutionUpdateRequest
 -> f PollWorkflowExecutionUpdateRequest)
-> ((Maybe UpdateRef -> f (Maybe UpdateRef))
    -> Maybe UpdateRef -> f (Maybe UpdateRef))
-> (Maybe UpdateRef -> f (Maybe UpdateRef))
-> PollWorkflowExecutionUpdateRequest
-> f PollWorkflowExecutionUpdateRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowExecutionUpdateRequest -> Maybe UpdateRef)
-> (PollWorkflowExecutionUpdateRequest
    -> Maybe UpdateRef -> PollWorkflowExecutionUpdateRequest)
-> Lens
     PollWorkflowExecutionUpdateRequest
     PollWorkflowExecutionUpdateRequest
     (Maybe UpdateRef)
     (Maybe UpdateRef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowExecutionUpdateRequest -> Maybe UpdateRef
_PollWorkflowExecutionUpdateRequest'updateRef
           (\ PollWorkflowExecutionUpdateRequest
x__ Maybe UpdateRef
y__
              -> PollWorkflowExecutionUpdateRequest
x__ {_PollWorkflowExecutionUpdateRequest'updateRef = y__}))
        (Maybe UpdateRef -> f (Maybe UpdateRef))
-> Maybe UpdateRef -> f (Maybe UpdateRef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowExecutionUpdateRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> PollWorkflowExecutionUpdateRequest
-> f PollWorkflowExecutionUpdateRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> PollWorkflowExecutionUpdateRequest
 -> f PollWorkflowExecutionUpdateRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PollWorkflowExecutionUpdateRequest
-> f PollWorkflowExecutionUpdateRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowExecutionUpdateRequest -> Text)
-> (PollWorkflowExecutionUpdateRequest
    -> Text -> PollWorkflowExecutionUpdateRequest)
-> Lens
     PollWorkflowExecutionUpdateRequest
     PollWorkflowExecutionUpdateRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowExecutionUpdateRequest -> Text
_PollWorkflowExecutionUpdateRequest'identity
           (\ PollWorkflowExecutionUpdateRequest
x__ Text
y__
              -> PollWorkflowExecutionUpdateRequest
x__ {_PollWorkflowExecutionUpdateRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowExecutionUpdateRequest "waitPolicy" Proto.Temporal.Api.Update.V1.Message.WaitPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "waitPolicy"
-> (WaitPolicy -> f WaitPolicy)
-> PollWorkflowExecutionUpdateRequest
-> f PollWorkflowExecutionUpdateRequest
fieldOf Proxy# "waitPolicy"
_
    = ((Maybe WaitPolicy -> f (Maybe WaitPolicy))
 -> PollWorkflowExecutionUpdateRequest
 -> f PollWorkflowExecutionUpdateRequest)
-> ((WaitPolicy -> f WaitPolicy)
    -> Maybe WaitPolicy -> f (Maybe WaitPolicy))
-> (WaitPolicy -> f WaitPolicy)
-> PollWorkflowExecutionUpdateRequest
-> f PollWorkflowExecutionUpdateRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowExecutionUpdateRequest -> Maybe WaitPolicy)
-> (PollWorkflowExecutionUpdateRequest
    -> Maybe WaitPolicy -> PollWorkflowExecutionUpdateRequest)
-> Lens
     PollWorkflowExecutionUpdateRequest
     PollWorkflowExecutionUpdateRequest
     (Maybe WaitPolicy)
     (Maybe WaitPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowExecutionUpdateRequest -> Maybe WaitPolicy
_PollWorkflowExecutionUpdateRequest'waitPolicy
           (\ PollWorkflowExecutionUpdateRequest
x__ Maybe WaitPolicy
y__
              -> PollWorkflowExecutionUpdateRequest
x__ {_PollWorkflowExecutionUpdateRequest'waitPolicy = y__}))
        (WaitPolicy -> Lens' (Maybe WaitPolicy) WaitPolicy
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WaitPolicy
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollWorkflowExecutionUpdateRequest "maybe'waitPolicy" (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.WaitPolicy) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'waitPolicy"
-> (Maybe WaitPolicy -> f (Maybe WaitPolicy))
-> PollWorkflowExecutionUpdateRequest
-> f PollWorkflowExecutionUpdateRequest
fieldOf Proxy# "maybe'waitPolicy"
_
    = ((Maybe WaitPolicy -> f (Maybe WaitPolicy))
 -> PollWorkflowExecutionUpdateRequest
 -> f PollWorkflowExecutionUpdateRequest)
-> ((Maybe WaitPolicy -> f (Maybe WaitPolicy))
    -> Maybe WaitPolicy -> f (Maybe WaitPolicy))
-> (Maybe WaitPolicy -> f (Maybe WaitPolicy))
-> PollWorkflowExecutionUpdateRequest
-> f PollWorkflowExecutionUpdateRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowExecutionUpdateRequest -> Maybe WaitPolicy)
-> (PollWorkflowExecutionUpdateRequest
    -> Maybe WaitPolicy -> PollWorkflowExecutionUpdateRequest)
-> Lens
     PollWorkflowExecutionUpdateRequest
     PollWorkflowExecutionUpdateRequest
     (Maybe WaitPolicy)
     (Maybe WaitPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowExecutionUpdateRequest -> Maybe WaitPolicy
_PollWorkflowExecutionUpdateRequest'waitPolicy
           (\ PollWorkflowExecutionUpdateRequest
x__ Maybe WaitPolicy
y__
              -> PollWorkflowExecutionUpdateRequest
x__ {_PollWorkflowExecutionUpdateRequest'waitPolicy = y__}))
        (Maybe WaitPolicy -> f (Maybe WaitPolicy))
-> Maybe WaitPolicy -> f (Maybe WaitPolicy)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message PollWorkflowExecutionUpdateRequest where
  messageName :: Proxy PollWorkflowExecutionUpdateRequest -> Text
messageName Proxy PollWorkflowExecutionUpdateRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.PollWorkflowExecutionUpdateRequest"
  packedMessageDescriptor :: Proxy PollWorkflowExecutionUpdateRequest -> ByteString
packedMessageDescriptor Proxy PollWorkflowExecutionUpdateRequest
_
    = ByteString
"\n\
      \\"PollWorkflowExecutionUpdateRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2@\n\
      \\n\
      \update_ref\CAN\STX \SOH(\v2!.temporal.api.update.v1.UpdateRefR\tupdateRef\DC2\SUB\n\
      \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2C\n\
      \\vwait_policy\CAN\EOT \SOH(\v2\".temporal.api.update.v1.WaitPolicyR\n\
      \waitPolicy"
  packedFileDescriptor :: Proxy PollWorkflowExecutionUpdateRequest -> ByteString
packedFileDescriptor Proxy PollWorkflowExecutionUpdateRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor PollWorkflowExecutionUpdateRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor PollWorkflowExecutionUpdateRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PollWorkflowExecutionUpdateRequest Text
-> FieldDescriptor PollWorkflowExecutionUpdateRequest
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
     PollWorkflowExecutionUpdateRequest
     PollWorkflowExecutionUpdateRequest
     Text
     Text
-> FieldAccessor PollWorkflowExecutionUpdateRequest 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 PollWorkflowExecutionUpdateRequest
        updateRef__field_descriptor :: FieldDescriptor PollWorkflowExecutionUpdateRequest
updateRef__field_descriptor
          = String
-> FieldTypeDescriptor UpdateRef
-> FieldAccessor PollWorkflowExecutionUpdateRequest UpdateRef
-> FieldDescriptor PollWorkflowExecutionUpdateRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"update_ref"
              (MessageOrGroup -> FieldTypeDescriptor UpdateRef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Update.V1.Message.UpdateRef)
              (Lens
  PollWorkflowExecutionUpdateRequest
  PollWorkflowExecutionUpdateRequest
  (Maybe UpdateRef)
  (Maybe UpdateRef)
-> FieldAccessor PollWorkflowExecutionUpdateRequest UpdateRef
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'updateRef")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowExecutionUpdateRequest
        identity__field_descriptor :: FieldDescriptor PollWorkflowExecutionUpdateRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PollWorkflowExecutionUpdateRequest Text
-> FieldDescriptor PollWorkflowExecutionUpdateRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     PollWorkflowExecutionUpdateRequest
     PollWorkflowExecutionUpdateRequest
     Text
     Text
-> FieldAccessor PollWorkflowExecutionUpdateRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowExecutionUpdateRequest
        waitPolicy__field_descriptor :: FieldDescriptor PollWorkflowExecutionUpdateRequest
waitPolicy__field_descriptor
          = String
-> FieldTypeDescriptor WaitPolicy
-> FieldAccessor PollWorkflowExecutionUpdateRequest WaitPolicy
-> FieldDescriptor PollWorkflowExecutionUpdateRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"wait_policy"
              (MessageOrGroup -> FieldTypeDescriptor WaitPolicy
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Update.V1.Message.WaitPolicy)
              (Lens
  PollWorkflowExecutionUpdateRequest
  PollWorkflowExecutionUpdateRequest
  (Maybe WaitPolicy)
  (Maybe WaitPolicy)
-> FieldAccessor PollWorkflowExecutionUpdateRequest WaitPolicy
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'waitPolicy")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowExecutionUpdateRequest
      in
        [(Tag, FieldDescriptor PollWorkflowExecutionUpdateRequest)]
-> Map Tag (FieldDescriptor PollWorkflowExecutionUpdateRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor PollWorkflowExecutionUpdateRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor PollWorkflowExecutionUpdateRequest
updateRef__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor PollWorkflowExecutionUpdateRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor PollWorkflowExecutionUpdateRequest
waitPolicy__field_descriptor)]
  unknownFields :: Lens' PollWorkflowExecutionUpdateRequest FieldSet
unknownFields
    = (PollWorkflowExecutionUpdateRequest -> FieldSet)
-> (PollWorkflowExecutionUpdateRequest
    -> FieldSet -> PollWorkflowExecutionUpdateRequest)
-> Lens' PollWorkflowExecutionUpdateRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        PollWorkflowExecutionUpdateRequest -> FieldSet
_PollWorkflowExecutionUpdateRequest'_unknownFields
        (\ PollWorkflowExecutionUpdateRequest
x__ FieldSet
y__
           -> PollWorkflowExecutionUpdateRequest
x__ {_PollWorkflowExecutionUpdateRequest'_unknownFields = y__})
  defMessage :: PollWorkflowExecutionUpdateRequest
defMessage
    = PollWorkflowExecutionUpdateRequest'_constructor
        {_PollWorkflowExecutionUpdateRequest'namespace :: Text
_PollWorkflowExecutionUpdateRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollWorkflowExecutionUpdateRequest'updateRef :: Maybe UpdateRef
_PollWorkflowExecutionUpdateRequest'updateRef = Maybe UpdateRef
forall a. Maybe a
Prelude.Nothing,
         _PollWorkflowExecutionUpdateRequest'identity :: Text
_PollWorkflowExecutionUpdateRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollWorkflowExecutionUpdateRequest'waitPolicy :: Maybe WaitPolicy
_PollWorkflowExecutionUpdateRequest'waitPolicy = Maybe WaitPolicy
forall a. Maybe a
Prelude.Nothing,
         _PollWorkflowExecutionUpdateRequest'_unknownFields :: FieldSet
_PollWorkflowExecutionUpdateRequest'_unknownFields = []}
  parseMessage :: Parser PollWorkflowExecutionUpdateRequest
parseMessage
    = let
        loop ::
          PollWorkflowExecutionUpdateRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser PollWorkflowExecutionUpdateRequest
        loop :: PollWorkflowExecutionUpdateRequest
-> Parser PollWorkflowExecutionUpdateRequest
loop PollWorkflowExecutionUpdateRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser UpdateRef -> String -> Parser UpdateRef
forall a. Parser a -> String -> Parser a
(Data.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_ref"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"updateRef") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
34
                          -> do y <- Parser WaitPolicy -> String -> Parser WaitPolicy
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"wait_policy"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"waitPolicy") 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 PollWorkflowExecutionUpdateRequest
-> String -> Parser PollWorkflowExecutionUpdateRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do PollWorkflowExecutionUpdateRequest
-> Parser PollWorkflowExecutionUpdateRequest
loop PollWorkflowExecutionUpdateRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"PollWorkflowExecutionUpdateRequest"
  buildMessage :: PollWorkflowExecutionUpdateRequest -> Builder
buildMessage
    = \ PollWorkflowExecutionUpdateRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  PollWorkflowExecutionUpdateRequest
  PollWorkflowExecutionUpdateRequest
  Text
  Text
-> PollWorkflowExecutionUpdateRequest -> 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") PollWorkflowExecutionUpdateRequest
_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 UpdateRef)
  PollWorkflowExecutionUpdateRequest
  PollWorkflowExecutionUpdateRequest
  (Maybe UpdateRef)
  (Maybe UpdateRef)
-> PollWorkflowExecutionUpdateRequest -> Maybe UpdateRef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'updateRef") PollWorkflowExecutionUpdateRequest
_x
                 of
                   Maybe UpdateRef
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just UpdateRef
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (UpdateRef -> ByteString) -> UpdateRef -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             UpdateRef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateRef
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v = FoldLike
  Text
  PollWorkflowExecutionUpdateRequest
  PollWorkflowExecutionUpdateRequest
  Text
  Text
-> PollWorkflowExecutionUpdateRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") PollWorkflowExecutionUpdateRequest
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe WaitPolicy)
  PollWorkflowExecutionUpdateRequest
  PollWorkflowExecutionUpdateRequest
  (Maybe WaitPolicy)
  (Maybe WaitPolicy)
-> PollWorkflowExecutionUpdateRequest -> Maybe WaitPolicy
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'waitPolicy") PollWorkflowExecutionUpdateRequest
_x
                       of
                         Maybe WaitPolicy
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just WaitPolicy
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (WaitPolicy -> ByteString) -> WaitPolicy -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   WaitPolicy -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WaitPolicy
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  PollWorkflowExecutionUpdateRequest
  PollWorkflowExecutionUpdateRequest
  FieldSet
  FieldSet
-> PollWorkflowExecutionUpdateRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  PollWorkflowExecutionUpdateRequest
  PollWorkflowExecutionUpdateRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PollWorkflowExecutionUpdateRequest FieldSet
Data.ProtoLens.unknownFields PollWorkflowExecutionUpdateRequest
_x)))))
instance Control.DeepSeq.NFData PollWorkflowExecutionUpdateRequest where
  rnf :: PollWorkflowExecutionUpdateRequest -> ()
rnf
    = \ PollWorkflowExecutionUpdateRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (PollWorkflowExecutionUpdateRequest -> FieldSet
_PollWorkflowExecutionUpdateRequest'_unknownFields PollWorkflowExecutionUpdateRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (PollWorkflowExecutionUpdateRequest -> Text
_PollWorkflowExecutionUpdateRequest'namespace PollWorkflowExecutionUpdateRequest
x__)
                (Maybe UpdateRef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (PollWorkflowExecutionUpdateRequest -> Maybe UpdateRef
_PollWorkflowExecutionUpdateRequest'updateRef PollWorkflowExecutionUpdateRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (PollWorkflowExecutionUpdateRequest -> Text
_PollWorkflowExecutionUpdateRequest'identity PollWorkflowExecutionUpdateRequest
x__)
                      (Maybe WaitPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (PollWorkflowExecutionUpdateRequest -> Maybe WaitPolicy
_PollWorkflowExecutionUpdateRequest'waitPolicy PollWorkflowExecutionUpdateRequest
x__) ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.outcome' @:: Lens' PollWorkflowExecutionUpdateResponse Proto.Temporal.Api.Update.V1.Message.Outcome@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'outcome' @:: Lens' PollWorkflowExecutionUpdateResponse (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Outcome)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.stage' @:: Lens' PollWorkflowExecutionUpdateResponse Proto.Temporal.Api.Enums.V1.Update.UpdateWorkflowExecutionLifecycleStage@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.updateRef' @:: Lens' PollWorkflowExecutionUpdateResponse Proto.Temporal.Api.Update.V1.Message.UpdateRef@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'updateRef' @:: Lens' PollWorkflowExecutionUpdateResponse (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.UpdateRef)@ -}
data PollWorkflowExecutionUpdateResponse
  = PollWorkflowExecutionUpdateResponse'_constructor {PollWorkflowExecutionUpdateResponse -> Maybe Outcome
_PollWorkflowExecutionUpdateResponse'outcome :: !(Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Outcome),
                                                      PollWorkflowExecutionUpdateResponse
-> UpdateWorkflowExecutionLifecycleStage
_PollWorkflowExecutionUpdateResponse'stage :: !Proto.Temporal.Api.Enums.V1.Update.UpdateWorkflowExecutionLifecycleStage,
                                                      PollWorkflowExecutionUpdateResponse -> Maybe UpdateRef
_PollWorkflowExecutionUpdateResponse'updateRef :: !(Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.UpdateRef),
                                                      PollWorkflowExecutionUpdateResponse -> FieldSet
_PollWorkflowExecutionUpdateResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Bool
(PollWorkflowExecutionUpdateResponse
 -> PollWorkflowExecutionUpdateResponse -> Bool)
-> (PollWorkflowExecutionUpdateResponse
    -> PollWorkflowExecutionUpdateResponse -> Bool)
-> Eq PollWorkflowExecutionUpdateResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Bool
== :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Bool
$c/= :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Bool
/= :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Bool
Prelude.Eq, Eq PollWorkflowExecutionUpdateResponse
Eq PollWorkflowExecutionUpdateResponse =>
(PollWorkflowExecutionUpdateResponse
 -> PollWorkflowExecutionUpdateResponse -> Ordering)
-> (PollWorkflowExecutionUpdateResponse
    -> PollWorkflowExecutionUpdateResponse -> Bool)
-> (PollWorkflowExecutionUpdateResponse
    -> PollWorkflowExecutionUpdateResponse -> Bool)
-> (PollWorkflowExecutionUpdateResponse
    -> PollWorkflowExecutionUpdateResponse -> Bool)
-> (PollWorkflowExecutionUpdateResponse
    -> PollWorkflowExecutionUpdateResponse -> Bool)
-> (PollWorkflowExecutionUpdateResponse
    -> PollWorkflowExecutionUpdateResponse
    -> PollWorkflowExecutionUpdateResponse)
-> (PollWorkflowExecutionUpdateResponse
    -> PollWorkflowExecutionUpdateResponse
    -> PollWorkflowExecutionUpdateResponse)
-> Ord PollWorkflowExecutionUpdateResponse
PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Bool
PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Ordering
PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse
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 :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Ordering
compare :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Ordering
$c< :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Bool
< :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Bool
$c<= :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Bool
<= :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Bool
$c> :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Bool
> :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Bool
$c>= :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Bool
>= :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse -> Bool
$cmax :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse
max :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse
$cmin :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse
min :: PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse
-> PollWorkflowExecutionUpdateResponse
Prelude.Ord)
instance Prelude.Show PollWorkflowExecutionUpdateResponse where
  showsPrec :: Int -> PollWorkflowExecutionUpdateResponse -> ShowS
showsPrec Int
_ PollWorkflowExecutionUpdateResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (PollWorkflowExecutionUpdateResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PollWorkflowExecutionUpdateResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField PollWorkflowExecutionUpdateResponse "outcome" Proto.Temporal.Api.Update.V1.Message.Outcome where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "outcome"
-> (Outcome -> f Outcome)
-> PollWorkflowExecutionUpdateResponse
-> f PollWorkflowExecutionUpdateResponse
fieldOf Proxy# "outcome"
_
    = ((Maybe Outcome -> f (Maybe Outcome))
 -> PollWorkflowExecutionUpdateResponse
 -> f PollWorkflowExecutionUpdateResponse)
-> ((Outcome -> f Outcome) -> Maybe Outcome -> f (Maybe Outcome))
-> (Outcome -> f Outcome)
-> PollWorkflowExecutionUpdateResponse
-> f PollWorkflowExecutionUpdateResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowExecutionUpdateResponse -> Maybe Outcome)
-> (PollWorkflowExecutionUpdateResponse
    -> Maybe Outcome -> PollWorkflowExecutionUpdateResponse)
-> Lens
     PollWorkflowExecutionUpdateResponse
     PollWorkflowExecutionUpdateResponse
     (Maybe Outcome)
     (Maybe Outcome)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowExecutionUpdateResponse -> Maybe Outcome
_PollWorkflowExecutionUpdateResponse'outcome
           (\ PollWorkflowExecutionUpdateResponse
x__ Maybe Outcome
y__
              -> PollWorkflowExecutionUpdateResponse
x__ {_PollWorkflowExecutionUpdateResponse'outcome = y__}))
        (Outcome -> Lens' (Maybe Outcome) Outcome
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Outcome
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollWorkflowExecutionUpdateResponse "maybe'outcome" (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Outcome) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'outcome"
-> (Maybe Outcome -> f (Maybe Outcome))
-> PollWorkflowExecutionUpdateResponse
-> f PollWorkflowExecutionUpdateResponse
fieldOf Proxy# "maybe'outcome"
_
    = ((Maybe Outcome -> f (Maybe Outcome))
 -> PollWorkflowExecutionUpdateResponse
 -> f PollWorkflowExecutionUpdateResponse)
-> ((Maybe Outcome -> f (Maybe Outcome))
    -> Maybe Outcome -> f (Maybe Outcome))
-> (Maybe Outcome -> f (Maybe Outcome))
-> PollWorkflowExecutionUpdateResponse
-> f PollWorkflowExecutionUpdateResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowExecutionUpdateResponse -> Maybe Outcome)
-> (PollWorkflowExecutionUpdateResponse
    -> Maybe Outcome -> PollWorkflowExecutionUpdateResponse)
-> Lens
     PollWorkflowExecutionUpdateResponse
     PollWorkflowExecutionUpdateResponse
     (Maybe Outcome)
     (Maybe Outcome)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowExecutionUpdateResponse -> Maybe Outcome
_PollWorkflowExecutionUpdateResponse'outcome
           (\ PollWorkflowExecutionUpdateResponse
x__ Maybe Outcome
y__
              -> PollWorkflowExecutionUpdateResponse
x__ {_PollWorkflowExecutionUpdateResponse'outcome = y__}))
        (Maybe Outcome -> f (Maybe Outcome))
-> Maybe Outcome -> f (Maybe Outcome)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowExecutionUpdateResponse "stage" Proto.Temporal.Api.Enums.V1.Update.UpdateWorkflowExecutionLifecycleStage where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "stage"
-> (UpdateWorkflowExecutionLifecycleStage
    -> f UpdateWorkflowExecutionLifecycleStage)
-> PollWorkflowExecutionUpdateResponse
-> f PollWorkflowExecutionUpdateResponse
fieldOf Proxy# "stage"
_
    = ((UpdateWorkflowExecutionLifecycleStage
  -> f UpdateWorkflowExecutionLifecycleStage)
 -> PollWorkflowExecutionUpdateResponse
 -> f PollWorkflowExecutionUpdateResponse)
-> ((UpdateWorkflowExecutionLifecycleStage
     -> f UpdateWorkflowExecutionLifecycleStage)
    -> UpdateWorkflowExecutionLifecycleStage
    -> f UpdateWorkflowExecutionLifecycleStage)
-> (UpdateWorkflowExecutionLifecycleStage
    -> f UpdateWorkflowExecutionLifecycleStage)
-> PollWorkflowExecutionUpdateResponse
-> f PollWorkflowExecutionUpdateResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowExecutionUpdateResponse
 -> UpdateWorkflowExecutionLifecycleStage)
-> (PollWorkflowExecutionUpdateResponse
    -> UpdateWorkflowExecutionLifecycleStage
    -> PollWorkflowExecutionUpdateResponse)
-> Lens
     PollWorkflowExecutionUpdateResponse
     PollWorkflowExecutionUpdateResponse
     UpdateWorkflowExecutionLifecycleStage
     UpdateWorkflowExecutionLifecycleStage
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowExecutionUpdateResponse
-> UpdateWorkflowExecutionLifecycleStage
_PollWorkflowExecutionUpdateResponse'stage
           (\ PollWorkflowExecutionUpdateResponse
x__ UpdateWorkflowExecutionLifecycleStage
y__
              -> PollWorkflowExecutionUpdateResponse
x__ {_PollWorkflowExecutionUpdateResponse'stage = y__}))
        (UpdateWorkflowExecutionLifecycleStage
 -> f UpdateWorkflowExecutionLifecycleStage)
-> UpdateWorkflowExecutionLifecycleStage
-> f UpdateWorkflowExecutionLifecycleStage
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowExecutionUpdateResponse "updateRef" Proto.Temporal.Api.Update.V1.Message.UpdateRef where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "updateRef"
-> (UpdateRef -> f UpdateRef)
-> PollWorkflowExecutionUpdateResponse
-> f PollWorkflowExecutionUpdateResponse
fieldOf Proxy# "updateRef"
_
    = ((Maybe UpdateRef -> f (Maybe UpdateRef))
 -> PollWorkflowExecutionUpdateResponse
 -> f PollWorkflowExecutionUpdateResponse)
-> ((UpdateRef -> f UpdateRef)
    -> Maybe UpdateRef -> f (Maybe UpdateRef))
-> (UpdateRef -> f UpdateRef)
-> PollWorkflowExecutionUpdateResponse
-> f PollWorkflowExecutionUpdateResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowExecutionUpdateResponse -> Maybe UpdateRef)
-> (PollWorkflowExecutionUpdateResponse
    -> Maybe UpdateRef -> PollWorkflowExecutionUpdateResponse)
-> Lens
     PollWorkflowExecutionUpdateResponse
     PollWorkflowExecutionUpdateResponse
     (Maybe UpdateRef)
     (Maybe UpdateRef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowExecutionUpdateResponse -> Maybe UpdateRef
_PollWorkflowExecutionUpdateResponse'updateRef
           (\ PollWorkflowExecutionUpdateResponse
x__ Maybe UpdateRef
y__
              -> PollWorkflowExecutionUpdateResponse
x__ {_PollWorkflowExecutionUpdateResponse'updateRef = y__}))
        (UpdateRef -> Lens' (Maybe UpdateRef) UpdateRef
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateRef
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollWorkflowExecutionUpdateResponse "maybe'updateRef" (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.UpdateRef) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'updateRef"
-> (Maybe UpdateRef -> f (Maybe UpdateRef))
-> PollWorkflowExecutionUpdateResponse
-> f PollWorkflowExecutionUpdateResponse
fieldOf Proxy# "maybe'updateRef"
_
    = ((Maybe UpdateRef -> f (Maybe UpdateRef))
 -> PollWorkflowExecutionUpdateResponse
 -> f PollWorkflowExecutionUpdateResponse)
-> ((Maybe UpdateRef -> f (Maybe UpdateRef))
    -> Maybe UpdateRef -> f (Maybe UpdateRef))
-> (Maybe UpdateRef -> f (Maybe UpdateRef))
-> PollWorkflowExecutionUpdateResponse
-> f PollWorkflowExecutionUpdateResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowExecutionUpdateResponse -> Maybe UpdateRef)
-> (PollWorkflowExecutionUpdateResponse
    -> Maybe UpdateRef -> PollWorkflowExecutionUpdateResponse)
-> Lens
     PollWorkflowExecutionUpdateResponse
     PollWorkflowExecutionUpdateResponse
     (Maybe UpdateRef)
     (Maybe UpdateRef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowExecutionUpdateResponse -> Maybe UpdateRef
_PollWorkflowExecutionUpdateResponse'updateRef
           (\ PollWorkflowExecutionUpdateResponse
x__ Maybe UpdateRef
y__
              -> PollWorkflowExecutionUpdateResponse
x__ {_PollWorkflowExecutionUpdateResponse'updateRef = y__}))
        (Maybe UpdateRef -> f (Maybe UpdateRef))
-> Maybe UpdateRef -> f (Maybe UpdateRef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message PollWorkflowExecutionUpdateResponse where
  messageName :: Proxy PollWorkflowExecutionUpdateResponse -> Text
messageName Proxy PollWorkflowExecutionUpdateResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.PollWorkflowExecutionUpdateResponse"
  packedMessageDescriptor :: Proxy PollWorkflowExecutionUpdateResponse -> ByteString
packedMessageDescriptor Proxy PollWorkflowExecutionUpdateResponse
_
    = ByteString
"\n\
      \#PollWorkflowExecutionUpdateResponse\DC29\n\
      \\aoutcome\CAN\SOH \SOH(\v2\US.temporal.api.update.v1.OutcomeR\aoutcome\DC2R\n\
      \\ENQstage\CAN\STX \SOH(\SO2<.temporal.api.enums.v1.UpdateWorkflowExecutionLifecycleStageR\ENQstage\DC2@\n\
      \\n\
      \update_ref\CAN\ETX \SOH(\v2!.temporal.api.update.v1.UpdateRefR\tupdateRef"
  packedFileDescriptor :: Proxy PollWorkflowExecutionUpdateResponse -> ByteString
packedFileDescriptor Proxy PollWorkflowExecutionUpdateResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor PollWorkflowExecutionUpdateResponse)
fieldsByTag
    = let
        outcome__field_descriptor :: FieldDescriptor PollWorkflowExecutionUpdateResponse
outcome__field_descriptor
          = String
-> FieldTypeDescriptor Outcome
-> FieldAccessor PollWorkflowExecutionUpdateResponse Outcome
-> FieldDescriptor PollWorkflowExecutionUpdateResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"outcome"
              (MessageOrGroup -> FieldTypeDescriptor Outcome
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Update.V1.Message.Outcome)
              (Lens
  PollWorkflowExecutionUpdateResponse
  PollWorkflowExecutionUpdateResponse
  (Maybe Outcome)
  (Maybe Outcome)
-> FieldAccessor PollWorkflowExecutionUpdateResponse Outcome
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'outcome")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowExecutionUpdateResponse
        stage__field_descriptor :: FieldDescriptor PollWorkflowExecutionUpdateResponse
stage__field_descriptor
          = String
-> FieldTypeDescriptor UpdateWorkflowExecutionLifecycleStage
-> FieldAccessor
     PollWorkflowExecutionUpdateResponse
     UpdateWorkflowExecutionLifecycleStage
-> FieldDescriptor PollWorkflowExecutionUpdateResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"stage"
              (ScalarField UpdateWorkflowExecutionLifecycleStage
-> FieldTypeDescriptor UpdateWorkflowExecutionLifecycleStage
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField UpdateWorkflowExecutionLifecycleStage
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Update.UpdateWorkflowExecutionLifecycleStage)
              (WireDefault UpdateWorkflowExecutionLifecycleStage
-> Lens
     PollWorkflowExecutionUpdateResponse
     PollWorkflowExecutionUpdateResponse
     UpdateWorkflowExecutionLifecycleStage
     UpdateWorkflowExecutionLifecycleStage
-> FieldAccessor
     PollWorkflowExecutionUpdateResponse
     UpdateWorkflowExecutionLifecycleStage
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault UpdateWorkflowExecutionLifecycleStage
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"stage")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowExecutionUpdateResponse
        updateRef__field_descriptor :: FieldDescriptor PollWorkflowExecutionUpdateResponse
updateRef__field_descriptor
          = String
-> FieldTypeDescriptor UpdateRef
-> FieldAccessor PollWorkflowExecutionUpdateResponse UpdateRef
-> FieldDescriptor PollWorkflowExecutionUpdateResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"update_ref"
              (MessageOrGroup -> FieldTypeDescriptor UpdateRef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Update.V1.Message.UpdateRef)
              (Lens
  PollWorkflowExecutionUpdateResponse
  PollWorkflowExecutionUpdateResponse
  (Maybe UpdateRef)
  (Maybe UpdateRef)
-> FieldAccessor PollWorkflowExecutionUpdateResponse UpdateRef
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'updateRef")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowExecutionUpdateResponse
      in
        [(Tag, FieldDescriptor PollWorkflowExecutionUpdateResponse)]
-> Map Tag (FieldDescriptor PollWorkflowExecutionUpdateResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor PollWorkflowExecutionUpdateResponse
outcome__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor PollWorkflowExecutionUpdateResponse
stage__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor PollWorkflowExecutionUpdateResponse
updateRef__field_descriptor)]
  unknownFields :: Lens' PollWorkflowExecutionUpdateResponse FieldSet
unknownFields
    = (PollWorkflowExecutionUpdateResponse -> FieldSet)
-> (PollWorkflowExecutionUpdateResponse
    -> FieldSet -> PollWorkflowExecutionUpdateResponse)
-> Lens' PollWorkflowExecutionUpdateResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        PollWorkflowExecutionUpdateResponse -> FieldSet
_PollWorkflowExecutionUpdateResponse'_unknownFields
        (\ PollWorkflowExecutionUpdateResponse
x__ FieldSet
y__
           -> PollWorkflowExecutionUpdateResponse
x__ {_PollWorkflowExecutionUpdateResponse'_unknownFields = y__})
  defMessage :: PollWorkflowExecutionUpdateResponse
defMessage
    = PollWorkflowExecutionUpdateResponse'_constructor
        {_PollWorkflowExecutionUpdateResponse'outcome :: Maybe Outcome
_PollWorkflowExecutionUpdateResponse'outcome = Maybe Outcome
forall a. Maybe a
Prelude.Nothing,
         _PollWorkflowExecutionUpdateResponse'stage :: UpdateWorkflowExecutionLifecycleStage
_PollWorkflowExecutionUpdateResponse'stage = UpdateWorkflowExecutionLifecycleStage
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollWorkflowExecutionUpdateResponse'updateRef :: Maybe UpdateRef
_PollWorkflowExecutionUpdateResponse'updateRef = Maybe UpdateRef
forall a. Maybe a
Prelude.Nothing,
         _PollWorkflowExecutionUpdateResponse'_unknownFields :: FieldSet
_PollWorkflowExecutionUpdateResponse'_unknownFields = []}
  parseMessage :: Parser PollWorkflowExecutionUpdateResponse
parseMessage
    = let
        loop ::
          PollWorkflowExecutionUpdateResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser PollWorkflowExecutionUpdateResponse
        loop :: PollWorkflowExecutionUpdateResponse
-> Parser PollWorkflowExecutionUpdateResponse
loop PollWorkflowExecutionUpdateResponse
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 Outcome -> String -> Parser Outcome
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"outcome"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"outcome") y x)
                        Word64
16
                          -> do y <- Parser UpdateWorkflowExecutionLifecycleStage
-> String -> Parser UpdateWorkflowExecutionLifecycleStage
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> UpdateWorkflowExecutionLifecycleStage)
-> Parser Int -> Parser UpdateWorkflowExecutionLifecycleStage
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> UpdateWorkflowExecutionLifecycleStage
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
"stage"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"stage") y x)
                        Word64
26
                          -> do y <- Parser UpdateRef -> String -> Parser UpdateRef
forall a. Parser a -> String -> Parser a
(Data.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_ref"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"updateRef") 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 PollWorkflowExecutionUpdateResponse
-> String -> Parser PollWorkflowExecutionUpdateResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do PollWorkflowExecutionUpdateResponse
-> Parser PollWorkflowExecutionUpdateResponse
loop PollWorkflowExecutionUpdateResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"PollWorkflowExecutionUpdateResponse"
  buildMessage :: PollWorkflowExecutionUpdateResponse -> Builder
buildMessage
    = \ PollWorkflowExecutionUpdateResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Outcome)
  PollWorkflowExecutionUpdateResponse
  PollWorkflowExecutionUpdateResponse
  (Maybe Outcome)
  (Maybe Outcome)
-> PollWorkflowExecutionUpdateResponse -> Maybe Outcome
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'outcome") PollWorkflowExecutionUpdateResponse
_x
              of
                Maybe Outcome
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just Outcome
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (Outcome -> ByteString) -> Outcome -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          Outcome -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Outcome
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: UpdateWorkflowExecutionLifecycleStage
_v = FoldLike
  UpdateWorkflowExecutionLifecycleStage
  PollWorkflowExecutionUpdateResponse
  PollWorkflowExecutionUpdateResponse
  UpdateWorkflowExecutionLifecycleStage
  UpdateWorkflowExecutionLifecycleStage
-> PollWorkflowExecutionUpdateResponse
-> UpdateWorkflowExecutionLifecycleStage
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"stage") PollWorkflowExecutionUpdateResponse
_x
                 in
                   if UpdateWorkflowExecutionLifecycleStage
-> UpdateWorkflowExecutionLifecycleStage -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) UpdateWorkflowExecutionLifecycleStage
_v UpdateWorkflowExecutionLifecycleStage
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
16)
                         ((Int -> Builder)
-> (UpdateWorkflowExecutionLifecycleStage -> Int)
-> UpdateWorkflowExecutionLifecycleStage
-> 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)
                            UpdateWorkflowExecutionLifecycleStage -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum UpdateWorkflowExecutionLifecycleStage
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe UpdateRef)
  PollWorkflowExecutionUpdateResponse
  PollWorkflowExecutionUpdateResponse
  (Maybe UpdateRef)
  (Maybe UpdateRef)
-> PollWorkflowExecutionUpdateResponse -> Maybe UpdateRef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'updateRef") PollWorkflowExecutionUpdateResponse
_x
                    of
                      Maybe UpdateRef
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just UpdateRef
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (UpdateRef -> ByteString) -> UpdateRef -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                UpdateRef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateRef
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  PollWorkflowExecutionUpdateResponse
  PollWorkflowExecutionUpdateResponse
  FieldSet
  FieldSet
-> PollWorkflowExecutionUpdateResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  PollWorkflowExecutionUpdateResponse
  PollWorkflowExecutionUpdateResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PollWorkflowExecutionUpdateResponse FieldSet
Data.ProtoLens.unknownFields PollWorkflowExecutionUpdateResponse
_x))))
instance Control.DeepSeq.NFData PollWorkflowExecutionUpdateResponse where
  rnf :: PollWorkflowExecutionUpdateResponse -> ()
rnf
    = \ PollWorkflowExecutionUpdateResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (PollWorkflowExecutionUpdateResponse -> FieldSet
_PollWorkflowExecutionUpdateResponse'_unknownFields PollWorkflowExecutionUpdateResponse
x__)
             (Maybe Outcome -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (PollWorkflowExecutionUpdateResponse -> Maybe Outcome
_PollWorkflowExecutionUpdateResponse'outcome PollWorkflowExecutionUpdateResponse
x__)
                (UpdateWorkflowExecutionLifecycleStage -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (PollWorkflowExecutionUpdateResponse
-> UpdateWorkflowExecutionLifecycleStage
_PollWorkflowExecutionUpdateResponse'stage PollWorkflowExecutionUpdateResponse
x__)
                   (Maybe UpdateRef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (PollWorkflowExecutionUpdateResponse -> Maybe UpdateRef
_PollWorkflowExecutionUpdateResponse'updateRef PollWorkflowExecutionUpdateResponse
x__) ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' PollWorkflowTaskQueueRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueue' @:: Lens' PollWorkflowTaskQueueRequest Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'taskQueue' @:: Lens' PollWorkflowTaskQueueRequest (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' PollWorkflowTaskQueueRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.binaryChecksum' @:: Lens' PollWorkflowTaskQueueRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workerVersionCapabilities' @:: Lens' PollWorkflowTaskQueueRequest Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workerVersionCapabilities' @:: Lens' PollWorkflowTaskQueueRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities)@ -}
data PollWorkflowTaskQueueRequest
  = PollWorkflowTaskQueueRequest'_constructor {PollWorkflowTaskQueueRequest -> Text
_PollWorkflowTaskQueueRequest'namespace :: !Data.Text.Text,
                                               PollWorkflowTaskQueueRequest -> Maybe TaskQueue
_PollWorkflowTaskQueueRequest'taskQueue :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue),
                                               PollWorkflowTaskQueueRequest -> Text
_PollWorkflowTaskQueueRequest'identity :: !Data.Text.Text,
                                               PollWorkflowTaskQueueRequest -> Text
_PollWorkflowTaskQueueRequest'binaryChecksum :: !Data.Text.Text,
                                               PollWorkflowTaskQueueRequest -> Maybe WorkerVersionCapabilities
_PollWorkflowTaskQueueRequest'workerVersionCapabilities :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities),
                                               PollWorkflowTaskQueueRequest -> FieldSet
_PollWorkflowTaskQueueRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Bool
(PollWorkflowTaskQueueRequest
 -> PollWorkflowTaskQueueRequest -> Bool)
-> (PollWorkflowTaskQueueRequest
    -> PollWorkflowTaskQueueRequest -> Bool)
-> Eq PollWorkflowTaskQueueRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Bool
== :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Bool
$c/= :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Bool
/= :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Bool
Prelude.Eq, Eq PollWorkflowTaskQueueRequest
Eq PollWorkflowTaskQueueRequest =>
(PollWorkflowTaskQueueRequest
 -> PollWorkflowTaskQueueRequest -> Ordering)
-> (PollWorkflowTaskQueueRequest
    -> PollWorkflowTaskQueueRequest -> Bool)
-> (PollWorkflowTaskQueueRequest
    -> PollWorkflowTaskQueueRequest -> Bool)
-> (PollWorkflowTaskQueueRequest
    -> PollWorkflowTaskQueueRequest -> Bool)
-> (PollWorkflowTaskQueueRequest
    -> PollWorkflowTaskQueueRequest -> Bool)
-> (PollWorkflowTaskQueueRequest
    -> PollWorkflowTaskQueueRequest -> PollWorkflowTaskQueueRequest)
-> (PollWorkflowTaskQueueRequest
    -> PollWorkflowTaskQueueRequest -> PollWorkflowTaskQueueRequest)
-> Ord PollWorkflowTaskQueueRequest
PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Bool
PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Ordering
PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> PollWorkflowTaskQueueRequest
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 :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Ordering
compare :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Ordering
$c< :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Bool
< :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Bool
$c<= :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Bool
<= :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Bool
$c> :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Bool
> :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Bool
$c>= :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Bool
>= :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> Bool
$cmax :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> PollWorkflowTaskQueueRequest
max :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> PollWorkflowTaskQueueRequest
$cmin :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> PollWorkflowTaskQueueRequest
min :: PollWorkflowTaskQueueRequest
-> PollWorkflowTaskQueueRequest -> PollWorkflowTaskQueueRequest
Prelude.Ord)
instance Prelude.Show PollWorkflowTaskQueueRequest where
  showsPrec :: Int -> PollWorkflowTaskQueueRequest -> ShowS
showsPrec Int
_ PollWorkflowTaskQueueRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (PollWorkflowTaskQueueRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PollWorkflowTaskQueueRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> PollWorkflowTaskQueueRequest
-> f PollWorkflowTaskQueueRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> PollWorkflowTaskQueueRequest -> f PollWorkflowTaskQueueRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PollWorkflowTaskQueueRequest
-> f PollWorkflowTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueRequest -> Text)
-> (PollWorkflowTaskQueueRequest
    -> Text -> PollWorkflowTaskQueueRequest)
-> Lens
     PollWorkflowTaskQueueRequest PollWorkflowTaskQueueRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueRequest -> Text
_PollWorkflowTaskQueueRequest'namespace
           (\ PollWorkflowTaskQueueRequest
x__ Text
y__ -> PollWorkflowTaskQueueRequest
x__ {_PollWorkflowTaskQueueRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueRequest "taskQueue" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (TaskQueue -> f TaskQueue)
-> PollWorkflowTaskQueueRequest
-> f PollWorkflowTaskQueueRequest
fieldOf Proxy# "taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> PollWorkflowTaskQueueRequest -> f PollWorkflowTaskQueueRequest)
-> ((TaskQueue -> f TaskQueue)
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (TaskQueue -> f TaskQueue)
-> PollWorkflowTaskQueueRequest
-> f PollWorkflowTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueRequest -> Maybe TaskQueue)
-> (PollWorkflowTaskQueueRequest
    -> Maybe TaskQueue -> PollWorkflowTaskQueueRequest)
-> Lens
     PollWorkflowTaskQueueRequest
     PollWorkflowTaskQueueRequest
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueRequest -> Maybe TaskQueue
_PollWorkflowTaskQueueRequest'taskQueue
           (\ PollWorkflowTaskQueueRequest
x__ Maybe TaskQueue
y__ -> PollWorkflowTaskQueueRequest
x__ {_PollWorkflowTaskQueueRequest'taskQueue = y__}))
        (TaskQueue -> Lens' (Maybe TaskQueue) TaskQueue
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TaskQueue
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueRequest "maybe'taskQueue" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'taskQueue"
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> PollWorkflowTaskQueueRequest
-> f PollWorkflowTaskQueueRequest
fieldOf Proxy# "maybe'taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> PollWorkflowTaskQueueRequest -> f PollWorkflowTaskQueueRequest)
-> ((Maybe TaskQueue -> f (Maybe TaskQueue))
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> PollWorkflowTaskQueueRequest
-> f PollWorkflowTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueRequest -> Maybe TaskQueue)
-> (PollWorkflowTaskQueueRequest
    -> Maybe TaskQueue -> PollWorkflowTaskQueueRequest)
-> Lens
     PollWorkflowTaskQueueRequest
     PollWorkflowTaskQueueRequest
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueRequest -> Maybe TaskQueue
_PollWorkflowTaskQueueRequest'taskQueue
           (\ PollWorkflowTaskQueueRequest
x__ Maybe TaskQueue
y__ -> PollWorkflowTaskQueueRequest
x__ {_PollWorkflowTaskQueueRequest'taskQueue = y__}))
        (Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> PollWorkflowTaskQueueRequest
-> f PollWorkflowTaskQueueRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> PollWorkflowTaskQueueRequest -> f PollWorkflowTaskQueueRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PollWorkflowTaskQueueRequest
-> f PollWorkflowTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueRequest -> Text)
-> (PollWorkflowTaskQueueRequest
    -> Text -> PollWorkflowTaskQueueRequest)
-> Lens
     PollWorkflowTaskQueueRequest PollWorkflowTaskQueueRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueRequest -> Text
_PollWorkflowTaskQueueRequest'identity
           (\ PollWorkflowTaskQueueRequest
x__ Text
y__ -> PollWorkflowTaskQueueRequest
x__ {_PollWorkflowTaskQueueRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueRequest "binaryChecksum" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "binaryChecksum"
-> (Text -> f Text)
-> PollWorkflowTaskQueueRequest
-> f PollWorkflowTaskQueueRequest
fieldOf Proxy# "binaryChecksum"
_
    = ((Text -> f Text)
 -> PollWorkflowTaskQueueRequest -> f PollWorkflowTaskQueueRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PollWorkflowTaskQueueRequest
-> f PollWorkflowTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueRequest -> Text)
-> (PollWorkflowTaskQueueRequest
    -> Text -> PollWorkflowTaskQueueRequest)
-> Lens
     PollWorkflowTaskQueueRequest PollWorkflowTaskQueueRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueRequest -> Text
_PollWorkflowTaskQueueRequest'binaryChecksum
           (\ PollWorkflowTaskQueueRequest
x__ Text
y__
              -> PollWorkflowTaskQueueRequest
x__ {_PollWorkflowTaskQueueRequest'binaryChecksum = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueRequest "workerVersionCapabilities" Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerVersionCapabilities"
-> (WorkerVersionCapabilities -> f WorkerVersionCapabilities)
-> PollWorkflowTaskQueueRequest
-> f PollWorkflowTaskQueueRequest
fieldOf Proxy# "workerVersionCapabilities"
_
    = ((Maybe WorkerVersionCapabilities
  -> f (Maybe WorkerVersionCapabilities))
 -> PollWorkflowTaskQueueRequest -> f PollWorkflowTaskQueueRequest)
-> ((WorkerVersionCapabilities -> f WorkerVersionCapabilities)
    -> Maybe WorkerVersionCapabilities
    -> f (Maybe WorkerVersionCapabilities))
-> (WorkerVersionCapabilities -> f WorkerVersionCapabilities)
-> PollWorkflowTaskQueueRequest
-> f PollWorkflowTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueRequest -> Maybe WorkerVersionCapabilities)
-> (PollWorkflowTaskQueueRequest
    -> Maybe WorkerVersionCapabilities -> PollWorkflowTaskQueueRequest)
-> Lens
     PollWorkflowTaskQueueRequest
     PollWorkflowTaskQueueRequest
     (Maybe WorkerVersionCapabilities)
     (Maybe WorkerVersionCapabilities)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueRequest -> Maybe WorkerVersionCapabilities
_PollWorkflowTaskQueueRequest'workerVersionCapabilities
           (\ PollWorkflowTaskQueueRequest
x__ Maybe WorkerVersionCapabilities
y__
              -> PollWorkflowTaskQueueRequest
x__
                   {_PollWorkflowTaskQueueRequest'workerVersionCapabilities = y__}))
        (WorkerVersionCapabilities
-> Lens'
     (Maybe WorkerVersionCapabilities) WorkerVersionCapabilities
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkerVersionCapabilities
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueRequest "maybe'workerVersionCapabilities" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workerVersionCapabilities"
-> (Maybe WorkerVersionCapabilities
    -> f (Maybe WorkerVersionCapabilities))
-> PollWorkflowTaskQueueRequest
-> f PollWorkflowTaskQueueRequest
fieldOf Proxy# "maybe'workerVersionCapabilities"
_
    = ((Maybe WorkerVersionCapabilities
  -> f (Maybe WorkerVersionCapabilities))
 -> PollWorkflowTaskQueueRequest -> f PollWorkflowTaskQueueRequest)
-> ((Maybe WorkerVersionCapabilities
     -> f (Maybe WorkerVersionCapabilities))
    -> Maybe WorkerVersionCapabilities
    -> f (Maybe WorkerVersionCapabilities))
-> (Maybe WorkerVersionCapabilities
    -> f (Maybe WorkerVersionCapabilities))
-> PollWorkflowTaskQueueRequest
-> f PollWorkflowTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueRequest -> Maybe WorkerVersionCapabilities)
-> (PollWorkflowTaskQueueRequest
    -> Maybe WorkerVersionCapabilities -> PollWorkflowTaskQueueRequest)
-> Lens
     PollWorkflowTaskQueueRequest
     PollWorkflowTaskQueueRequest
     (Maybe WorkerVersionCapabilities)
     (Maybe WorkerVersionCapabilities)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueRequest -> Maybe WorkerVersionCapabilities
_PollWorkflowTaskQueueRequest'workerVersionCapabilities
           (\ PollWorkflowTaskQueueRequest
x__ Maybe WorkerVersionCapabilities
y__
              -> PollWorkflowTaskQueueRequest
x__
                   {_PollWorkflowTaskQueueRequest'workerVersionCapabilities = y__}))
        (Maybe WorkerVersionCapabilities
 -> f (Maybe WorkerVersionCapabilities))
-> Maybe WorkerVersionCapabilities
-> f (Maybe WorkerVersionCapabilities)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message PollWorkflowTaskQueueRequest where
  messageName :: Proxy PollWorkflowTaskQueueRequest -> Text
messageName Proxy PollWorkflowTaskQueueRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.PollWorkflowTaskQueueRequest"
  packedMessageDescriptor :: Proxy PollWorkflowTaskQueueRequest -> ByteString
packedMessageDescriptor Proxy PollWorkflowTaskQueueRequest
_
    = ByteString
"\n\
      \\FSPollWorkflowTaskQueueRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2C\n\
      \\n\
      \task_queue\CAN\STX \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC2\SUB\n\
      \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2'\n\
      \\SIbinary_checksum\CAN\EOT \SOH(\tR\SObinaryChecksum\DC2q\n\
      \\ESCworker_version_capabilities\CAN\ENQ \SOH(\v21.temporal.api.common.v1.WorkerVersionCapabilitiesR\EMworkerVersionCapabilities"
  packedFileDescriptor :: Proxy PollWorkflowTaskQueueRequest -> ByteString
packedFileDescriptor Proxy PollWorkflowTaskQueueRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor PollWorkflowTaskQueueRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PollWorkflowTaskQueueRequest Text
-> FieldDescriptor PollWorkflowTaskQueueRequest
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
     PollWorkflowTaskQueueRequest PollWorkflowTaskQueueRequest Text Text
-> FieldAccessor PollWorkflowTaskQueueRequest 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 PollWorkflowTaskQueueRequest
        taskQueue__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueRequest
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueue
-> FieldAccessor PollWorkflowTaskQueueRequest TaskQueue
-> FieldDescriptor PollWorkflowTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_queue"
              (MessageOrGroup -> FieldTypeDescriptor TaskQueue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)
              (Lens
  PollWorkflowTaskQueueRequest
  PollWorkflowTaskQueueRequest
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> FieldAccessor PollWorkflowTaskQueueRequest TaskQueue
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueRequest
        identity__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PollWorkflowTaskQueueRequest Text
-> FieldDescriptor PollWorkflowTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     PollWorkflowTaskQueueRequest PollWorkflowTaskQueueRequest Text Text
-> FieldAccessor PollWorkflowTaskQueueRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueRequest
        binaryChecksum__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueRequest
binaryChecksum__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PollWorkflowTaskQueueRequest Text
-> FieldDescriptor PollWorkflowTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"binary_checksum"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     PollWorkflowTaskQueueRequest PollWorkflowTaskQueueRequest Text Text
-> FieldAccessor PollWorkflowTaskQueueRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"binaryChecksum")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueRequest
        workerVersionCapabilities__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueRequest
workerVersionCapabilities__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionCapabilities
-> FieldAccessor
     PollWorkflowTaskQueueRequest WorkerVersionCapabilities
-> FieldDescriptor PollWorkflowTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_version_capabilities"
              (MessageOrGroup -> FieldTypeDescriptor WorkerVersionCapabilities
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkerVersionCapabilities)
              (Lens
  PollWorkflowTaskQueueRequest
  PollWorkflowTaskQueueRequest
  (Maybe WorkerVersionCapabilities)
  (Maybe WorkerVersionCapabilities)
-> FieldAccessor
     PollWorkflowTaskQueueRequest WorkerVersionCapabilities
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workerVersionCapabilities")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueRequest
      in
        [(Tag, FieldDescriptor PollWorkflowTaskQueueRequest)]
-> Map Tag (FieldDescriptor PollWorkflowTaskQueueRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor PollWorkflowTaskQueueRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor PollWorkflowTaskQueueRequest
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor PollWorkflowTaskQueueRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor PollWorkflowTaskQueueRequest
binaryChecksum__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, 
            FieldDescriptor PollWorkflowTaskQueueRequest
workerVersionCapabilities__field_descriptor)]
  unknownFields :: Lens' PollWorkflowTaskQueueRequest FieldSet
unknownFields
    = (PollWorkflowTaskQueueRequest -> FieldSet)
-> (PollWorkflowTaskQueueRequest
    -> FieldSet -> PollWorkflowTaskQueueRequest)
-> Lens' PollWorkflowTaskQueueRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        PollWorkflowTaskQueueRequest -> FieldSet
_PollWorkflowTaskQueueRequest'_unknownFields
        (\ PollWorkflowTaskQueueRequest
x__ FieldSet
y__
           -> PollWorkflowTaskQueueRequest
x__ {_PollWorkflowTaskQueueRequest'_unknownFields = y__})
  defMessage :: PollWorkflowTaskQueueRequest
defMessage
    = PollWorkflowTaskQueueRequest'_constructor
        {_PollWorkflowTaskQueueRequest'namespace :: Text
_PollWorkflowTaskQueueRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollWorkflowTaskQueueRequest'taskQueue :: Maybe TaskQueue
_PollWorkflowTaskQueueRequest'taskQueue = Maybe TaskQueue
forall a. Maybe a
Prelude.Nothing,
         _PollWorkflowTaskQueueRequest'identity :: Text
_PollWorkflowTaskQueueRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollWorkflowTaskQueueRequest'binaryChecksum :: Text
_PollWorkflowTaskQueueRequest'binaryChecksum = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollWorkflowTaskQueueRequest'workerVersionCapabilities :: Maybe WorkerVersionCapabilities
_PollWorkflowTaskQueueRequest'workerVersionCapabilities = Maybe WorkerVersionCapabilities
forall a. Maybe a
Prelude.Nothing,
         _PollWorkflowTaskQueueRequest'_unknownFields :: FieldSet
_PollWorkflowTaskQueueRequest'_unknownFields = []}
  parseMessage :: Parser PollWorkflowTaskQueueRequest
parseMessage
    = let
        loop ::
          PollWorkflowTaskQueueRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser PollWorkflowTaskQueueRequest
        loop :: PollWorkflowTaskQueueRequest -> Parser PollWorkflowTaskQueueRequest
loop PollWorkflowTaskQueueRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser TaskQueue -> String -> Parser TaskQueue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"task_queue"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskQueue") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"binary_checksum"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"binaryChecksum") y x)
                        Word64
42
                          -> do y <- Parser WorkerVersionCapabilities
-> String -> Parser WorkerVersionCapabilities
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"worker_version_capabilities"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerVersionCapabilities") 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 PollWorkflowTaskQueueRequest
-> String -> Parser PollWorkflowTaskQueueRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do PollWorkflowTaskQueueRequest -> Parser PollWorkflowTaskQueueRequest
loop PollWorkflowTaskQueueRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"PollWorkflowTaskQueueRequest"
  buildMessage :: PollWorkflowTaskQueueRequest -> Builder
buildMessage
    = \ PollWorkflowTaskQueueRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  PollWorkflowTaskQueueRequest
  PollWorkflowTaskQueueRequest
  Text
  Text
-> PollWorkflowTaskQueueRequest -> 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") PollWorkflowTaskQueueRequest
_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 TaskQueue)
  PollWorkflowTaskQueueRequest
  PollWorkflowTaskQueueRequest
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> PollWorkflowTaskQueueRequest -> Maybe TaskQueue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue") PollWorkflowTaskQueueRequest
_x
                 of
                   Maybe TaskQueue
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just TaskQueue
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (TaskQueue -> ByteString) -> TaskQueue -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             TaskQueue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueue
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v = FoldLike
  Text
  PollWorkflowTaskQueueRequest
  PollWorkflowTaskQueueRequest
  Text
  Text
-> PollWorkflowTaskQueueRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") PollWorkflowTaskQueueRequest
_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
  PollWorkflowTaskQueueRequest
  PollWorkflowTaskQueueRequest
  Text
  Text
-> PollWorkflowTaskQueueRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"binaryChecksum") PollWorkflowTaskQueueRequest
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe WorkerVersionCapabilities)
  PollWorkflowTaskQueueRequest
  PollWorkflowTaskQueueRequest
  (Maybe WorkerVersionCapabilities)
  (Maybe WorkerVersionCapabilities)
-> PollWorkflowTaskQueueRequest -> Maybe WorkerVersionCapabilities
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'workerVersionCapabilities") PollWorkflowTaskQueueRequest
_x
                          of
                            Maybe WorkerVersionCapabilities
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just WorkerVersionCapabilities
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (WorkerVersionCapabilities -> ByteString)
-> WorkerVersionCapabilities
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      WorkerVersionCapabilities -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkerVersionCapabilities
_v))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  PollWorkflowTaskQueueRequest
  PollWorkflowTaskQueueRequest
  FieldSet
  FieldSet
-> PollWorkflowTaskQueueRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  PollWorkflowTaskQueueRequest
  PollWorkflowTaskQueueRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PollWorkflowTaskQueueRequest FieldSet
Data.ProtoLens.unknownFields PollWorkflowTaskQueueRequest
_x))))))
instance Control.DeepSeq.NFData PollWorkflowTaskQueueRequest where
  rnf :: PollWorkflowTaskQueueRequest -> ()
rnf
    = \ PollWorkflowTaskQueueRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (PollWorkflowTaskQueueRequest -> FieldSet
_PollWorkflowTaskQueueRequest'_unknownFields PollWorkflowTaskQueueRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (PollWorkflowTaskQueueRequest -> Text
_PollWorkflowTaskQueueRequest'namespace PollWorkflowTaskQueueRequest
x__)
                (Maybe TaskQueue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (PollWorkflowTaskQueueRequest -> Maybe TaskQueue
_PollWorkflowTaskQueueRequest'taskQueue PollWorkflowTaskQueueRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (PollWorkflowTaskQueueRequest -> Text
_PollWorkflowTaskQueueRequest'identity PollWorkflowTaskQueueRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (PollWorkflowTaskQueueRequest -> Text
_PollWorkflowTaskQueueRequest'binaryChecksum PollWorkflowTaskQueueRequest
x__)
                         (Maybe WorkerVersionCapabilities -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (PollWorkflowTaskQueueRequest -> Maybe WorkerVersionCapabilities
_PollWorkflowTaskQueueRequest'workerVersionCapabilities PollWorkflowTaskQueueRequest
x__)
                            ())))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskToken' @:: Lens' PollWorkflowTaskQueueResponse Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowExecution' @:: Lens' PollWorkflowTaskQueueResponse Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowExecution' @:: Lens' PollWorkflowTaskQueueResponse (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowType' @:: Lens' PollWorkflowTaskQueueResponse Proto.Temporal.Api.Common.V1.Message.WorkflowType@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowType' @:: Lens' PollWorkflowTaskQueueResponse (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.previousStartedEventId' @:: Lens' PollWorkflowTaskQueueResponse Data.Int.Int64@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.startedEventId' @:: Lens' PollWorkflowTaskQueueResponse Data.Int.Int64@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.attempt' @:: Lens' PollWorkflowTaskQueueResponse Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.backlogCountHint' @:: Lens' PollWorkflowTaskQueueResponse Data.Int.Int64@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.history' @:: Lens' PollWorkflowTaskQueueResponse Proto.Temporal.Api.History.V1.Message.History@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'history' @:: Lens' PollWorkflowTaskQueueResponse (Prelude.Maybe Proto.Temporal.Api.History.V1.Message.History)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' PollWorkflowTaskQueueResponse Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.query' @:: Lens' PollWorkflowTaskQueueResponse Proto.Temporal.Api.Query.V1.Message.WorkflowQuery@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'query' @:: Lens' PollWorkflowTaskQueueResponse (Prelude.Maybe Proto.Temporal.Api.Query.V1.Message.WorkflowQuery)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowExecutionTaskQueue' @:: Lens' PollWorkflowTaskQueueResponse Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowExecutionTaskQueue' @:: Lens' PollWorkflowTaskQueueResponse (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.scheduledTime' @:: Lens' PollWorkflowTaskQueueResponse Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'scheduledTime' @:: Lens' PollWorkflowTaskQueueResponse (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.startedTime' @:: Lens' PollWorkflowTaskQueueResponse Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'startedTime' @:: Lens' PollWorkflowTaskQueueResponse (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.queries' @:: Lens' PollWorkflowTaskQueueResponse (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Query.V1.Message.WorkflowQuery)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.messages' @:: Lens' PollWorkflowTaskQueueResponse [Proto.Temporal.Api.Protocol.V1.Message.Message]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'messages' @:: Lens' PollWorkflowTaskQueueResponse (Data.Vector.Vector Proto.Temporal.Api.Protocol.V1.Message.Message)@ -}
data PollWorkflowTaskQueueResponse
  = PollWorkflowTaskQueueResponse'_constructor {PollWorkflowTaskQueueResponse -> ByteString
_PollWorkflowTaskQueueResponse'taskToken :: !Data.ByteString.ByteString,
                                                PollWorkflowTaskQueueResponse -> Maybe WorkflowExecution
_PollWorkflowTaskQueueResponse'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                PollWorkflowTaskQueueResponse -> Maybe WorkflowType
_PollWorkflowTaskQueueResponse'workflowType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
                                                PollWorkflowTaskQueueResponse -> Int64
_PollWorkflowTaskQueueResponse'previousStartedEventId :: !Data.Int.Int64,
                                                PollWorkflowTaskQueueResponse -> Int64
_PollWorkflowTaskQueueResponse'startedEventId :: !Data.Int.Int64,
                                                PollWorkflowTaskQueueResponse -> Int32
_PollWorkflowTaskQueueResponse'attempt :: !Data.Int.Int32,
                                                PollWorkflowTaskQueueResponse -> Int64
_PollWorkflowTaskQueueResponse'backlogCountHint :: !Data.Int.Int64,
                                                PollWorkflowTaskQueueResponse -> Maybe History
_PollWorkflowTaskQueueResponse'history :: !(Prelude.Maybe Proto.Temporal.Api.History.V1.Message.History),
                                                PollWorkflowTaskQueueResponse -> ByteString
_PollWorkflowTaskQueueResponse'nextPageToken :: !Data.ByteString.ByteString,
                                                PollWorkflowTaskQueueResponse -> Maybe WorkflowQuery
_PollWorkflowTaskQueueResponse'query :: !(Prelude.Maybe Proto.Temporal.Api.Query.V1.Message.WorkflowQuery),
                                                PollWorkflowTaskQueueResponse -> Maybe TaskQueue
_PollWorkflowTaskQueueResponse'workflowExecutionTaskQueue :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue),
                                                PollWorkflowTaskQueueResponse -> Maybe Timestamp
_PollWorkflowTaskQueueResponse'scheduledTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                                PollWorkflowTaskQueueResponse -> Maybe Timestamp
_PollWorkflowTaskQueueResponse'startedTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                                PollWorkflowTaskQueueResponse -> Map Text WorkflowQuery
_PollWorkflowTaskQueueResponse'queries :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Query.V1.Message.WorkflowQuery),
                                                PollWorkflowTaskQueueResponse -> Vector Message
_PollWorkflowTaskQueueResponse'messages :: !(Data.Vector.Vector Proto.Temporal.Api.Protocol.V1.Message.Message),
                                                PollWorkflowTaskQueueResponse -> FieldSet
_PollWorkflowTaskQueueResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Bool
(PollWorkflowTaskQueueResponse
 -> PollWorkflowTaskQueueResponse -> Bool)
-> (PollWorkflowTaskQueueResponse
    -> PollWorkflowTaskQueueResponse -> Bool)
-> Eq PollWorkflowTaskQueueResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Bool
== :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Bool
$c/= :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Bool
/= :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Bool
Prelude.Eq, Eq PollWorkflowTaskQueueResponse
Eq PollWorkflowTaskQueueResponse =>
(PollWorkflowTaskQueueResponse
 -> PollWorkflowTaskQueueResponse -> Ordering)
-> (PollWorkflowTaskQueueResponse
    -> PollWorkflowTaskQueueResponse -> Bool)
-> (PollWorkflowTaskQueueResponse
    -> PollWorkflowTaskQueueResponse -> Bool)
-> (PollWorkflowTaskQueueResponse
    -> PollWorkflowTaskQueueResponse -> Bool)
-> (PollWorkflowTaskQueueResponse
    -> PollWorkflowTaskQueueResponse -> Bool)
-> (PollWorkflowTaskQueueResponse
    -> PollWorkflowTaskQueueResponse -> PollWorkflowTaskQueueResponse)
-> (PollWorkflowTaskQueueResponse
    -> PollWorkflowTaskQueueResponse -> PollWorkflowTaskQueueResponse)
-> Ord PollWorkflowTaskQueueResponse
PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Bool
PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Ordering
PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> PollWorkflowTaskQueueResponse
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 :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Ordering
compare :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Ordering
$c< :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Bool
< :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Bool
$c<= :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Bool
<= :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Bool
$c> :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Bool
> :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Bool
$c>= :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Bool
>= :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> Bool
$cmax :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> PollWorkflowTaskQueueResponse
max :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> PollWorkflowTaskQueueResponse
$cmin :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> PollWorkflowTaskQueueResponse
min :: PollWorkflowTaskQueueResponse
-> PollWorkflowTaskQueueResponse -> PollWorkflowTaskQueueResponse
Prelude.Ord)
instance Prelude.Show PollWorkflowTaskQueueResponse where
  showsPrec :: Int -> PollWorkflowTaskQueueResponse -> ShowS
showsPrec Int
_ PollWorkflowTaskQueueResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (PollWorkflowTaskQueueResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PollWorkflowTaskQueueResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "taskToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskToken"
-> (ByteString -> f ByteString)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "taskToken"
_
    = ((ByteString -> f ByteString)
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> ByteString)
-> (PollWorkflowTaskQueueResponse
    -> ByteString -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> ByteString
_PollWorkflowTaskQueueResponse'taskToken
           (\ PollWorkflowTaskQueueResponse
x__ ByteString
y__
              -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'taskToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Maybe WorkflowExecution)
-> (PollWorkflowTaskQueueResponse
    -> Maybe WorkflowExecution -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Maybe WorkflowExecution
_PollWorkflowTaskQueueResponse'workflowExecution
           (\ PollWorkflowTaskQueueResponse
x__ Maybe WorkflowExecution
y__
              -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'workflowExecution = y__}))
        (WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Maybe WorkflowExecution)
-> (PollWorkflowTaskQueueResponse
    -> Maybe WorkflowExecution -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Maybe WorkflowExecution
_PollWorkflowTaskQueueResponse'workflowExecution
           (\ PollWorkflowTaskQueueResponse
x__ Maybe WorkflowExecution
y__
              -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "workflowType" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (WorkflowType -> f WorkflowType)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((WorkflowType -> f WorkflowType)
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Maybe WorkflowType)
-> (PollWorkflowTaskQueueResponse
    -> Maybe WorkflowType -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Maybe WorkflowType
_PollWorkflowTaskQueueResponse'workflowType
           (\ PollWorkflowTaskQueueResponse
x__ Maybe WorkflowType
y__
              -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'workflowType = y__}))
        (WorkflowType -> Lens' (Maybe WorkflowType) WorkflowType
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowType
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "maybe'workflowType" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowType"
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "maybe'workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Maybe WorkflowType)
-> (PollWorkflowTaskQueueResponse
    -> Maybe WorkflowType -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Maybe WorkflowType
_PollWorkflowTaskQueueResponse'workflowType
           (\ PollWorkflowTaskQueueResponse
x__ Maybe WorkflowType
y__
              -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'workflowType = y__}))
        (Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "previousStartedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "previousStartedEventId"
-> (Int64 -> f Int64)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "previousStartedEventId"
_
    = ((Int64 -> f Int64)
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Int64)
-> (PollWorkflowTaskQueueResponse
    -> Int64 -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Int64
_PollWorkflowTaskQueueResponse'previousStartedEventId
           (\ PollWorkflowTaskQueueResponse
x__ Int64
y__
              -> PollWorkflowTaskQueueResponse
x__
                   {_PollWorkflowTaskQueueResponse'previousStartedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "startedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedEventId"
-> (Int64 -> f Int64)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "startedEventId"
_
    = ((Int64 -> f Int64)
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Int64)
-> (PollWorkflowTaskQueueResponse
    -> Int64 -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Int64
_PollWorkflowTaskQueueResponse'startedEventId
           (\ PollWorkflowTaskQueueResponse
x__ Int64
y__
              -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'startedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "attempt" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attempt"
-> (Int32 -> f Int32)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "attempt"
_
    = ((Int32 -> f Int32)
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Int32)
-> (PollWorkflowTaskQueueResponse
    -> Int32 -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Int32
_PollWorkflowTaskQueueResponse'attempt
           (\ PollWorkflowTaskQueueResponse
x__ Int32
y__ -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'attempt = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "backlogCountHint" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "backlogCountHint"
-> (Int64 -> f Int64)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "backlogCountHint"
_
    = ((Int64 -> f Int64)
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Int64)
-> (PollWorkflowTaskQueueResponse
    -> Int64 -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Int64
_PollWorkflowTaskQueueResponse'backlogCountHint
           (\ PollWorkflowTaskQueueResponse
x__ Int64
y__
              -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'backlogCountHint = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "history" Proto.Temporal.Api.History.V1.Message.History where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "history"
-> (History -> f History)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "history"
_
    = ((Maybe History -> f (Maybe History))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((History -> f History) -> Maybe History -> f (Maybe History))
-> (History -> f History)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Maybe History)
-> (PollWorkflowTaskQueueResponse
    -> Maybe History -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Maybe History)
     (Maybe History)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Maybe History
_PollWorkflowTaskQueueResponse'history
           (\ PollWorkflowTaskQueueResponse
x__ Maybe History
y__ -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'history = y__}))
        (History -> Lens' (Maybe History) History
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens History
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "maybe'history" (Prelude.Maybe Proto.Temporal.Api.History.V1.Message.History) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'history"
-> (Maybe History -> f (Maybe History))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "maybe'history"
_
    = ((Maybe History -> f (Maybe History))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((Maybe History -> f (Maybe History))
    -> Maybe History -> f (Maybe History))
-> (Maybe History -> f (Maybe History))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Maybe History)
-> (PollWorkflowTaskQueueResponse
    -> Maybe History -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Maybe History)
     (Maybe History)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Maybe History
_PollWorkflowTaskQueueResponse'history
           (\ PollWorkflowTaskQueueResponse
x__ Maybe History
y__ -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'history = y__}))
        (Maybe History -> f (Maybe History))
-> Maybe History -> f (Maybe History)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> ByteString)
-> (PollWorkflowTaskQueueResponse
    -> ByteString -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> ByteString
_PollWorkflowTaskQueueResponse'nextPageToken
           (\ PollWorkflowTaskQueueResponse
x__ ByteString
y__
              -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "query" Proto.Temporal.Api.Query.V1.Message.WorkflowQuery where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "query"
-> (WorkflowQuery -> f WorkflowQuery)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "query"
_
    = ((Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((WorkflowQuery -> f WorkflowQuery)
    -> Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
-> (WorkflowQuery -> f WorkflowQuery)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Maybe WorkflowQuery)
-> (PollWorkflowTaskQueueResponse
    -> Maybe WorkflowQuery -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Maybe WorkflowQuery)
     (Maybe WorkflowQuery)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Maybe WorkflowQuery
_PollWorkflowTaskQueueResponse'query
           (\ PollWorkflowTaskQueueResponse
x__ Maybe WorkflowQuery
y__ -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'query = y__}))
        (WorkflowQuery -> Lens' (Maybe WorkflowQuery) WorkflowQuery
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowQuery
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "maybe'query" (Prelude.Maybe Proto.Temporal.Api.Query.V1.Message.WorkflowQuery) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'query"
-> (Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "maybe'query"
_
    = ((Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
    -> Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
-> (Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Maybe WorkflowQuery)
-> (PollWorkflowTaskQueueResponse
    -> Maybe WorkflowQuery -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Maybe WorkflowQuery)
     (Maybe WorkflowQuery)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Maybe WorkflowQuery
_PollWorkflowTaskQueueResponse'query
           (\ PollWorkflowTaskQueueResponse
x__ Maybe WorkflowQuery
y__ -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'query = y__}))
        (Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
-> Maybe WorkflowQuery -> f (Maybe WorkflowQuery)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "workflowExecutionTaskQueue" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionTaskQueue"
-> (TaskQueue -> f TaskQueue)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "workflowExecutionTaskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((TaskQueue -> f TaskQueue)
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (TaskQueue -> f TaskQueue)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Maybe TaskQueue)
-> (PollWorkflowTaskQueueResponse
    -> Maybe TaskQueue -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Maybe TaskQueue
_PollWorkflowTaskQueueResponse'workflowExecutionTaskQueue
           (\ PollWorkflowTaskQueueResponse
x__ Maybe TaskQueue
y__
              -> PollWorkflowTaskQueueResponse
x__
                   {_PollWorkflowTaskQueueResponse'workflowExecutionTaskQueue = y__}))
        (TaskQueue -> Lens' (Maybe TaskQueue) TaskQueue
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TaskQueue
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "maybe'workflowExecutionTaskQueue" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionTaskQueue"
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "maybe'workflowExecutionTaskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((Maybe TaskQueue -> f (Maybe TaskQueue))
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Maybe TaskQueue)
-> (PollWorkflowTaskQueueResponse
    -> Maybe TaskQueue -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Maybe TaskQueue
_PollWorkflowTaskQueueResponse'workflowExecutionTaskQueue
           (\ PollWorkflowTaskQueueResponse
x__ Maybe TaskQueue
y__
              -> PollWorkflowTaskQueueResponse
x__
                   {_PollWorkflowTaskQueueResponse'workflowExecutionTaskQueue = y__}))
        (Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "scheduledTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledTime"
-> (Timestamp -> f Timestamp)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "scheduledTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Maybe Timestamp)
-> (PollWorkflowTaskQueueResponse
    -> Maybe Timestamp -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Maybe Timestamp
_PollWorkflowTaskQueueResponse'scheduledTime
           (\ PollWorkflowTaskQueueResponse
x__ Maybe Timestamp
y__
              -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'scheduledTime = y__}))
        (Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "maybe'scheduledTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduledTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "maybe'scheduledTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Maybe Timestamp)
-> (PollWorkflowTaskQueueResponse
    -> Maybe Timestamp -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Maybe Timestamp
_PollWorkflowTaskQueueResponse'scheduledTime
           (\ PollWorkflowTaskQueueResponse
x__ Maybe Timestamp
y__
              -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'scheduledTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "startedTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedTime"
-> (Timestamp -> f Timestamp)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "startedTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Maybe Timestamp)
-> (PollWorkflowTaskQueueResponse
    -> Maybe Timestamp -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Maybe Timestamp
_PollWorkflowTaskQueueResponse'startedTime
           (\ PollWorkflowTaskQueueResponse
x__ Maybe Timestamp
y__
              -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'startedTime = y__}))
        (Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "maybe'startedTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startedTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "maybe'startedTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Maybe Timestamp)
-> (PollWorkflowTaskQueueResponse
    -> Maybe Timestamp -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Maybe Timestamp
_PollWorkflowTaskQueueResponse'startedTime
           (\ PollWorkflowTaskQueueResponse
x__ Maybe Timestamp
y__
              -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'startedTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "queries" (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Query.V1.Message.WorkflowQuery) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "queries"
-> (Map Text WorkflowQuery -> f (Map Text WorkflowQuery))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "queries"
_
    = ((Map Text WorkflowQuery -> f (Map Text WorkflowQuery))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((Map Text WorkflowQuery -> f (Map Text WorkflowQuery))
    -> Map Text WorkflowQuery -> f (Map Text WorkflowQuery))
-> (Map Text WorkflowQuery -> f (Map Text WorkflowQuery))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Map Text WorkflowQuery)
-> (PollWorkflowTaskQueueResponse
    -> Map Text WorkflowQuery -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Map Text WorkflowQuery)
     (Map Text WorkflowQuery)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Map Text WorkflowQuery
_PollWorkflowTaskQueueResponse'queries
           (\ PollWorkflowTaskQueueResponse
x__ Map Text WorkflowQuery
y__ -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'queries = y__}))
        (Map Text WorkflowQuery -> f (Map Text WorkflowQuery))
-> Map Text WorkflowQuery -> f (Map Text WorkflowQuery)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "messages" [Proto.Temporal.Api.Protocol.V1.Message.Message] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "messages"
-> ([Message] -> f [Message])
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "messages"
_
    = ((Vector Message -> f (Vector Message))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> (([Message] -> f [Message])
    -> Vector Message -> f (Vector Message))
-> ([Message] -> f [Message])
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Vector Message)
-> (PollWorkflowTaskQueueResponse
    -> Vector Message -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Vector Message)
     (Vector Message)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Vector Message
_PollWorkflowTaskQueueResponse'messages
           (\ PollWorkflowTaskQueueResponse
x__ Vector Message
y__ -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'messages = y__}))
        ((Vector Message -> [Message])
-> (Vector Message -> [Message] -> Vector Message)
-> Lens (Vector Message) (Vector Message) [Message] [Message]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Message -> [Message]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Message
_ [Message]
y__ -> [Message] -> Vector Message
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Message]
y__))
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse "vec'messages" (Data.Vector.Vector Proto.Temporal.Api.Protocol.V1.Message.Message) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'messages"
-> (Vector Message -> f (Vector Message))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
fieldOf Proxy# "vec'messages"
_
    = ((Vector Message -> f (Vector Message))
 -> PollWorkflowTaskQueueResponse
 -> f PollWorkflowTaskQueueResponse)
-> ((Vector Message -> f (Vector Message))
    -> Vector Message -> f (Vector Message))
-> (Vector Message -> f (Vector Message))
-> PollWorkflowTaskQueueResponse
-> f PollWorkflowTaskQueueResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse -> Vector Message)
-> (PollWorkflowTaskQueueResponse
    -> Vector Message -> PollWorkflowTaskQueueResponse)
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Vector Message)
     (Vector Message)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse -> Vector Message
_PollWorkflowTaskQueueResponse'messages
           (\ PollWorkflowTaskQueueResponse
x__ Vector Message
y__ -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'messages = y__}))
        (Vector Message -> f (Vector Message))
-> Vector Message -> f (Vector Message)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message PollWorkflowTaskQueueResponse where
  messageName :: Proxy PollWorkflowTaskQueueResponse -> Text
messageName Proxy PollWorkflowTaskQueueResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.PollWorkflowTaskQueueResponse"
  packedMessageDescriptor :: Proxy PollWorkflowTaskQueueResponse -> ByteString
packedMessageDescriptor Proxy PollWorkflowTaskQueueResponse
_
    = ByteString
"\n\
      \\GSPollWorkflowTaskQueueResponse\DC2\GS\n\
      \\n\
      \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2X\n\
      \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
      \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC29\n\
      \\EMprevious_started_event_id\CAN\EOT \SOH(\ETXR\SYNpreviousStartedEventId\DC2(\n\
      \\DLEstarted_event_id\CAN\ENQ \SOH(\ETXR\SOstartedEventId\DC2\CAN\n\
      \\aattempt\CAN\ACK \SOH(\ENQR\aattempt\DC2,\n\
      \\DC2backlog_count_hint\CAN\a \SOH(\ETXR\DLEbacklogCountHint\DC2:\n\
      \\ahistory\CAN\b \SOH(\v2 .temporal.api.history.v1.HistoryR\ahistory\DC2&\n\
      \\SInext_page_token\CAN\t \SOH(\fR\rnextPageToken\DC2:\n\
      \\ENQquery\CAN\n\
      \ \SOH(\v2$.temporal.api.query.v1.WorkflowQueryR\ENQquery\DC2g\n\
      \\GSworkflow_execution_task_queue\CAN\v \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\SUBworkflowExecutionTaskQueue\DC2A\n\
      \\SOscheduled_time\CAN\f \SOH(\v2\SUB.google.protobuf.TimestampR\rscheduledTime\DC2=\n\
      \\fstarted_time\CAN\r \SOH(\v2\SUB.google.protobuf.TimestampR\vstartedTime\DC2e\n\
      \\aqueries\CAN\SO \ETX(\v2K.temporal.api.workflowservice.v1.PollWorkflowTaskQueueResponse.QueriesEntryR\aqueries\DC2=\n\
      \\bmessages\CAN\SI \ETX(\v2!.temporal.api.protocol.v1.MessageR\bmessages\SUB`\n\
      \\fQueriesEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2:\n\
      \\ENQvalue\CAN\STX \SOH(\v2$.temporal.api.query.v1.WorkflowQueryR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy PollWorkflowTaskQueueResponse -> ByteString
packedFileDescriptor Proxy PollWorkflowTaskQueueResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor PollWorkflowTaskQueueResponse)
fieldsByTag
    = let
        taskToken__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse
taskToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor PollWorkflowTaskQueueResponse ByteString
-> FieldDescriptor PollWorkflowTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     ByteString
     ByteString
-> FieldAccessor PollWorkflowTaskQueueResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueResponse
        workflowExecution__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor PollWorkflowTaskQueueResponse WorkflowExecution
-> FieldDescriptor PollWorkflowTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
              (Lens
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor PollWorkflowTaskQueueResponse WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueResponse
        workflowType__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor PollWorkflowTaskQueueResponse WorkflowType
-> FieldDescriptor PollWorkflowTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_type"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowType
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowType)
              (Lens
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> FieldAccessor PollWorkflowTaskQueueResponse WorkflowType
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowType")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueResponse
        previousStartedEventId__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse
previousStartedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor PollWorkflowTaskQueueResponse Int64
-> FieldDescriptor PollWorkflowTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"previous_started_event_id"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     Int64
     Int64
-> FieldAccessor PollWorkflowTaskQueueResponse Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"previousStartedEventId")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueResponse
        startedEventId__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse
startedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor PollWorkflowTaskQueueResponse Int64
-> FieldDescriptor PollWorkflowTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_event_id"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     Int64
     Int64
-> FieldAccessor PollWorkflowTaskQueueResponse Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"startedEventId")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueResponse
        attempt__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse
attempt__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor PollWorkflowTaskQueueResponse Int32
-> FieldDescriptor PollWorkflowTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"attempt"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     Int32
     Int32
-> FieldAccessor PollWorkflowTaskQueueResponse Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueResponse
        backlogCountHint__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse
backlogCountHint__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor PollWorkflowTaskQueueResponse Int64
-> FieldDescriptor PollWorkflowTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"backlog_count_hint"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     Int64
     Int64
-> FieldAccessor PollWorkflowTaskQueueResponse Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"backlogCountHint")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueResponse
        history__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse
history__field_descriptor
          = String
-> FieldTypeDescriptor History
-> FieldAccessor PollWorkflowTaskQueueResponse History
-> FieldDescriptor PollWorkflowTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"history"
              (MessageOrGroup -> FieldTypeDescriptor History
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.History.V1.Message.History)
              (Lens
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Maybe History)
  (Maybe History)
-> FieldAccessor PollWorkflowTaskQueueResponse History
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'history")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueResponse
        nextPageToken__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor PollWorkflowTaskQueueResponse ByteString
-> FieldDescriptor PollWorkflowTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     ByteString
     ByteString
-> FieldAccessor PollWorkflowTaskQueueResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueResponse
        query__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse
query__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowQuery
-> FieldAccessor PollWorkflowTaskQueueResponse WorkflowQuery
-> FieldDescriptor PollWorkflowTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"query"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowQuery
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Query.V1.Message.WorkflowQuery)
              (Lens
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Maybe WorkflowQuery)
  (Maybe WorkflowQuery)
-> FieldAccessor PollWorkflowTaskQueueResponse WorkflowQuery
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'query")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueResponse
        workflowExecutionTaskQueue__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse
workflowExecutionTaskQueue__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueue
-> FieldAccessor PollWorkflowTaskQueueResponse TaskQueue
-> FieldDescriptor PollWorkflowTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_task_queue"
              (MessageOrGroup -> FieldTypeDescriptor TaskQueue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)
              (Lens
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> FieldAccessor PollWorkflowTaskQueueResponse TaskQueue
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                    @"maybe'workflowExecutionTaskQueue")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueResponse
        scheduledTime__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse
scheduledTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor PollWorkflowTaskQueueResponse Timestamp
-> FieldDescriptor PollWorkflowTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_time"
              (MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
              (Lens
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Maybe Timestamp)
  (Maybe Timestamp)
-> FieldAccessor PollWorkflowTaskQueueResponse Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduledTime")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueResponse
        startedTime__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse
startedTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor PollWorkflowTaskQueueResponse Timestamp
-> FieldDescriptor PollWorkflowTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_time"
              (MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
              (Lens
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Maybe Timestamp)
  (Maybe Timestamp)
-> FieldAccessor PollWorkflowTaskQueueResponse Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startedTime")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueResponse
        queries__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse
queries__field_descriptor
          = String
-> FieldTypeDescriptor PollWorkflowTaskQueueResponse'QueriesEntry
-> FieldAccessor
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse'QueriesEntry
-> FieldDescriptor PollWorkflowTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"queries"
              (MessageOrGroup
-> FieldTypeDescriptor PollWorkflowTaskQueueResponse'QueriesEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor PollWorkflowTaskQueueResponse'QueriesEntry)
              (Lens' PollWorkflowTaskQueueResponse'QueriesEntry Text
-> Lens' PollWorkflowTaskQueueResponse'QueriesEntry WorkflowQuery
-> Lens
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse
     (Map Text WorkflowQuery)
     (Map Text WorkflowQuery)
-> FieldAccessor
     PollWorkflowTaskQueueResponse
     PollWorkflowTaskQueueResponse'QueriesEntry
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 @"queries")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueResponse
        messages__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse
messages__field_descriptor
          = String
-> FieldTypeDescriptor Message
-> FieldAccessor PollWorkflowTaskQueueResponse Message
-> FieldDescriptor PollWorkflowTaskQueueResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"messages"
              (MessageOrGroup -> FieldTypeDescriptor Message
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Protocol.V1.Message.Message)
              (Packing
-> Lens' PollWorkflowTaskQueueResponse [Message]
-> FieldAccessor PollWorkflowTaskQueueResponse Message
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 @"messages")) ::
              Data.ProtoLens.FieldDescriptor PollWorkflowTaskQueueResponse
      in
        [(Tag, FieldDescriptor PollWorkflowTaskQueueResponse)]
-> Map Tag (FieldDescriptor PollWorkflowTaskQueueResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor PollWorkflowTaskQueueResponse
taskToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor PollWorkflowTaskQueueResponse
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor PollWorkflowTaskQueueResponse
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor PollWorkflowTaskQueueResponse
previousStartedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor PollWorkflowTaskQueueResponse
startedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor PollWorkflowTaskQueueResponse
attempt__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor PollWorkflowTaskQueueResponse
backlogCountHint__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor PollWorkflowTaskQueueResponse
history__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor PollWorkflowTaskQueueResponse
nextPageToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor PollWorkflowTaskQueueResponse
query__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, 
            FieldDescriptor PollWorkflowTaskQueueResponse
workflowExecutionTaskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor PollWorkflowTaskQueueResponse
scheduledTime__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor PollWorkflowTaskQueueResponse
startedTime__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
14, FieldDescriptor PollWorkflowTaskQueueResponse
queries__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
15, FieldDescriptor PollWorkflowTaskQueueResponse
messages__field_descriptor)]
  unknownFields :: Lens' PollWorkflowTaskQueueResponse FieldSet
unknownFields
    = (PollWorkflowTaskQueueResponse -> FieldSet)
-> (PollWorkflowTaskQueueResponse
    -> FieldSet -> PollWorkflowTaskQueueResponse)
-> Lens' PollWorkflowTaskQueueResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        PollWorkflowTaskQueueResponse -> FieldSet
_PollWorkflowTaskQueueResponse'_unknownFields
        (\ PollWorkflowTaskQueueResponse
x__ FieldSet
y__
           -> PollWorkflowTaskQueueResponse
x__ {_PollWorkflowTaskQueueResponse'_unknownFields = y__})
  defMessage :: PollWorkflowTaskQueueResponse
defMessage
    = PollWorkflowTaskQueueResponse'_constructor
        {_PollWorkflowTaskQueueResponse'taskToken :: ByteString
_PollWorkflowTaskQueueResponse'taskToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollWorkflowTaskQueueResponse'workflowExecution :: Maybe WorkflowExecution
_PollWorkflowTaskQueueResponse'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _PollWorkflowTaskQueueResponse'workflowType :: Maybe WorkflowType
_PollWorkflowTaskQueueResponse'workflowType = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
         _PollWorkflowTaskQueueResponse'previousStartedEventId :: Int64
_PollWorkflowTaskQueueResponse'previousStartedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollWorkflowTaskQueueResponse'startedEventId :: Int64
_PollWorkflowTaskQueueResponse'startedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollWorkflowTaskQueueResponse'attempt :: Int32
_PollWorkflowTaskQueueResponse'attempt = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollWorkflowTaskQueueResponse'backlogCountHint :: Int64
_PollWorkflowTaskQueueResponse'backlogCountHint = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollWorkflowTaskQueueResponse'history :: Maybe History
_PollWorkflowTaskQueueResponse'history = Maybe History
forall a. Maybe a
Prelude.Nothing,
         _PollWorkflowTaskQueueResponse'nextPageToken :: ByteString
_PollWorkflowTaskQueueResponse'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollWorkflowTaskQueueResponse'query :: Maybe WorkflowQuery
_PollWorkflowTaskQueueResponse'query = Maybe WorkflowQuery
forall a. Maybe a
Prelude.Nothing,
         _PollWorkflowTaskQueueResponse'workflowExecutionTaskQueue :: Maybe TaskQueue
_PollWorkflowTaskQueueResponse'workflowExecutionTaskQueue = Maybe TaskQueue
forall a. Maybe a
Prelude.Nothing,
         _PollWorkflowTaskQueueResponse'scheduledTime :: Maybe Timestamp
_PollWorkflowTaskQueueResponse'scheduledTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _PollWorkflowTaskQueueResponse'startedTime :: Maybe Timestamp
_PollWorkflowTaskQueueResponse'startedTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _PollWorkflowTaskQueueResponse'queries :: Map Text WorkflowQuery
_PollWorkflowTaskQueueResponse'queries = Map Text WorkflowQuery
forall k a. Map k a
Data.Map.empty,
         _PollWorkflowTaskQueueResponse'messages :: Vector Message
_PollWorkflowTaskQueueResponse'messages = Vector Message
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _PollWorkflowTaskQueueResponse'_unknownFields :: FieldSet
_PollWorkflowTaskQueueResponse'_unknownFields = []}
  parseMessage :: Parser PollWorkflowTaskQueueResponse
parseMessage
    = let
        loop ::
          PollWorkflowTaskQueueResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Protocol.V1.Message.Message
             -> Data.ProtoLens.Encoding.Bytes.Parser PollWorkflowTaskQueueResponse
        loop :: PollWorkflowTaskQueueResponse
-> Growing Vector RealWorld Message
-> Parser PollWorkflowTaskQueueResponse
loop PollWorkflowTaskQueueResponse
x Growing Vector RealWorld Message
mutable'messages
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'messages <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                              mutable'messages)
                      (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'messages") frozen'messages x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"task_token"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskToken") y x)
                                  mutable'messages
                        Word64
18
                          -> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                                  mutable'messages
                        Word64
26
                          -> do y <- Parser WorkflowType -> String -> Parser WorkflowType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowType") y x)
                                  mutable'messages
                        Word64
32
                          -> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"previous_started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"previousStartedEventId") y x)
                                  mutable'messages
                        Word64
40
                          -> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startedEventId") y x)
                                  mutable'messages
                        Word64
48
                          -> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"attempt"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"attempt") y x)
                                  mutable'messages
                        Word64
56
                          -> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"backlog_count_hint"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"backlogCountHint") y x)
                                  mutable'messages
                        Word64
66
                          -> do y <- Parser History -> String -> Parser History
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"history"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"history") y x)
                                  mutable'messages
                        Word64
74
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                                  mutable'messages
                        Word64
82
                          -> do y <- Parser WorkflowQuery -> String -> Parser WorkflowQuery
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"query"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"query") y x)
                                  mutable'messages
                        Word64
90
                          -> do y <- Parser TaskQueue -> String -> Parser TaskQueue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_execution_task_queue"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecutionTaskQueue") y x)
                                  mutable'messages
                        Word64
98
                          -> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"scheduled_time"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledTime") y x)
                                  mutable'messages
                        Word64
106
                          -> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"started_time"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"startedTime") y x)
                                  mutable'messages
                        Word64
114
                          -> do !(entry :: PollWorkflowTaskQueueResponse'QueriesEntry) <- Parser PollWorkflowTaskQueueResponse'QueriesEntry
-> String -> Parser PollWorkflowTaskQueueResponse'QueriesEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                                            (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                                                Data.ProtoLens.Encoding.Bytes.isolate
                                                                                                  (Prelude.fromIntegral
                                                                                                     len)
                                                                                                  Data.ProtoLens.parseMessage)
                                                                                            String
"queries"
                                (let
                                   key = FoldLike
  Text
  PollWorkflowTaskQueueResponse'QueriesEntry
  PollWorkflowTaskQueueResponse'QueriesEntry
  Text
  Text
-> PollWorkflowTaskQueueResponse'QueriesEntry -> 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") PollWorkflowTaskQueueResponse'QueriesEntry
entry
                                   value
                                     = FoldLike
  WorkflowQuery
  PollWorkflowTaskQueueResponse'QueriesEntry
  PollWorkflowTaskQueueResponse'QueriesEntry
  WorkflowQuery
  WorkflowQuery
-> PollWorkflowTaskQueueResponse'QueriesEntry -> WorkflowQuery
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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") PollWorkflowTaskQueueResponse'QueriesEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"queries")
                                        (\ !Map Text WorkflowQuery
t -> Text
-> WorkflowQuery
-> Map Text WorkflowQuery
-> Map Text WorkflowQuery
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key WorkflowQuery
value Map Text WorkflowQuery
t) x)
                                     mutable'messages)
                        Word64
122
                          -> do !y <- Parser Message -> String -> Parser Message
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"messages"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'messages y)
                                loop x v
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
                                  mutable'messages
      in
        Parser PollWorkflowTaskQueueResponse
-> String -> Parser PollWorkflowTaskQueueResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'messages <- IO (Growing Vector RealWorld Message)
-> Parser (Growing Vector RealWorld Message)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                    IO (Growing Vector RealWorld Message)
IO (Growing Vector (PrimState IO) Message)
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'messages)
          String
"PollWorkflowTaskQueueResponse"
  buildMessage :: PollWorkflowTaskQueueResponse -> Builder
buildMessage
    = \ PollWorkflowTaskQueueResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: ByteString
_v = FoldLike
  ByteString
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  ByteString
  ByteString
-> PollWorkflowTaskQueueResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken") PollWorkflowTaskQueueResponse
_x
              in
                if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
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
bs
                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         ByteString
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe WorkflowExecution)
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> PollWorkflowTaskQueueResponse -> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution") PollWorkflowTaskQueueResponse
_x
                 of
                   Maybe WorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just WorkflowExecution
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe WorkflowType)
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> PollWorkflowTaskQueueResponse -> Maybe WorkflowType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                          (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowType") PollWorkflowTaskQueueResponse
_x
                    of
                      Maybe WorkflowType
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just WorkflowType
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (WorkflowType -> ByteString) -> WorkflowType -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                WorkflowType -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowType
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Int64
_v
                           = FoldLike
  Int64
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  Int64
  Int64
-> PollWorkflowTaskQueueResponse -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"previousStartedEventId") PollWorkflowTaskQueueResponse
_x
                       in
                         if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
32)
                               ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Int64
_v
                              = FoldLike
  Int64
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  Int64
  Int64
-> PollWorkflowTaskQueueResponse -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                  (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"startedEventId") PollWorkflowTaskQueueResponse
_x
                          in
                            if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
40)
                                  ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                     Int64
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Int32
_v = FoldLike
  Int32
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  Int32
  Int32
-> PollWorkflowTaskQueueResponse -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt") PollWorkflowTaskQueueResponse
_x
                             in
                               if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
48)
                                     ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                        Int32
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Int64
_v
                                    = FoldLike
  Int64
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  Int64
  Int64
-> PollWorkflowTaskQueueResponse -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                        (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"backlogCountHint") PollWorkflowTaskQueueResponse
_x
                                in
                                  if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                      Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  else
                                      Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
56)
                                        ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                           Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (case
                                       FoldLike
  (Maybe History)
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Maybe History)
  (Maybe History)
-> PollWorkflowTaskQueueResponse -> Maybe History
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'history") PollWorkflowTaskQueueResponse
_x
                                   of
                                     Maybe History
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                     (Prelude.Just History
_v)
                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                                            ((ByteString -> Builder)
-> (History -> ByteString) -> History -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                               (\ ByteString
bs
                                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                             (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                               History -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage History
_v))
                                  (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (let
                                        _v :: ByteString
_v
                                          = FoldLike
  ByteString
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  ByteString
  ByteString
-> PollWorkflowTaskQueueResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") PollWorkflowTaskQueueResponse
_x
                                      in
                                        if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                            Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                        else
                                            Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
                                              ((\ ByteString
bs
                                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                             (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                                 ByteString
_v))
                                     (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (case
                                             FoldLike
  (Maybe WorkflowQuery)
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Maybe WorkflowQuery)
  (Maybe WorkflowQuery)
-> PollWorkflowTaskQueueResponse -> Maybe WorkflowQuery
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'query") PollWorkflowTaskQueueResponse
_x
                                         of
                                           Maybe WorkflowQuery
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                           (Prelude.Just WorkflowQuery
_v)
                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
                                                  ((ByteString -> Builder)
-> (WorkflowQuery -> ByteString) -> WorkflowQuery -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                     (\ ByteString
bs
                                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                   (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                ByteString
bs))
                                                     WorkflowQuery -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowQuery
_v))
                                        (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (case
                                                FoldLike
  (Maybe TaskQueue)
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> PollWorkflowTaskQueueResponse -> Maybe TaskQueue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                  (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                     @"maybe'workflowExecutionTaskQueue")
                                                  PollWorkflowTaskQueueResponse
_x
                                            of
                                              Maybe TaskQueue
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                              (Prelude.Just TaskQueue
_v)
                                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
90)
                                                     ((ByteString -> Builder)
-> (TaskQueue -> ByteString) -> TaskQueue -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                        (\ ByteString
bs
                                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                   ByteString
bs))
                                                        TaskQueue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueue
_v))
                                           (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (case
                                                   FoldLike
  (Maybe Timestamp)
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Maybe Timestamp)
  (Maybe Timestamp)
-> PollWorkflowTaskQueueResponse -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                        @"maybe'scheduledTime")
                                                     PollWorkflowTaskQueueResponse
_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
98)
                                                        ((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                           (\ ByteString
bs
                                                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                         (ByteString -> Int
Data.ByteString.length
                                                                            ByteString
bs)))
                                                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                      ByteString
bs))
                                                           Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
                                              (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (case
                                                      FoldLike
  (Maybe Timestamp)
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Maybe Timestamp)
  (Maybe Timestamp)
-> PollWorkflowTaskQueueResponse -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                        (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                           @"maybe'startedTime")
                                                        PollWorkflowTaskQueueResponse
_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
106)
                                                           ((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, WorkflowQuery) -> Builder)
-> [(Text, WorkflowQuery)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                                                          (\ (Text, WorkflowQuery)
_v
                                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                     Word64
114)
                                                                  ((ByteString -> Builder)
-> (PollWorkflowTaskQueueResponse'QueriesEntry -> ByteString)
-> PollWorkflowTaskQueueResponse'QueriesEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                     (\ ByteString
bs
                                                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                   (ByteString -> Int
Data.ByteString.length
                                                                                      ByteString
bs)))
                                                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                ByteString
bs))
                                                                     PollWorkflowTaskQueueResponse'QueriesEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                     (Setter
  PollWorkflowTaskQueueResponse'QueriesEntry
  PollWorkflowTaskQueueResponse'QueriesEntry
  Text
  Text
-> Text
-> PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry
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, WorkflowQuery) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, WorkflowQuery)
_v)
                                                                        (Setter
  PollWorkflowTaskQueueResponse'QueriesEntry
  PollWorkflowTaskQueueResponse'QueriesEntry
  WorkflowQuery
  WorkflowQuery
-> WorkflowQuery
-> PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry
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, WorkflowQuery) -> WorkflowQuery
forall a b. (a, b) -> b
Prelude.snd (Text, WorkflowQuery)
_v)
                                                                           (PollWorkflowTaskQueueResponse'QueriesEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                                              PollWorkflowTaskQueueResponse'QueriesEntry)))))
                                                          (Map Text WorkflowQuery -> [(Text, WorkflowQuery)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                                             (FoldLike
  (Map Text WorkflowQuery)
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Map Text WorkflowQuery)
  (Map Text WorkflowQuery)
-> PollWorkflowTaskQueueResponse -> Map Text WorkflowQuery
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                   @"queries")
                                                                PollWorkflowTaskQueueResponse
_x))))
                                                    (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       ((Message -> Builder) -> Vector Message -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                                          (\ Message
_v
                                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                     Word64
122)
                                                                  ((ByteString -> Builder)
-> (Message -> ByteString) -> Message -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                     (\ ByteString
bs
                                                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                   (ByteString -> Int
Data.ByteString.length
                                                                                      ByteString
bs)))
                                                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                ByteString
bs))
                                                                     Message -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                     Message
_v))
                                                          (FoldLike
  (Vector Message)
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  (Vector Message)
  (Vector Message)
-> PollWorkflowTaskQueueResponse -> Vector Message
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'messages")
                                                             PollWorkflowTaskQueueResponse
_x))
                                                       (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                                          (FoldLike
  FieldSet
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  FieldSet
  FieldSet
-> PollWorkflowTaskQueueResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                             FoldLike
  FieldSet
  PollWorkflowTaskQueueResponse
  PollWorkflowTaskQueueResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PollWorkflowTaskQueueResponse FieldSet
Data.ProtoLens.unknownFields
                                                             PollWorkflowTaskQueueResponse
_x))))))))))))))))
instance Control.DeepSeq.NFData PollWorkflowTaskQueueResponse where
  rnf :: PollWorkflowTaskQueueResponse -> ()
rnf
    = \ PollWorkflowTaskQueueResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (PollWorkflowTaskQueueResponse -> FieldSet
_PollWorkflowTaskQueueResponse'_unknownFields PollWorkflowTaskQueueResponse
x__)
             (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (PollWorkflowTaskQueueResponse -> ByteString
_PollWorkflowTaskQueueResponse'taskToken PollWorkflowTaskQueueResponse
x__)
                (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (PollWorkflowTaskQueueResponse -> Maybe WorkflowExecution
_PollWorkflowTaskQueueResponse'workflowExecution PollWorkflowTaskQueueResponse
x__)
                   (Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (PollWorkflowTaskQueueResponse -> Maybe WorkflowType
_PollWorkflowTaskQueueResponse'workflowType PollWorkflowTaskQueueResponse
x__)
                      (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (PollWorkflowTaskQueueResponse -> Int64
_PollWorkflowTaskQueueResponse'previousStartedEventId PollWorkflowTaskQueueResponse
x__)
                         (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (PollWorkflowTaskQueueResponse -> Int64
_PollWorkflowTaskQueueResponse'startedEventId PollWorkflowTaskQueueResponse
x__)
                            (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (PollWorkflowTaskQueueResponse -> Int32
_PollWorkflowTaskQueueResponse'attempt PollWorkflowTaskQueueResponse
x__)
                               (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (PollWorkflowTaskQueueResponse -> Int64
_PollWorkflowTaskQueueResponse'backlogCountHint PollWorkflowTaskQueueResponse
x__)
                                  (Maybe History -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (PollWorkflowTaskQueueResponse -> Maybe History
_PollWorkflowTaskQueueResponse'history PollWorkflowTaskQueueResponse
x__)
                                     (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (PollWorkflowTaskQueueResponse -> ByteString
_PollWorkflowTaskQueueResponse'nextPageToken PollWorkflowTaskQueueResponse
x__)
                                        (Maybe WorkflowQuery -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (PollWorkflowTaskQueueResponse -> Maybe WorkflowQuery
_PollWorkflowTaskQueueResponse'query PollWorkflowTaskQueueResponse
x__)
                                           (Maybe TaskQueue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (PollWorkflowTaskQueueResponse -> Maybe TaskQueue
_PollWorkflowTaskQueueResponse'workflowExecutionTaskQueue
                                                 PollWorkflowTaskQueueResponse
x__)
                                              (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (PollWorkflowTaskQueueResponse -> Maybe Timestamp
_PollWorkflowTaskQueueResponse'scheduledTime PollWorkflowTaskQueueResponse
x__)
                                                 (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (PollWorkflowTaskQueueResponse -> Maybe Timestamp
_PollWorkflowTaskQueueResponse'startedTime PollWorkflowTaskQueueResponse
x__)
                                                    (Map Text WorkflowQuery -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                       (PollWorkflowTaskQueueResponse -> Map Text WorkflowQuery
_PollWorkflowTaskQueueResponse'queries PollWorkflowTaskQueueResponse
x__)
                                                       (Vector Message -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                          (PollWorkflowTaskQueueResponse -> Vector Message
_PollWorkflowTaskQueueResponse'messages
                                                             PollWorkflowTaskQueueResponse
x__)
                                                          ())))))))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.key' @:: Lens' PollWorkflowTaskQueueResponse'QueriesEntry Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.value' @:: Lens' PollWorkflowTaskQueueResponse'QueriesEntry Proto.Temporal.Api.Query.V1.Message.WorkflowQuery@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'value' @:: Lens' PollWorkflowTaskQueueResponse'QueriesEntry (Prelude.Maybe Proto.Temporal.Api.Query.V1.Message.WorkflowQuery)@ -}
data PollWorkflowTaskQueueResponse'QueriesEntry
  = PollWorkflowTaskQueueResponse'QueriesEntry'_constructor {PollWorkflowTaskQueueResponse'QueriesEntry -> Text
_PollWorkflowTaskQueueResponse'QueriesEntry'key :: !Data.Text.Text,
                                                             PollWorkflowTaskQueueResponse'QueriesEntry -> Maybe WorkflowQuery
_PollWorkflowTaskQueueResponse'QueriesEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Query.V1.Message.WorkflowQuery),
                                                             PollWorkflowTaskQueueResponse'QueriesEntry -> FieldSet
_PollWorkflowTaskQueueResponse'QueriesEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool
(PollWorkflowTaskQueueResponse'QueriesEntry
 -> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool)
-> (PollWorkflowTaskQueueResponse'QueriesEntry
    -> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool)
-> Eq PollWorkflowTaskQueueResponse'QueriesEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool
== :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool
$c/= :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool
/= :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool
Prelude.Eq, Eq PollWorkflowTaskQueueResponse'QueriesEntry
Eq PollWorkflowTaskQueueResponse'QueriesEntry =>
(PollWorkflowTaskQueueResponse'QueriesEntry
 -> PollWorkflowTaskQueueResponse'QueriesEntry -> Ordering)
-> (PollWorkflowTaskQueueResponse'QueriesEntry
    -> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool)
-> (PollWorkflowTaskQueueResponse'QueriesEntry
    -> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool)
-> (PollWorkflowTaskQueueResponse'QueriesEntry
    -> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool)
-> (PollWorkflowTaskQueueResponse'QueriesEntry
    -> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool)
-> (PollWorkflowTaskQueueResponse'QueriesEntry
    -> PollWorkflowTaskQueueResponse'QueriesEntry
    -> PollWorkflowTaskQueueResponse'QueriesEntry)
-> (PollWorkflowTaskQueueResponse'QueriesEntry
    -> PollWorkflowTaskQueueResponse'QueriesEntry
    -> PollWorkflowTaskQueueResponse'QueriesEntry)
-> Ord PollWorkflowTaskQueueResponse'QueriesEntry
PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool
PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Ordering
PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry
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 :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Ordering
compare :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Ordering
$c< :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool
< :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool
$c<= :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool
<= :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool
$c> :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool
> :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool
$c>= :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool
>= :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry -> Bool
$cmax :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry
max :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry
$cmin :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry
min :: PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry
-> PollWorkflowTaskQueueResponse'QueriesEntry
Prelude.Ord)
instance Prelude.Show PollWorkflowTaskQueueResponse'QueriesEntry where
  showsPrec :: Int -> PollWorkflowTaskQueueResponse'QueriesEntry -> ShowS
showsPrec Int
_ PollWorkflowTaskQueueResponse'QueriesEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (PollWorkflowTaskQueueResponse'QueriesEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PollWorkflowTaskQueueResponse'QueriesEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse'QueriesEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> PollWorkflowTaskQueueResponse'QueriesEntry
-> f PollWorkflowTaskQueueResponse'QueriesEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> PollWorkflowTaskQueueResponse'QueriesEntry
 -> f PollWorkflowTaskQueueResponse'QueriesEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PollWorkflowTaskQueueResponse'QueriesEntry
-> f PollWorkflowTaskQueueResponse'QueriesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse'QueriesEntry -> Text)
-> (PollWorkflowTaskQueueResponse'QueriesEntry
    -> Text -> PollWorkflowTaskQueueResponse'QueriesEntry)
-> Lens' PollWorkflowTaskQueueResponse'QueriesEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse'QueriesEntry -> Text
_PollWorkflowTaskQueueResponse'QueriesEntry'key
           (\ PollWorkflowTaskQueueResponse'QueriesEntry
x__ Text
y__
              -> PollWorkflowTaskQueueResponse'QueriesEntry
x__ {_PollWorkflowTaskQueueResponse'QueriesEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse'QueriesEntry "value" Proto.Temporal.Api.Query.V1.Message.WorkflowQuery where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (WorkflowQuery -> f WorkflowQuery)
-> PollWorkflowTaskQueueResponse'QueriesEntry
-> f PollWorkflowTaskQueueResponse'QueriesEntry
fieldOf Proxy# "value"
_
    = ((Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
 -> PollWorkflowTaskQueueResponse'QueriesEntry
 -> f PollWorkflowTaskQueueResponse'QueriesEntry)
-> ((WorkflowQuery -> f WorkflowQuery)
    -> Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
-> (WorkflowQuery -> f WorkflowQuery)
-> PollWorkflowTaskQueueResponse'QueriesEntry
-> f PollWorkflowTaskQueueResponse'QueriesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse'QueriesEntry -> Maybe WorkflowQuery)
-> (PollWorkflowTaskQueueResponse'QueriesEntry
    -> Maybe WorkflowQuery
    -> PollWorkflowTaskQueueResponse'QueriesEntry)
-> Lens
     PollWorkflowTaskQueueResponse'QueriesEntry
     PollWorkflowTaskQueueResponse'QueriesEntry
     (Maybe WorkflowQuery)
     (Maybe WorkflowQuery)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse'QueriesEntry -> Maybe WorkflowQuery
_PollWorkflowTaskQueueResponse'QueriesEntry'value
           (\ PollWorkflowTaskQueueResponse'QueriesEntry
x__ Maybe WorkflowQuery
y__
              -> PollWorkflowTaskQueueResponse'QueriesEntry
x__ {_PollWorkflowTaskQueueResponse'QueriesEntry'value = y__}))
        (WorkflowQuery -> Lens' (Maybe WorkflowQuery) WorkflowQuery
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowQuery
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PollWorkflowTaskQueueResponse'QueriesEntry "maybe'value" (Prelude.Maybe Proto.Temporal.Api.Query.V1.Message.WorkflowQuery) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'value"
-> (Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
-> PollWorkflowTaskQueueResponse'QueriesEntry
-> f PollWorkflowTaskQueueResponse'QueriesEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
 -> PollWorkflowTaskQueueResponse'QueriesEntry
 -> f PollWorkflowTaskQueueResponse'QueriesEntry)
-> ((Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
    -> Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
-> (Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
-> PollWorkflowTaskQueueResponse'QueriesEntry
-> f PollWorkflowTaskQueueResponse'QueriesEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((PollWorkflowTaskQueueResponse'QueriesEntry -> Maybe WorkflowQuery)
-> (PollWorkflowTaskQueueResponse'QueriesEntry
    -> Maybe WorkflowQuery
    -> PollWorkflowTaskQueueResponse'QueriesEntry)
-> Lens
     PollWorkflowTaskQueueResponse'QueriesEntry
     PollWorkflowTaskQueueResponse'QueriesEntry
     (Maybe WorkflowQuery)
     (Maybe WorkflowQuery)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           PollWorkflowTaskQueueResponse'QueriesEntry -> Maybe WorkflowQuery
_PollWorkflowTaskQueueResponse'QueriesEntry'value
           (\ PollWorkflowTaskQueueResponse'QueriesEntry
x__ Maybe WorkflowQuery
y__
              -> PollWorkflowTaskQueueResponse'QueriesEntry
x__ {_PollWorkflowTaskQueueResponse'QueriesEntry'value = y__}))
        (Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
-> Maybe WorkflowQuery -> f (Maybe WorkflowQuery)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message PollWorkflowTaskQueueResponse'QueriesEntry where
  messageName :: Proxy PollWorkflowTaskQueueResponse'QueriesEntry -> Text
messageName Proxy PollWorkflowTaskQueueResponse'QueriesEntry
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.PollWorkflowTaskQueueResponse.QueriesEntry"
  packedMessageDescriptor :: Proxy PollWorkflowTaskQueueResponse'QueriesEntry -> ByteString
packedMessageDescriptor Proxy PollWorkflowTaskQueueResponse'QueriesEntry
_
    = ByteString
"\n\
      \\fQueriesEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2:\n\
      \\ENQvalue\CAN\STX \SOH(\v2$.temporal.api.query.v1.WorkflowQueryR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy PollWorkflowTaskQueueResponse'QueriesEntry -> ByteString
packedFileDescriptor Proxy PollWorkflowTaskQueueResponse'QueriesEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor PollWorkflowTaskQueueResponse'QueriesEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse'QueriesEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor PollWorkflowTaskQueueResponse'QueriesEntry Text
-> FieldDescriptor PollWorkflowTaskQueueResponse'QueriesEntry
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' PollWorkflowTaskQueueResponse'QueriesEntry Text
-> FieldAccessor PollWorkflowTaskQueueResponse'QueriesEntry 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 PollWorkflowTaskQueueResponse'QueriesEntry
        value__field_descriptor :: FieldDescriptor PollWorkflowTaskQueueResponse'QueriesEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowQuery
-> FieldAccessor
     PollWorkflowTaskQueueResponse'QueriesEntry WorkflowQuery
-> FieldDescriptor PollWorkflowTaskQueueResponse'QueriesEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"value"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowQuery
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Query.V1.Message.WorkflowQuery)
              (Lens
  PollWorkflowTaskQueueResponse'QueriesEntry
  PollWorkflowTaskQueueResponse'QueriesEntry
  (Maybe WorkflowQuery)
  (Maybe WorkflowQuery)
-> FieldAccessor
     PollWorkflowTaskQueueResponse'QueriesEntry WorkflowQuery
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.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 PollWorkflowTaskQueueResponse'QueriesEntry
      in
        [(Tag, FieldDescriptor PollWorkflowTaskQueueResponse'QueriesEntry)]
-> Map
     Tag (FieldDescriptor PollWorkflowTaskQueueResponse'QueriesEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor PollWorkflowTaskQueueResponse'QueriesEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor PollWorkflowTaskQueueResponse'QueriesEntry
value__field_descriptor)]
  unknownFields :: Lens' PollWorkflowTaskQueueResponse'QueriesEntry FieldSet
unknownFields
    = (PollWorkflowTaskQueueResponse'QueriesEntry -> FieldSet)
-> (PollWorkflowTaskQueueResponse'QueriesEntry
    -> FieldSet -> PollWorkflowTaskQueueResponse'QueriesEntry)
-> Lens' PollWorkflowTaskQueueResponse'QueriesEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        PollWorkflowTaskQueueResponse'QueriesEntry -> FieldSet
_PollWorkflowTaskQueueResponse'QueriesEntry'_unknownFields
        (\ PollWorkflowTaskQueueResponse'QueriesEntry
x__ FieldSet
y__
           -> PollWorkflowTaskQueueResponse'QueriesEntry
x__
                {_PollWorkflowTaskQueueResponse'QueriesEntry'_unknownFields = y__})
  defMessage :: PollWorkflowTaskQueueResponse'QueriesEntry
defMessage
    = PollWorkflowTaskQueueResponse'QueriesEntry'_constructor
        {_PollWorkflowTaskQueueResponse'QueriesEntry'key :: Text
_PollWorkflowTaskQueueResponse'QueriesEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _PollWorkflowTaskQueueResponse'QueriesEntry'value :: Maybe WorkflowQuery
_PollWorkflowTaskQueueResponse'QueriesEntry'value = Maybe WorkflowQuery
forall a. Maybe a
Prelude.Nothing,
         _PollWorkflowTaskQueueResponse'QueriesEntry'_unknownFields :: FieldSet
_PollWorkflowTaskQueueResponse'QueriesEntry'_unknownFields = []}
  parseMessage :: Parser PollWorkflowTaskQueueResponse'QueriesEntry
parseMessage
    = let
        loop ::
          PollWorkflowTaskQueueResponse'QueriesEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser PollWorkflowTaskQueueResponse'QueriesEntry
        loop :: PollWorkflowTaskQueueResponse'QueriesEntry
-> Parser PollWorkflowTaskQueueResponse'QueriesEntry
loop PollWorkflowTaskQueueResponse'QueriesEntry
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 WorkflowQuery -> String -> Parser WorkflowQuery
forall a. Parser a -> String -> Parser a
(Data.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 PollWorkflowTaskQueueResponse'QueriesEntry
-> String -> Parser PollWorkflowTaskQueueResponse'QueriesEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do PollWorkflowTaskQueueResponse'QueriesEntry
-> Parser PollWorkflowTaskQueueResponse'QueriesEntry
loop PollWorkflowTaskQueueResponse'QueriesEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"QueriesEntry"
  buildMessage :: PollWorkflowTaskQueueResponse'QueriesEntry -> Builder
buildMessage
    = \ PollWorkflowTaskQueueResponse'QueriesEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  PollWorkflowTaskQueueResponse'QueriesEntry
  PollWorkflowTaskQueueResponse'QueriesEntry
  Text
  Text
-> PollWorkflowTaskQueueResponse'QueriesEntry -> 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") PollWorkflowTaskQueueResponse'QueriesEntry
_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 WorkflowQuery)
  PollWorkflowTaskQueueResponse'QueriesEntry
  PollWorkflowTaskQueueResponse'QueriesEntry
  (Maybe WorkflowQuery)
  (Maybe WorkflowQuery)
-> PollWorkflowTaskQueueResponse'QueriesEntry
-> Maybe WorkflowQuery
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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") PollWorkflowTaskQueueResponse'QueriesEntry
_x
                 of
                   Maybe WorkflowQuery
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just WorkflowQuery
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (WorkflowQuery -> ByteString) -> WorkflowQuery -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             WorkflowQuery -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowQuery
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  PollWorkflowTaskQueueResponse'QueriesEntry
  PollWorkflowTaskQueueResponse'QueriesEntry
  FieldSet
  FieldSet
-> PollWorkflowTaskQueueResponse'QueriesEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  PollWorkflowTaskQueueResponse'QueriesEntry
  PollWorkflowTaskQueueResponse'QueriesEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PollWorkflowTaskQueueResponse'QueriesEntry FieldSet
Data.ProtoLens.unknownFields PollWorkflowTaskQueueResponse'QueriesEntry
_x)))
instance Control.DeepSeq.NFData PollWorkflowTaskQueueResponse'QueriesEntry where
  rnf :: PollWorkflowTaskQueueResponse'QueriesEntry -> ()
rnf
    = \ PollWorkflowTaskQueueResponse'QueriesEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (PollWorkflowTaskQueueResponse'QueriesEntry -> FieldSet
_PollWorkflowTaskQueueResponse'QueriesEntry'_unknownFields PollWorkflowTaskQueueResponse'QueriesEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (PollWorkflowTaskQueueResponse'QueriesEntry -> Text
_PollWorkflowTaskQueueResponse'QueriesEntry'key PollWorkflowTaskQueueResponse'QueriesEntry
x__)
                (Maybe WorkflowQuery -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (PollWorkflowTaskQueueResponse'QueriesEntry -> Maybe WorkflowQuery
_PollWorkflowTaskQueueResponse'QueriesEntry'value PollWorkflowTaskQueueResponse'QueriesEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' QueryWorkflowRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.execution' @:: Lens' QueryWorkflowRequest Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'execution' @:: Lens' QueryWorkflowRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.query' @:: Lens' QueryWorkflowRequest Proto.Temporal.Api.Query.V1.Message.WorkflowQuery@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'query' @:: Lens' QueryWorkflowRequest (Prelude.Maybe Proto.Temporal.Api.Query.V1.Message.WorkflowQuery)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.queryRejectCondition' @:: Lens' QueryWorkflowRequest Proto.Temporal.Api.Enums.V1.Query.QueryRejectCondition@ -}
data QueryWorkflowRequest
  = QueryWorkflowRequest'_constructor {QueryWorkflowRequest -> Text
_QueryWorkflowRequest'namespace :: !Data.Text.Text,
                                       QueryWorkflowRequest -> Maybe WorkflowExecution
_QueryWorkflowRequest'execution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                       QueryWorkflowRequest -> Maybe WorkflowQuery
_QueryWorkflowRequest'query :: !(Prelude.Maybe Proto.Temporal.Api.Query.V1.Message.WorkflowQuery),
                                       QueryWorkflowRequest -> QueryRejectCondition
_QueryWorkflowRequest'queryRejectCondition :: !Proto.Temporal.Api.Enums.V1.Query.QueryRejectCondition,
                                       QueryWorkflowRequest -> FieldSet
_QueryWorkflowRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (QueryWorkflowRequest -> QueryWorkflowRequest -> Bool
(QueryWorkflowRequest -> QueryWorkflowRequest -> Bool)
-> (QueryWorkflowRequest -> QueryWorkflowRequest -> Bool)
-> Eq QueryWorkflowRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: QueryWorkflowRequest -> QueryWorkflowRequest -> Bool
== :: QueryWorkflowRequest -> QueryWorkflowRequest -> Bool
$c/= :: QueryWorkflowRequest -> QueryWorkflowRequest -> Bool
/= :: QueryWorkflowRequest -> QueryWorkflowRequest -> Bool
Prelude.Eq, Eq QueryWorkflowRequest
Eq QueryWorkflowRequest =>
(QueryWorkflowRequest -> QueryWorkflowRequest -> Ordering)
-> (QueryWorkflowRequest -> QueryWorkflowRequest -> Bool)
-> (QueryWorkflowRequest -> QueryWorkflowRequest -> Bool)
-> (QueryWorkflowRequest -> QueryWorkflowRequest -> Bool)
-> (QueryWorkflowRequest -> QueryWorkflowRequest -> Bool)
-> (QueryWorkflowRequest
    -> QueryWorkflowRequest -> QueryWorkflowRequest)
-> (QueryWorkflowRequest
    -> QueryWorkflowRequest -> QueryWorkflowRequest)
-> Ord QueryWorkflowRequest
QueryWorkflowRequest -> QueryWorkflowRequest -> Bool
QueryWorkflowRequest -> QueryWorkflowRequest -> Ordering
QueryWorkflowRequest
-> QueryWorkflowRequest -> QueryWorkflowRequest
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 :: QueryWorkflowRequest -> QueryWorkflowRequest -> Ordering
compare :: QueryWorkflowRequest -> QueryWorkflowRequest -> Ordering
$c< :: QueryWorkflowRequest -> QueryWorkflowRequest -> Bool
< :: QueryWorkflowRequest -> QueryWorkflowRequest -> Bool
$c<= :: QueryWorkflowRequest -> QueryWorkflowRequest -> Bool
<= :: QueryWorkflowRequest -> QueryWorkflowRequest -> Bool
$c> :: QueryWorkflowRequest -> QueryWorkflowRequest -> Bool
> :: QueryWorkflowRequest -> QueryWorkflowRequest -> Bool
$c>= :: QueryWorkflowRequest -> QueryWorkflowRequest -> Bool
>= :: QueryWorkflowRequest -> QueryWorkflowRequest -> Bool
$cmax :: QueryWorkflowRequest
-> QueryWorkflowRequest -> QueryWorkflowRequest
max :: QueryWorkflowRequest
-> QueryWorkflowRequest -> QueryWorkflowRequest
$cmin :: QueryWorkflowRequest
-> QueryWorkflowRequest -> QueryWorkflowRequest
min :: QueryWorkflowRequest
-> QueryWorkflowRequest -> QueryWorkflowRequest
Prelude.Ord)
instance Prelude.Show QueryWorkflowRequest where
  showsPrec :: Int -> QueryWorkflowRequest -> ShowS
showsPrec Int
_ QueryWorkflowRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (QueryWorkflowRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort QueryWorkflowRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField QueryWorkflowRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> QueryWorkflowRequest
-> f QueryWorkflowRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> QueryWorkflowRequest -> f QueryWorkflowRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> QueryWorkflowRequest
-> f QueryWorkflowRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflowRequest -> Text)
-> (QueryWorkflowRequest -> Text -> QueryWorkflowRequest)
-> Lens QueryWorkflowRequest QueryWorkflowRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflowRequest -> Text
_QueryWorkflowRequest'namespace
           (\ QueryWorkflowRequest
x__ Text
y__ -> QueryWorkflowRequest
x__ {_QueryWorkflowRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField QueryWorkflowRequest "execution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "execution"
-> (WorkflowExecution -> f WorkflowExecution)
-> QueryWorkflowRequest
-> f QueryWorkflowRequest
fieldOf Proxy# "execution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> QueryWorkflowRequest -> f QueryWorkflowRequest)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> QueryWorkflowRequest
-> f QueryWorkflowRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflowRequest -> Maybe WorkflowExecution)
-> (QueryWorkflowRequest
    -> Maybe WorkflowExecution -> QueryWorkflowRequest)
-> Lens
     QueryWorkflowRequest
     QueryWorkflowRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflowRequest -> Maybe WorkflowExecution
_QueryWorkflowRequest'execution
           (\ QueryWorkflowRequest
x__ Maybe WorkflowExecution
y__ -> QueryWorkflowRequest
x__ {_QueryWorkflowRequest'execution = y__}))
        (WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField QueryWorkflowRequest "maybe'execution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'execution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> QueryWorkflowRequest
-> f QueryWorkflowRequest
fieldOf Proxy# "maybe'execution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> QueryWorkflowRequest -> f QueryWorkflowRequest)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> QueryWorkflowRequest
-> f QueryWorkflowRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflowRequest -> Maybe WorkflowExecution)
-> (QueryWorkflowRequest
    -> Maybe WorkflowExecution -> QueryWorkflowRequest)
-> Lens
     QueryWorkflowRequest
     QueryWorkflowRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflowRequest -> Maybe WorkflowExecution
_QueryWorkflowRequest'execution
           (\ QueryWorkflowRequest
x__ Maybe WorkflowExecution
y__ -> QueryWorkflowRequest
x__ {_QueryWorkflowRequest'execution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField QueryWorkflowRequest "query" Proto.Temporal.Api.Query.V1.Message.WorkflowQuery where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "query"
-> (WorkflowQuery -> f WorkflowQuery)
-> QueryWorkflowRequest
-> f QueryWorkflowRequest
fieldOf Proxy# "query"
_
    = ((Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
 -> QueryWorkflowRequest -> f QueryWorkflowRequest)
-> ((WorkflowQuery -> f WorkflowQuery)
    -> Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
-> (WorkflowQuery -> f WorkflowQuery)
-> QueryWorkflowRequest
-> f QueryWorkflowRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflowRequest -> Maybe WorkflowQuery)
-> (QueryWorkflowRequest
    -> Maybe WorkflowQuery -> QueryWorkflowRequest)
-> Lens
     QueryWorkflowRequest
     QueryWorkflowRequest
     (Maybe WorkflowQuery)
     (Maybe WorkflowQuery)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflowRequest -> Maybe WorkflowQuery
_QueryWorkflowRequest'query
           (\ QueryWorkflowRequest
x__ Maybe WorkflowQuery
y__ -> QueryWorkflowRequest
x__ {_QueryWorkflowRequest'query = y__}))
        (WorkflowQuery -> Lens' (Maybe WorkflowQuery) WorkflowQuery
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowQuery
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField QueryWorkflowRequest "maybe'query" (Prelude.Maybe Proto.Temporal.Api.Query.V1.Message.WorkflowQuery) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'query"
-> (Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
-> QueryWorkflowRequest
-> f QueryWorkflowRequest
fieldOf Proxy# "maybe'query"
_
    = ((Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
 -> QueryWorkflowRequest -> f QueryWorkflowRequest)
-> ((Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
    -> Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
-> (Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
-> QueryWorkflowRequest
-> f QueryWorkflowRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflowRequest -> Maybe WorkflowQuery)
-> (QueryWorkflowRequest
    -> Maybe WorkflowQuery -> QueryWorkflowRequest)
-> Lens
     QueryWorkflowRequest
     QueryWorkflowRequest
     (Maybe WorkflowQuery)
     (Maybe WorkflowQuery)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflowRequest -> Maybe WorkflowQuery
_QueryWorkflowRequest'query
           (\ QueryWorkflowRequest
x__ Maybe WorkflowQuery
y__ -> QueryWorkflowRequest
x__ {_QueryWorkflowRequest'query = y__}))
        (Maybe WorkflowQuery -> f (Maybe WorkflowQuery))
-> Maybe WorkflowQuery -> f (Maybe WorkflowQuery)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField QueryWorkflowRequest "queryRejectCondition" Proto.Temporal.Api.Enums.V1.Query.QueryRejectCondition where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "queryRejectCondition"
-> (QueryRejectCondition -> f QueryRejectCondition)
-> QueryWorkflowRequest
-> f QueryWorkflowRequest
fieldOf Proxy# "queryRejectCondition"
_
    = ((QueryRejectCondition -> f QueryRejectCondition)
 -> QueryWorkflowRequest -> f QueryWorkflowRequest)
-> ((QueryRejectCondition -> f QueryRejectCondition)
    -> QueryRejectCondition -> f QueryRejectCondition)
-> (QueryRejectCondition -> f QueryRejectCondition)
-> QueryWorkflowRequest
-> f QueryWorkflowRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflowRequest -> QueryRejectCondition)
-> (QueryWorkflowRequest
    -> QueryRejectCondition -> QueryWorkflowRequest)
-> Lens
     QueryWorkflowRequest
     QueryWorkflowRequest
     QueryRejectCondition
     QueryRejectCondition
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflowRequest -> QueryRejectCondition
_QueryWorkflowRequest'queryRejectCondition
           (\ QueryWorkflowRequest
x__ QueryRejectCondition
y__
              -> QueryWorkflowRequest
x__ {_QueryWorkflowRequest'queryRejectCondition = y__}))
        (QueryRejectCondition -> f QueryRejectCondition)
-> QueryRejectCondition -> f QueryRejectCondition
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message QueryWorkflowRequest where
  messageName :: Proxy QueryWorkflowRequest -> Text
messageName Proxy QueryWorkflowRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.QueryWorkflowRequest"
  packedMessageDescriptor :: Proxy QueryWorkflowRequest -> ByteString
packedMessageDescriptor Proxy QueryWorkflowRequest
_
    = ByteString
"\n\
      \\DC4QueryWorkflowRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2G\n\
      \\texecution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\texecution\DC2:\n\
      \\ENQquery\CAN\ETX \SOH(\v2$.temporal.api.query.v1.WorkflowQueryR\ENQquery\DC2a\n\
      \\SYNquery_reject_condition\CAN\EOT \SOH(\SO2+.temporal.api.enums.v1.QueryRejectConditionR\DC4queryRejectCondition"
  packedFileDescriptor :: Proxy QueryWorkflowRequest -> ByteString
packedFileDescriptor Proxy QueryWorkflowRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor QueryWorkflowRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor QueryWorkflowRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor QueryWorkflowRequest Text
-> FieldDescriptor QueryWorkflowRequest
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 QueryWorkflowRequest QueryWorkflowRequest Text Text
-> FieldAccessor QueryWorkflowRequest 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 QueryWorkflowRequest
        execution__field_descriptor :: FieldDescriptor QueryWorkflowRequest
execution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor QueryWorkflowRequest WorkflowExecution
-> FieldDescriptor QueryWorkflowRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"execution"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
              (Lens
  QueryWorkflowRequest
  QueryWorkflowRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor QueryWorkflowRequest WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'execution")) ::
              Data.ProtoLens.FieldDescriptor QueryWorkflowRequest
        query__field_descriptor :: FieldDescriptor QueryWorkflowRequest
query__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowQuery
-> FieldAccessor QueryWorkflowRequest WorkflowQuery
-> FieldDescriptor QueryWorkflowRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"query"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowQuery
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Query.V1.Message.WorkflowQuery)
              (Lens
  QueryWorkflowRequest
  QueryWorkflowRequest
  (Maybe WorkflowQuery)
  (Maybe WorkflowQuery)
-> FieldAccessor QueryWorkflowRequest WorkflowQuery
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'query")) ::
              Data.ProtoLens.FieldDescriptor QueryWorkflowRequest
        queryRejectCondition__field_descriptor :: FieldDescriptor QueryWorkflowRequest
queryRejectCondition__field_descriptor
          = String
-> FieldTypeDescriptor QueryRejectCondition
-> FieldAccessor QueryWorkflowRequest QueryRejectCondition
-> FieldDescriptor QueryWorkflowRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"query_reject_condition"
              (ScalarField QueryRejectCondition
-> FieldTypeDescriptor QueryRejectCondition
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField QueryRejectCondition
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Query.QueryRejectCondition)
              (WireDefault QueryRejectCondition
-> Lens
     QueryWorkflowRequest
     QueryWorkflowRequest
     QueryRejectCondition
     QueryRejectCondition
-> FieldAccessor QueryWorkflowRequest QueryRejectCondition
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault QueryRejectCondition
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"queryRejectCondition")) ::
              Data.ProtoLens.FieldDescriptor QueryWorkflowRequest
      in
        [(Tag, FieldDescriptor QueryWorkflowRequest)]
-> Map Tag (FieldDescriptor QueryWorkflowRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor QueryWorkflowRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor QueryWorkflowRequest
execution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor QueryWorkflowRequest
query__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor QueryWorkflowRequest
queryRejectCondition__field_descriptor)]
  unknownFields :: Lens' QueryWorkflowRequest FieldSet
unknownFields
    = (QueryWorkflowRequest -> FieldSet)
-> (QueryWorkflowRequest -> FieldSet -> QueryWorkflowRequest)
-> Lens' QueryWorkflowRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        QueryWorkflowRequest -> FieldSet
_QueryWorkflowRequest'_unknownFields
        (\ QueryWorkflowRequest
x__ FieldSet
y__ -> QueryWorkflowRequest
x__ {_QueryWorkflowRequest'_unknownFields = y__})
  defMessage :: QueryWorkflowRequest
defMessage
    = QueryWorkflowRequest'_constructor
        {_QueryWorkflowRequest'namespace :: Text
_QueryWorkflowRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _QueryWorkflowRequest'execution :: Maybe WorkflowExecution
_QueryWorkflowRequest'execution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _QueryWorkflowRequest'query :: Maybe WorkflowQuery
_QueryWorkflowRequest'query = Maybe WorkflowQuery
forall a. Maybe a
Prelude.Nothing,
         _QueryWorkflowRequest'queryRejectCondition :: QueryRejectCondition
_QueryWorkflowRequest'queryRejectCondition = QueryRejectCondition
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _QueryWorkflowRequest'_unknownFields :: FieldSet
_QueryWorkflowRequest'_unknownFields = []}
  parseMessage :: Parser QueryWorkflowRequest
parseMessage
    = let
        loop ::
          QueryWorkflowRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser QueryWorkflowRequest
        loop :: QueryWorkflowRequest -> Parser QueryWorkflowRequest
loop QueryWorkflowRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"execution"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"execution") y x)
                        Word64
26
                          -> do y <- Parser WorkflowQuery -> String -> Parser WorkflowQuery
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"query"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"query") y x)
                        Word64
32
                          -> do y <- Parser QueryRejectCondition
-> String -> Parser QueryRejectCondition
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> QueryRejectCondition)
-> Parser Int -> Parser QueryRejectCondition
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> QueryRejectCondition
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
"query_reject_condition"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"queryRejectCondition") 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 QueryWorkflowRequest
-> String -> Parser QueryWorkflowRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do QueryWorkflowRequest -> Parser QueryWorkflowRequest
loop QueryWorkflowRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"QueryWorkflowRequest"
  buildMessage :: QueryWorkflowRequest -> Builder
buildMessage
    = \ QueryWorkflowRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike Text QueryWorkflowRequest QueryWorkflowRequest Text Text
-> QueryWorkflowRequest -> 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") QueryWorkflowRequest
_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 WorkflowExecution)
  QueryWorkflowRequest
  QueryWorkflowRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> QueryWorkflowRequest -> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'execution") QueryWorkflowRequest
_x
                 of
                   Maybe WorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just WorkflowExecution
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe WorkflowQuery)
  QueryWorkflowRequest
  QueryWorkflowRequest
  (Maybe WorkflowQuery)
  (Maybe WorkflowQuery)
-> QueryWorkflowRequest -> Maybe WorkflowQuery
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'query") QueryWorkflowRequest
_x
                    of
                      Maybe WorkflowQuery
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just WorkflowQuery
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (WorkflowQuery -> ByteString) -> WorkflowQuery -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                WorkflowQuery -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowQuery
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: QueryRejectCondition
_v
                           = FoldLike
  QueryRejectCondition
  QueryWorkflowRequest
  QueryWorkflowRequest
  QueryRejectCondition
  QueryRejectCondition
-> QueryWorkflowRequest -> QueryRejectCondition
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"queryRejectCondition") QueryWorkflowRequest
_x
                       in
                         if QueryRejectCondition -> QueryRejectCondition -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) QueryRejectCondition
_v QueryRejectCondition
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
32)
                               ((Int -> Builder)
-> (QueryRejectCondition -> Int) -> QueryRejectCondition -> 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)
                                  QueryRejectCondition -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum QueryRejectCondition
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  QueryWorkflowRequest
  QueryWorkflowRequest
  FieldSet
  FieldSet
-> QueryWorkflowRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  QueryWorkflowRequest
  QueryWorkflowRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' QueryWorkflowRequest FieldSet
Data.ProtoLens.unknownFields QueryWorkflowRequest
_x)))))
instance Control.DeepSeq.NFData QueryWorkflowRequest where
  rnf :: QueryWorkflowRequest -> ()
rnf
    = \ QueryWorkflowRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (QueryWorkflowRequest -> FieldSet
_QueryWorkflowRequest'_unknownFields QueryWorkflowRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (QueryWorkflowRequest -> Text
_QueryWorkflowRequest'namespace QueryWorkflowRequest
x__)
                (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (QueryWorkflowRequest -> Maybe WorkflowExecution
_QueryWorkflowRequest'execution QueryWorkflowRequest
x__)
                   (Maybe WorkflowQuery -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (QueryWorkflowRequest -> Maybe WorkflowQuery
_QueryWorkflowRequest'query QueryWorkflowRequest
x__)
                      (QueryRejectCondition -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (QueryWorkflowRequest -> QueryRejectCondition
_QueryWorkflowRequest'queryRejectCondition QueryWorkflowRequest
x__) ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.queryResult' @:: Lens' QueryWorkflowResponse Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'queryResult' @:: Lens' QueryWorkflowResponse (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.queryRejected' @:: Lens' QueryWorkflowResponse Proto.Temporal.Api.Query.V1.Message.QueryRejected@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'queryRejected' @:: Lens' QueryWorkflowResponse (Prelude.Maybe Proto.Temporal.Api.Query.V1.Message.QueryRejected)@ -}
data QueryWorkflowResponse
  = QueryWorkflowResponse'_constructor {QueryWorkflowResponse -> Maybe Payloads
_QueryWorkflowResponse'queryResult :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                        QueryWorkflowResponse -> Maybe QueryRejected
_QueryWorkflowResponse'queryRejected :: !(Prelude.Maybe Proto.Temporal.Api.Query.V1.Message.QueryRejected),
                                        QueryWorkflowResponse -> FieldSet
_QueryWorkflowResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (QueryWorkflowResponse -> QueryWorkflowResponse -> Bool
(QueryWorkflowResponse -> QueryWorkflowResponse -> Bool)
-> (QueryWorkflowResponse -> QueryWorkflowResponse -> Bool)
-> Eq QueryWorkflowResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: QueryWorkflowResponse -> QueryWorkflowResponse -> Bool
== :: QueryWorkflowResponse -> QueryWorkflowResponse -> Bool
$c/= :: QueryWorkflowResponse -> QueryWorkflowResponse -> Bool
/= :: QueryWorkflowResponse -> QueryWorkflowResponse -> Bool
Prelude.Eq, Eq QueryWorkflowResponse
Eq QueryWorkflowResponse =>
(QueryWorkflowResponse -> QueryWorkflowResponse -> Ordering)
-> (QueryWorkflowResponse -> QueryWorkflowResponse -> Bool)
-> (QueryWorkflowResponse -> QueryWorkflowResponse -> Bool)
-> (QueryWorkflowResponse -> QueryWorkflowResponse -> Bool)
-> (QueryWorkflowResponse -> QueryWorkflowResponse -> Bool)
-> (QueryWorkflowResponse
    -> QueryWorkflowResponse -> QueryWorkflowResponse)
-> (QueryWorkflowResponse
    -> QueryWorkflowResponse -> QueryWorkflowResponse)
-> Ord QueryWorkflowResponse
QueryWorkflowResponse -> QueryWorkflowResponse -> Bool
QueryWorkflowResponse -> QueryWorkflowResponse -> Ordering
QueryWorkflowResponse
-> QueryWorkflowResponse -> QueryWorkflowResponse
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 :: QueryWorkflowResponse -> QueryWorkflowResponse -> Ordering
compare :: QueryWorkflowResponse -> QueryWorkflowResponse -> Ordering
$c< :: QueryWorkflowResponse -> QueryWorkflowResponse -> Bool
< :: QueryWorkflowResponse -> QueryWorkflowResponse -> Bool
$c<= :: QueryWorkflowResponse -> QueryWorkflowResponse -> Bool
<= :: QueryWorkflowResponse -> QueryWorkflowResponse -> Bool
$c> :: QueryWorkflowResponse -> QueryWorkflowResponse -> Bool
> :: QueryWorkflowResponse -> QueryWorkflowResponse -> Bool
$c>= :: QueryWorkflowResponse -> QueryWorkflowResponse -> Bool
>= :: QueryWorkflowResponse -> QueryWorkflowResponse -> Bool
$cmax :: QueryWorkflowResponse
-> QueryWorkflowResponse -> QueryWorkflowResponse
max :: QueryWorkflowResponse
-> QueryWorkflowResponse -> QueryWorkflowResponse
$cmin :: QueryWorkflowResponse
-> QueryWorkflowResponse -> QueryWorkflowResponse
min :: QueryWorkflowResponse
-> QueryWorkflowResponse -> QueryWorkflowResponse
Prelude.Ord)
instance Prelude.Show QueryWorkflowResponse where
  showsPrec :: Int -> QueryWorkflowResponse -> ShowS
showsPrec Int
_ QueryWorkflowResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (QueryWorkflowResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort QueryWorkflowResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField QueryWorkflowResponse "queryResult" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "queryResult"
-> (Payloads -> f Payloads)
-> QueryWorkflowResponse
-> f QueryWorkflowResponse
fieldOf Proxy# "queryResult"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> QueryWorkflowResponse -> f QueryWorkflowResponse)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> QueryWorkflowResponse
-> f QueryWorkflowResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflowResponse -> Maybe Payloads)
-> (QueryWorkflowResponse
    -> Maybe Payloads -> QueryWorkflowResponse)
-> Lens
     QueryWorkflowResponse
     QueryWorkflowResponse
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflowResponse -> Maybe Payloads
_QueryWorkflowResponse'queryResult
           (\ QueryWorkflowResponse
x__ Maybe Payloads
y__ -> QueryWorkflowResponse
x__ {_QueryWorkflowResponse'queryResult = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField QueryWorkflowResponse "maybe'queryResult" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'queryResult"
-> (Maybe Payloads -> f (Maybe Payloads))
-> QueryWorkflowResponse
-> f QueryWorkflowResponse
fieldOf Proxy# "maybe'queryResult"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> QueryWorkflowResponse -> f QueryWorkflowResponse)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> QueryWorkflowResponse
-> f QueryWorkflowResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflowResponse -> Maybe Payloads)
-> (QueryWorkflowResponse
    -> Maybe Payloads -> QueryWorkflowResponse)
-> Lens
     QueryWorkflowResponse
     QueryWorkflowResponse
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflowResponse -> Maybe Payloads
_QueryWorkflowResponse'queryResult
           (\ QueryWorkflowResponse
x__ Maybe Payloads
y__ -> QueryWorkflowResponse
x__ {_QueryWorkflowResponse'queryResult = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField QueryWorkflowResponse "queryRejected" Proto.Temporal.Api.Query.V1.Message.QueryRejected where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "queryRejected"
-> (QueryRejected -> f QueryRejected)
-> QueryWorkflowResponse
-> f QueryWorkflowResponse
fieldOf Proxy# "queryRejected"
_
    = ((Maybe QueryRejected -> f (Maybe QueryRejected))
 -> QueryWorkflowResponse -> f QueryWorkflowResponse)
-> ((QueryRejected -> f QueryRejected)
    -> Maybe QueryRejected -> f (Maybe QueryRejected))
-> (QueryRejected -> f QueryRejected)
-> QueryWorkflowResponse
-> f QueryWorkflowResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflowResponse -> Maybe QueryRejected)
-> (QueryWorkflowResponse
    -> Maybe QueryRejected -> QueryWorkflowResponse)
-> Lens
     QueryWorkflowResponse
     QueryWorkflowResponse
     (Maybe QueryRejected)
     (Maybe QueryRejected)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflowResponse -> Maybe QueryRejected
_QueryWorkflowResponse'queryRejected
           (\ QueryWorkflowResponse
x__ Maybe QueryRejected
y__ -> QueryWorkflowResponse
x__ {_QueryWorkflowResponse'queryRejected = y__}))
        (QueryRejected -> Lens' (Maybe QueryRejected) QueryRejected
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens QueryRejected
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField QueryWorkflowResponse "maybe'queryRejected" (Prelude.Maybe Proto.Temporal.Api.Query.V1.Message.QueryRejected) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'queryRejected"
-> (Maybe QueryRejected -> f (Maybe QueryRejected))
-> QueryWorkflowResponse
-> f QueryWorkflowResponse
fieldOf Proxy# "maybe'queryRejected"
_
    = ((Maybe QueryRejected -> f (Maybe QueryRejected))
 -> QueryWorkflowResponse -> f QueryWorkflowResponse)
-> ((Maybe QueryRejected -> f (Maybe QueryRejected))
    -> Maybe QueryRejected -> f (Maybe QueryRejected))
-> (Maybe QueryRejected -> f (Maybe QueryRejected))
-> QueryWorkflowResponse
-> f QueryWorkflowResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((QueryWorkflowResponse -> Maybe QueryRejected)
-> (QueryWorkflowResponse
    -> Maybe QueryRejected -> QueryWorkflowResponse)
-> Lens
     QueryWorkflowResponse
     QueryWorkflowResponse
     (Maybe QueryRejected)
     (Maybe QueryRejected)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           QueryWorkflowResponse -> Maybe QueryRejected
_QueryWorkflowResponse'queryRejected
           (\ QueryWorkflowResponse
x__ Maybe QueryRejected
y__ -> QueryWorkflowResponse
x__ {_QueryWorkflowResponse'queryRejected = y__}))
        (Maybe QueryRejected -> f (Maybe QueryRejected))
-> Maybe QueryRejected -> f (Maybe QueryRejected)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message QueryWorkflowResponse where
  messageName :: Proxy QueryWorkflowResponse -> Text
messageName Proxy QueryWorkflowResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.QueryWorkflowResponse"
  packedMessageDescriptor :: Proxy QueryWorkflowResponse -> ByteString
packedMessageDescriptor Proxy QueryWorkflowResponse
_
    = ByteString
"\n\
      \\NAKQueryWorkflowResponse\DC2C\n\
      \\fquery_result\CAN\SOH \SOH(\v2 .temporal.api.common.v1.PayloadsR\vqueryResult\DC2K\n\
      \\SOquery_rejected\CAN\STX \SOH(\v2$.temporal.api.query.v1.QueryRejectedR\rqueryRejected"
  packedFileDescriptor :: Proxy QueryWorkflowResponse -> ByteString
packedFileDescriptor Proxy QueryWorkflowResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor QueryWorkflowResponse)
fieldsByTag
    = let
        queryResult__field_descriptor :: FieldDescriptor QueryWorkflowResponse
queryResult__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor QueryWorkflowResponse Payloads
-> FieldDescriptor QueryWorkflowResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"query_result"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  QueryWorkflowResponse
  QueryWorkflowResponse
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor QueryWorkflowResponse Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'queryResult")) ::
              Data.ProtoLens.FieldDescriptor QueryWorkflowResponse
        queryRejected__field_descriptor :: FieldDescriptor QueryWorkflowResponse
queryRejected__field_descriptor
          = String
-> FieldTypeDescriptor QueryRejected
-> FieldAccessor QueryWorkflowResponse QueryRejected
-> FieldDescriptor QueryWorkflowResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"query_rejected"
              (MessageOrGroup -> FieldTypeDescriptor QueryRejected
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Query.V1.Message.QueryRejected)
              (Lens
  QueryWorkflowResponse
  QueryWorkflowResponse
  (Maybe QueryRejected)
  (Maybe QueryRejected)
-> FieldAccessor QueryWorkflowResponse QueryRejected
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'queryRejected")) ::
              Data.ProtoLens.FieldDescriptor QueryWorkflowResponse
      in
        [(Tag, FieldDescriptor QueryWorkflowResponse)]
-> Map Tag (FieldDescriptor QueryWorkflowResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor QueryWorkflowResponse
queryResult__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor QueryWorkflowResponse
queryRejected__field_descriptor)]
  unknownFields :: Lens' QueryWorkflowResponse FieldSet
unknownFields
    = (QueryWorkflowResponse -> FieldSet)
-> (QueryWorkflowResponse -> FieldSet -> QueryWorkflowResponse)
-> Lens' QueryWorkflowResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        QueryWorkflowResponse -> FieldSet
_QueryWorkflowResponse'_unknownFields
        (\ QueryWorkflowResponse
x__ FieldSet
y__ -> QueryWorkflowResponse
x__ {_QueryWorkflowResponse'_unknownFields = y__})
  defMessage :: QueryWorkflowResponse
defMessage
    = QueryWorkflowResponse'_constructor
        {_QueryWorkflowResponse'queryResult :: Maybe Payloads
_QueryWorkflowResponse'queryResult = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _QueryWorkflowResponse'queryRejected :: Maybe QueryRejected
_QueryWorkflowResponse'queryRejected = Maybe QueryRejected
forall a. Maybe a
Prelude.Nothing,
         _QueryWorkflowResponse'_unknownFields :: FieldSet
_QueryWorkflowResponse'_unknownFields = []}
  parseMessage :: Parser QueryWorkflowResponse
parseMessage
    = let
        loop ::
          QueryWorkflowResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser QueryWorkflowResponse
        loop :: QueryWorkflowResponse -> Parser QueryWorkflowResponse
loop QueryWorkflowResponse
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"query_result"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"queryResult") y x)
                        Word64
18
                          -> do y <- Parser QueryRejected -> String -> Parser QueryRejected
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"query_rejected"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"queryRejected") 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 QueryWorkflowResponse
-> String -> Parser QueryWorkflowResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do QueryWorkflowResponse -> Parser QueryWorkflowResponse
loop QueryWorkflowResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"QueryWorkflowResponse"
  buildMessage :: QueryWorkflowResponse -> Builder
buildMessage
    = \ QueryWorkflowResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Payloads)
  QueryWorkflowResponse
  QueryWorkflowResponse
  (Maybe Payloads)
  (Maybe Payloads)
-> QueryWorkflowResponse -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                    (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'queryResult") QueryWorkflowResponse
_x
              of
                Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just Payloads
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe QueryRejected)
  QueryWorkflowResponse
  QueryWorkflowResponse
  (Maybe QueryRejected)
  (Maybe QueryRejected)
-> QueryWorkflowResponse -> Maybe QueryRejected
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'queryRejected") QueryWorkflowResponse
_x
                 of
                   Maybe QueryRejected
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just QueryRejected
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (QueryRejected -> ByteString) -> QueryRejected -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             QueryRejected -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage QueryRejected
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  QueryWorkflowResponse
  QueryWorkflowResponse
  FieldSet
  FieldSet
-> QueryWorkflowResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  QueryWorkflowResponse
  QueryWorkflowResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' QueryWorkflowResponse FieldSet
Data.ProtoLens.unknownFields QueryWorkflowResponse
_x)))
instance Control.DeepSeq.NFData QueryWorkflowResponse where
  rnf :: QueryWorkflowResponse -> ()
rnf
    = \ QueryWorkflowResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (QueryWorkflowResponse -> FieldSet
_QueryWorkflowResponse'_unknownFields QueryWorkflowResponse
x__)
             (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (QueryWorkflowResponse -> Maybe Payloads
_QueryWorkflowResponse'queryResult QueryWorkflowResponse
x__)
                (Maybe QueryRejected -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (QueryWorkflowResponse -> Maybe QueryRejected
_QueryWorkflowResponse'queryRejected QueryWorkflowResponse
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' RecordActivityTaskHeartbeatByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowId' @:: Lens' RecordActivityTaskHeartbeatByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.runId' @:: Lens' RecordActivityTaskHeartbeatByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.activityId' @:: Lens' RecordActivityTaskHeartbeatByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.details' @:: Lens' RecordActivityTaskHeartbeatByIdRequest Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'details' @:: Lens' RecordActivityTaskHeartbeatByIdRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' RecordActivityTaskHeartbeatByIdRequest Data.Text.Text@ -}
data RecordActivityTaskHeartbeatByIdRequest
  = RecordActivityTaskHeartbeatByIdRequest'_constructor {RecordActivityTaskHeartbeatByIdRequest -> Text
_RecordActivityTaskHeartbeatByIdRequest'namespace :: !Data.Text.Text,
                                                         RecordActivityTaskHeartbeatByIdRequest -> Text
_RecordActivityTaskHeartbeatByIdRequest'workflowId :: !Data.Text.Text,
                                                         RecordActivityTaskHeartbeatByIdRequest -> Text
_RecordActivityTaskHeartbeatByIdRequest'runId :: !Data.Text.Text,
                                                         RecordActivityTaskHeartbeatByIdRequest -> Text
_RecordActivityTaskHeartbeatByIdRequest'activityId :: !Data.Text.Text,
                                                         RecordActivityTaskHeartbeatByIdRequest -> Maybe Payloads
_RecordActivityTaskHeartbeatByIdRequest'details :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                         RecordActivityTaskHeartbeatByIdRequest -> Text
_RecordActivityTaskHeartbeatByIdRequest'identity :: !Data.Text.Text,
                                                         RecordActivityTaskHeartbeatByIdRequest -> FieldSet
_RecordActivityTaskHeartbeatByIdRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Bool
(RecordActivityTaskHeartbeatByIdRequest
 -> RecordActivityTaskHeartbeatByIdRequest -> Bool)
-> (RecordActivityTaskHeartbeatByIdRequest
    -> RecordActivityTaskHeartbeatByIdRequest -> Bool)
-> Eq RecordActivityTaskHeartbeatByIdRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Bool
== :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Bool
$c/= :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Bool
/= :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Bool
Prelude.Eq, Eq RecordActivityTaskHeartbeatByIdRequest
Eq RecordActivityTaskHeartbeatByIdRequest =>
(RecordActivityTaskHeartbeatByIdRequest
 -> RecordActivityTaskHeartbeatByIdRequest -> Ordering)
-> (RecordActivityTaskHeartbeatByIdRequest
    -> RecordActivityTaskHeartbeatByIdRequest -> Bool)
-> (RecordActivityTaskHeartbeatByIdRequest
    -> RecordActivityTaskHeartbeatByIdRequest -> Bool)
-> (RecordActivityTaskHeartbeatByIdRequest
    -> RecordActivityTaskHeartbeatByIdRequest -> Bool)
-> (RecordActivityTaskHeartbeatByIdRequest
    -> RecordActivityTaskHeartbeatByIdRequest -> Bool)
-> (RecordActivityTaskHeartbeatByIdRequest
    -> RecordActivityTaskHeartbeatByIdRequest
    -> RecordActivityTaskHeartbeatByIdRequest)
-> (RecordActivityTaskHeartbeatByIdRequest
    -> RecordActivityTaskHeartbeatByIdRequest
    -> RecordActivityTaskHeartbeatByIdRequest)
-> Ord RecordActivityTaskHeartbeatByIdRequest
RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Bool
RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Ordering
RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest
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 :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Ordering
compare :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Ordering
$c< :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Bool
< :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Bool
$c<= :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Bool
<= :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Bool
$c> :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Bool
> :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Bool
$c>= :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Bool
>= :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest -> Bool
$cmax :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest
max :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest
$cmin :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest
min :: RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest
-> RecordActivityTaskHeartbeatByIdRequest
Prelude.Ord)
instance Prelude.Show RecordActivityTaskHeartbeatByIdRequest where
  showsPrec :: Int -> RecordActivityTaskHeartbeatByIdRequest -> ShowS
showsPrec Int
_ RecordActivityTaskHeartbeatByIdRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RecordActivityTaskHeartbeatByIdRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RecordActivityTaskHeartbeatByIdRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RecordActivityTaskHeartbeatByIdRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RecordActivityTaskHeartbeatByIdRequest
-> f RecordActivityTaskHeartbeatByIdRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RecordActivityTaskHeartbeatByIdRequest
 -> f RecordActivityTaskHeartbeatByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RecordActivityTaskHeartbeatByIdRequest
-> f RecordActivityTaskHeartbeatByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RecordActivityTaskHeartbeatByIdRequest -> Text)
-> (RecordActivityTaskHeartbeatByIdRequest
    -> Text -> RecordActivityTaskHeartbeatByIdRequest)
-> Lens
     RecordActivityTaskHeartbeatByIdRequest
     RecordActivityTaskHeartbeatByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RecordActivityTaskHeartbeatByIdRequest -> Text
_RecordActivityTaskHeartbeatByIdRequest'namespace
           (\ RecordActivityTaskHeartbeatByIdRequest
x__ Text
y__
              -> RecordActivityTaskHeartbeatByIdRequest
x__ {_RecordActivityTaskHeartbeatByIdRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RecordActivityTaskHeartbeatByIdRequest "workflowId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowId"
-> (Text -> f Text)
-> RecordActivityTaskHeartbeatByIdRequest
-> f RecordActivityTaskHeartbeatByIdRequest
fieldOf Proxy# "workflowId"
_
    = ((Text -> f Text)
 -> RecordActivityTaskHeartbeatByIdRequest
 -> f RecordActivityTaskHeartbeatByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RecordActivityTaskHeartbeatByIdRequest
-> f RecordActivityTaskHeartbeatByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RecordActivityTaskHeartbeatByIdRequest -> Text)
-> (RecordActivityTaskHeartbeatByIdRequest
    -> Text -> RecordActivityTaskHeartbeatByIdRequest)
-> Lens
     RecordActivityTaskHeartbeatByIdRequest
     RecordActivityTaskHeartbeatByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RecordActivityTaskHeartbeatByIdRequest -> Text
_RecordActivityTaskHeartbeatByIdRequest'workflowId
           (\ RecordActivityTaskHeartbeatByIdRequest
x__ Text
y__
              -> RecordActivityTaskHeartbeatByIdRequest
x__ {_RecordActivityTaskHeartbeatByIdRequest'workflowId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RecordActivityTaskHeartbeatByIdRequest "runId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "runId"
-> (Text -> f Text)
-> RecordActivityTaskHeartbeatByIdRequest
-> f RecordActivityTaskHeartbeatByIdRequest
fieldOf Proxy# "runId"
_
    = ((Text -> f Text)
 -> RecordActivityTaskHeartbeatByIdRequest
 -> f RecordActivityTaskHeartbeatByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RecordActivityTaskHeartbeatByIdRequest
-> f RecordActivityTaskHeartbeatByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RecordActivityTaskHeartbeatByIdRequest -> Text)
-> (RecordActivityTaskHeartbeatByIdRequest
    -> Text -> RecordActivityTaskHeartbeatByIdRequest)
-> Lens
     RecordActivityTaskHeartbeatByIdRequest
     RecordActivityTaskHeartbeatByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RecordActivityTaskHeartbeatByIdRequest -> Text
_RecordActivityTaskHeartbeatByIdRequest'runId
           (\ RecordActivityTaskHeartbeatByIdRequest
x__ Text
y__
              -> RecordActivityTaskHeartbeatByIdRequest
x__ {_RecordActivityTaskHeartbeatByIdRequest'runId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RecordActivityTaskHeartbeatByIdRequest "activityId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityId"
-> (Text -> f Text)
-> RecordActivityTaskHeartbeatByIdRequest
-> f RecordActivityTaskHeartbeatByIdRequest
fieldOf Proxy# "activityId"
_
    = ((Text -> f Text)
 -> RecordActivityTaskHeartbeatByIdRequest
 -> f RecordActivityTaskHeartbeatByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RecordActivityTaskHeartbeatByIdRequest
-> f RecordActivityTaskHeartbeatByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RecordActivityTaskHeartbeatByIdRequest -> Text)
-> (RecordActivityTaskHeartbeatByIdRequest
    -> Text -> RecordActivityTaskHeartbeatByIdRequest)
-> Lens
     RecordActivityTaskHeartbeatByIdRequest
     RecordActivityTaskHeartbeatByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RecordActivityTaskHeartbeatByIdRequest -> Text
_RecordActivityTaskHeartbeatByIdRequest'activityId
           (\ RecordActivityTaskHeartbeatByIdRequest
x__ Text
y__
              -> RecordActivityTaskHeartbeatByIdRequest
x__ {_RecordActivityTaskHeartbeatByIdRequest'activityId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RecordActivityTaskHeartbeatByIdRequest "details" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "details"
-> (Payloads -> f Payloads)
-> RecordActivityTaskHeartbeatByIdRequest
-> f RecordActivityTaskHeartbeatByIdRequest
fieldOf Proxy# "details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RecordActivityTaskHeartbeatByIdRequest
 -> f RecordActivityTaskHeartbeatByIdRequest)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> RecordActivityTaskHeartbeatByIdRequest
-> f RecordActivityTaskHeartbeatByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RecordActivityTaskHeartbeatByIdRequest -> Maybe Payloads)
-> (RecordActivityTaskHeartbeatByIdRequest
    -> Maybe Payloads -> RecordActivityTaskHeartbeatByIdRequest)
-> Lens
     RecordActivityTaskHeartbeatByIdRequest
     RecordActivityTaskHeartbeatByIdRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RecordActivityTaskHeartbeatByIdRequest -> Maybe Payloads
_RecordActivityTaskHeartbeatByIdRequest'details
           (\ RecordActivityTaskHeartbeatByIdRequest
x__ Maybe Payloads
y__
              -> RecordActivityTaskHeartbeatByIdRequest
x__ {_RecordActivityTaskHeartbeatByIdRequest'details = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RecordActivityTaskHeartbeatByIdRequest "maybe'details" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'details"
-> (Maybe Payloads -> f (Maybe Payloads))
-> RecordActivityTaskHeartbeatByIdRequest
-> f RecordActivityTaskHeartbeatByIdRequest
fieldOf Proxy# "maybe'details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RecordActivityTaskHeartbeatByIdRequest
 -> f RecordActivityTaskHeartbeatByIdRequest)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> RecordActivityTaskHeartbeatByIdRequest
-> f RecordActivityTaskHeartbeatByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RecordActivityTaskHeartbeatByIdRequest -> Maybe Payloads)
-> (RecordActivityTaskHeartbeatByIdRequest
    -> Maybe Payloads -> RecordActivityTaskHeartbeatByIdRequest)
-> Lens
     RecordActivityTaskHeartbeatByIdRequest
     RecordActivityTaskHeartbeatByIdRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RecordActivityTaskHeartbeatByIdRequest -> Maybe Payloads
_RecordActivityTaskHeartbeatByIdRequest'details
           (\ RecordActivityTaskHeartbeatByIdRequest
x__ Maybe Payloads
y__
              -> RecordActivityTaskHeartbeatByIdRequest
x__ {_RecordActivityTaskHeartbeatByIdRequest'details = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RecordActivityTaskHeartbeatByIdRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> RecordActivityTaskHeartbeatByIdRequest
-> f RecordActivityTaskHeartbeatByIdRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> RecordActivityTaskHeartbeatByIdRequest
 -> f RecordActivityTaskHeartbeatByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RecordActivityTaskHeartbeatByIdRequest
-> f RecordActivityTaskHeartbeatByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RecordActivityTaskHeartbeatByIdRequest -> Text)
-> (RecordActivityTaskHeartbeatByIdRequest
    -> Text -> RecordActivityTaskHeartbeatByIdRequest)
-> Lens
     RecordActivityTaskHeartbeatByIdRequest
     RecordActivityTaskHeartbeatByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RecordActivityTaskHeartbeatByIdRequest -> Text
_RecordActivityTaskHeartbeatByIdRequest'identity
           (\ RecordActivityTaskHeartbeatByIdRequest
x__ Text
y__
              -> RecordActivityTaskHeartbeatByIdRequest
x__ {_RecordActivityTaskHeartbeatByIdRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RecordActivityTaskHeartbeatByIdRequest where
  messageName :: Proxy RecordActivityTaskHeartbeatByIdRequest -> Text
messageName Proxy RecordActivityTaskHeartbeatByIdRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RecordActivityTaskHeartbeatByIdRequest"
  packedMessageDescriptor :: Proxy RecordActivityTaskHeartbeatByIdRequest -> ByteString
packedMessageDescriptor Proxy RecordActivityTaskHeartbeatByIdRequest
_
    = ByteString
"\n\
      \&RecordActivityTaskHeartbeatByIdRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
      \\vworkflow_id\CAN\STX \SOH(\tR\n\
      \workflowId\DC2\NAK\n\
      \\ACKrun_id\CAN\ETX \SOH(\tR\ENQrunId\DC2\US\n\
      \\vactivity_id\CAN\EOT \SOH(\tR\n\
      \activityId\DC2:\n\
      \\adetails\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2\SUB\n\
      \\bidentity\CAN\ACK \SOH(\tR\bidentity"
  packedFileDescriptor :: Proxy RecordActivityTaskHeartbeatByIdRequest -> ByteString
packedFileDescriptor Proxy RecordActivityTaskHeartbeatByIdRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RecordActivityTaskHeartbeatByIdRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RecordActivityTaskHeartbeatByIdRequest Text
-> FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
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
     RecordActivityTaskHeartbeatByIdRequest
     RecordActivityTaskHeartbeatByIdRequest
     Text
     Text
-> FieldAccessor RecordActivityTaskHeartbeatByIdRequest 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 RecordActivityTaskHeartbeatByIdRequest
        workflowId__field_descriptor :: FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
workflowId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RecordActivityTaskHeartbeatByIdRequest Text
-> FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
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
     RecordActivityTaskHeartbeatByIdRequest
     RecordActivityTaskHeartbeatByIdRequest
     Text
     Text
-> FieldAccessor RecordActivityTaskHeartbeatByIdRequest 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 RecordActivityTaskHeartbeatByIdRequest
        runId__field_descriptor :: FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
runId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RecordActivityTaskHeartbeatByIdRequest Text
-> FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"run_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RecordActivityTaskHeartbeatByIdRequest
     RecordActivityTaskHeartbeatByIdRequest
     Text
     Text
-> FieldAccessor RecordActivityTaskHeartbeatByIdRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId")) ::
              Data.ProtoLens.FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
        activityId__field_descriptor :: FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
activityId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RecordActivityTaskHeartbeatByIdRequest Text
-> FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
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
     RecordActivityTaskHeartbeatByIdRequest
     RecordActivityTaskHeartbeatByIdRequest
     Text
     Text
-> FieldAccessor RecordActivityTaskHeartbeatByIdRequest 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 RecordActivityTaskHeartbeatByIdRequest
        details__field_descriptor :: FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
details__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor RecordActivityTaskHeartbeatByIdRequest Payloads
-> FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"details"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  RecordActivityTaskHeartbeatByIdRequest
  RecordActivityTaskHeartbeatByIdRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor RecordActivityTaskHeartbeatByIdRequest Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'details")) ::
              Data.ProtoLens.FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
        identity__field_descriptor :: FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RecordActivityTaskHeartbeatByIdRequest Text
-> FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RecordActivityTaskHeartbeatByIdRequest
     RecordActivityTaskHeartbeatByIdRequest
     Text
     Text
-> FieldAccessor RecordActivityTaskHeartbeatByIdRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
      in
        [(Tag, FieldDescriptor RecordActivityTaskHeartbeatByIdRequest)]
-> Map Tag (FieldDescriptor RecordActivityTaskHeartbeatByIdRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
workflowId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
runId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
activityId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
details__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor RecordActivityTaskHeartbeatByIdRequest
identity__field_descriptor)]
  unknownFields :: Lens' RecordActivityTaskHeartbeatByIdRequest FieldSet
unknownFields
    = (RecordActivityTaskHeartbeatByIdRequest -> FieldSet)
-> (RecordActivityTaskHeartbeatByIdRequest
    -> FieldSet -> RecordActivityTaskHeartbeatByIdRequest)
-> Lens' RecordActivityTaskHeartbeatByIdRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RecordActivityTaskHeartbeatByIdRequest -> FieldSet
_RecordActivityTaskHeartbeatByIdRequest'_unknownFields
        (\ RecordActivityTaskHeartbeatByIdRequest
x__ FieldSet
y__
           -> RecordActivityTaskHeartbeatByIdRequest
x__
                {_RecordActivityTaskHeartbeatByIdRequest'_unknownFields = y__})
  defMessage :: RecordActivityTaskHeartbeatByIdRequest
defMessage
    = RecordActivityTaskHeartbeatByIdRequest'_constructor
        {_RecordActivityTaskHeartbeatByIdRequest'namespace :: Text
_RecordActivityTaskHeartbeatByIdRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RecordActivityTaskHeartbeatByIdRequest'workflowId :: Text
_RecordActivityTaskHeartbeatByIdRequest'workflowId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RecordActivityTaskHeartbeatByIdRequest'runId :: Text
_RecordActivityTaskHeartbeatByIdRequest'runId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RecordActivityTaskHeartbeatByIdRequest'activityId :: Text
_RecordActivityTaskHeartbeatByIdRequest'activityId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RecordActivityTaskHeartbeatByIdRequest'details :: Maybe Payloads
_RecordActivityTaskHeartbeatByIdRequest'details = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _RecordActivityTaskHeartbeatByIdRequest'identity :: Text
_RecordActivityTaskHeartbeatByIdRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RecordActivityTaskHeartbeatByIdRequest'_unknownFields :: FieldSet
_RecordActivityTaskHeartbeatByIdRequest'_unknownFields = []}
  parseMessage :: Parser RecordActivityTaskHeartbeatByIdRequest
parseMessage
    = let
        loop ::
          RecordActivityTaskHeartbeatByIdRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser RecordActivityTaskHeartbeatByIdRequest
        loop :: RecordActivityTaskHeartbeatByIdRequest
-> Parser RecordActivityTaskHeartbeatByIdRequest
loop RecordActivityTaskHeartbeatByIdRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"workflow_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"workflowId") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"run_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"runId") y x)
                        Word64
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
"activity_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"activityId") y x)
                        Word64
42
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"details"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"details") y x)
                        Word64
50
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser RecordActivityTaskHeartbeatByIdRequest
-> String -> Parser RecordActivityTaskHeartbeatByIdRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RecordActivityTaskHeartbeatByIdRequest
-> Parser RecordActivityTaskHeartbeatByIdRequest
loop RecordActivityTaskHeartbeatByIdRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RecordActivityTaskHeartbeatByIdRequest"
  buildMessage :: RecordActivityTaskHeartbeatByIdRequest -> Builder
buildMessage
    = \ RecordActivityTaskHeartbeatByIdRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  RecordActivityTaskHeartbeatByIdRequest
  RecordActivityTaskHeartbeatByIdRequest
  Text
  Text
-> RecordActivityTaskHeartbeatByIdRequest -> 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") RecordActivityTaskHeartbeatByIdRequest
_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
  RecordActivityTaskHeartbeatByIdRequest
  RecordActivityTaskHeartbeatByIdRequest
  Text
  Text
-> RecordActivityTaskHeartbeatByIdRequest -> 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") RecordActivityTaskHeartbeatByIdRequest
_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
  RecordActivityTaskHeartbeatByIdRequest
  RecordActivityTaskHeartbeatByIdRequest
  Text
  Text
-> RecordActivityTaskHeartbeatByIdRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId") RecordActivityTaskHeartbeatByIdRequest
_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
  RecordActivityTaskHeartbeatByIdRequest
  RecordActivityTaskHeartbeatByIdRequest
  Text
  Text
-> RecordActivityTaskHeartbeatByIdRequest -> 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") RecordActivityTaskHeartbeatByIdRequest
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Payloads)
  RecordActivityTaskHeartbeatByIdRequest
  RecordActivityTaskHeartbeatByIdRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> RecordActivityTaskHeartbeatByIdRequest -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'details") RecordActivityTaskHeartbeatByIdRequest
_x
                          of
                            Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just Payloads
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v = FoldLike
  Text
  RecordActivityTaskHeartbeatByIdRequest
  RecordActivityTaskHeartbeatByIdRequest
  Text
  Text
-> RecordActivityTaskHeartbeatByIdRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") RecordActivityTaskHeartbeatByIdRequest
_x
                             in
                               if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                     ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        (\ ByteString
bs
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                            (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                               (FoldLike
  FieldSet
  RecordActivityTaskHeartbeatByIdRequest
  RecordActivityTaskHeartbeatByIdRequest
  FieldSet
  FieldSet
-> RecordActivityTaskHeartbeatByIdRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RecordActivityTaskHeartbeatByIdRequest
  RecordActivityTaskHeartbeatByIdRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RecordActivityTaskHeartbeatByIdRequest FieldSet
Data.ProtoLens.unknownFields RecordActivityTaskHeartbeatByIdRequest
_x)))))))
instance Control.DeepSeq.NFData RecordActivityTaskHeartbeatByIdRequest where
  rnf :: RecordActivityTaskHeartbeatByIdRequest -> ()
rnf
    = \ RecordActivityTaskHeartbeatByIdRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RecordActivityTaskHeartbeatByIdRequest -> FieldSet
_RecordActivityTaskHeartbeatByIdRequest'_unknownFields RecordActivityTaskHeartbeatByIdRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RecordActivityTaskHeartbeatByIdRequest -> Text
_RecordActivityTaskHeartbeatByIdRequest'namespace RecordActivityTaskHeartbeatByIdRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RecordActivityTaskHeartbeatByIdRequest -> Text
_RecordActivityTaskHeartbeatByIdRequest'workflowId RecordActivityTaskHeartbeatByIdRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RecordActivityTaskHeartbeatByIdRequest -> Text
_RecordActivityTaskHeartbeatByIdRequest'runId RecordActivityTaskHeartbeatByIdRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RecordActivityTaskHeartbeatByIdRequest -> Text
_RecordActivityTaskHeartbeatByIdRequest'activityId RecordActivityTaskHeartbeatByIdRequest
x__)
                         (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RecordActivityTaskHeartbeatByIdRequest -> Maybe Payloads
_RecordActivityTaskHeartbeatByIdRequest'details RecordActivityTaskHeartbeatByIdRequest
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (RecordActivityTaskHeartbeatByIdRequest -> Text
_RecordActivityTaskHeartbeatByIdRequest'identity RecordActivityTaskHeartbeatByIdRequest
x__) ()))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.cancelRequested' @:: Lens' RecordActivityTaskHeartbeatByIdResponse Prelude.Bool@ -}
data RecordActivityTaskHeartbeatByIdResponse
  = RecordActivityTaskHeartbeatByIdResponse'_constructor {RecordActivityTaskHeartbeatByIdResponse -> Bool
_RecordActivityTaskHeartbeatByIdResponse'cancelRequested :: !Prelude.Bool,
                                                          RecordActivityTaskHeartbeatByIdResponse -> FieldSet
_RecordActivityTaskHeartbeatByIdResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Bool
(RecordActivityTaskHeartbeatByIdResponse
 -> RecordActivityTaskHeartbeatByIdResponse -> Bool)
-> (RecordActivityTaskHeartbeatByIdResponse
    -> RecordActivityTaskHeartbeatByIdResponse -> Bool)
-> Eq RecordActivityTaskHeartbeatByIdResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Bool
== :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Bool
$c/= :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Bool
/= :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Bool
Prelude.Eq, Eq RecordActivityTaskHeartbeatByIdResponse
Eq RecordActivityTaskHeartbeatByIdResponse =>
(RecordActivityTaskHeartbeatByIdResponse
 -> RecordActivityTaskHeartbeatByIdResponse -> Ordering)
-> (RecordActivityTaskHeartbeatByIdResponse
    -> RecordActivityTaskHeartbeatByIdResponse -> Bool)
-> (RecordActivityTaskHeartbeatByIdResponse
    -> RecordActivityTaskHeartbeatByIdResponse -> Bool)
-> (RecordActivityTaskHeartbeatByIdResponse
    -> RecordActivityTaskHeartbeatByIdResponse -> Bool)
-> (RecordActivityTaskHeartbeatByIdResponse
    -> RecordActivityTaskHeartbeatByIdResponse -> Bool)
-> (RecordActivityTaskHeartbeatByIdResponse
    -> RecordActivityTaskHeartbeatByIdResponse
    -> RecordActivityTaskHeartbeatByIdResponse)
-> (RecordActivityTaskHeartbeatByIdResponse
    -> RecordActivityTaskHeartbeatByIdResponse
    -> RecordActivityTaskHeartbeatByIdResponse)
-> Ord RecordActivityTaskHeartbeatByIdResponse
RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Bool
RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Ordering
RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse
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 :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Ordering
compare :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Ordering
$c< :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Bool
< :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Bool
$c<= :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Bool
<= :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Bool
$c> :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Bool
> :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Bool
$c>= :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Bool
>= :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse -> Bool
$cmax :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse
max :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse
$cmin :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse
min :: RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse
-> RecordActivityTaskHeartbeatByIdResponse
Prelude.Ord)
instance Prelude.Show RecordActivityTaskHeartbeatByIdResponse where
  showsPrec :: Int -> RecordActivityTaskHeartbeatByIdResponse -> ShowS
showsPrec Int
_ RecordActivityTaskHeartbeatByIdResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RecordActivityTaskHeartbeatByIdResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RecordActivityTaskHeartbeatByIdResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RecordActivityTaskHeartbeatByIdResponse "cancelRequested" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cancelRequested"
-> (Bool -> f Bool)
-> RecordActivityTaskHeartbeatByIdResponse
-> f RecordActivityTaskHeartbeatByIdResponse
fieldOf Proxy# "cancelRequested"
_
    = ((Bool -> f Bool)
 -> RecordActivityTaskHeartbeatByIdResponse
 -> f RecordActivityTaskHeartbeatByIdResponse)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> RecordActivityTaskHeartbeatByIdResponse
-> f RecordActivityTaskHeartbeatByIdResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RecordActivityTaskHeartbeatByIdResponse -> Bool)
-> (RecordActivityTaskHeartbeatByIdResponse
    -> Bool -> RecordActivityTaskHeartbeatByIdResponse)
-> Lens
     RecordActivityTaskHeartbeatByIdResponse
     RecordActivityTaskHeartbeatByIdResponse
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RecordActivityTaskHeartbeatByIdResponse -> Bool
_RecordActivityTaskHeartbeatByIdResponse'cancelRequested
           (\ RecordActivityTaskHeartbeatByIdResponse
x__ Bool
y__
              -> RecordActivityTaskHeartbeatByIdResponse
x__
                   {_RecordActivityTaskHeartbeatByIdResponse'cancelRequested = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RecordActivityTaskHeartbeatByIdResponse where
  messageName :: Proxy RecordActivityTaskHeartbeatByIdResponse -> Text
messageName Proxy RecordActivityTaskHeartbeatByIdResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RecordActivityTaskHeartbeatByIdResponse"
  packedMessageDescriptor :: Proxy RecordActivityTaskHeartbeatByIdResponse -> ByteString
packedMessageDescriptor Proxy RecordActivityTaskHeartbeatByIdResponse
_
    = ByteString
"\n\
      \'RecordActivityTaskHeartbeatByIdResponse\DC2)\n\
      \\DLEcancel_requested\CAN\SOH \SOH(\bR\SIcancelRequested"
  packedFileDescriptor :: Proxy RecordActivityTaskHeartbeatByIdResponse -> ByteString
packedFileDescriptor Proxy RecordActivityTaskHeartbeatByIdResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RecordActivityTaskHeartbeatByIdResponse)
fieldsByTag
    = let
        cancelRequested__field_descriptor :: FieldDescriptor RecordActivityTaskHeartbeatByIdResponse
cancelRequested__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor RecordActivityTaskHeartbeatByIdResponse Bool
-> FieldDescriptor RecordActivityTaskHeartbeatByIdResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cancel_requested"
              (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
     RecordActivityTaskHeartbeatByIdResponse
     RecordActivityTaskHeartbeatByIdResponse
     Bool
     Bool
-> FieldAccessor RecordActivityTaskHeartbeatByIdResponse 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 @"cancelRequested")) ::
              Data.ProtoLens.FieldDescriptor RecordActivityTaskHeartbeatByIdResponse
      in
        [(Tag, FieldDescriptor RecordActivityTaskHeartbeatByIdResponse)]
-> Map
     Tag (FieldDescriptor RecordActivityTaskHeartbeatByIdResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RecordActivityTaskHeartbeatByIdResponse
cancelRequested__field_descriptor)]
  unknownFields :: Lens' RecordActivityTaskHeartbeatByIdResponse FieldSet
unknownFields
    = (RecordActivityTaskHeartbeatByIdResponse -> FieldSet)
-> (RecordActivityTaskHeartbeatByIdResponse
    -> FieldSet -> RecordActivityTaskHeartbeatByIdResponse)
-> Lens' RecordActivityTaskHeartbeatByIdResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RecordActivityTaskHeartbeatByIdResponse -> FieldSet
_RecordActivityTaskHeartbeatByIdResponse'_unknownFields
        (\ RecordActivityTaskHeartbeatByIdResponse
x__ FieldSet
y__
           -> RecordActivityTaskHeartbeatByIdResponse
x__
                {_RecordActivityTaskHeartbeatByIdResponse'_unknownFields = y__})
  defMessage :: RecordActivityTaskHeartbeatByIdResponse
defMessage
    = RecordActivityTaskHeartbeatByIdResponse'_constructor
        {_RecordActivityTaskHeartbeatByIdResponse'cancelRequested :: Bool
_RecordActivityTaskHeartbeatByIdResponse'cancelRequested = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RecordActivityTaskHeartbeatByIdResponse'_unknownFields :: FieldSet
_RecordActivityTaskHeartbeatByIdResponse'_unknownFields = []}
  parseMessage :: Parser RecordActivityTaskHeartbeatByIdResponse
parseMessage
    = let
        loop ::
          RecordActivityTaskHeartbeatByIdResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser RecordActivityTaskHeartbeatByIdResponse
        loop :: RecordActivityTaskHeartbeatByIdResponse
-> Parser RecordActivityTaskHeartbeatByIdResponse
loop RecordActivityTaskHeartbeatByIdResponse
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 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
"cancel_requested"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cancelRequested") 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 RecordActivityTaskHeartbeatByIdResponse
-> String -> Parser RecordActivityTaskHeartbeatByIdResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RecordActivityTaskHeartbeatByIdResponse
-> Parser RecordActivityTaskHeartbeatByIdResponse
loop RecordActivityTaskHeartbeatByIdResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RecordActivityTaskHeartbeatByIdResponse"
  buildMessage :: RecordActivityTaskHeartbeatByIdResponse -> Builder
buildMessage
    = \ RecordActivityTaskHeartbeatByIdResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Bool
_v
                  = FoldLike
  Bool
  RecordActivityTaskHeartbeatByIdResponse
  RecordActivityTaskHeartbeatByIdResponse
  Bool
  Bool
-> RecordActivityTaskHeartbeatByIdResponse -> 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 @"cancelRequested") RecordActivityTaskHeartbeatByIdResponse
_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
8)
                      ((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
  RecordActivityTaskHeartbeatByIdResponse
  RecordActivityTaskHeartbeatByIdResponse
  FieldSet
  FieldSet
-> RecordActivityTaskHeartbeatByIdResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RecordActivityTaskHeartbeatByIdResponse
  RecordActivityTaskHeartbeatByIdResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RecordActivityTaskHeartbeatByIdResponse FieldSet
Data.ProtoLens.unknownFields RecordActivityTaskHeartbeatByIdResponse
_x))
instance Control.DeepSeq.NFData RecordActivityTaskHeartbeatByIdResponse where
  rnf :: RecordActivityTaskHeartbeatByIdResponse -> ()
rnf
    = \ RecordActivityTaskHeartbeatByIdResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RecordActivityTaskHeartbeatByIdResponse -> FieldSet
_RecordActivityTaskHeartbeatByIdResponse'_unknownFields RecordActivityTaskHeartbeatByIdResponse
x__)
             (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RecordActivityTaskHeartbeatByIdResponse -> Bool
_RecordActivityTaskHeartbeatByIdResponse'cancelRequested RecordActivityTaskHeartbeatByIdResponse
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskToken' @:: Lens' RecordActivityTaskHeartbeatRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.details' @:: Lens' RecordActivityTaskHeartbeatRequest Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'details' @:: Lens' RecordActivityTaskHeartbeatRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' RecordActivityTaskHeartbeatRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' RecordActivityTaskHeartbeatRequest Data.Text.Text@ -}
data RecordActivityTaskHeartbeatRequest
  = RecordActivityTaskHeartbeatRequest'_constructor {RecordActivityTaskHeartbeatRequest -> ByteString
_RecordActivityTaskHeartbeatRequest'taskToken :: !Data.ByteString.ByteString,
                                                     RecordActivityTaskHeartbeatRequest -> Maybe Payloads
_RecordActivityTaskHeartbeatRequest'details :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                     RecordActivityTaskHeartbeatRequest -> Text
_RecordActivityTaskHeartbeatRequest'identity :: !Data.Text.Text,
                                                     RecordActivityTaskHeartbeatRequest -> Text
_RecordActivityTaskHeartbeatRequest'namespace :: !Data.Text.Text,
                                                     RecordActivityTaskHeartbeatRequest -> FieldSet
_RecordActivityTaskHeartbeatRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Bool
(RecordActivityTaskHeartbeatRequest
 -> RecordActivityTaskHeartbeatRequest -> Bool)
-> (RecordActivityTaskHeartbeatRequest
    -> RecordActivityTaskHeartbeatRequest -> Bool)
-> Eq RecordActivityTaskHeartbeatRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Bool
== :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Bool
$c/= :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Bool
/= :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Bool
Prelude.Eq, Eq RecordActivityTaskHeartbeatRequest
Eq RecordActivityTaskHeartbeatRequest =>
(RecordActivityTaskHeartbeatRequest
 -> RecordActivityTaskHeartbeatRequest -> Ordering)
-> (RecordActivityTaskHeartbeatRequest
    -> RecordActivityTaskHeartbeatRequest -> Bool)
-> (RecordActivityTaskHeartbeatRequest
    -> RecordActivityTaskHeartbeatRequest -> Bool)
-> (RecordActivityTaskHeartbeatRequest
    -> RecordActivityTaskHeartbeatRequest -> Bool)
-> (RecordActivityTaskHeartbeatRequest
    -> RecordActivityTaskHeartbeatRequest -> Bool)
-> (RecordActivityTaskHeartbeatRequest
    -> RecordActivityTaskHeartbeatRequest
    -> RecordActivityTaskHeartbeatRequest)
-> (RecordActivityTaskHeartbeatRequest
    -> RecordActivityTaskHeartbeatRequest
    -> RecordActivityTaskHeartbeatRequest)
-> Ord RecordActivityTaskHeartbeatRequest
RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Bool
RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Ordering
RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest
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 :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Ordering
compare :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Ordering
$c< :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Bool
< :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Bool
$c<= :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Bool
<= :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Bool
$c> :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Bool
> :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Bool
$c>= :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Bool
>= :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest -> Bool
$cmax :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest
max :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest
$cmin :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest
min :: RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest
-> RecordActivityTaskHeartbeatRequest
Prelude.Ord)
instance Prelude.Show RecordActivityTaskHeartbeatRequest where
  showsPrec :: Int -> RecordActivityTaskHeartbeatRequest -> ShowS
showsPrec Int
_ RecordActivityTaskHeartbeatRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RecordActivityTaskHeartbeatRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RecordActivityTaskHeartbeatRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RecordActivityTaskHeartbeatRequest "taskToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskToken"
-> (ByteString -> f ByteString)
-> RecordActivityTaskHeartbeatRequest
-> f RecordActivityTaskHeartbeatRequest
fieldOf Proxy# "taskToken"
_
    = ((ByteString -> f ByteString)
 -> RecordActivityTaskHeartbeatRequest
 -> f RecordActivityTaskHeartbeatRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> RecordActivityTaskHeartbeatRequest
-> f RecordActivityTaskHeartbeatRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RecordActivityTaskHeartbeatRequest -> ByteString)
-> (RecordActivityTaskHeartbeatRequest
    -> ByteString -> RecordActivityTaskHeartbeatRequest)
-> Lens
     RecordActivityTaskHeartbeatRequest
     RecordActivityTaskHeartbeatRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RecordActivityTaskHeartbeatRequest -> ByteString
_RecordActivityTaskHeartbeatRequest'taskToken
           (\ RecordActivityTaskHeartbeatRequest
x__ ByteString
y__
              -> RecordActivityTaskHeartbeatRequest
x__ {_RecordActivityTaskHeartbeatRequest'taskToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RecordActivityTaskHeartbeatRequest "details" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "details"
-> (Payloads -> f Payloads)
-> RecordActivityTaskHeartbeatRequest
-> f RecordActivityTaskHeartbeatRequest
fieldOf Proxy# "details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RecordActivityTaskHeartbeatRequest
 -> f RecordActivityTaskHeartbeatRequest)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> RecordActivityTaskHeartbeatRequest
-> f RecordActivityTaskHeartbeatRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RecordActivityTaskHeartbeatRequest -> Maybe Payloads)
-> (RecordActivityTaskHeartbeatRequest
    -> Maybe Payloads -> RecordActivityTaskHeartbeatRequest)
-> Lens
     RecordActivityTaskHeartbeatRequest
     RecordActivityTaskHeartbeatRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RecordActivityTaskHeartbeatRequest -> Maybe Payloads
_RecordActivityTaskHeartbeatRequest'details
           (\ RecordActivityTaskHeartbeatRequest
x__ Maybe Payloads
y__
              -> RecordActivityTaskHeartbeatRequest
x__ {_RecordActivityTaskHeartbeatRequest'details = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RecordActivityTaskHeartbeatRequest "maybe'details" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'details"
-> (Maybe Payloads -> f (Maybe Payloads))
-> RecordActivityTaskHeartbeatRequest
-> f RecordActivityTaskHeartbeatRequest
fieldOf Proxy# "maybe'details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RecordActivityTaskHeartbeatRequest
 -> f RecordActivityTaskHeartbeatRequest)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> RecordActivityTaskHeartbeatRequest
-> f RecordActivityTaskHeartbeatRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RecordActivityTaskHeartbeatRequest -> Maybe Payloads)
-> (RecordActivityTaskHeartbeatRequest
    -> Maybe Payloads -> RecordActivityTaskHeartbeatRequest)
-> Lens
     RecordActivityTaskHeartbeatRequest
     RecordActivityTaskHeartbeatRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RecordActivityTaskHeartbeatRequest -> Maybe Payloads
_RecordActivityTaskHeartbeatRequest'details
           (\ RecordActivityTaskHeartbeatRequest
x__ Maybe Payloads
y__
              -> RecordActivityTaskHeartbeatRequest
x__ {_RecordActivityTaskHeartbeatRequest'details = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RecordActivityTaskHeartbeatRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> RecordActivityTaskHeartbeatRequest
-> f RecordActivityTaskHeartbeatRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> RecordActivityTaskHeartbeatRequest
 -> f RecordActivityTaskHeartbeatRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RecordActivityTaskHeartbeatRequest
-> f RecordActivityTaskHeartbeatRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RecordActivityTaskHeartbeatRequest -> Text)
-> (RecordActivityTaskHeartbeatRequest
    -> Text -> RecordActivityTaskHeartbeatRequest)
-> Lens
     RecordActivityTaskHeartbeatRequest
     RecordActivityTaskHeartbeatRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RecordActivityTaskHeartbeatRequest -> Text
_RecordActivityTaskHeartbeatRequest'identity
           (\ RecordActivityTaskHeartbeatRequest
x__ Text
y__
              -> RecordActivityTaskHeartbeatRequest
x__ {_RecordActivityTaskHeartbeatRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RecordActivityTaskHeartbeatRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RecordActivityTaskHeartbeatRequest
-> f RecordActivityTaskHeartbeatRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RecordActivityTaskHeartbeatRequest
 -> f RecordActivityTaskHeartbeatRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RecordActivityTaskHeartbeatRequest
-> f RecordActivityTaskHeartbeatRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RecordActivityTaskHeartbeatRequest -> Text)
-> (RecordActivityTaskHeartbeatRequest
    -> Text -> RecordActivityTaskHeartbeatRequest)
-> Lens
     RecordActivityTaskHeartbeatRequest
     RecordActivityTaskHeartbeatRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RecordActivityTaskHeartbeatRequest -> Text
_RecordActivityTaskHeartbeatRequest'namespace
           (\ RecordActivityTaskHeartbeatRequest
x__ Text
y__
              -> RecordActivityTaskHeartbeatRequest
x__ {_RecordActivityTaskHeartbeatRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RecordActivityTaskHeartbeatRequest where
  messageName :: Proxy RecordActivityTaskHeartbeatRequest -> Text
messageName Proxy RecordActivityTaskHeartbeatRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RecordActivityTaskHeartbeatRequest"
  packedMessageDescriptor :: Proxy RecordActivityTaskHeartbeatRequest -> ByteString
packedMessageDescriptor Proxy RecordActivityTaskHeartbeatRequest
_
    = ByteString
"\n\
      \\"RecordActivityTaskHeartbeatRequest\DC2\GS\n\
      \\n\
      \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2:\n\
      \\adetails\CAN\STX \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2\SUB\n\
      \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2\FS\n\
      \\tnamespace\CAN\EOT \SOH(\tR\tnamespace"
  packedFileDescriptor :: Proxy RecordActivityTaskHeartbeatRequest -> ByteString
packedFileDescriptor Proxy RecordActivityTaskHeartbeatRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RecordActivityTaskHeartbeatRequest)
fieldsByTag
    = let
        taskToken__field_descriptor :: FieldDescriptor RecordActivityTaskHeartbeatRequest
taskToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor RecordActivityTaskHeartbeatRequest ByteString
-> FieldDescriptor RecordActivityTaskHeartbeatRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     RecordActivityTaskHeartbeatRequest
     RecordActivityTaskHeartbeatRequest
     ByteString
     ByteString
-> FieldAccessor RecordActivityTaskHeartbeatRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken")) ::
              Data.ProtoLens.FieldDescriptor RecordActivityTaskHeartbeatRequest
        details__field_descriptor :: FieldDescriptor RecordActivityTaskHeartbeatRequest
details__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor RecordActivityTaskHeartbeatRequest Payloads
-> FieldDescriptor RecordActivityTaskHeartbeatRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"details"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  RecordActivityTaskHeartbeatRequest
  RecordActivityTaskHeartbeatRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor RecordActivityTaskHeartbeatRequest Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'details")) ::
              Data.ProtoLens.FieldDescriptor RecordActivityTaskHeartbeatRequest
        identity__field_descriptor :: FieldDescriptor RecordActivityTaskHeartbeatRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RecordActivityTaskHeartbeatRequest Text
-> FieldDescriptor RecordActivityTaskHeartbeatRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RecordActivityTaskHeartbeatRequest
     RecordActivityTaskHeartbeatRequest
     Text
     Text
-> FieldAccessor RecordActivityTaskHeartbeatRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor RecordActivityTaskHeartbeatRequest
        namespace__field_descriptor :: FieldDescriptor RecordActivityTaskHeartbeatRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RecordActivityTaskHeartbeatRequest Text
-> FieldDescriptor RecordActivityTaskHeartbeatRequest
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
     RecordActivityTaskHeartbeatRequest
     RecordActivityTaskHeartbeatRequest
     Text
     Text
-> FieldAccessor RecordActivityTaskHeartbeatRequest 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 RecordActivityTaskHeartbeatRequest
      in
        [(Tag, FieldDescriptor RecordActivityTaskHeartbeatRequest)]
-> Map Tag (FieldDescriptor RecordActivityTaskHeartbeatRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RecordActivityTaskHeartbeatRequest
taskToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RecordActivityTaskHeartbeatRequest
details__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RecordActivityTaskHeartbeatRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor RecordActivityTaskHeartbeatRequest
namespace__field_descriptor)]
  unknownFields :: Lens' RecordActivityTaskHeartbeatRequest FieldSet
unknownFields
    = (RecordActivityTaskHeartbeatRequest -> FieldSet)
-> (RecordActivityTaskHeartbeatRequest
    -> FieldSet -> RecordActivityTaskHeartbeatRequest)
-> Lens' RecordActivityTaskHeartbeatRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RecordActivityTaskHeartbeatRequest -> FieldSet
_RecordActivityTaskHeartbeatRequest'_unknownFields
        (\ RecordActivityTaskHeartbeatRequest
x__ FieldSet
y__
           -> RecordActivityTaskHeartbeatRequest
x__ {_RecordActivityTaskHeartbeatRequest'_unknownFields = y__})
  defMessage :: RecordActivityTaskHeartbeatRequest
defMessage
    = RecordActivityTaskHeartbeatRequest'_constructor
        {_RecordActivityTaskHeartbeatRequest'taskToken :: ByteString
_RecordActivityTaskHeartbeatRequest'taskToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RecordActivityTaskHeartbeatRequest'details :: Maybe Payloads
_RecordActivityTaskHeartbeatRequest'details = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _RecordActivityTaskHeartbeatRequest'identity :: Text
_RecordActivityTaskHeartbeatRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RecordActivityTaskHeartbeatRequest'namespace :: Text
_RecordActivityTaskHeartbeatRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RecordActivityTaskHeartbeatRequest'_unknownFields :: FieldSet
_RecordActivityTaskHeartbeatRequest'_unknownFields = []}
  parseMessage :: Parser RecordActivityTaskHeartbeatRequest
parseMessage
    = let
        loop ::
          RecordActivityTaskHeartbeatRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser RecordActivityTaskHeartbeatRequest
        loop :: RecordActivityTaskHeartbeatRequest
-> Parser RecordActivityTaskHeartbeatRequest
loop RecordActivityTaskHeartbeatRequest
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 ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"task_token"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskToken") y x)
                        Word64
18
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"details"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"details") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") 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 RecordActivityTaskHeartbeatRequest
-> String -> Parser RecordActivityTaskHeartbeatRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RecordActivityTaskHeartbeatRequest
-> Parser RecordActivityTaskHeartbeatRequest
loop RecordActivityTaskHeartbeatRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RecordActivityTaskHeartbeatRequest"
  buildMessage :: RecordActivityTaskHeartbeatRequest -> Builder
buildMessage
    = \ RecordActivityTaskHeartbeatRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: ByteString
_v = FoldLike
  ByteString
  RecordActivityTaskHeartbeatRequest
  RecordActivityTaskHeartbeatRequest
  ByteString
  ByteString
-> RecordActivityTaskHeartbeatRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken") RecordActivityTaskHeartbeatRequest
_x
              in
                if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
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
bs
                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         ByteString
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe Payloads)
  RecordActivityTaskHeartbeatRequest
  RecordActivityTaskHeartbeatRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> RecordActivityTaskHeartbeatRequest -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'details") RecordActivityTaskHeartbeatRequest
_x
                 of
                   Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just Payloads
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v = FoldLike
  Text
  RecordActivityTaskHeartbeatRequest
  RecordActivityTaskHeartbeatRequest
  Text
  Text
-> RecordActivityTaskHeartbeatRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") RecordActivityTaskHeartbeatRequest
_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
  RecordActivityTaskHeartbeatRequest
  RecordActivityTaskHeartbeatRequest
  Text
  Text
-> RecordActivityTaskHeartbeatRequest -> 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") RecordActivityTaskHeartbeatRequest
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  RecordActivityTaskHeartbeatRequest
  RecordActivityTaskHeartbeatRequest
  FieldSet
  FieldSet
-> RecordActivityTaskHeartbeatRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RecordActivityTaskHeartbeatRequest
  RecordActivityTaskHeartbeatRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RecordActivityTaskHeartbeatRequest FieldSet
Data.ProtoLens.unknownFields RecordActivityTaskHeartbeatRequest
_x)))))
instance Control.DeepSeq.NFData RecordActivityTaskHeartbeatRequest where
  rnf :: RecordActivityTaskHeartbeatRequest -> ()
rnf
    = \ RecordActivityTaskHeartbeatRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RecordActivityTaskHeartbeatRequest -> FieldSet
_RecordActivityTaskHeartbeatRequest'_unknownFields RecordActivityTaskHeartbeatRequest
x__)
             (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RecordActivityTaskHeartbeatRequest -> ByteString
_RecordActivityTaskHeartbeatRequest'taskToken RecordActivityTaskHeartbeatRequest
x__)
                (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RecordActivityTaskHeartbeatRequest -> Maybe Payloads
_RecordActivityTaskHeartbeatRequest'details RecordActivityTaskHeartbeatRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RecordActivityTaskHeartbeatRequest -> Text
_RecordActivityTaskHeartbeatRequest'identity RecordActivityTaskHeartbeatRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RecordActivityTaskHeartbeatRequest -> Text
_RecordActivityTaskHeartbeatRequest'namespace RecordActivityTaskHeartbeatRequest
x__) ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.cancelRequested' @:: Lens' RecordActivityTaskHeartbeatResponse Prelude.Bool@ -}
data RecordActivityTaskHeartbeatResponse
  = RecordActivityTaskHeartbeatResponse'_constructor {RecordActivityTaskHeartbeatResponse -> Bool
_RecordActivityTaskHeartbeatResponse'cancelRequested :: !Prelude.Bool,
                                                      RecordActivityTaskHeartbeatResponse -> FieldSet
_RecordActivityTaskHeartbeatResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Bool
(RecordActivityTaskHeartbeatResponse
 -> RecordActivityTaskHeartbeatResponse -> Bool)
-> (RecordActivityTaskHeartbeatResponse
    -> RecordActivityTaskHeartbeatResponse -> Bool)
-> Eq RecordActivityTaskHeartbeatResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Bool
== :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Bool
$c/= :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Bool
/= :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Bool
Prelude.Eq, Eq RecordActivityTaskHeartbeatResponse
Eq RecordActivityTaskHeartbeatResponse =>
(RecordActivityTaskHeartbeatResponse
 -> RecordActivityTaskHeartbeatResponse -> Ordering)
-> (RecordActivityTaskHeartbeatResponse
    -> RecordActivityTaskHeartbeatResponse -> Bool)
-> (RecordActivityTaskHeartbeatResponse
    -> RecordActivityTaskHeartbeatResponse -> Bool)
-> (RecordActivityTaskHeartbeatResponse
    -> RecordActivityTaskHeartbeatResponse -> Bool)
-> (RecordActivityTaskHeartbeatResponse
    -> RecordActivityTaskHeartbeatResponse -> Bool)
-> (RecordActivityTaskHeartbeatResponse
    -> RecordActivityTaskHeartbeatResponse
    -> RecordActivityTaskHeartbeatResponse)
-> (RecordActivityTaskHeartbeatResponse
    -> RecordActivityTaskHeartbeatResponse
    -> RecordActivityTaskHeartbeatResponse)
-> Ord RecordActivityTaskHeartbeatResponse
RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Bool
RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Ordering
RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse
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 :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Ordering
compare :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Ordering
$c< :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Bool
< :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Bool
$c<= :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Bool
<= :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Bool
$c> :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Bool
> :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Bool
$c>= :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Bool
>= :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse -> Bool
$cmax :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse
max :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse
$cmin :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse
min :: RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse
-> RecordActivityTaskHeartbeatResponse
Prelude.Ord)
instance Prelude.Show RecordActivityTaskHeartbeatResponse where
  showsPrec :: Int -> RecordActivityTaskHeartbeatResponse -> ShowS
showsPrec Int
_ RecordActivityTaskHeartbeatResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RecordActivityTaskHeartbeatResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RecordActivityTaskHeartbeatResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RecordActivityTaskHeartbeatResponse "cancelRequested" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cancelRequested"
-> (Bool -> f Bool)
-> RecordActivityTaskHeartbeatResponse
-> f RecordActivityTaskHeartbeatResponse
fieldOf Proxy# "cancelRequested"
_
    = ((Bool -> f Bool)
 -> RecordActivityTaskHeartbeatResponse
 -> f RecordActivityTaskHeartbeatResponse)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> RecordActivityTaskHeartbeatResponse
-> f RecordActivityTaskHeartbeatResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RecordActivityTaskHeartbeatResponse -> Bool)
-> (RecordActivityTaskHeartbeatResponse
    -> Bool -> RecordActivityTaskHeartbeatResponse)
-> Lens
     RecordActivityTaskHeartbeatResponse
     RecordActivityTaskHeartbeatResponse
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RecordActivityTaskHeartbeatResponse -> Bool
_RecordActivityTaskHeartbeatResponse'cancelRequested
           (\ RecordActivityTaskHeartbeatResponse
x__ Bool
y__
              -> RecordActivityTaskHeartbeatResponse
x__
                   {_RecordActivityTaskHeartbeatResponse'cancelRequested = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RecordActivityTaskHeartbeatResponse where
  messageName :: Proxy RecordActivityTaskHeartbeatResponse -> Text
messageName Proxy RecordActivityTaskHeartbeatResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RecordActivityTaskHeartbeatResponse"
  packedMessageDescriptor :: Proxy RecordActivityTaskHeartbeatResponse -> ByteString
packedMessageDescriptor Proxy RecordActivityTaskHeartbeatResponse
_
    = ByteString
"\n\
      \#RecordActivityTaskHeartbeatResponse\DC2)\n\
      \\DLEcancel_requested\CAN\SOH \SOH(\bR\SIcancelRequested"
  packedFileDescriptor :: Proxy RecordActivityTaskHeartbeatResponse -> ByteString
packedFileDescriptor Proxy RecordActivityTaskHeartbeatResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RecordActivityTaskHeartbeatResponse)
fieldsByTag
    = let
        cancelRequested__field_descriptor :: FieldDescriptor RecordActivityTaskHeartbeatResponse
cancelRequested__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor RecordActivityTaskHeartbeatResponse Bool
-> FieldDescriptor RecordActivityTaskHeartbeatResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cancel_requested"
              (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
     RecordActivityTaskHeartbeatResponse
     RecordActivityTaskHeartbeatResponse
     Bool
     Bool
-> FieldAccessor RecordActivityTaskHeartbeatResponse 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 @"cancelRequested")) ::
              Data.ProtoLens.FieldDescriptor RecordActivityTaskHeartbeatResponse
      in
        [(Tag, FieldDescriptor RecordActivityTaskHeartbeatResponse)]
-> Map Tag (FieldDescriptor RecordActivityTaskHeartbeatResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RecordActivityTaskHeartbeatResponse
cancelRequested__field_descriptor)]
  unknownFields :: Lens' RecordActivityTaskHeartbeatResponse FieldSet
unknownFields
    = (RecordActivityTaskHeartbeatResponse -> FieldSet)
-> (RecordActivityTaskHeartbeatResponse
    -> FieldSet -> RecordActivityTaskHeartbeatResponse)
-> Lens' RecordActivityTaskHeartbeatResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RecordActivityTaskHeartbeatResponse -> FieldSet
_RecordActivityTaskHeartbeatResponse'_unknownFields
        (\ RecordActivityTaskHeartbeatResponse
x__ FieldSet
y__
           -> RecordActivityTaskHeartbeatResponse
x__ {_RecordActivityTaskHeartbeatResponse'_unknownFields = y__})
  defMessage :: RecordActivityTaskHeartbeatResponse
defMessage
    = RecordActivityTaskHeartbeatResponse'_constructor
        {_RecordActivityTaskHeartbeatResponse'cancelRequested :: Bool
_RecordActivityTaskHeartbeatResponse'cancelRequested = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RecordActivityTaskHeartbeatResponse'_unknownFields :: FieldSet
_RecordActivityTaskHeartbeatResponse'_unknownFields = []}
  parseMessage :: Parser RecordActivityTaskHeartbeatResponse
parseMessage
    = let
        loop ::
          RecordActivityTaskHeartbeatResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser RecordActivityTaskHeartbeatResponse
        loop :: RecordActivityTaskHeartbeatResponse
-> Parser RecordActivityTaskHeartbeatResponse
loop RecordActivityTaskHeartbeatResponse
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 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
"cancel_requested"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cancelRequested") 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 RecordActivityTaskHeartbeatResponse
-> String -> Parser RecordActivityTaskHeartbeatResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RecordActivityTaskHeartbeatResponse
-> Parser RecordActivityTaskHeartbeatResponse
loop RecordActivityTaskHeartbeatResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RecordActivityTaskHeartbeatResponse"
  buildMessage :: RecordActivityTaskHeartbeatResponse -> Builder
buildMessage
    = \ RecordActivityTaskHeartbeatResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Bool
_v
                  = FoldLike
  Bool
  RecordActivityTaskHeartbeatResponse
  RecordActivityTaskHeartbeatResponse
  Bool
  Bool
-> RecordActivityTaskHeartbeatResponse -> 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 @"cancelRequested") RecordActivityTaskHeartbeatResponse
_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
8)
                      ((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
  RecordActivityTaskHeartbeatResponse
  RecordActivityTaskHeartbeatResponse
  FieldSet
  FieldSet
-> RecordActivityTaskHeartbeatResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RecordActivityTaskHeartbeatResponse
  RecordActivityTaskHeartbeatResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RecordActivityTaskHeartbeatResponse FieldSet
Data.ProtoLens.unknownFields RecordActivityTaskHeartbeatResponse
_x))
instance Control.DeepSeq.NFData RecordActivityTaskHeartbeatResponse where
  rnf :: RecordActivityTaskHeartbeatResponse -> ()
rnf
    = \ RecordActivityTaskHeartbeatResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RecordActivityTaskHeartbeatResponse -> FieldSet
_RecordActivityTaskHeartbeatResponse'_unknownFields RecordActivityTaskHeartbeatResponse
x__)
             (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RecordActivityTaskHeartbeatResponse -> Bool
_RecordActivityTaskHeartbeatResponse'cancelRequested RecordActivityTaskHeartbeatResponse
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' RegisterNamespaceRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.description' @:: Lens' RegisterNamespaceRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.ownerEmail' @:: Lens' RegisterNamespaceRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowExecutionRetentionPeriod' @:: Lens' RegisterNamespaceRequest Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowExecutionRetentionPeriod' @:: Lens' RegisterNamespaceRequest (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.clusters' @:: Lens' RegisterNamespaceRequest [Proto.Temporal.Api.Replication.V1.Message.ClusterReplicationConfig]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'clusters' @:: Lens' RegisterNamespaceRequest (Data.Vector.Vector Proto.Temporal.Api.Replication.V1.Message.ClusterReplicationConfig)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.activeClusterName' @:: Lens' RegisterNamespaceRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.data'' @:: Lens' RegisterNamespaceRequest (Data.Map.Map Data.Text.Text Data.Text.Text)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.securityToken' @:: Lens' RegisterNamespaceRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.isGlobalNamespace' @:: Lens' RegisterNamespaceRequest Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.historyArchivalState' @:: Lens' RegisterNamespaceRequest Proto.Temporal.Api.Enums.V1.Namespace.ArchivalState@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.historyArchivalUri' @:: Lens' RegisterNamespaceRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.visibilityArchivalState' @:: Lens' RegisterNamespaceRequest Proto.Temporal.Api.Enums.V1.Namespace.ArchivalState@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.visibilityArchivalUri' @:: Lens' RegisterNamespaceRequest Data.Text.Text@ -}
data RegisterNamespaceRequest
  = RegisterNamespaceRequest'_constructor {RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'namespace :: !Data.Text.Text,
                                           RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'description :: !Data.Text.Text,
                                           RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'ownerEmail :: !Data.Text.Text,
                                           RegisterNamespaceRequest -> Maybe Duration
_RegisterNamespaceRequest'workflowExecutionRetentionPeriod :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                           RegisterNamespaceRequest -> Vector ClusterReplicationConfig
_RegisterNamespaceRequest'clusters :: !(Data.Vector.Vector Proto.Temporal.Api.Replication.V1.Message.ClusterReplicationConfig),
                                           RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'activeClusterName :: !Data.Text.Text,
                                           RegisterNamespaceRequest -> Map Text Text
_RegisterNamespaceRequest'data' :: !(Data.Map.Map Data.Text.Text Data.Text.Text),
                                           RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'securityToken :: !Data.Text.Text,
                                           RegisterNamespaceRequest -> Bool
_RegisterNamespaceRequest'isGlobalNamespace :: !Prelude.Bool,
                                           RegisterNamespaceRequest -> ArchivalState
_RegisterNamespaceRequest'historyArchivalState :: !Proto.Temporal.Api.Enums.V1.Namespace.ArchivalState,
                                           RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'historyArchivalUri :: !Data.Text.Text,
                                           RegisterNamespaceRequest -> ArchivalState
_RegisterNamespaceRequest'visibilityArchivalState :: !Proto.Temporal.Api.Enums.V1.Namespace.ArchivalState,
                                           RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'visibilityArchivalUri :: !Data.Text.Text,
                                           RegisterNamespaceRequest -> FieldSet
_RegisterNamespaceRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool
(RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool)
-> (RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool)
-> Eq RegisterNamespaceRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool
== :: RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool
$c/= :: RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool
/= :: RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool
Prelude.Eq, Eq RegisterNamespaceRequest
Eq RegisterNamespaceRequest =>
(RegisterNamespaceRequest -> RegisterNamespaceRequest -> Ordering)
-> (RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool)
-> (RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool)
-> (RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool)
-> (RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool)
-> (RegisterNamespaceRequest
    -> RegisterNamespaceRequest -> RegisterNamespaceRequest)
-> (RegisterNamespaceRequest
    -> RegisterNamespaceRequest -> RegisterNamespaceRequest)
-> Ord RegisterNamespaceRequest
RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool
RegisterNamespaceRequest -> RegisterNamespaceRequest -> Ordering
RegisterNamespaceRequest
-> RegisterNamespaceRequest -> RegisterNamespaceRequest
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 :: RegisterNamespaceRequest -> RegisterNamespaceRequest -> Ordering
compare :: RegisterNamespaceRequest -> RegisterNamespaceRequest -> Ordering
$c< :: RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool
< :: RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool
$c<= :: RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool
<= :: RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool
$c> :: RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool
> :: RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool
$c>= :: RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool
>= :: RegisterNamespaceRequest -> RegisterNamespaceRequest -> Bool
$cmax :: RegisterNamespaceRequest
-> RegisterNamespaceRequest -> RegisterNamespaceRequest
max :: RegisterNamespaceRequest
-> RegisterNamespaceRequest -> RegisterNamespaceRequest
$cmin :: RegisterNamespaceRequest
-> RegisterNamespaceRequest -> RegisterNamespaceRequest
min :: RegisterNamespaceRequest
-> RegisterNamespaceRequest -> RegisterNamespaceRequest
Prelude.Ord)
instance Prelude.Show RegisterNamespaceRequest where
  showsPrec :: Int -> RegisterNamespaceRequest -> ShowS
showsPrec Int
_ RegisterNamespaceRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RegisterNamespaceRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RegisterNamespaceRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RegisterNamespaceRequest -> f RegisterNamespaceRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest -> Text)
-> (RegisterNamespaceRequest -> Text -> RegisterNamespaceRequest)
-> Lens RegisterNamespaceRequest RegisterNamespaceRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'namespace
           (\ RegisterNamespaceRequest
x__ Text
y__ -> RegisterNamespaceRequest
x__ {_RegisterNamespaceRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest "description" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "description"
-> (Text -> f Text)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
fieldOf Proxy# "description"
_
    = ((Text -> f Text)
 -> RegisterNamespaceRequest -> f RegisterNamespaceRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest -> Text)
-> (RegisterNamespaceRequest -> Text -> RegisterNamespaceRequest)
-> Lens RegisterNamespaceRequest RegisterNamespaceRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'description
           (\ RegisterNamespaceRequest
x__ Text
y__ -> RegisterNamespaceRequest
x__ {_RegisterNamespaceRequest'description = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest "ownerEmail" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "ownerEmail"
-> (Text -> f Text)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
fieldOf Proxy# "ownerEmail"
_
    = ((Text -> f Text)
 -> RegisterNamespaceRequest -> f RegisterNamespaceRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest -> Text)
-> (RegisterNamespaceRequest -> Text -> RegisterNamespaceRequest)
-> Lens RegisterNamespaceRequest RegisterNamespaceRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'ownerEmail
           (\ RegisterNamespaceRequest
x__ Text
y__ -> RegisterNamespaceRequest
x__ {_RegisterNamespaceRequest'ownerEmail = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest "workflowExecutionRetentionPeriod" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionRetentionPeriod"
-> (Duration -> f Duration)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
fieldOf Proxy# "workflowExecutionRetentionPeriod"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> RegisterNamespaceRequest -> f RegisterNamespaceRequest)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest -> Maybe Duration)
-> (RegisterNamespaceRequest
    -> Maybe Duration -> RegisterNamespaceRequest)
-> Lens
     RegisterNamespaceRequest
     RegisterNamespaceRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest -> Maybe Duration
_RegisterNamespaceRequest'workflowExecutionRetentionPeriod
           (\ RegisterNamespaceRequest
x__ Maybe Duration
y__
              -> RegisterNamespaceRequest
x__
                   {_RegisterNamespaceRequest'workflowExecutionRetentionPeriod = 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 RegisterNamespaceRequest "maybe'workflowExecutionRetentionPeriod" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionRetentionPeriod"
-> (Maybe Duration -> f (Maybe Duration))
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
fieldOf Proxy# "maybe'workflowExecutionRetentionPeriod"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> RegisterNamespaceRequest -> f RegisterNamespaceRequest)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest -> Maybe Duration)
-> (RegisterNamespaceRequest
    -> Maybe Duration -> RegisterNamespaceRequest)
-> Lens
     RegisterNamespaceRequest
     RegisterNamespaceRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest -> Maybe Duration
_RegisterNamespaceRequest'workflowExecutionRetentionPeriod
           (\ RegisterNamespaceRequest
x__ Maybe Duration
y__
              -> RegisterNamespaceRequest
x__
                   {_RegisterNamespaceRequest'workflowExecutionRetentionPeriod = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest "clusters" [Proto.Temporal.Api.Replication.V1.Message.ClusterReplicationConfig] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "clusters"
-> ([ClusterReplicationConfig] -> f [ClusterReplicationConfig])
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
fieldOf Proxy# "clusters"
_
    = ((Vector ClusterReplicationConfig
  -> f (Vector ClusterReplicationConfig))
 -> RegisterNamespaceRequest -> f RegisterNamespaceRequest)
-> (([ClusterReplicationConfig] -> f [ClusterReplicationConfig])
    -> Vector ClusterReplicationConfig
    -> f (Vector ClusterReplicationConfig))
-> ([ClusterReplicationConfig] -> f [ClusterReplicationConfig])
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest -> Vector ClusterReplicationConfig)
-> (RegisterNamespaceRequest
    -> Vector ClusterReplicationConfig -> RegisterNamespaceRequest)
-> Lens
     RegisterNamespaceRequest
     RegisterNamespaceRequest
     (Vector ClusterReplicationConfig)
     (Vector ClusterReplicationConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest -> Vector ClusterReplicationConfig
_RegisterNamespaceRequest'clusters
           (\ RegisterNamespaceRequest
x__ Vector ClusterReplicationConfig
y__ -> RegisterNamespaceRequest
x__ {_RegisterNamespaceRequest'clusters = y__}))
        ((Vector ClusterReplicationConfig -> [ClusterReplicationConfig])
-> (Vector ClusterReplicationConfig
    -> [ClusterReplicationConfig] -> Vector ClusterReplicationConfig)
-> Lens
     (Vector ClusterReplicationConfig)
     (Vector ClusterReplicationConfig)
     [ClusterReplicationConfig]
     [ClusterReplicationConfig]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector ClusterReplicationConfig -> [ClusterReplicationConfig]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector ClusterReplicationConfig
_ [ClusterReplicationConfig]
y__ -> [ClusterReplicationConfig] -> Vector ClusterReplicationConfig
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [ClusterReplicationConfig]
y__))
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest "vec'clusters" (Data.Vector.Vector Proto.Temporal.Api.Replication.V1.Message.ClusterReplicationConfig) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'clusters"
-> (Vector ClusterReplicationConfig
    -> f (Vector ClusterReplicationConfig))
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
fieldOf Proxy# "vec'clusters"
_
    = ((Vector ClusterReplicationConfig
  -> f (Vector ClusterReplicationConfig))
 -> RegisterNamespaceRequest -> f RegisterNamespaceRequest)
-> ((Vector ClusterReplicationConfig
     -> f (Vector ClusterReplicationConfig))
    -> Vector ClusterReplicationConfig
    -> f (Vector ClusterReplicationConfig))
-> (Vector ClusterReplicationConfig
    -> f (Vector ClusterReplicationConfig))
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest -> Vector ClusterReplicationConfig)
-> (RegisterNamespaceRequest
    -> Vector ClusterReplicationConfig -> RegisterNamespaceRequest)
-> Lens
     RegisterNamespaceRequest
     RegisterNamespaceRequest
     (Vector ClusterReplicationConfig)
     (Vector ClusterReplicationConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest -> Vector ClusterReplicationConfig
_RegisterNamespaceRequest'clusters
           (\ RegisterNamespaceRequest
x__ Vector ClusterReplicationConfig
y__ -> RegisterNamespaceRequest
x__ {_RegisterNamespaceRequest'clusters = y__}))
        (Vector ClusterReplicationConfig
 -> f (Vector ClusterReplicationConfig))
-> Vector ClusterReplicationConfig
-> f (Vector ClusterReplicationConfig)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest "activeClusterName" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activeClusterName"
-> (Text -> f Text)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
fieldOf Proxy# "activeClusterName"
_
    = ((Text -> f Text)
 -> RegisterNamespaceRequest -> f RegisterNamespaceRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest -> Text)
-> (RegisterNamespaceRequest -> Text -> RegisterNamespaceRequest)
-> Lens RegisterNamespaceRequest RegisterNamespaceRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'activeClusterName
           (\ RegisterNamespaceRequest
x__ Text
y__
              -> RegisterNamespaceRequest
x__ {_RegisterNamespaceRequest'activeClusterName = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest "data'" (Data.Map.Map Data.Text.Text Data.Text.Text) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "data'"
-> (Map Text Text -> f (Map Text Text))
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
fieldOf Proxy# "data'"
_
    = ((Map Text Text -> f (Map Text Text))
 -> RegisterNamespaceRequest -> f RegisterNamespaceRequest)
-> ((Map Text Text -> f (Map Text Text))
    -> Map Text Text -> f (Map Text Text))
-> (Map Text Text -> f (Map Text Text))
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest -> Map Text Text)
-> (RegisterNamespaceRequest
    -> Map Text Text -> RegisterNamespaceRequest)
-> Lens
     RegisterNamespaceRequest
     RegisterNamespaceRequest
     (Map Text Text)
     (Map Text Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest -> Map Text Text
_RegisterNamespaceRequest'data'
           (\ RegisterNamespaceRequest
x__ Map Text Text
y__ -> RegisterNamespaceRequest
x__ {_RegisterNamespaceRequest'data' = y__}))
        (Map Text Text -> f (Map Text Text))
-> Map Text Text -> f (Map Text Text)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest "securityToken" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "securityToken"
-> (Text -> f Text)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
fieldOf Proxy# "securityToken"
_
    = ((Text -> f Text)
 -> RegisterNamespaceRequest -> f RegisterNamespaceRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest -> Text)
-> (RegisterNamespaceRequest -> Text -> RegisterNamespaceRequest)
-> Lens RegisterNamespaceRequest RegisterNamespaceRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'securityToken
           (\ RegisterNamespaceRequest
x__ Text
y__ -> RegisterNamespaceRequest
x__ {_RegisterNamespaceRequest'securityToken = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest "isGlobalNamespace" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "isGlobalNamespace"
-> (Bool -> f Bool)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
fieldOf Proxy# "isGlobalNamespace"
_
    = ((Bool -> f Bool)
 -> RegisterNamespaceRequest -> f RegisterNamespaceRequest)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest -> Bool)
-> (RegisterNamespaceRequest -> Bool -> RegisterNamespaceRequest)
-> Lens RegisterNamespaceRequest RegisterNamespaceRequest Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest -> Bool
_RegisterNamespaceRequest'isGlobalNamespace
           (\ RegisterNamespaceRequest
x__ Bool
y__
              -> RegisterNamespaceRequest
x__ {_RegisterNamespaceRequest'isGlobalNamespace = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest "historyArchivalState" Proto.Temporal.Api.Enums.V1.Namespace.ArchivalState where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "historyArchivalState"
-> (ArchivalState -> f ArchivalState)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
fieldOf Proxy# "historyArchivalState"
_
    = ((ArchivalState -> f ArchivalState)
 -> RegisterNamespaceRequest -> f RegisterNamespaceRequest)
-> ((ArchivalState -> f ArchivalState)
    -> ArchivalState -> f ArchivalState)
-> (ArchivalState -> f ArchivalState)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest -> ArchivalState)
-> (RegisterNamespaceRequest
    -> ArchivalState -> RegisterNamespaceRequest)
-> Lens
     RegisterNamespaceRequest
     RegisterNamespaceRequest
     ArchivalState
     ArchivalState
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest -> ArchivalState
_RegisterNamespaceRequest'historyArchivalState
           (\ RegisterNamespaceRequest
x__ ArchivalState
y__
              -> RegisterNamespaceRequest
x__ {_RegisterNamespaceRequest'historyArchivalState = y__}))
        (ArchivalState -> f ArchivalState)
-> ArchivalState -> f ArchivalState
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest "historyArchivalUri" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "historyArchivalUri"
-> (Text -> f Text)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
fieldOf Proxy# "historyArchivalUri"
_
    = ((Text -> f Text)
 -> RegisterNamespaceRequest -> f RegisterNamespaceRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest -> Text)
-> (RegisterNamespaceRequest -> Text -> RegisterNamespaceRequest)
-> Lens RegisterNamespaceRequest RegisterNamespaceRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'historyArchivalUri
           (\ RegisterNamespaceRequest
x__ Text
y__
              -> RegisterNamespaceRequest
x__ {_RegisterNamespaceRequest'historyArchivalUri = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest "visibilityArchivalState" Proto.Temporal.Api.Enums.V1.Namespace.ArchivalState where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "visibilityArchivalState"
-> (ArchivalState -> f ArchivalState)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
fieldOf Proxy# "visibilityArchivalState"
_
    = ((ArchivalState -> f ArchivalState)
 -> RegisterNamespaceRequest -> f RegisterNamespaceRequest)
-> ((ArchivalState -> f ArchivalState)
    -> ArchivalState -> f ArchivalState)
-> (ArchivalState -> f ArchivalState)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest -> ArchivalState)
-> (RegisterNamespaceRequest
    -> ArchivalState -> RegisterNamespaceRequest)
-> Lens
     RegisterNamespaceRequest
     RegisterNamespaceRequest
     ArchivalState
     ArchivalState
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest -> ArchivalState
_RegisterNamespaceRequest'visibilityArchivalState
           (\ RegisterNamespaceRequest
x__ ArchivalState
y__
              -> RegisterNamespaceRequest
x__ {_RegisterNamespaceRequest'visibilityArchivalState = y__}))
        (ArchivalState -> f ArchivalState)
-> ArchivalState -> f ArchivalState
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest "visibilityArchivalUri" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "visibilityArchivalUri"
-> (Text -> f Text)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
fieldOf Proxy# "visibilityArchivalUri"
_
    = ((Text -> f Text)
 -> RegisterNamespaceRequest -> f RegisterNamespaceRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RegisterNamespaceRequest
-> f RegisterNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest -> Text)
-> (RegisterNamespaceRequest -> Text -> RegisterNamespaceRequest)
-> Lens RegisterNamespaceRequest RegisterNamespaceRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'visibilityArchivalUri
           (\ RegisterNamespaceRequest
x__ Text
y__
              -> RegisterNamespaceRequest
x__ {_RegisterNamespaceRequest'visibilityArchivalUri = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RegisterNamespaceRequest where
  messageName :: Proxy RegisterNamespaceRequest -> Text
messageName Proxy RegisterNamespaceRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RegisterNamespaceRequest"
  packedMessageDescriptor :: Proxy RegisterNamespaceRequest -> ByteString
packedMessageDescriptor Proxy RegisterNamespaceRequest
_
    = ByteString
"\n\
      \\CANRegisterNamespaceRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2 \n\
      \\vdescription\CAN\STX \SOH(\tR\vdescription\DC2\US\n\
      \\vowner_email\CAN\ETX \SOH(\tR\n\
      \ownerEmail\DC2h\n\
      \#workflow_execution_retention_period\CAN\EOT \SOH(\v2\EM.google.protobuf.DurationR workflowExecutionRetentionPeriod\DC2Q\n\
      \\bclusters\CAN\ENQ \ETX(\v25.temporal.api.replication.v1.ClusterReplicationConfigR\bclusters\DC2.\n\
      \\DC3active_cluster_name\CAN\ACK \SOH(\tR\DC1activeClusterName\DC2W\n\
      \\EOTdata\CAN\a \ETX(\v2C.temporal.api.workflowservice.v1.RegisterNamespaceRequest.DataEntryR\EOTdata\DC2%\n\
      \\SOsecurity_token\CAN\b \SOH(\tR\rsecurityToken\DC2.\n\
      \\DC3is_global_namespace\CAN\t \SOH(\bR\DC1isGlobalNamespace\DC2Z\n\
      \\SYNhistory_archival_state\CAN\n\
      \ \SOH(\SO2$.temporal.api.enums.v1.ArchivalStateR\DC4historyArchivalState\DC20\n\
      \\DC4history_archival_uri\CAN\v \SOH(\tR\DC2historyArchivalUri\DC2`\n\
      \\EMvisibility_archival_state\CAN\f \SOH(\SO2$.temporal.api.enums.v1.ArchivalStateR\ETBvisibilityArchivalState\DC26\n\
      \\ETBvisibility_archival_uri\CAN\r \SOH(\tR\NAKvisibilityArchivalUri\SUB7\n\
      \\tDataEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy RegisterNamespaceRequest -> ByteString
packedFileDescriptor Proxy RegisterNamespaceRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RegisterNamespaceRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor RegisterNamespaceRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RegisterNamespaceRequest Text
-> FieldDescriptor RegisterNamespaceRequest
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 RegisterNamespaceRequest RegisterNamespaceRequest Text Text
-> FieldAccessor RegisterNamespaceRequest 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 RegisterNamespaceRequest
        description__field_descriptor :: FieldDescriptor RegisterNamespaceRequest
description__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RegisterNamespaceRequest Text
-> FieldDescriptor RegisterNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"description"
              (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 RegisterNamespaceRequest RegisterNamespaceRequest Text Text
-> FieldAccessor RegisterNamespaceRequest 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 @"description")) ::
              Data.ProtoLens.FieldDescriptor RegisterNamespaceRequest
        ownerEmail__field_descriptor :: FieldDescriptor RegisterNamespaceRequest
ownerEmail__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RegisterNamespaceRequest Text
-> FieldDescriptor RegisterNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"owner_email"
              (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 RegisterNamespaceRequest RegisterNamespaceRequest Text Text
-> FieldAccessor RegisterNamespaceRequest 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 @"ownerEmail")) ::
              Data.ProtoLens.FieldDescriptor RegisterNamespaceRequest
        workflowExecutionRetentionPeriod__field_descriptor :: FieldDescriptor RegisterNamespaceRequest
workflowExecutionRetentionPeriod__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor RegisterNamespaceRequest Duration
-> FieldDescriptor RegisterNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_retention_period"
              (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
  RegisterNamespaceRequest
  RegisterNamespaceRequest
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor RegisterNamespaceRequest 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'workflowExecutionRetentionPeriod")) ::
              Data.ProtoLens.FieldDescriptor RegisterNamespaceRequest
        clusters__field_descriptor :: FieldDescriptor RegisterNamespaceRequest
clusters__field_descriptor
          = String
-> FieldTypeDescriptor ClusterReplicationConfig
-> FieldAccessor RegisterNamespaceRequest ClusterReplicationConfig
-> FieldDescriptor RegisterNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"clusters"
              (MessageOrGroup -> FieldTypeDescriptor ClusterReplicationConfig
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Replication.V1.Message.ClusterReplicationConfig)
              (Packing
-> Lens' RegisterNamespaceRequest [ClusterReplicationConfig]
-> FieldAccessor RegisterNamespaceRequest ClusterReplicationConfig
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 @"clusters")) ::
              Data.ProtoLens.FieldDescriptor RegisterNamespaceRequest
        activeClusterName__field_descriptor :: FieldDescriptor RegisterNamespaceRequest
activeClusterName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RegisterNamespaceRequest Text
-> FieldDescriptor RegisterNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"active_cluster_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 RegisterNamespaceRequest RegisterNamespaceRequest Text Text
-> FieldAccessor RegisterNamespaceRequest 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 @"activeClusterName")) ::
              Data.ProtoLens.FieldDescriptor RegisterNamespaceRequest
        data'__field_descriptor :: FieldDescriptor RegisterNamespaceRequest
data'__field_descriptor
          = String
-> FieldTypeDescriptor RegisterNamespaceRequest'DataEntry
-> FieldAccessor
     RegisterNamespaceRequest RegisterNamespaceRequest'DataEntry
-> FieldDescriptor RegisterNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"data"
              (MessageOrGroup
-> FieldTypeDescriptor RegisterNamespaceRequest'DataEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor RegisterNamespaceRequest'DataEntry)
              (Lens' RegisterNamespaceRequest'DataEntry Text
-> Lens' RegisterNamespaceRequest'DataEntry Text
-> Lens
     RegisterNamespaceRequest
     RegisterNamespaceRequest
     (Map Text Text)
     (Map Text Text)
-> FieldAccessor
     RegisterNamespaceRequest RegisterNamespaceRequest'DataEntry
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 @"data'")) ::
              Data.ProtoLens.FieldDescriptor RegisterNamespaceRequest
        securityToken__field_descriptor :: FieldDescriptor RegisterNamespaceRequest
securityToken__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RegisterNamespaceRequest Text
-> FieldDescriptor RegisterNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"security_token"
              (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 RegisterNamespaceRequest RegisterNamespaceRequest Text Text
-> FieldAccessor RegisterNamespaceRequest 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 @"securityToken")) ::
              Data.ProtoLens.FieldDescriptor RegisterNamespaceRequest
        isGlobalNamespace__field_descriptor :: FieldDescriptor RegisterNamespaceRequest
isGlobalNamespace__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor RegisterNamespaceRequest Bool
-> FieldDescriptor RegisterNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"is_global_namespace"
              (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 RegisterNamespaceRequest RegisterNamespaceRequest Bool Bool
-> FieldAccessor RegisterNamespaceRequest 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 @"isGlobalNamespace")) ::
              Data.ProtoLens.FieldDescriptor RegisterNamespaceRequest
        historyArchivalState__field_descriptor :: FieldDescriptor RegisterNamespaceRequest
historyArchivalState__field_descriptor
          = String
-> FieldTypeDescriptor ArchivalState
-> FieldAccessor RegisterNamespaceRequest ArchivalState
-> FieldDescriptor RegisterNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"history_archival_state"
              (ScalarField ArchivalState -> FieldTypeDescriptor ArchivalState
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ArchivalState
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Namespace.ArchivalState)
              (WireDefault ArchivalState
-> Lens
     RegisterNamespaceRequest
     RegisterNamespaceRequest
     ArchivalState
     ArchivalState
-> FieldAccessor RegisterNamespaceRequest ArchivalState
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ArchivalState
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"historyArchivalState")) ::
              Data.ProtoLens.FieldDescriptor RegisterNamespaceRequest
        historyArchivalUri__field_descriptor :: FieldDescriptor RegisterNamespaceRequest
historyArchivalUri__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RegisterNamespaceRequest Text
-> FieldDescriptor RegisterNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"history_archival_uri"
              (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 RegisterNamespaceRequest RegisterNamespaceRequest Text Text
-> FieldAccessor RegisterNamespaceRequest 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 @"historyArchivalUri")) ::
              Data.ProtoLens.FieldDescriptor RegisterNamespaceRequest
        visibilityArchivalState__field_descriptor :: FieldDescriptor RegisterNamespaceRequest
visibilityArchivalState__field_descriptor
          = String
-> FieldTypeDescriptor ArchivalState
-> FieldAccessor RegisterNamespaceRequest ArchivalState
-> FieldDescriptor RegisterNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"visibility_archival_state"
              (ScalarField ArchivalState -> FieldTypeDescriptor ArchivalState
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ArchivalState
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Namespace.ArchivalState)
              (WireDefault ArchivalState
-> Lens
     RegisterNamespaceRequest
     RegisterNamespaceRequest
     ArchivalState
     ArchivalState
-> FieldAccessor RegisterNamespaceRequest ArchivalState
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ArchivalState
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"visibilityArchivalState")) ::
              Data.ProtoLens.FieldDescriptor RegisterNamespaceRequest
        visibilityArchivalUri__field_descriptor :: FieldDescriptor RegisterNamespaceRequest
visibilityArchivalUri__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RegisterNamespaceRequest Text
-> FieldDescriptor RegisterNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"visibility_archival_uri"
              (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 RegisterNamespaceRequest RegisterNamespaceRequest Text Text
-> FieldAccessor RegisterNamespaceRequest 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 @"visibilityArchivalUri")) ::
              Data.ProtoLens.FieldDescriptor RegisterNamespaceRequest
      in
        [(Tag, FieldDescriptor RegisterNamespaceRequest)]
-> Map Tag (FieldDescriptor RegisterNamespaceRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RegisterNamespaceRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RegisterNamespaceRequest
description__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RegisterNamespaceRequest
ownerEmail__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, 
            FieldDescriptor RegisterNamespaceRequest
workflowExecutionRetentionPeriod__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor RegisterNamespaceRequest
clusters__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor RegisterNamespaceRequest
activeClusterName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor RegisterNamespaceRequest
data'__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor RegisterNamespaceRequest
securityToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor RegisterNamespaceRequest
isGlobalNamespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor RegisterNamespaceRequest
historyArchivalState__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor RegisterNamespaceRequest
historyArchivalUri__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor RegisterNamespaceRequest
visibilityArchivalState__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor RegisterNamespaceRequest
visibilityArchivalUri__field_descriptor)]
  unknownFields :: Lens' RegisterNamespaceRequest FieldSet
unknownFields
    = (RegisterNamespaceRequest -> FieldSet)
-> (RegisterNamespaceRequest
    -> FieldSet -> RegisterNamespaceRequest)
-> Lens' RegisterNamespaceRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RegisterNamespaceRequest -> FieldSet
_RegisterNamespaceRequest'_unknownFields
        (\ RegisterNamespaceRequest
x__ FieldSet
y__ -> RegisterNamespaceRequest
x__ {_RegisterNamespaceRequest'_unknownFields = y__})
  defMessage :: RegisterNamespaceRequest
defMessage
    = RegisterNamespaceRequest'_constructor
        {_RegisterNamespaceRequest'namespace :: Text
_RegisterNamespaceRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RegisterNamespaceRequest'description :: Text
_RegisterNamespaceRequest'description = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RegisterNamespaceRequest'ownerEmail :: Text
_RegisterNamespaceRequest'ownerEmail = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RegisterNamespaceRequest'workflowExecutionRetentionPeriod :: Maybe Duration
_RegisterNamespaceRequest'workflowExecutionRetentionPeriod = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _RegisterNamespaceRequest'clusters :: Vector ClusterReplicationConfig
_RegisterNamespaceRequest'clusters = Vector ClusterReplicationConfig
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _RegisterNamespaceRequest'activeClusterName :: Text
_RegisterNamespaceRequest'activeClusterName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RegisterNamespaceRequest'data' :: Map Text Text
_RegisterNamespaceRequest'data' = Map Text Text
forall k a. Map k a
Data.Map.empty,
         _RegisterNamespaceRequest'securityToken :: Text
_RegisterNamespaceRequest'securityToken = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RegisterNamespaceRequest'isGlobalNamespace :: Bool
_RegisterNamespaceRequest'isGlobalNamespace = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RegisterNamespaceRequest'historyArchivalState :: ArchivalState
_RegisterNamespaceRequest'historyArchivalState = ArchivalState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RegisterNamespaceRequest'historyArchivalUri :: Text
_RegisterNamespaceRequest'historyArchivalUri = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RegisterNamespaceRequest'visibilityArchivalState :: ArchivalState
_RegisterNamespaceRequest'visibilityArchivalState = ArchivalState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RegisterNamespaceRequest'visibilityArchivalUri :: Text
_RegisterNamespaceRequest'visibilityArchivalUri = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RegisterNamespaceRequest'_unknownFields :: FieldSet
_RegisterNamespaceRequest'_unknownFields = []}
  parseMessage :: Parser RegisterNamespaceRequest
parseMessage
    = let
        loop ::
          RegisterNamespaceRequest
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Replication.V1.Message.ClusterReplicationConfig
             -> Data.ProtoLens.Encoding.Bytes.Parser RegisterNamespaceRequest
        loop :: RegisterNamespaceRequest
-> Growing Vector RealWorld ClusterReplicationConfig
-> Parser RegisterNamespaceRequest
loop RegisterNamespaceRequest
x Growing Vector RealWorld ClusterReplicationConfig
mutable'clusters
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'clusters <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                              mutable'clusters)
                      (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'clusters") frozen'clusters x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                                  mutable'clusters
                        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
"description"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"description") y x)
                                  mutable'clusters
                        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
"owner_email"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"ownerEmail") y x)
                                  mutable'clusters
                        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_execution_retention_period"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowExecutionRetentionPeriod")
                                     y x)
                                  mutable'clusters
                        Word64
42
                          -> do !y <- Parser ClusterReplicationConfig
-> String -> Parser ClusterReplicationConfig
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"clusters"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'clusters y)
                                loop x v
                        Word64
50
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"active_cluster_name"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"activeClusterName") y x)
                                  mutable'clusters
                        Word64
58
                          -> do !(entry :: RegisterNamespaceRequest'DataEntry) <- Parser RegisterNamespaceRequest'DataEntry
-> String -> Parser RegisterNamespaceRequest'DataEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                                    (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                                        Data.ProtoLens.Encoding.Bytes.isolate
                                                                                          (Prelude.fromIntegral
                                                                                             len)
                                                                                          Data.ProtoLens.parseMessage)
                                                                                    String
"data"
                                (let
                                   key = FoldLike
  Text
  RegisterNamespaceRequest'DataEntry
  RegisterNamespaceRequest'DataEntry
  Text
  Text
-> RegisterNamespaceRequest'DataEntry -> 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") RegisterNamespaceRequest'DataEntry
entry
                                   value
                                     = FoldLike
  Text
  RegisterNamespaceRequest'DataEntry
  RegisterNamespaceRequest'DataEntry
  Text
  Text
-> RegisterNamespaceRequest'DataEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") RegisterNamespaceRequest'DataEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"data'")
                                        (\ !Map Text Text
t -> Text -> Text -> Map Text Text -> Map Text Text
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key Text
value Map Text Text
t) x)
                                     mutable'clusters)
                        Word64
66
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"security_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"securityToken") y x)
                                  mutable'clusters
                        Word64
72
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"is_global_namespace"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"isGlobalNamespace") y x)
                                  mutable'clusters
                        Word64
80
                          -> do y <- Parser ArchivalState -> String -> Parser ArchivalState
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> ArchivalState) -> Parser Int -> Parser ArchivalState
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> ArchivalState
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
"history_archival_state"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"historyArchivalState") y x)
                                  mutable'clusters
                        Word64
90
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"history_archival_uri"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"historyArchivalUri") y x)
                                  mutable'clusters
                        Word64
96
                          -> do y <- Parser ArchivalState -> String -> Parser ArchivalState
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> ArchivalState) -> Parser Int -> Parser ArchivalState
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> ArchivalState
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
"visibility_archival_state"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"visibilityArchivalState") y x)
                                  mutable'clusters
                        Word64
106
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"visibility_archival_uri"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"visibilityArchivalUri") y x)
                                  mutable'clusters
                        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'clusters
      in
        Parser RegisterNamespaceRequest
-> String -> Parser RegisterNamespaceRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'clusters <- IO (Growing Vector RealWorld ClusterReplicationConfig)
-> Parser (Growing Vector RealWorld ClusterReplicationConfig)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                    IO (Growing Vector RealWorld ClusterReplicationConfig)
IO (Growing Vector (PrimState IO) ClusterReplicationConfig)
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'clusters)
          String
"RegisterNamespaceRequest"
  buildMessage :: RegisterNamespaceRequest -> Builder
buildMessage
    = \ RegisterNamespaceRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text RegisterNamespaceRequest RegisterNamespaceRequest Text Text
-> RegisterNamespaceRequest -> 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") RegisterNamespaceRequest
_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 RegisterNamespaceRequest RegisterNamespaceRequest Text Text
-> RegisterNamespaceRequest -> 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 @"description") RegisterNamespaceRequest
_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 RegisterNamespaceRequest RegisterNamespaceRequest Text Text
-> RegisterNamespaceRequest -> 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 @"ownerEmail") RegisterNamespaceRequest
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe Duration)
  RegisterNamespaceRequest
  RegisterNamespaceRequest
  (Maybe Duration)
  (Maybe Duration)
-> RegisterNamespaceRequest -> 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'workflowExecutionRetentionPeriod")
                             RegisterNamespaceRequest
_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.<>)
                         ((ClusterReplicationConfig -> Builder)
-> Vector ClusterReplicationConfig -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                            (\ ClusterReplicationConfig
_v
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                    ((ByteString -> Builder)
-> (ClusterReplicationConfig -> ByteString)
-> ClusterReplicationConfig
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                       (\ ByteString
bs
                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                     (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                       ClusterReplicationConfig -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ClusterReplicationConfig
_v))
                            (FoldLike
  (Vector ClusterReplicationConfig)
  RegisterNamespaceRequest
  RegisterNamespaceRequest
  (Vector ClusterReplicationConfig)
  (Vector ClusterReplicationConfig)
-> RegisterNamespaceRequest -> Vector ClusterReplicationConfig
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'clusters") RegisterNamespaceRequest
_x))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v
                                 = FoldLike
  Text RegisterNamespaceRequest RegisterNamespaceRequest Text Text
-> RegisterNamespaceRequest -> 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 @"activeClusterName") RegisterNamespaceRequest
_x
                             in
                               if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                     ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        (\ ByteString
bs
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                                  (((Text, Text) -> Builder) -> [(Text, Text)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                                     (\ (Text, Text)
_v
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                             ((ByteString -> Builder)
-> (RegisterNamespaceRequest'DataEntry -> ByteString)
-> RegisterNamespaceRequest'DataEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                (\ ByteString
bs
                                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                              (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                                RegisterNamespaceRequest'DataEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                (Setter
  RegisterNamespaceRequest'DataEntry
  RegisterNamespaceRequest'DataEntry
  Text
  Text
-> Text
-> RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                   (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                                                   ((Text, Text) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, Text)
_v)
                                                   (Setter
  RegisterNamespaceRequest'DataEntry
  RegisterNamespaceRequest'DataEntry
  Text
  Text
-> Text
-> RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                      (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                                                      ((Text, Text) -> Text
forall a b. (a, b) -> b
Prelude.snd (Text, Text)
_v)
                                                      (RegisterNamespaceRequest'DataEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                         RegisterNamespaceRequest'DataEntry)))))
                                     (Map Text Text -> [(Text, Text)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                        (FoldLike
  (Map Text Text)
  RegisterNamespaceRequest
  RegisterNamespaceRequest
  (Map Text Text)
  (Map Text Text)
-> RegisterNamespaceRequest -> Map Text Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                           (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"data'") RegisterNamespaceRequest
_x))))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (let
                                     _v :: Text
_v
                                       = FoldLike
  Text RegisterNamespaceRequest RegisterNamespaceRequest Text Text
-> RegisterNamespaceRequest -> 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 @"securityToken") RegisterNamespaceRequest
_x
                                   in
                                     if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                         Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                     else
                                         Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                                           ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                              (\ ByteString
bs
                                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                            (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                              Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                                  (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (let
                                        _v :: Bool
_v
                                          = FoldLike
  Bool RegisterNamespaceRequest RegisterNamespaceRequest Bool Bool
-> RegisterNamespaceRequest -> 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 @"isGlobalNamespace") RegisterNamespaceRequest
_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
72)
                                              ((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 :: ArchivalState
_v
                                             = FoldLike
  ArchivalState
  RegisterNamespaceRequest
  RegisterNamespaceRequest
  ArchivalState
  ArchivalState
-> RegisterNamespaceRequest -> ArchivalState
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                    @"historyArchivalState")
                                                 RegisterNamespaceRequest
_x
                                         in
                                           if ArchivalState -> ArchivalState -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ArchivalState
_v ArchivalState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                               Builder
forall a. Monoid a => a
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)
-> (ArchivalState -> Int) -> ArchivalState -> 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)
                                                    ArchivalState -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum ArchivalState
_v))
                                        (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (let
                                              _v :: Text
_v
                                                = FoldLike
  Text RegisterNamespaceRequest RegisterNamespaceRequest Text Text
-> RegisterNamespaceRequest -> 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
                                                       @"historyArchivalUri")
                                                    RegisterNamespaceRequest
_x
                                            in
                                              if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                  Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                              else
                                                  Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
90)
                                                    ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                       (\ ByteString
bs
                                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                     (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                  ByteString
bs))
                                                       Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                                           (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (let
                                                 _v :: ArchivalState
_v
                                                   = FoldLike
  ArchivalState
  RegisterNamespaceRequest
  RegisterNamespaceRequest
  ArchivalState
  ArchivalState
-> RegisterNamespaceRequest -> ArchivalState
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                          @"visibilityArchivalState")
                                                       RegisterNamespaceRequest
_x
                                               in
                                                 if ArchivalState -> ArchivalState -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ArchivalState
_v ArchivalState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                     Builder
forall a. Monoid a => a
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)
-> (ArchivalState -> Int) -> ArchivalState -> 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)
                                                          ArchivalState -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum ArchivalState
_v))
                                              (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (let
                                                    _v :: Text
_v
                                                      = FoldLike
  Text RegisterNamespaceRequest RegisterNamespaceRequest Text Text
-> RegisterNamespaceRequest -> 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
                                                             @"visibilityArchivalUri")
                                                          RegisterNamespaceRequest
_x
                                                  in
                                                    if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
                                                         Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                        Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                    else
                                                        Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                             Word64
106)
                                                          ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                             (\ ByteString
bs
                                                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                           (ByteString -> Int
Data.ByteString.length
                                                                              ByteString
bs)))
                                                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                        ByteString
bs))
                                                             Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                                                 (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                                    (FoldLike
  FieldSet
  RegisterNamespaceRequest
  RegisterNamespaceRequest
  FieldSet
  FieldSet
-> RegisterNamespaceRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                       FoldLike
  FieldSet
  RegisterNamespaceRequest
  RegisterNamespaceRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RegisterNamespaceRequest FieldSet
Data.ProtoLens.unknownFields RegisterNamespaceRequest
_x))))))))))))))
instance Control.DeepSeq.NFData RegisterNamespaceRequest where
  rnf :: RegisterNamespaceRequest -> ()
rnf
    = \ RegisterNamespaceRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RegisterNamespaceRequest -> FieldSet
_RegisterNamespaceRequest'_unknownFields RegisterNamespaceRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'namespace RegisterNamespaceRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'description RegisterNamespaceRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'ownerEmail RegisterNamespaceRequest
x__)
                      (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RegisterNamespaceRequest -> Maybe Duration
_RegisterNamespaceRequest'workflowExecutionRetentionPeriod RegisterNamespaceRequest
x__)
                         (Vector ClusterReplicationConfig -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RegisterNamespaceRequest -> Vector ClusterReplicationConfig
_RegisterNamespaceRequest'clusters RegisterNamespaceRequest
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'activeClusterName RegisterNamespaceRequest
x__)
                               (Map Text Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (RegisterNamespaceRequest -> Map Text Text
_RegisterNamespaceRequest'data' RegisterNamespaceRequest
x__)
                                  (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'securityToken RegisterNamespaceRequest
x__)
                                     (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (RegisterNamespaceRequest -> Bool
_RegisterNamespaceRequest'isGlobalNamespace RegisterNamespaceRequest
x__)
                                        (ArchivalState -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (RegisterNamespaceRequest -> ArchivalState
_RegisterNamespaceRequest'historyArchivalState RegisterNamespaceRequest
x__)
                                           (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'historyArchivalUri RegisterNamespaceRequest
x__)
                                              (ArchivalState -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (RegisterNamespaceRequest -> ArchivalState
_RegisterNamespaceRequest'visibilityArchivalState
                                                    RegisterNamespaceRequest
x__)
                                                 (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (RegisterNamespaceRequest -> Text
_RegisterNamespaceRequest'visibilityArchivalUri
                                                       RegisterNamespaceRequest
x__)
                                                    ())))))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.key' @:: Lens' RegisterNamespaceRequest'DataEntry Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.value' @:: Lens' RegisterNamespaceRequest'DataEntry Data.Text.Text@ -}
data RegisterNamespaceRequest'DataEntry
  = RegisterNamespaceRequest'DataEntry'_constructor {RegisterNamespaceRequest'DataEntry -> Text
_RegisterNamespaceRequest'DataEntry'key :: !Data.Text.Text,
                                                     RegisterNamespaceRequest'DataEntry -> Text
_RegisterNamespaceRequest'DataEntry'value :: !Data.Text.Text,
                                                     RegisterNamespaceRequest'DataEntry -> FieldSet
_RegisterNamespaceRequest'DataEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Bool
(RegisterNamespaceRequest'DataEntry
 -> RegisterNamespaceRequest'DataEntry -> Bool)
-> (RegisterNamespaceRequest'DataEntry
    -> RegisterNamespaceRequest'DataEntry -> Bool)
-> Eq RegisterNamespaceRequest'DataEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Bool
== :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Bool
$c/= :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Bool
/= :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Bool
Prelude.Eq, Eq RegisterNamespaceRequest'DataEntry
Eq RegisterNamespaceRequest'DataEntry =>
(RegisterNamespaceRequest'DataEntry
 -> RegisterNamespaceRequest'DataEntry -> Ordering)
-> (RegisterNamespaceRequest'DataEntry
    -> RegisterNamespaceRequest'DataEntry -> Bool)
-> (RegisterNamespaceRequest'DataEntry
    -> RegisterNamespaceRequest'DataEntry -> Bool)
-> (RegisterNamespaceRequest'DataEntry
    -> RegisterNamespaceRequest'DataEntry -> Bool)
-> (RegisterNamespaceRequest'DataEntry
    -> RegisterNamespaceRequest'DataEntry -> Bool)
-> (RegisterNamespaceRequest'DataEntry
    -> RegisterNamespaceRequest'DataEntry
    -> RegisterNamespaceRequest'DataEntry)
-> (RegisterNamespaceRequest'DataEntry
    -> RegisterNamespaceRequest'DataEntry
    -> RegisterNamespaceRequest'DataEntry)
-> Ord RegisterNamespaceRequest'DataEntry
RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Bool
RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Ordering
RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry
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 :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Ordering
compare :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Ordering
$c< :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Bool
< :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Bool
$c<= :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Bool
<= :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Bool
$c> :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Bool
> :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Bool
$c>= :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Bool
>= :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry -> Bool
$cmax :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry
max :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry
$cmin :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry
min :: RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry
-> RegisterNamespaceRequest'DataEntry
Prelude.Ord)
instance Prelude.Show RegisterNamespaceRequest'DataEntry where
  showsPrec :: Int -> RegisterNamespaceRequest'DataEntry -> ShowS
showsPrec Int
_ RegisterNamespaceRequest'DataEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RegisterNamespaceRequest'DataEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RegisterNamespaceRequest'DataEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest'DataEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> RegisterNamespaceRequest'DataEntry
-> f RegisterNamespaceRequest'DataEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> RegisterNamespaceRequest'DataEntry
 -> f RegisterNamespaceRequest'DataEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RegisterNamespaceRequest'DataEntry
-> f RegisterNamespaceRequest'DataEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest'DataEntry -> Text)
-> (RegisterNamespaceRequest'DataEntry
    -> Text -> RegisterNamespaceRequest'DataEntry)
-> Lens' RegisterNamespaceRequest'DataEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest'DataEntry -> Text
_RegisterNamespaceRequest'DataEntry'key
           (\ RegisterNamespaceRequest'DataEntry
x__ Text
y__ -> RegisterNamespaceRequest'DataEntry
x__ {_RegisterNamespaceRequest'DataEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RegisterNamespaceRequest'DataEntry "value" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Text -> f Text)
-> RegisterNamespaceRequest'DataEntry
-> f RegisterNamespaceRequest'DataEntry
fieldOf Proxy# "value"
_
    = ((Text -> f Text)
 -> RegisterNamespaceRequest'DataEntry
 -> f RegisterNamespaceRequest'DataEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RegisterNamespaceRequest'DataEntry
-> f RegisterNamespaceRequest'DataEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RegisterNamespaceRequest'DataEntry -> Text)
-> (RegisterNamespaceRequest'DataEntry
    -> Text -> RegisterNamespaceRequest'DataEntry)
-> Lens' RegisterNamespaceRequest'DataEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RegisterNamespaceRequest'DataEntry -> Text
_RegisterNamespaceRequest'DataEntry'value
           (\ RegisterNamespaceRequest'DataEntry
x__ Text
y__
              -> RegisterNamespaceRequest'DataEntry
x__ {_RegisterNamespaceRequest'DataEntry'value = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RegisterNamespaceRequest'DataEntry where
  messageName :: Proxy RegisterNamespaceRequest'DataEntry -> Text
messageName Proxy RegisterNamespaceRequest'DataEntry
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RegisterNamespaceRequest.DataEntry"
  packedMessageDescriptor :: Proxy RegisterNamespaceRequest'DataEntry -> ByteString
packedMessageDescriptor Proxy RegisterNamespaceRequest'DataEntry
_
    = ByteString
"\n\
      \\tDataEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy RegisterNamespaceRequest'DataEntry -> ByteString
packedFileDescriptor Proxy RegisterNamespaceRequest'DataEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RegisterNamespaceRequest'DataEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor RegisterNamespaceRequest'DataEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RegisterNamespaceRequest'DataEntry Text
-> FieldDescriptor RegisterNamespaceRequest'DataEntry
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' RegisterNamespaceRequest'DataEntry Text
-> FieldAccessor RegisterNamespaceRequest'DataEntry 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 RegisterNamespaceRequest'DataEntry
        value__field_descriptor :: FieldDescriptor RegisterNamespaceRequest'DataEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RegisterNamespaceRequest'DataEntry Text
-> FieldDescriptor RegisterNamespaceRequest'DataEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"value"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens' RegisterNamespaceRequest'DataEntry Text
-> FieldAccessor RegisterNamespaceRequest'DataEntry Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")) ::
              Data.ProtoLens.FieldDescriptor RegisterNamespaceRequest'DataEntry
      in
        [(Tag, FieldDescriptor RegisterNamespaceRequest'DataEntry)]
-> Map Tag (FieldDescriptor RegisterNamespaceRequest'DataEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RegisterNamespaceRequest'DataEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RegisterNamespaceRequest'DataEntry
value__field_descriptor)]
  unknownFields :: Lens' RegisterNamespaceRequest'DataEntry FieldSet
unknownFields
    = (RegisterNamespaceRequest'DataEntry -> FieldSet)
-> (RegisterNamespaceRequest'DataEntry
    -> FieldSet -> RegisterNamespaceRequest'DataEntry)
-> Lens' RegisterNamespaceRequest'DataEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RegisterNamespaceRequest'DataEntry -> FieldSet
_RegisterNamespaceRequest'DataEntry'_unknownFields
        (\ RegisterNamespaceRequest'DataEntry
x__ FieldSet
y__
           -> RegisterNamespaceRequest'DataEntry
x__ {_RegisterNamespaceRequest'DataEntry'_unknownFields = y__})
  defMessage :: RegisterNamespaceRequest'DataEntry
defMessage
    = RegisterNamespaceRequest'DataEntry'_constructor
        {_RegisterNamespaceRequest'DataEntry'key :: Text
_RegisterNamespaceRequest'DataEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RegisterNamespaceRequest'DataEntry'value :: Text
_RegisterNamespaceRequest'DataEntry'value = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RegisterNamespaceRequest'DataEntry'_unknownFields :: FieldSet
_RegisterNamespaceRequest'DataEntry'_unknownFields = []}
  parseMessage :: Parser RegisterNamespaceRequest'DataEntry
parseMessage
    = let
        loop ::
          RegisterNamespaceRequest'DataEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser RegisterNamespaceRequest'DataEntry
        loop :: RegisterNamespaceRequest'DataEntry
-> Parser RegisterNamespaceRequest'DataEntry
loop RegisterNamespaceRequest'DataEntry
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"key"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"key") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"value"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser RegisterNamespaceRequest'DataEntry
-> String -> Parser RegisterNamespaceRequest'DataEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RegisterNamespaceRequest'DataEntry
-> Parser RegisterNamespaceRequest'DataEntry
loop RegisterNamespaceRequest'DataEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"DataEntry"
  buildMessage :: RegisterNamespaceRequest'DataEntry -> Builder
buildMessage
    = \ RegisterNamespaceRequest'DataEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  RegisterNamespaceRequest'DataEntry
  RegisterNamespaceRequest'DataEntry
  Text
  Text
-> RegisterNamespaceRequest'DataEntry -> 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") RegisterNamespaceRequest'DataEntry
_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
  RegisterNamespaceRequest'DataEntry
  RegisterNamespaceRequest'DataEntry
  Text
  Text
-> RegisterNamespaceRequest'DataEntry -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") RegisterNamespaceRequest'DataEntry
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  RegisterNamespaceRequest'DataEntry
  RegisterNamespaceRequest'DataEntry
  FieldSet
  FieldSet
-> RegisterNamespaceRequest'DataEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RegisterNamespaceRequest'DataEntry
  RegisterNamespaceRequest'DataEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RegisterNamespaceRequest'DataEntry FieldSet
Data.ProtoLens.unknownFields RegisterNamespaceRequest'DataEntry
_x)))
instance Control.DeepSeq.NFData RegisterNamespaceRequest'DataEntry where
  rnf :: RegisterNamespaceRequest'DataEntry -> ()
rnf
    = \ RegisterNamespaceRequest'DataEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RegisterNamespaceRequest'DataEntry -> FieldSet
_RegisterNamespaceRequest'DataEntry'_unknownFields RegisterNamespaceRequest'DataEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RegisterNamespaceRequest'DataEntry -> Text
_RegisterNamespaceRequest'DataEntry'key RegisterNamespaceRequest'DataEntry
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RegisterNamespaceRequest'DataEntry -> Text
_RegisterNamespaceRequest'DataEntry'value RegisterNamespaceRequest'DataEntry
x__) ()))
{- | Fields :
      -}
data RegisterNamespaceResponse
  = RegisterNamespaceResponse'_constructor {RegisterNamespaceResponse -> FieldSet
_RegisterNamespaceResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool
(RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool)
-> (RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool)
-> Eq RegisterNamespaceResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool
== :: RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool
$c/= :: RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool
/= :: RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool
Prelude.Eq, Eq RegisterNamespaceResponse
Eq RegisterNamespaceResponse =>
(RegisterNamespaceResponse
 -> RegisterNamespaceResponse -> Ordering)
-> (RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool)
-> (RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool)
-> (RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool)
-> (RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool)
-> (RegisterNamespaceResponse
    -> RegisterNamespaceResponse -> RegisterNamespaceResponse)
-> (RegisterNamespaceResponse
    -> RegisterNamespaceResponse -> RegisterNamespaceResponse)
-> Ord RegisterNamespaceResponse
RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool
RegisterNamespaceResponse -> RegisterNamespaceResponse -> Ordering
RegisterNamespaceResponse
-> RegisterNamespaceResponse -> RegisterNamespaceResponse
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 :: RegisterNamespaceResponse -> RegisterNamespaceResponse -> Ordering
compare :: RegisterNamespaceResponse -> RegisterNamespaceResponse -> Ordering
$c< :: RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool
< :: RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool
$c<= :: RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool
<= :: RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool
$c> :: RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool
> :: RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool
$c>= :: RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool
>= :: RegisterNamespaceResponse -> RegisterNamespaceResponse -> Bool
$cmax :: RegisterNamespaceResponse
-> RegisterNamespaceResponse -> RegisterNamespaceResponse
max :: RegisterNamespaceResponse
-> RegisterNamespaceResponse -> RegisterNamespaceResponse
$cmin :: RegisterNamespaceResponse
-> RegisterNamespaceResponse -> RegisterNamespaceResponse
min :: RegisterNamespaceResponse
-> RegisterNamespaceResponse -> RegisterNamespaceResponse
Prelude.Ord)
instance Prelude.Show RegisterNamespaceResponse where
  showsPrec :: Int -> RegisterNamespaceResponse -> ShowS
showsPrec Int
_ RegisterNamespaceResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RegisterNamespaceResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RegisterNamespaceResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message RegisterNamespaceResponse where
  messageName :: Proxy RegisterNamespaceResponse -> Text
messageName Proxy RegisterNamespaceResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RegisterNamespaceResponse"
  packedMessageDescriptor :: Proxy RegisterNamespaceResponse -> ByteString
packedMessageDescriptor Proxy RegisterNamespaceResponse
_
    = ByteString
"\n\
      \\EMRegisterNamespaceResponse"
  packedFileDescriptor :: Proxy RegisterNamespaceResponse -> ByteString
packedFileDescriptor Proxy RegisterNamespaceResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RegisterNamespaceResponse)
fieldsByTag = let in [(Tag, FieldDescriptor RegisterNamespaceResponse)]
-> Map Tag (FieldDescriptor RegisterNamespaceResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' RegisterNamespaceResponse FieldSet
unknownFields
    = (RegisterNamespaceResponse -> FieldSet)
-> (RegisterNamespaceResponse
    -> FieldSet -> RegisterNamespaceResponse)
-> Lens' RegisterNamespaceResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RegisterNamespaceResponse -> FieldSet
_RegisterNamespaceResponse'_unknownFields
        (\ RegisterNamespaceResponse
x__ FieldSet
y__
           -> RegisterNamespaceResponse
x__ {_RegisterNamespaceResponse'_unknownFields = y__})
  defMessage :: RegisterNamespaceResponse
defMessage
    = RegisterNamespaceResponse'_constructor
        {_RegisterNamespaceResponse'_unknownFields :: FieldSet
_RegisterNamespaceResponse'_unknownFields = []}
  parseMessage :: Parser RegisterNamespaceResponse
parseMessage
    = let
        loop ::
          RegisterNamespaceResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser RegisterNamespaceResponse
        loop :: RegisterNamespaceResponse -> Parser RegisterNamespaceResponse
loop RegisterNamespaceResponse
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 RegisterNamespaceResponse
-> String -> Parser RegisterNamespaceResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RegisterNamespaceResponse -> Parser RegisterNamespaceResponse
loop RegisterNamespaceResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"RegisterNamespaceResponse"
  buildMessage :: RegisterNamespaceResponse -> Builder
buildMessage
    = \ RegisterNamespaceResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  RegisterNamespaceResponse
  RegisterNamespaceResponse
  FieldSet
  FieldSet
-> RegisterNamespaceResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RegisterNamespaceResponse
  RegisterNamespaceResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RegisterNamespaceResponse FieldSet
Data.ProtoLens.unknownFields RegisterNamespaceResponse
_x)
instance Control.DeepSeq.NFData RegisterNamespaceResponse where
  rnf :: RegisterNamespaceResponse -> ()
rnf
    = \ RegisterNamespaceResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RegisterNamespaceResponse -> FieldSet
_RegisterNamespaceResponse'_unknownFields RegisterNamespaceResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' RequestCancelWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowExecution' @:: Lens' RequestCancelWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowExecution' @:: Lens' RequestCancelWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' RequestCancelWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.requestId' @:: Lens' RequestCancelWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.firstExecutionRunId' @:: Lens' RequestCancelWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.reason' @:: Lens' RequestCancelWorkflowExecutionRequest Data.Text.Text@ -}
data RequestCancelWorkflowExecutionRequest
  = RequestCancelWorkflowExecutionRequest'_constructor {RequestCancelWorkflowExecutionRequest -> Text
_RequestCancelWorkflowExecutionRequest'namespace :: !Data.Text.Text,
                                                        RequestCancelWorkflowExecutionRequest -> Maybe WorkflowExecution
_RequestCancelWorkflowExecutionRequest'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                        RequestCancelWorkflowExecutionRequest -> Text
_RequestCancelWorkflowExecutionRequest'identity :: !Data.Text.Text,
                                                        RequestCancelWorkflowExecutionRequest -> Text
_RequestCancelWorkflowExecutionRequest'requestId :: !Data.Text.Text,
                                                        RequestCancelWorkflowExecutionRequest -> Text
_RequestCancelWorkflowExecutionRequest'firstExecutionRunId :: !Data.Text.Text,
                                                        RequestCancelWorkflowExecutionRequest -> Text
_RequestCancelWorkflowExecutionRequest'reason :: !Data.Text.Text,
                                                        RequestCancelWorkflowExecutionRequest -> FieldSet
_RequestCancelWorkflowExecutionRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Bool
(RequestCancelWorkflowExecutionRequest
 -> RequestCancelWorkflowExecutionRequest -> Bool)
-> (RequestCancelWorkflowExecutionRequest
    -> RequestCancelWorkflowExecutionRequest -> Bool)
-> Eq RequestCancelWorkflowExecutionRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Bool
== :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Bool
$c/= :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Bool
/= :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Bool
Prelude.Eq, Eq RequestCancelWorkflowExecutionRequest
Eq RequestCancelWorkflowExecutionRequest =>
(RequestCancelWorkflowExecutionRequest
 -> RequestCancelWorkflowExecutionRequest -> Ordering)
-> (RequestCancelWorkflowExecutionRequest
    -> RequestCancelWorkflowExecutionRequest -> Bool)
-> (RequestCancelWorkflowExecutionRequest
    -> RequestCancelWorkflowExecutionRequest -> Bool)
-> (RequestCancelWorkflowExecutionRequest
    -> RequestCancelWorkflowExecutionRequest -> Bool)
-> (RequestCancelWorkflowExecutionRequest
    -> RequestCancelWorkflowExecutionRequest -> Bool)
-> (RequestCancelWorkflowExecutionRequest
    -> RequestCancelWorkflowExecutionRequest
    -> RequestCancelWorkflowExecutionRequest)
-> (RequestCancelWorkflowExecutionRequest
    -> RequestCancelWorkflowExecutionRequest
    -> RequestCancelWorkflowExecutionRequest)
-> Ord RequestCancelWorkflowExecutionRequest
RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Bool
RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Ordering
RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest
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 :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Ordering
compare :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Ordering
$c< :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Bool
< :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Bool
$c<= :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Bool
<= :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Bool
$c> :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Bool
> :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Bool
$c>= :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Bool
>= :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest -> Bool
$cmax :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest
max :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest
$cmin :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest
min :: RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest
-> RequestCancelWorkflowExecutionRequest
Prelude.Ord)
instance Prelude.Show RequestCancelWorkflowExecutionRequest where
  showsPrec :: Int -> RequestCancelWorkflowExecutionRequest -> ShowS
showsPrec Int
_ RequestCancelWorkflowExecutionRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RequestCancelWorkflowExecutionRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RequestCancelWorkflowExecutionRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RequestCancelWorkflowExecutionRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RequestCancelWorkflowExecutionRequest
-> f RequestCancelWorkflowExecutionRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RequestCancelWorkflowExecutionRequest
 -> f RequestCancelWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RequestCancelWorkflowExecutionRequest
-> f RequestCancelWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelWorkflowExecutionRequest -> Text)
-> (RequestCancelWorkflowExecutionRequest
    -> Text -> RequestCancelWorkflowExecutionRequest)
-> Lens
     RequestCancelWorkflowExecutionRequest
     RequestCancelWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelWorkflowExecutionRequest -> Text
_RequestCancelWorkflowExecutionRequest'namespace
           (\ RequestCancelWorkflowExecutionRequest
x__ Text
y__
              -> RequestCancelWorkflowExecutionRequest
x__ {_RequestCancelWorkflowExecutionRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelWorkflowExecutionRequest "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> RequestCancelWorkflowExecutionRequest
-> f RequestCancelWorkflowExecutionRequest
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> RequestCancelWorkflowExecutionRequest
 -> f RequestCancelWorkflowExecutionRequest)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> RequestCancelWorkflowExecutionRequest
-> f RequestCancelWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelWorkflowExecutionRequest -> Maybe WorkflowExecution)
-> (RequestCancelWorkflowExecutionRequest
    -> Maybe WorkflowExecution
    -> RequestCancelWorkflowExecutionRequest)
-> Lens
     RequestCancelWorkflowExecutionRequest
     RequestCancelWorkflowExecutionRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelWorkflowExecutionRequest -> Maybe WorkflowExecution
_RequestCancelWorkflowExecutionRequest'workflowExecution
           (\ RequestCancelWorkflowExecutionRequest
x__ Maybe WorkflowExecution
y__
              -> RequestCancelWorkflowExecutionRequest
x__
                   {_RequestCancelWorkflowExecutionRequest'workflowExecution = y__}))
        (WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RequestCancelWorkflowExecutionRequest "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> RequestCancelWorkflowExecutionRequest
-> f RequestCancelWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> RequestCancelWorkflowExecutionRequest
 -> f RequestCancelWorkflowExecutionRequest)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> RequestCancelWorkflowExecutionRequest
-> f RequestCancelWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelWorkflowExecutionRequest -> Maybe WorkflowExecution)
-> (RequestCancelWorkflowExecutionRequest
    -> Maybe WorkflowExecution
    -> RequestCancelWorkflowExecutionRequest)
-> Lens
     RequestCancelWorkflowExecutionRequest
     RequestCancelWorkflowExecutionRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelWorkflowExecutionRequest -> Maybe WorkflowExecution
_RequestCancelWorkflowExecutionRequest'workflowExecution
           (\ RequestCancelWorkflowExecutionRequest
x__ Maybe WorkflowExecution
y__
              -> RequestCancelWorkflowExecutionRequest
x__
                   {_RequestCancelWorkflowExecutionRequest'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelWorkflowExecutionRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> RequestCancelWorkflowExecutionRequest
-> f RequestCancelWorkflowExecutionRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> RequestCancelWorkflowExecutionRequest
 -> f RequestCancelWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RequestCancelWorkflowExecutionRequest
-> f RequestCancelWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelWorkflowExecutionRequest -> Text)
-> (RequestCancelWorkflowExecutionRequest
    -> Text -> RequestCancelWorkflowExecutionRequest)
-> Lens
     RequestCancelWorkflowExecutionRequest
     RequestCancelWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelWorkflowExecutionRequest -> Text
_RequestCancelWorkflowExecutionRequest'identity
           (\ RequestCancelWorkflowExecutionRequest
x__ Text
y__
              -> RequestCancelWorkflowExecutionRequest
x__ {_RequestCancelWorkflowExecutionRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelWorkflowExecutionRequest "requestId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestId"
-> (Text -> f Text)
-> RequestCancelWorkflowExecutionRequest
-> f RequestCancelWorkflowExecutionRequest
fieldOf Proxy# "requestId"
_
    = ((Text -> f Text)
 -> RequestCancelWorkflowExecutionRequest
 -> f RequestCancelWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RequestCancelWorkflowExecutionRequest
-> f RequestCancelWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelWorkflowExecutionRequest -> Text)
-> (RequestCancelWorkflowExecutionRequest
    -> Text -> RequestCancelWorkflowExecutionRequest)
-> Lens
     RequestCancelWorkflowExecutionRequest
     RequestCancelWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelWorkflowExecutionRequest -> Text
_RequestCancelWorkflowExecutionRequest'requestId
           (\ RequestCancelWorkflowExecutionRequest
x__ Text
y__
              -> RequestCancelWorkflowExecutionRequest
x__ {_RequestCancelWorkflowExecutionRequest'requestId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelWorkflowExecutionRequest "firstExecutionRunId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "firstExecutionRunId"
-> (Text -> f Text)
-> RequestCancelWorkflowExecutionRequest
-> f RequestCancelWorkflowExecutionRequest
fieldOf Proxy# "firstExecutionRunId"
_
    = ((Text -> f Text)
 -> RequestCancelWorkflowExecutionRequest
 -> f RequestCancelWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RequestCancelWorkflowExecutionRequest
-> f RequestCancelWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelWorkflowExecutionRequest -> Text)
-> (RequestCancelWorkflowExecutionRequest
    -> Text -> RequestCancelWorkflowExecutionRequest)
-> Lens
     RequestCancelWorkflowExecutionRequest
     RequestCancelWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelWorkflowExecutionRequest -> Text
_RequestCancelWorkflowExecutionRequest'firstExecutionRunId
           (\ RequestCancelWorkflowExecutionRequest
x__ Text
y__
              -> RequestCancelWorkflowExecutionRequest
x__
                   {_RequestCancelWorkflowExecutionRequest'firstExecutionRunId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelWorkflowExecutionRequest "reason" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "reason"
-> (Text -> f Text)
-> RequestCancelWorkflowExecutionRequest
-> f RequestCancelWorkflowExecutionRequest
fieldOf Proxy# "reason"
_
    = ((Text -> f Text)
 -> RequestCancelWorkflowExecutionRequest
 -> f RequestCancelWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RequestCancelWorkflowExecutionRequest
-> f RequestCancelWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelWorkflowExecutionRequest -> Text)
-> (RequestCancelWorkflowExecutionRequest
    -> Text -> RequestCancelWorkflowExecutionRequest)
-> Lens
     RequestCancelWorkflowExecutionRequest
     RequestCancelWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelWorkflowExecutionRequest -> Text
_RequestCancelWorkflowExecutionRequest'reason
           (\ RequestCancelWorkflowExecutionRequest
x__ Text
y__
              -> RequestCancelWorkflowExecutionRequest
x__ {_RequestCancelWorkflowExecutionRequest'reason = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RequestCancelWorkflowExecutionRequest where
  messageName :: Proxy RequestCancelWorkflowExecutionRequest -> Text
messageName Proxy RequestCancelWorkflowExecutionRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RequestCancelWorkflowExecutionRequest"
  packedMessageDescriptor :: Proxy RequestCancelWorkflowExecutionRequest -> ByteString
packedMessageDescriptor Proxy RequestCancelWorkflowExecutionRequest
_
    = ByteString
"\n\
      \%RequestCancelWorkflowExecutionRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2X\n\
      \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2\SUB\n\
      \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2\GS\n\
      \\n\
      \request_id\CAN\EOT \SOH(\tR\trequestId\DC23\n\
      \\SYNfirst_execution_run_id\CAN\ENQ \SOH(\tR\DC3firstExecutionRunId\DC2\SYN\n\
      \\ACKreason\CAN\ACK \SOH(\tR\ACKreason"
  packedFileDescriptor :: Proxy RequestCancelWorkflowExecutionRequest -> ByteString
packedFileDescriptor Proxy RequestCancelWorkflowExecutionRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RequestCancelWorkflowExecutionRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor RequestCancelWorkflowExecutionRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RequestCancelWorkflowExecutionRequest Text
-> FieldDescriptor RequestCancelWorkflowExecutionRequest
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
     RequestCancelWorkflowExecutionRequest
     RequestCancelWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor RequestCancelWorkflowExecutionRequest 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 RequestCancelWorkflowExecutionRequest
        workflowExecution__field_descriptor :: FieldDescriptor RequestCancelWorkflowExecutionRequest
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     RequestCancelWorkflowExecutionRequest WorkflowExecution
-> FieldDescriptor RequestCancelWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
              (Lens
  RequestCancelWorkflowExecutionRequest
  RequestCancelWorkflowExecutionRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     RequestCancelWorkflowExecutionRequest WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelWorkflowExecutionRequest
        identity__field_descriptor :: FieldDescriptor RequestCancelWorkflowExecutionRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RequestCancelWorkflowExecutionRequest Text
-> FieldDescriptor RequestCancelWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RequestCancelWorkflowExecutionRequest
     RequestCancelWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor RequestCancelWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelWorkflowExecutionRequest
        requestId__field_descriptor :: FieldDescriptor RequestCancelWorkflowExecutionRequest
requestId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RequestCancelWorkflowExecutionRequest Text
-> FieldDescriptor RequestCancelWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RequestCancelWorkflowExecutionRequest
     RequestCancelWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor RequestCancelWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelWorkflowExecutionRequest
        firstExecutionRunId__field_descriptor :: FieldDescriptor RequestCancelWorkflowExecutionRequest
firstExecutionRunId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RequestCancelWorkflowExecutionRequest Text
-> FieldDescriptor RequestCancelWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"first_execution_run_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RequestCancelWorkflowExecutionRequest
     RequestCancelWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor RequestCancelWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"firstExecutionRunId")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelWorkflowExecutionRequest
        reason__field_descriptor :: FieldDescriptor RequestCancelWorkflowExecutionRequest
reason__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RequestCancelWorkflowExecutionRequest Text
-> FieldDescriptor RequestCancelWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"reason"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RequestCancelWorkflowExecutionRequest
     RequestCancelWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor RequestCancelWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reason")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelWorkflowExecutionRequest
      in
        [(Tag, FieldDescriptor RequestCancelWorkflowExecutionRequest)]
-> Map Tag (FieldDescriptor RequestCancelWorkflowExecutionRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RequestCancelWorkflowExecutionRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RequestCancelWorkflowExecutionRequest
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RequestCancelWorkflowExecutionRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor RequestCancelWorkflowExecutionRequest
requestId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor RequestCancelWorkflowExecutionRequest
firstExecutionRunId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor RequestCancelWorkflowExecutionRequest
reason__field_descriptor)]
  unknownFields :: Lens' RequestCancelWorkflowExecutionRequest FieldSet
unknownFields
    = (RequestCancelWorkflowExecutionRequest -> FieldSet)
-> (RequestCancelWorkflowExecutionRequest
    -> FieldSet -> RequestCancelWorkflowExecutionRequest)
-> Lens' RequestCancelWorkflowExecutionRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RequestCancelWorkflowExecutionRequest -> FieldSet
_RequestCancelWorkflowExecutionRequest'_unknownFields
        (\ RequestCancelWorkflowExecutionRequest
x__ FieldSet
y__
           -> RequestCancelWorkflowExecutionRequest
x__
                {_RequestCancelWorkflowExecutionRequest'_unknownFields = y__})
  defMessage :: RequestCancelWorkflowExecutionRequest
defMessage
    = RequestCancelWorkflowExecutionRequest'_constructor
        {_RequestCancelWorkflowExecutionRequest'namespace :: Text
_RequestCancelWorkflowExecutionRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelWorkflowExecutionRequest'workflowExecution :: Maybe WorkflowExecution
_RequestCancelWorkflowExecutionRequest'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _RequestCancelWorkflowExecutionRequest'identity :: Text
_RequestCancelWorkflowExecutionRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelWorkflowExecutionRequest'requestId :: Text
_RequestCancelWorkflowExecutionRequest'requestId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelWorkflowExecutionRequest'firstExecutionRunId :: Text
_RequestCancelWorkflowExecutionRequest'firstExecutionRunId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelWorkflowExecutionRequest'reason :: Text
_RequestCancelWorkflowExecutionRequest'reason = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelWorkflowExecutionRequest'_unknownFields :: FieldSet
_RequestCancelWorkflowExecutionRequest'_unknownFields = []}
  parseMessage :: Parser RequestCancelWorkflowExecutionRequest
parseMessage
    = let
        loop ::
          RequestCancelWorkflowExecutionRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser RequestCancelWorkflowExecutionRequest
        loop :: RequestCancelWorkflowExecutionRequest
-> Parser RequestCancelWorkflowExecutionRequest
loop RequestCancelWorkflowExecutionRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"request_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x)
                        Word64
42
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"first_execution_run_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"firstExecutionRunId") y x)
                        Word64
50
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"reason"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"reason") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser RequestCancelWorkflowExecutionRequest
-> String -> Parser RequestCancelWorkflowExecutionRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RequestCancelWorkflowExecutionRequest
-> Parser RequestCancelWorkflowExecutionRequest
loop RequestCancelWorkflowExecutionRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RequestCancelWorkflowExecutionRequest"
  buildMessage :: RequestCancelWorkflowExecutionRequest -> Builder
buildMessage
    = \ RequestCancelWorkflowExecutionRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  RequestCancelWorkflowExecutionRequest
  RequestCancelWorkflowExecutionRequest
  Text
  Text
-> RequestCancelWorkflowExecutionRequest -> 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") RequestCancelWorkflowExecutionRequest
_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 WorkflowExecution)
  RequestCancelWorkflowExecutionRequest
  RequestCancelWorkflowExecutionRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> RequestCancelWorkflowExecutionRequest -> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution") RequestCancelWorkflowExecutionRequest
_x
                 of
                   Maybe WorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just WorkflowExecution
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v = FoldLike
  Text
  RequestCancelWorkflowExecutionRequest
  RequestCancelWorkflowExecutionRequest
  Text
  Text
-> RequestCancelWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") RequestCancelWorkflowExecutionRequest
_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
  RequestCancelWorkflowExecutionRequest
  RequestCancelWorkflowExecutionRequest
  Text
  Text
-> RequestCancelWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId") RequestCancelWorkflowExecutionRequest
_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
  RequestCancelWorkflowExecutionRequest
  RequestCancelWorkflowExecutionRequest
  Text
  Text
-> RequestCancelWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                  (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"firstExecutionRunId") RequestCancelWorkflowExecutionRequest
_x
                          in
                            if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                  ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     (\ ByteString
bs
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                     Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v = FoldLike
  Text
  RequestCancelWorkflowExecutionRequest
  RequestCancelWorkflowExecutionRequest
  Text
  Text
-> RequestCancelWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reason") RequestCancelWorkflowExecutionRequest
_x
                             in
                               if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                     ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        (\ ByteString
bs
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                            (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                               (FoldLike
  FieldSet
  RequestCancelWorkflowExecutionRequest
  RequestCancelWorkflowExecutionRequest
  FieldSet
  FieldSet
-> RequestCancelWorkflowExecutionRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RequestCancelWorkflowExecutionRequest
  RequestCancelWorkflowExecutionRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RequestCancelWorkflowExecutionRequest FieldSet
Data.ProtoLens.unknownFields RequestCancelWorkflowExecutionRequest
_x)))))))
instance Control.DeepSeq.NFData RequestCancelWorkflowExecutionRequest where
  rnf :: RequestCancelWorkflowExecutionRequest -> ()
rnf
    = \ RequestCancelWorkflowExecutionRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RequestCancelWorkflowExecutionRequest -> FieldSet
_RequestCancelWorkflowExecutionRequest'_unknownFields RequestCancelWorkflowExecutionRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RequestCancelWorkflowExecutionRequest -> Text
_RequestCancelWorkflowExecutionRequest'namespace RequestCancelWorkflowExecutionRequest
x__)
                (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RequestCancelWorkflowExecutionRequest -> Maybe WorkflowExecution
_RequestCancelWorkflowExecutionRequest'workflowExecution RequestCancelWorkflowExecutionRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RequestCancelWorkflowExecutionRequest -> Text
_RequestCancelWorkflowExecutionRequest'identity RequestCancelWorkflowExecutionRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RequestCancelWorkflowExecutionRequest -> Text
_RequestCancelWorkflowExecutionRequest'requestId RequestCancelWorkflowExecutionRequest
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RequestCancelWorkflowExecutionRequest -> Text
_RequestCancelWorkflowExecutionRequest'firstExecutionRunId RequestCancelWorkflowExecutionRequest
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (RequestCancelWorkflowExecutionRequest -> Text
_RequestCancelWorkflowExecutionRequest'reason RequestCancelWorkflowExecutionRequest
x__) ()))))))
{- | Fields :
      -}
data RequestCancelWorkflowExecutionResponse
  = RequestCancelWorkflowExecutionResponse'_constructor {RequestCancelWorkflowExecutionResponse -> FieldSet
_RequestCancelWorkflowExecutionResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Bool
(RequestCancelWorkflowExecutionResponse
 -> RequestCancelWorkflowExecutionResponse -> Bool)
-> (RequestCancelWorkflowExecutionResponse
    -> RequestCancelWorkflowExecutionResponse -> Bool)
-> Eq RequestCancelWorkflowExecutionResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Bool
== :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Bool
$c/= :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Bool
/= :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Bool
Prelude.Eq, Eq RequestCancelWorkflowExecutionResponse
Eq RequestCancelWorkflowExecutionResponse =>
(RequestCancelWorkflowExecutionResponse
 -> RequestCancelWorkflowExecutionResponse -> Ordering)
-> (RequestCancelWorkflowExecutionResponse
    -> RequestCancelWorkflowExecutionResponse -> Bool)
-> (RequestCancelWorkflowExecutionResponse
    -> RequestCancelWorkflowExecutionResponse -> Bool)
-> (RequestCancelWorkflowExecutionResponse
    -> RequestCancelWorkflowExecutionResponse -> Bool)
-> (RequestCancelWorkflowExecutionResponse
    -> RequestCancelWorkflowExecutionResponse -> Bool)
-> (RequestCancelWorkflowExecutionResponse
    -> RequestCancelWorkflowExecutionResponse
    -> RequestCancelWorkflowExecutionResponse)
-> (RequestCancelWorkflowExecutionResponse
    -> RequestCancelWorkflowExecutionResponse
    -> RequestCancelWorkflowExecutionResponse)
-> Ord RequestCancelWorkflowExecutionResponse
RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Bool
RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Ordering
RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse
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 :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Ordering
compare :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Ordering
$c< :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Bool
< :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Bool
$c<= :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Bool
<= :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Bool
$c> :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Bool
> :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Bool
$c>= :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Bool
>= :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse -> Bool
$cmax :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse
max :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse
$cmin :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse
min :: RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse
-> RequestCancelWorkflowExecutionResponse
Prelude.Ord)
instance Prelude.Show RequestCancelWorkflowExecutionResponse where
  showsPrec :: Int -> RequestCancelWorkflowExecutionResponse -> ShowS
showsPrec Int
_ RequestCancelWorkflowExecutionResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RequestCancelWorkflowExecutionResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RequestCancelWorkflowExecutionResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message RequestCancelWorkflowExecutionResponse where
  messageName :: Proxy RequestCancelWorkflowExecutionResponse -> Text
messageName Proxy RequestCancelWorkflowExecutionResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RequestCancelWorkflowExecutionResponse"
  packedMessageDescriptor :: Proxy RequestCancelWorkflowExecutionResponse -> ByteString
packedMessageDescriptor Proxy RequestCancelWorkflowExecutionResponse
_
    = ByteString
"\n\
      \&RequestCancelWorkflowExecutionResponse"
  packedFileDescriptor :: Proxy RequestCancelWorkflowExecutionResponse -> ByteString
packedFileDescriptor Proxy RequestCancelWorkflowExecutionResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RequestCancelWorkflowExecutionResponse)
fieldsByTag = let in [(Tag, FieldDescriptor RequestCancelWorkflowExecutionResponse)]
-> Map Tag (FieldDescriptor RequestCancelWorkflowExecutionResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' RequestCancelWorkflowExecutionResponse FieldSet
unknownFields
    = (RequestCancelWorkflowExecutionResponse -> FieldSet)
-> (RequestCancelWorkflowExecutionResponse
    -> FieldSet -> RequestCancelWorkflowExecutionResponse)
-> Lens' RequestCancelWorkflowExecutionResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RequestCancelWorkflowExecutionResponse -> FieldSet
_RequestCancelWorkflowExecutionResponse'_unknownFields
        (\ RequestCancelWorkflowExecutionResponse
x__ FieldSet
y__
           -> RequestCancelWorkflowExecutionResponse
x__
                {_RequestCancelWorkflowExecutionResponse'_unknownFields = y__})
  defMessage :: RequestCancelWorkflowExecutionResponse
defMessage
    = RequestCancelWorkflowExecutionResponse'_constructor
        {_RequestCancelWorkflowExecutionResponse'_unknownFields :: FieldSet
_RequestCancelWorkflowExecutionResponse'_unknownFields = []}
  parseMessage :: Parser RequestCancelWorkflowExecutionResponse
parseMessage
    = let
        loop ::
          RequestCancelWorkflowExecutionResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser RequestCancelWorkflowExecutionResponse
        loop :: RequestCancelWorkflowExecutionResponse
-> Parser RequestCancelWorkflowExecutionResponse
loop RequestCancelWorkflowExecutionResponse
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 RequestCancelWorkflowExecutionResponse
-> String -> Parser RequestCancelWorkflowExecutionResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RequestCancelWorkflowExecutionResponse
-> Parser RequestCancelWorkflowExecutionResponse
loop RequestCancelWorkflowExecutionResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RequestCancelWorkflowExecutionResponse"
  buildMessage :: RequestCancelWorkflowExecutionResponse -> Builder
buildMessage
    = \ RequestCancelWorkflowExecutionResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  RequestCancelWorkflowExecutionResponse
  RequestCancelWorkflowExecutionResponse
  FieldSet
  FieldSet
-> RequestCancelWorkflowExecutionResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RequestCancelWorkflowExecutionResponse
  RequestCancelWorkflowExecutionResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RequestCancelWorkflowExecutionResponse FieldSet
Data.ProtoLens.unknownFields RequestCancelWorkflowExecutionResponse
_x)
instance Control.DeepSeq.NFData RequestCancelWorkflowExecutionResponse where
  rnf :: RequestCancelWorkflowExecutionResponse -> ()
rnf
    = \ RequestCancelWorkflowExecutionResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RequestCancelWorkflowExecutionResponse -> FieldSet
_RequestCancelWorkflowExecutionResponse'_unknownFields RequestCancelWorkflowExecutionResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' ResetStickyTaskQueueRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.execution' @:: Lens' ResetStickyTaskQueueRequest Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'execution' @:: Lens' ResetStickyTaskQueueRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@ -}
data ResetStickyTaskQueueRequest
  = ResetStickyTaskQueueRequest'_constructor {ResetStickyTaskQueueRequest -> Text
_ResetStickyTaskQueueRequest'namespace :: !Data.Text.Text,
                                              ResetStickyTaskQueueRequest -> Maybe WorkflowExecution
_ResetStickyTaskQueueRequest'execution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                              ResetStickyTaskQueueRequest -> FieldSet
_ResetStickyTaskQueueRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest -> Bool
(ResetStickyTaskQueueRequest
 -> ResetStickyTaskQueueRequest -> Bool)
-> (ResetStickyTaskQueueRequest
    -> ResetStickyTaskQueueRequest -> Bool)
-> Eq ResetStickyTaskQueueRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest -> Bool
== :: ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest -> Bool
$c/= :: ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest -> Bool
/= :: ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest -> Bool
Prelude.Eq, Eq ResetStickyTaskQueueRequest
Eq ResetStickyTaskQueueRequest =>
(ResetStickyTaskQueueRequest
 -> ResetStickyTaskQueueRequest -> Ordering)
-> (ResetStickyTaskQueueRequest
    -> ResetStickyTaskQueueRequest -> Bool)
-> (ResetStickyTaskQueueRequest
    -> ResetStickyTaskQueueRequest -> Bool)
-> (ResetStickyTaskQueueRequest
    -> ResetStickyTaskQueueRequest -> Bool)
-> (ResetStickyTaskQueueRequest
    -> ResetStickyTaskQueueRequest -> Bool)
-> (ResetStickyTaskQueueRequest
    -> ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest)
-> (ResetStickyTaskQueueRequest
    -> ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest)
-> Ord ResetStickyTaskQueueRequest
ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest -> Bool
ResetStickyTaskQueueRequest
-> ResetStickyTaskQueueRequest -> Ordering
ResetStickyTaskQueueRequest
-> ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest
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 :: ResetStickyTaskQueueRequest
-> ResetStickyTaskQueueRequest -> Ordering
compare :: ResetStickyTaskQueueRequest
-> ResetStickyTaskQueueRequest -> Ordering
$c< :: ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest -> Bool
< :: ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest -> Bool
$c<= :: ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest -> Bool
<= :: ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest -> Bool
$c> :: ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest -> Bool
> :: ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest -> Bool
$c>= :: ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest -> Bool
>= :: ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest -> Bool
$cmax :: ResetStickyTaskQueueRequest
-> ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest
max :: ResetStickyTaskQueueRequest
-> ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest
$cmin :: ResetStickyTaskQueueRequest
-> ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest
min :: ResetStickyTaskQueueRequest
-> ResetStickyTaskQueueRequest -> ResetStickyTaskQueueRequest
Prelude.Ord)
instance Prelude.Show ResetStickyTaskQueueRequest where
  showsPrec :: Int -> ResetStickyTaskQueueRequest -> ShowS
showsPrec Int
_ ResetStickyTaskQueueRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ResetStickyTaskQueueRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResetStickyTaskQueueRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ResetStickyTaskQueueRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ResetStickyTaskQueueRequest
-> f ResetStickyTaskQueueRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ResetStickyTaskQueueRequest -> f ResetStickyTaskQueueRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ResetStickyTaskQueueRequest
-> f ResetStickyTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResetStickyTaskQueueRequest -> Text)
-> (ResetStickyTaskQueueRequest
    -> Text -> ResetStickyTaskQueueRequest)
-> Lens
     ResetStickyTaskQueueRequest ResetStickyTaskQueueRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResetStickyTaskQueueRequest -> Text
_ResetStickyTaskQueueRequest'namespace
           (\ ResetStickyTaskQueueRequest
x__ Text
y__ -> ResetStickyTaskQueueRequest
x__ {_ResetStickyTaskQueueRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResetStickyTaskQueueRequest "execution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "execution"
-> (WorkflowExecution -> f WorkflowExecution)
-> ResetStickyTaskQueueRequest
-> f ResetStickyTaskQueueRequest
fieldOf Proxy# "execution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ResetStickyTaskQueueRequest -> f ResetStickyTaskQueueRequest)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> ResetStickyTaskQueueRequest
-> f ResetStickyTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResetStickyTaskQueueRequest -> Maybe WorkflowExecution)
-> (ResetStickyTaskQueueRequest
    -> Maybe WorkflowExecution -> ResetStickyTaskQueueRequest)
-> Lens
     ResetStickyTaskQueueRequest
     ResetStickyTaskQueueRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResetStickyTaskQueueRequest -> Maybe WorkflowExecution
_ResetStickyTaskQueueRequest'execution
           (\ ResetStickyTaskQueueRequest
x__ Maybe WorkflowExecution
y__ -> ResetStickyTaskQueueRequest
x__ {_ResetStickyTaskQueueRequest'execution = y__}))
        (WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ResetStickyTaskQueueRequest "maybe'execution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'execution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ResetStickyTaskQueueRequest
-> f ResetStickyTaskQueueRequest
fieldOf Proxy# "maybe'execution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ResetStickyTaskQueueRequest -> f ResetStickyTaskQueueRequest)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ResetStickyTaskQueueRequest
-> f ResetStickyTaskQueueRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResetStickyTaskQueueRequest -> Maybe WorkflowExecution)
-> (ResetStickyTaskQueueRequest
    -> Maybe WorkflowExecution -> ResetStickyTaskQueueRequest)
-> Lens
     ResetStickyTaskQueueRequest
     ResetStickyTaskQueueRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResetStickyTaskQueueRequest -> Maybe WorkflowExecution
_ResetStickyTaskQueueRequest'execution
           (\ ResetStickyTaskQueueRequest
x__ Maybe WorkflowExecution
y__ -> ResetStickyTaskQueueRequest
x__ {_ResetStickyTaskQueueRequest'execution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ResetStickyTaskQueueRequest where
  messageName :: Proxy ResetStickyTaskQueueRequest -> Text
messageName Proxy ResetStickyTaskQueueRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ResetStickyTaskQueueRequest"
  packedMessageDescriptor :: Proxy ResetStickyTaskQueueRequest -> ByteString
packedMessageDescriptor Proxy ResetStickyTaskQueueRequest
_
    = ByteString
"\n\
      \\ESCResetStickyTaskQueueRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2G\n\
      \\texecution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\texecution"
  packedFileDescriptor :: Proxy ResetStickyTaskQueueRequest -> ByteString
packedFileDescriptor Proxy ResetStickyTaskQueueRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ResetStickyTaskQueueRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor ResetStickyTaskQueueRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ResetStickyTaskQueueRequest Text
-> FieldDescriptor ResetStickyTaskQueueRequest
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
     ResetStickyTaskQueueRequest ResetStickyTaskQueueRequest Text Text
-> FieldAccessor ResetStickyTaskQueueRequest 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 ResetStickyTaskQueueRequest
        execution__field_descriptor :: FieldDescriptor ResetStickyTaskQueueRequest
execution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor ResetStickyTaskQueueRequest WorkflowExecution
-> FieldDescriptor ResetStickyTaskQueueRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"execution"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
              (Lens
  ResetStickyTaskQueueRequest
  ResetStickyTaskQueueRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor ResetStickyTaskQueueRequest WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'execution")) ::
              Data.ProtoLens.FieldDescriptor ResetStickyTaskQueueRequest
      in
        [(Tag, FieldDescriptor ResetStickyTaskQueueRequest)]
-> Map Tag (FieldDescriptor ResetStickyTaskQueueRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ResetStickyTaskQueueRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ResetStickyTaskQueueRequest
execution__field_descriptor)]
  unknownFields :: Lens' ResetStickyTaskQueueRequest FieldSet
unknownFields
    = (ResetStickyTaskQueueRequest -> FieldSet)
-> (ResetStickyTaskQueueRequest
    -> FieldSet -> ResetStickyTaskQueueRequest)
-> Lens' ResetStickyTaskQueueRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ResetStickyTaskQueueRequest -> FieldSet
_ResetStickyTaskQueueRequest'_unknownFields
        (\ ResetStickyTaskQueueRequest
x__ FieldSet
y__
           -> ResetStickyTaskQueueRequest
x__ {_ResetStickyTaskQueueRequest'_unknownFields = y__})
  defMessage :: ResetStickyTaskQueueRequest
defMessage
    = ResetStickyTaskQueueRequest'_constructor
        {_ResetStickyTaskQueueRequest'namespace :: Text
_ResetStickyTaskQueueRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResetStickyTaskQueueRequest'execution :: Maybe WorkflowExecution
_ResetStickyTaskQueueRequest'execution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _ResetStickyTaskQueueRequest'_unknownFields :: FieldSet
_ResetStickyTaskQueueRequest'_unknownFields = []}
  parseMessage :: Parser ResetStickyTaskQueueRequest
parseMessage
    = let
        loop ::
          ResetStickyTaskQueueRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser ResetStickyTaskQueueRequest
        loop :: ResetStickyTaskQueueRequest -> Parser ResetStickyTaskQueueRequest
loop ResetStickyTaskQueueRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"execution"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"execution") 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 ResetStickyTaskQueueRequest
-> String -> Parser ResetStickyTaskQueueRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ResetStickyTaskQueueRequest -> Parser ResetStickyTaskQueueRequest
loop ResetStickyTaskQueueRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ResetStickyTaskQueueRequest"
  buildMessage :: ResetStickyTaskQueueRequest -> Builder
buildMessage
    = \ ResetStickyTaskQueueRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ResetStickyTaskQueueRequest
  ResetStickyTaskQueueRequest
  Text
  Text
-> ResetStickyTaskQueueRequest -> 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") ResetStickyTaskQueueRequest
_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 WorkflowExecution)
  ResetStickyTaskQueueRequest
  ResetStickyTaskQueueRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> ResetStickyTaskQueueRequest -> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'execution") ResetStickyTaskQueueRequest
_x
                 of
                   Maybe WorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just WorkflowExecution
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ResetStickyTaskQueueRequest
  ResetStickyTaskQueueRequest
  FieldSet
  FieldSet
-> ResetStickyTaskQueueRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ResetStickyTaskQueueRequest
  ResetStickyTaskQueueRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResetStickyTaskQueueRequest FieldSet
Data.ProtoLens.unknownFields ResetStickyTaskQueueRequest
_x)))
instance Control.DeepSeq.NFData ResetStickyTaskQueueRequest where
  rnf :: ResetStickyTaskQueueRequest -> ()
rnf
    = \ ResetStickyTaskQueueRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ResetStickyTaskQueueRequest -> FieldSet
_ResetStickyTaskQueueRequest'_unknownFields ResetStickyTaskQueueRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ResetStickyTaskQueueRequest -> Text
_ResetStickyTaskQueueRequest'namespace ResetStickyTaskQueueRequest
x__)
                (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ResetStickyTaskQueueRequest -> Maybe WorkflowExecution
_ResetStickyTaskQueueRequest'execution ResetStickyTaskQueueRequest
x__) ()))
{- | Fields :
      -}
data ResetStickyTaskQueueResponse
  = ResetStickyTaskQueueResponse'_constructor {ResetStickyTaskQueueResponse -> FieldSet
_ResetStickyTaskQueueResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Bool
(ResetStickyTaskQueueResponse
 -> ResetStickyTaskQueueResponse -> Bool)
-> (ResetStickyTaskQueueResponse
    -> ResetStickyTaskQueueResponse -> Bool)
-> Eq ResetStickyTaskQueueResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Bool
== :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Bool
$c/= :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Bool
/= :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Bool
Prelude.Eq, Eq ResetStickyTaskQueueResponse
Eq ResetStickyTaskQueueResponse =>
(ResetStickyTaskQueueResponse
 -> ResetStickyTaskQueueResponse -> Ordering)
-> (ResetStickyTaskQueueResponse
    -> ResetStickyTaskQueueResponse -> Bool)
-> (ResetStickyTaskQueueResponse
    -> ResetStickyTaskQueueResponse -> Bool)
-> (ResetStickyTaskQueueResponse
    -> ResetStickyTaskQueueResponse -> Bool)
-> (ResetStickyTaskQueueResponse
    -> ResetStickyTaskQueueResponse -> Bool)
-> (ResetStickyTaskQueueResponse
    -> ResetStickyTaskQueueResponse -> ResetStickyTaskQueueResponse)
-> (ResetStickyTaskQueueResponse
    -> ResetStickyTaskQueueResponse -> ResetStickyTaskQueueResponse)
-> Ord ResetStickyTaskQueueResponse
ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Bool
ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Ordering
ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> ResetStickyTaskQueueResponse
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 :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Ordering
compare :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Ordering
$c< :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Bool
< :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Bool
$c<= :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Bool
<= :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Bool
$c> :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Bool
> :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Bool
$c>= :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Bool
>= :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> Bool
$cmax :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> ResetStickyTaskQueueResponse
max :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> ResetStickyTaskQueueResponse
$cmin :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> ResetStickyTaskQueueResponse
min :: ResetStickyTaskQueueResponse
-> ResetStickyTaskQueueResponse -> ResetStickyTaskQueueResponse
Prelude.Ord)
instance Prelude.Show ResetStickyTaskQueueResponse where
  showsPrec :: Int -> ResetStickyTaskQueueResponse -> ShowS
showsPrec Int
_ ResetStickyTaskQueueResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ResetStickyTaskQueueResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResetStickyTaskQueueResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message ResetStickyTaskQueueResponse where
  messageName :: Proxy ResetStickyTaskQueueResponse -> Text
messageName Proxy ResetStickyTaskQueueResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ResetStickyTaskQueueResponse"
  packedMessageDescriptor :: Proxy ResetStickyTaskQueueResponse -> ByteString
packedMessageDescriptor Proxy ResetStickyTaskQueueResponse
_
    = ByteString
"\n\
      \\FSResetStickyTaskQueueResponse"
  packedFileDescriptor :: Proxy ResetStickyTaskQueueResponse -> ByteString
packedFileDescriptor Proxy ResetStickyTaskQueueResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ResetStickyTaskQueueResponse)
fieldsByTag = let in [(Tag, FieldDescriptor ResetStickyTaskQueueResponse)]
-> Map Tag (FieldDescriptor ResetStickyTaskQueueResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' ResetStickyTaskQueueResponse FieldSet
unknownFields
    = (ResetStickyTaskQueueResponse -> FieldSet)
-> (ResetStickyTaskQueueResponse
    -> FieldSet -> ResetStickyTaskQueueResponse)
-> Lens' ResetStickyTaskQueueResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ResetStickyTaskQueueResponse -> FieldSet
_ResetStickyTaskQueueResponse'_unknownFields
        (\ ResetStickyTaskQueueResponse
x__ FieldSet
y__
           -> ResetStickyTaskQueueResponse
x__ {_ResetStickyTaskQueueResponse'_unknownFields = y__})
  defMessage :: ResetStickyTaskQueueResponse
defMessage
    = ResetStickyTaskQueueResponse'_constructor
        {_ResetStickyTaskQueueResponse'_unknownFields :: FieldSet
_ResetStickyTaskQueueResponse'_unknownFields = []}
  parseMessage :: Parser ResetStickyTaskQueueResponse
parseMessage
    = let
        loop ::
          ResetStickyTaskQueueResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser ResetStickyTaskQueueResponse
        loop :: ResetStickyTaskQueueResponse -> Parser ResetStickyTaskQueueResponse
loop ResetStickyTaskQueueResponse
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 ResetStickyTaskQueueResponse
-> String -> Parser ResetStickyTaskQueueResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ResetStickyTaskQueueResponse -> Parser ResetStickyTaskQueueResponse
loop ResetStickyTaskQueueResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ResetStickyTaskQueueResponse"
  buildMessage :: ResetStickyTaskQueueResponse -> Builder
buildMessage
    = \ ResetStickyTaskQueueResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  ResetStickyTaskQueueResponse
  ResetStickyTaskQueueResponse
  FieldSet
  FieldSet
-> ResetStickyTaskQueueResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ResetStickyTaskQueueResponse
  ResetStickyTaskQueueResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResetStickyTaskQueueResponse FieldSet
Data.ProtoLens.unknownFields ResetStickyTaskQueueResponse
_x)
instance Control.DeepSeq.NFData ResetStickyTaskQueueResponse where
  rnf :: ResetStickyTaskQueueResponse -> ()
rnf
    = \ ResetStickyTaskQueueResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ResetStickyTaskQueueResponse -> FieldSet
_ResetStickyTaskQueueResponse'_unknownFields ResetStickyTaskQueueResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' ResetWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowExecution' @:: Lens' ResetWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowExecution' @:: Lens' ResetWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.reason' @:: Lens' ResetWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowTaskFinishEventId' @:: Lens' ResetWorkflowExecutionRequest Data.Int.Int64@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.requestId' @:: Lens' ResetWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.resetReapplyType' @:: Lens' ResetWorkflowExecutionRequest Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyType@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.resetReapplyExcludeTypes' @:: Lens' ResetWorkflowExecutionRequest [Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyExcludeType]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'resetReapplyExcludeTypes' @:: Lens' ResetWorkflowExecutionRequest (Data.Vector.Vector Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyExcludeType)@ -}
data ResetWorkflowExecutionRequest
  = ResetWorkflowExecutionRequest'_constructor {ResetWorkflowExecutionRequest -> Text
_ResetWorkflowExecutionRequest'namespace :: !Data.Text.Text,
                                                ResetWorkflowExecutionRequest -> Maybe WorkflowExecution
_ResetWorkflowExecutionRequest'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                ResetWorkflowExecutionRequest -> Text
_ResetWorkflowExecutionRequest'reason :: !Data.Text.Text,
                                                ResetWorkflowExecutionRequest -> Int64
_ResetWorkflowExecutionRequest'workflowTaskFinishEventId :: !Data.Int.Int64,
                                                ResetWorkflowExecutionRequest -> Text
_ResetWorkflowExecutionRequest'requestId :: !Data.Text.Text,
                                                ResetWorkflowExecutionRequest -> ResetReapplyType
_ResetWorkflowExecutionRequest'resetReapplyType :: !Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyType,
                                                ResetWorkflowExecutionRequest -> Vector ResetReapplyExcludeType
_ResetWorkflowExecutionRequest'resetReapplyExcludeTypes :: !(Data.Vector.Vector Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyExcludeType),
                                                ResetWorkflowExecutionRequest -> FieldSet
_ResetWorkflowExecutionRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Bool
(ResetWorkflowExecutionRequest
 -> ResetWorkflowExecutionRequest -> Bool)
-> (ResetWorkflowExecutionRequest
    -> ResetWorkflowExecutionRequest -> Bool)
-> Eq ResetWorkflowExecutionRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Bool
== :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Bool
$c/= :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Bool
/= :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Bool
Prelude.Eq, Eq ResetWorkflowExecutionRequest
Eq ResetWorkflowExecutionRequest =>
(ResetWorkflowExecutionRequest
 -> ResetWorkflowExecutionRequest -> Ordering)
-> (ResetWorkflowExecutionRequest
    -> ResetWorkflowExecutionRequest -> Bool)
-> (ResetWorkflowExecutionRequest
    -> ResetWorkflowExecutionRequest -> Bool)
-> (ResetWorkflowExecutionRequest
    -> ResetWorkflowExecutionRequest -> Bool)
-> (ResetWorkflowExecutionRequest
    -> ResetWorkflowExecutionRequest -> Bool)
-> (ResetWorkflowExecutionRequest
    -> ResetWorkflowExecutionRequest -> ResetWorkflowExecutionRequest)
-> (ResetWorkflowExecutionRequest
    -> ResetWorkflowExecutionRequest -> ResetWorkflowExecutionRequest)
-> Ord ResetWorkflowExecutionRequest
ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Bool
ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Ordering
ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> ResetWorkflowExecutionRequest
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 :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Ordering
compare :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Ordering
$c< :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Bool
< :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Bool
$c<= :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Bool
<= :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Bool
$c> :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Bool
> :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Bool
$c>= :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Bool
>= :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> Bool
$cmax :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> ResetWorkflowExecutionRequest
max :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> ResetWorkflowExecutionRequest
$cmin :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> ResetWorkflowExecutionRequest
min :: ResetWorkflowExecutionRequest
-> ResetWorkflowExecutionRequest -> ResetWorkflowExecutionRequest
Prelude.Ord)
instance Prelude.Show ResetWorkflowExecutionRequest where
  showsPrec :: Int -> ResetWorkflowExecutionRequest -> ShowS
showsPrec Int
_ ResetWorkflowExecutionRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ResetWorkflowExecutionRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResetWorkflowExecutionRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ResetWorkflowExecutionRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ResetWorkflowExecutionRequest
 -> f ResetWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResetWorkflowExecutionRequest -> Text)
-> (ResetWorkflowExecutionRequest
    -> Text -> ResetWorkflowExecutionRequest)
-> Lens
     ResetWorkflowExecutionRequest
     ResetWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResetWorkflowExecutionRequest -> Text
_ResetWorkflowExecutionRequest'namespace
           (\ ResetWorkflowExecutionRequest
x__ Text
y__
              -> ResetWorkflowExecutionRequest
x__ {_ResetWorkflowExecutionRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResetWorkflowExecutionRequest "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ResetWorkflowExecutionRequest
 -> f ResetWorkflowExecutionRequest)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResetWorkflowExecutionRequest -> Maybe WorkflowExecution)
-> (ResetWorkflowExecutionRequest
    -> Maybe WorkflowExecution -> ResetWorkflowExecutionRequest)
-> Lens
     ResetWorkflowExecutionRequest
     ResetWorkflowExecutionRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResetWorkflowExecutionRequest -> Maybe WorkflowExecution
_ResetWorkflowExecutionRequest'workflowExecution
           (\ ResetWorkflowExecutionRequest
x__ Maybe WorkflowExecution
y__
              -> ResetWorkflowExecutionRequest
x__ {_ResetWorkflowExecutionRequest'workflowExecution = y__}))
        (WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ResetWorkflowExecutionRequest "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ResetWorkflowExecutionRequest
 -> f ResetWorkflowExecutionRequest)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResetWorkflowExecutionRequest -> Maybe WorkflowExecution)
-> (ResetWorkflowExecutionRequest
    -> Maybe WorkflowExecution -> ResetWorkflowExecutionRequest)
-> Lens
     ResetWorkflowExecutionRequest
     ResetWorkflowExecutionRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResetWorkflowExecutionRequest -> Maybe WorkflowExecution
_ResetWorkflowExecutionRequest'workflowExecution
           (\ ResetWorkflowExecutionRequest
x__ Maybe WorkflowExecution
y__
              -> ResetWorkflowExecutionRequest
x__ {_ResetWorkflowExecutionRequest'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResetWorkflowExecutionRequest "reason" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "reason"
-> (Text -> f Text)
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
fieldOf Proxy# "reason"
_
    = ((Text -> f Text)
 -> ResetWorkflowExecutionRequest
 -> f ResetWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResetWorkflowExecutionRequest -> Text)
-> (ResetWorkflowExecutionRequest
    -> Text -> ResetWorkflowExecutionRequest)
-> Lens
     ResetWorkflowExecutionRequest
     ResetWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResetWorkflowExecutionRequest -> Text
_ResetWorkflowExecutionRequest'reason
           (\ ResetWorkflowExecutionRequest
x__ Text
y__ -> ResetWorkflowExecutionRequest
x__ {_ResetWorkflowExecutionRequest'reason = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResetWorkflowExecutionRequest "workflowTaskFinishEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskFinishEventId"
-> (Int64 -> f Int64)
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
fieldOf Proxy# "workflowTaskFinishEventId"
_
    = ((Int64 -> f Int64)
 -> ResetWorkflowExecutionRequest
 -> f ResetWorkflowExecutionRequest)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResetWorkflowExecutionRequest -> Int64)
-> (ResetWorkflowExecutionRequest
    -> Int64 -> ResetWorkflowExecutionRequest)
-> Lens
     ResetWorkflowExecutionRequest
     ResetWorkflowExecutionRequest
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResetWorkflowExecutionRequest -> Int64
_ResetWorkflowExecutionRequest'workflowTaskFinishEventId
           (\ ResetWorkflowExecutionRequest
x__ Int64
y__
              -> ResetWorkflowExecutionRequest
x__
                   {_ResetWorkflowExecutionRequest'workflowTaskFinishEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResetWorkflowExecutionRequest "requestId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestId"
-> (Text -> f Text)
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
fieldOf Proxy# "requestId"
_
    = ((Text -> f Text)
 -> ResetWorkflowExecutionRequest
 -> f ResetWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResetWorkflowExecutionRequest -> Text)
-> (ResetWorkflowExecutionRequest
    -> Text -> ResetWorkflowExecutionRequest)
-> Lens
     ResetWorkflowExecutionRequest
     ResetWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResetWorkflowExecutionRequest -> Text
_ResetWorkflowExecutionRequest'requestId
           (\ ResetWorkflowExecutionRequest
x__ Text
y__
              -> ResetWorkflowExecutionRequest
x__ {_ResetWorkflowExecutionRequest'requestId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResetWorkflowExecutionRequest "resetReapplyType" Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "resetReapplyType"
-> (ResetReapplyType -> f ResetReapplyType)
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
fieldOf Proxy# "resetReapplyType"
_
    = ((ResetReapplyType -> f ResetReapplyType)
 -> ResetWorkflowExecutionRequest
 -> f ResetWorkflowExecutionRequest)
-> ((ResetReapplyType -> f ResetReapplyType)
    -> ResetReapplyType -> f ResetReapplyType)
-> (ResetReapplyType -> f ResetReapplyType)
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResetWorkflowExecutionRequest -> ResetReapplyType)
-> (ResetWorkflowExecutionRequest
    -> ResetReapplyType -> ResetWorkflowExecutionRequest)
-> Lens
     ResetWorkflowExecutionRequest
     ResetWorkflowExecutionRequest
     ResetReapplyType
     ResetReapplyType
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResetWorkflowExecutionRequest -> ResetReapplyType
_ResetWorkflowExecutionRequest'resetReapplyType
           (\ ResetWorkflowExecutionRequest
x__ ResetReapplyType
y__
              -> ResetWorkflowExecutionRequest
x__ {_ResetWorkflowExecutionRequest'resetReapplyType = y__}))
        (ResetReapplyType -> f ResetReapplyType)
-> ResetReapplyType -> f ResetReapplyType
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResetWorkflowExecutionRequest "resetReapplyExcludeTypes" [Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyExcludeType] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "resetReapplyExcludeTypes"
-> ([ResetReapplyExcludeType] -> f [ResetReapplyExcludeType])
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
fieldOf Proxy# "resetReapplyExcludeTypes"
_
    = ((Vector ResetReapplyExcludeType
  -> f (Vector ResetReapplyExcludeType))
 -> ResetWorkflowExecutionRequest
 -> f ResetWorkflowExecutionRequest)
-> (([ResetReapplyExcludeType] -> f [ResetReapplyExcludeType])
    -> Vector ResetReapplyExcludeType
    -> f (Vector ResetReapplyExcludeType))
-> ([ResetReapplyExcludeType] -> f [ResetReapplyExcludeType])
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResetWorkflowExecutionRequest -> Vector ResetReapplyExcludeType)
-> (ResetWorkflowExecutionRequest
    -> Vector ResetReapplyExcludeType -> ResetWorkflowExecutionRequest)
-> Lens
     ResetWorkflowExecutionRequest
     ResetWorkflowExecutionRequest
     (Vector ResetReapplyExcludeType)
     (Vector ResetReapplyExcludeType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResetWorkflowExecutionRequest -> Vector ResetReapplyExcludeType
_ResetWorkflowExecutionRequest'resetReapplyExcludeTypes
           (\ ResetWorkflowExecutionRequest
x__ Vector ResetReapplyExcludeType
y__
              -> ResetWorkflowExecutionRequest
x__
                   {_ResetWorkflowExecutionRequest'resetReapplyExcludeTypes = y__}))
        ((Vector ResetReapplyExcludeType -> [ResetReapplyExcludeType])
-> (Vector ResetReapplyExcludeType
    -> [ResetReapplyExcludeType] -> Vector ResetReapplyExcludeType)
-> Lens
     (Vector ResetReapplyExcludeType)
     (Vector ResetReapplyExcludeType)
     [ResetReapplyExcludeType]
     [ResetReapplyExcludeType]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector ResetReapplyExcludeType -> [ResetReapplyExcludeType]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector ResetReapplyExcludeType
_ [ResetReapplyExcludeType]
y__ -> [ResetReapplyExcludeType] -> Vector ResetReapplyExcludeType
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [ResetReapplyExcludeType]
y__))
instance Data.ProtoLens.Field.HasField ResetWorkflowExecutionRequest "vec'resetReapplyExcludeTypes" (Data.Vector.Vector Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyExcludeType) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'resetReapplyExcludeTypes"
-> (Vector ResetReapplyExcludeType
    -> f (Vector ResetReapplyExcludeType))
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
fieldOf Proxy# "vec'resetReapplyExcludeTypes"
_
    = ((Vector ResetReapplyExcludeType
  -> f (Vector ResetReapplyExcludeType))
 -> ResetWorkflowExecutionRequest
 -> f ResetWorkflowExecutionRequest)
-> ((Vector ResetReapplyExcludeType
     -> f (Vector ResetReapplyExcludeType))
    -> Vector ResetReapplyExcludeType
    -> f (Vector ResetReapplyExcludeType))
-> (Vector ResetReapplyExcludeType
    -> f (Vector ResetReapplyExcludeType))
-> ResetWorkflowExecutionRequest
-> f ResetWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResetWorkflowExecutionRequest -> Vector ResetReapplyExcludeType)
-> (ResetWorkflowExecutionRequest
    -> Vector ResetReapplyExcludeType -> ResetWorkflowExecutionRequest)
-> Lens
     ResetWorkflowExecutionRequest
     ResetWorkflowExecutionRequest
     (Vector ResetReapplyExcludeType)
     (Vector ResetReapplyExcludeType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResetWorkflowExecutionRequest -> Vector ResetReapplyExcludeType
_ResetWorkflowExecutionRequest'resetReapplyExcludeTypes
           (\ ResetWorkflowExecutionRequest
x__ Vector ResetReapplyExcludeType
y__
              -> ResetWorkflowExecutionRequest
x__
                   {_ResetWorkflowExecutionRequest'resetReapplyExcludeTypes = y__}))
        (Vector ResetReapplyExcludeType
 -> f (Vector ResetReapplyExcludeType))
-> Vector ResetReapplyExcludeType
-> f (Vector ResetReapplyExcludeType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ResetWorkflowExecutionRequest where
  messageName :: Proxy ResetWorkflowExecutionRequest -> Text
messageName Proxy ResetWorkflowExecutionRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ResetWorkflowExecutionRequest"
  packedMessageDescriptor :: Proxy ResetWorkflowExecutionRequest -> ByteString
packedMessageDescriptor Proxy ResetWorkflowExecutionRequest
_
    = ByteString
"\n\
      \\GSResetWorkflowExecutionRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2X\n\
      \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2\SYN\n\
      \\ACKreason\CAN\ETX \SOH(\tR\ACKreason\DC2@\n\
      \\GSworkflow_task_finish_event_id\CAN\EOT \SOH(\ETXR\EMworkflowTaskFinishEventId\DC2\GS\n\
      \\n\
      \request_id\CAN\ENQ \SOH(\tR\trequestId\DC2U\n\
      \\DC2reset_reapply_type\CAN\ACK \SOH(\SO2'.temporal.api.enums.v1.ResetReapplyTypeR\DLEresetReapplyType\DC2m\n\
      \\ESCreset_reapply_exclude_types\CAN\a \ETX(\SO2..temporal.api.enums.v1.ResetReapplyExcludeTypeR\CANresetReapplyExcludeTypes"
  packedFileDescriptor :: Proxy ResetWorkflowExecutionRequest -> ByteString
packedFileDescriptor Proxy ResetWorkflowExecutionRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ResetWorkflowExecutionRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor ResetWorkflowExecutionRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ResetWorkflowExecutionRequest Text
-> FieldDescriptor ResetWorkflowExecutionRequest
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
     ResetWorkflowExecutionRequest
     ResetWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor ResetWorkflowExecutionRequest 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 ResetWorkflowExecutionRequest
        workflowExecution__field_descriptor :: FieldDescriptor ResetWorkflowExecutionRequest
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor ResetWorkflowExecutionRequest WorkflowExecution
-> FieldDescriptor ResetWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
              (Lens
  ResetWorkflowExecutionRequest
  ResetWorkflowExecutionRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor ResetWorkflowExecutionRequest WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor ResetWorkflowExecutionRequest
        reason__field_descriptor :: FieldDescriptor ResetWorkflowExecutionRequest
reason__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ResetWorkflowExecutionRequest Text
-> FieldDescriptor ResetWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"reason"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     ResetWorkflowExecutionRequest
     ResetWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor ResetWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reason")) ::
              Data.ProtoLens.FieldDescriptor ResetWorkflowExecutionRequest
        workflowTaskFinishEventId__field_descriptor :: FieldDescriptor ResetWorkflowExecutionRequest
workflowTaskFinishEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ResetWorkflowExecutionRequest Int64
-> FieldDescriptor ResetWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_finish_event_id"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens
     ResetWorkflowExecutionRequest
     ResetWorkflowExecutionRequest
     Int64
     Int64
-> FieldAccessor ResetWorkflowExecutionRequest Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"workflowTaskFinishEventId")) ::
              Data.ProtoLens.FieldDescriptor ResetWorkflowExecutionRequest
        requestId__field_descriptor :: FieldDescriptor ResetWorkflowExecutionRequest
requestId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ResetWorkflowExecutionRequest Text
-> FieldDescriptor ResetWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     ResetWorkflowExecutionRequest
     ResetWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor ResetWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId")) ::
              Data.ProtoLens.FieldDescriptor ResetWorkflowExecutionRequest
        resetReapplyType__field_descriptor :: FieldDescriptor ResetWorkflowExecutionRequest
resetReapplyType__field_descriptor
          = String
-> FieldTypeDescriptor ResetReapplyType
-> FieldAccessor ResetWorkflowExecutionRequest ResetReapplyType
-> FieldDescriptor ResetWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"reset_reapply_type"
              (ScalarField ResetReapplyType
-> FieldTypeDescriptor ResetReapplyType
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ResetReapplyType
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyType)
              (WireDefault ResetReapplyType
-> Lens
     ResetWorkflowExecutionRequest
     ResetWorkflowExecutionRequest
     ResetReapplyType
     ResetReapplyType
-> FieldAccessor ResetWorkflowExecutionRequest ResetReapplyType
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ResetReapplyType
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"resetReapplyType")) ::
              Data.ProtoLens.FieldDescriptor ResetWorkflowExecutionRequest
        resetReapplyExcludeTypes__field_descriptor :: FieldDescriptor ResetWorkflowExecutionRequest
resetReapplyExcludeTypes__field_descriptor
          = String
-> FieldTypeDescriptor ResetReapplyExcludeType
-> FieldAccessor
     ResetWorkflowExecutionRequest ResetReapplyExcludeType
-> FieldDescriptor ResetWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"reset_reapply_exclude_types"
              (ScalarField ResetReapplyExcludeType
-> FieldTypeDescriptor ResetReapplyExcludeType
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ResetReapplyExcludeType
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyExcludeType)
              (Packing
-> Lens' ResetWorkflowExecutionRequest [ResetReapplyExcludeType]
-> FieldAccessor
     ResetWorkflowExecutionRequest ResetReapplyExcludeType
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Packed
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"resetReapplyExcludeTypes")) ::
              Data.ProtoLens.FieldDescriptor ResetWorkflowExecutionRequest
      in
        [(Tag, FieldDescriptor ResetWorkflowExecutionRequest)]
-> Map Tag (FieldDescriptor ResetWorkflowExecutionRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ResetWorkflowExecutionRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ResetWorkflowExecutionRequest
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ResetWorkflowExecutionRequest
reason__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, 
            FieldDescriptor ResetWorkflowExecutionRequest
workflowTaskFinishEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ResetWorkflowExecutionRequest
requestId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ResetWorkflowExecutionRequest
resetReapplyType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor ResetWorkflowExecutionRequest
resetReapplyExcludeTypes__field_descriptor)]
  unknownFields :: Lens' ResetWorkflowExecutionRequest FieldSet
unknownFields
    = (ResetWorkflowExecutionRequest -> FieldSet)
-> (ResetWorkflowExecutionRequest
    -> FieldSet -> ResetWorkflowExecutionRequest)
-> Lens' ResetWorkflowExecutionRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ResetWorkflowExecutionRequest -> FieldSet
_ResetWorkflowExecutionRequest'_unknownFields
        (\ ResetWorkflowExecutionRequest
x__ FieldSet
y__
           -> ResetWorkflowExecutionRequest
x__ {_ResetWorkflowExecutionRequest'_unknownFields = y__})
  defMessage :: ResetWorkflowExecutionRequest
defMessage
    = ResetWorkflowExecutionRequest'_constructor
        {_ResetWorkflowExecutionRequest'namespace :: Text
_ResetWorkflowExecutionRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResetWorkflowExecutionRequest'workflowExecution :: Maybe WorkflowExecution
_ResetWorkflowExecutionRequest'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _ResetWorkflowExecutionRequest'reason :: Text
_ResetWorkflowExecutionRequest'reason = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResetWorkflowExecutionRequest'workflowTaskFinishEventId :: Int64
_ResetWorkflowExecutionRequest'workflowTaskFinishEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResetWorkflowExecutionRequest'requestId :: Text
_ResetWorkflowExecutionRequest'requestId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResetWorkflowExecutionRequest'resetReapplyType :: ResetReapplyType
_ResetWorkflowExecutionRequest'resetReapplyType = ResetReapplyType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResetWorkflowExecutionRequest'resetReapplyExcludeTypes :: Vector ResetReapplyExcludeType
_ResetWorkflowExecutionRequest'resetReapplyExcludeTypes = Vector ResetReapplyExcludeType
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ResetWorkflowExecutionRequest'_unknownFields :: FieldSet
_ResetWorkflowExecutionRequest'_unknownFields = []}
  parseMessage :: Parser ResetWorkflowExecutionRequest
parseMessage
    = let
        loop ::
          ResetWorkflowExecutionRequest
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Enums.V1.Reset.ResetReapplyExcludeType
             -> Data.ProtoLens.Encoding.Bytes.Parser ResetWorkflowExecutionRequest
        loop :: ResetWorkflowExecutionRequest
-> Growing Vector RealWorld ResetReapplyExcludeType
-> Parser ResetWorkflowExecutionRequest
loop ResetWorkflowExecutionRequest
x Growing Vector RealWorld ResetReapplyExcludeType
mutable'resetReapplyExcludeTypes
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'resetReapplyExcludeTypes <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                           (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                              mutable'resetReapplyExcludeTypes)
                      (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'resetReapplyExcludeTypes")
                              frozen'resetReapplyExcludeTypes x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                                  mutable'resetReapplyExcludeTypes
                        Word64
18
                          -> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                                  mutable'resetReapplyExcludeTypes
                        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
"reason"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"reason") y x)
                                  mutable'resetReapplyExcludeTypes
                        Word64
32
                          -> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"workflow_task_finish_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskFinishEventId") y x)
                                  mutable'resetReapplyExcludeTypes
                        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
"request_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x)
                                  mutable'resetReapplyExcludeTypes
                        Word64
48
                          -> do y <- Parser ResetReapplyType -> String -> Parser ResetReapplyType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> ResetReapplyType) -> Parser Int -> Parser ResetReapplyType
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> ResetReapplyType
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
"reset_reapply_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"resetReapplyType") y x)
                                  mutable'resetReapplyExcludeTypes
                        Word64
56
                          -> do !y <- Parser ResetReapplyExcludeType
-> String -> Parser ResetReapplyExcludeType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        ((Int -> ResetReapplyExcludeType)
-> Parser Int -> Parser ResetReapplyExcludeType
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                           Int -> ResetReapplyExcludeType
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
"reset_reapply_exclude_types"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'resetReapplyExcludeTypes y)
                                loop x v
                        Word64
58
                          -> do y <- do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                        Data.ProtoLens.Encoding.Bytes.isolate
                                          (Prelude.fromIntegral len)
                                          ((let
                                              ploop Growing v RealWorld a
qs
                                                = do packedEnd <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
                                                     if packedEnd then
                                                         Prelude.return qs
                                                     else
                                                         do !q <- (Data.ProtoLens.Encoding.Bytes.<?>)
                                                                    (Prelude.fmap
                                                                       Prelude.toEnum
                                                                       (Prelude.fmap
                                                                          Prelude.fromIntegral
                                                                          Data.ProtoLens.Encoding.Bytes.getVarInt))
                                                                    "reset_reapply_exclude_types"
                                                            qs' <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                                     (Data.ProtoLens.Encoding.Growing.append
                                                                        qs q)
                                                            ploop qs'
                                            in ploop)
                                             mutable'resetReapplyExcludeTypes)
                                loop x y
                        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'resetReapplyExcludeTypes
      in
        Parser ResetWorkflowExecutionRequest
-> String -> Parser ResetWorkflowExecutionRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'resetReapplyExcludeTypes <- IO (Growing Vector RealWorld ResetReapplyExcludeType)
-> Parser (Growing Vector RealWorld ResetReapplyExcludeType)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                    IO (Growing Vector RealWorld ResetReapplyExcludeType)
IO (Growing Vector (PrimState IO) ResetReapplyExcludeType)
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'resetReapplyExcludeTypes)
          String
"ResetWorkflowExecutionRequest"
  buildMessage :: ResetWorkflowExecutionRequest -> Builder
buildMessage
    = \ ResetWorkflowExecutionRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ResetWorkflowExecutionRequest
  ResetWorkflowExecutionRequest
  Text
  Text
-> ResetWorkflowExecutionRequest -> 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") ResetWorkflowExecutionRequest
_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 WorkflowExecution)
  ResetWorkflowExecutionRequest
  ResetWorkflowExecutionRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> ResetWorkflowExecutionRequest -> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution") ResetWorkflowExecutionRequest
_x
                 of
                   Maybe WorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just WorkflowExecution
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v = FoldLike
  Text
  ResetWorkflowExecutionRequest
  ResetWorkflowExecutionRequest
  Text
  Text
-> ResetWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reason") ResetWorkflowExecutionRequest
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Int64
_v
                           = FoldLike
  Int64
  ResetWorkflowExecutionRequest
  ResetWorkflowExecutionRequest
  Int64
  Int64
-> ResetWorkflowExecutionRequest -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"workflowTaskFinishEventId") ResetWorkflowExecutionRequest
_x
                       in
                         if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
32)
                               ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Text
_v = FoldLike
  Text
  ResetWorkflowExecutionRequest
  ResetWorkflowExecutionRequest
  Text
  Text
-> ResetWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId") ResetWorkflowExecutionRequest
_x
                          in
                            if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                  ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     (\ ByteString
bs
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                     Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: ResetReapplyType
_v
                                 = FoldLike
  ResetReapplyType
  ResetWorkflowExecutionRequest
  ResetWorkflowExecutionRequest
  ResetReapplyType
  ResetReapplyType
-> ResetWorkflowExecutionRequest -> ResetReapplyType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"resetReapplyType") ResetWorkflowExecutionRequest
_x
                             in
                               if ResetReapplyType -> ResetReapplyType -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ResetReapplyType
_v ResetReapplyType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
48)
                                     ((Int -> Builder)
-> (ResetReapplyType -> Int) -> ResetReapplyType -> 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)
                                        ResetReapplyType -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum ResetReapplyType
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  p :: Vector ResetReapplyExcludeType
p = FoldLike
  (Vector ResetReapplyExcludeType)
  ResetWorkflowExecutionRequest
  ResetWorkflowExecutionRequest
  (Vector ResetReapplyExcludeType)
  (Vector ResetReapplyExcludeType)
-> ResetWorkflowExecutionRequest -> Vector ResetReapplyExcludeType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'resetReapplyExcludeTypes")
                                        ResetWorkflowExecutionRequest
_x
                                in
                                  if Vector ResetReapplyExcludeType -> Bool
forall (v :: * -> *) a. Vector v a => v a -> Bool
Data.Vector.Generic.null Vector ResetReapplyExcludeType
p then
                                      Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  else
                                      Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                        ((\ ByteString
bs
                                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                       (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                           (Builder -> ByteString
Data.ProtoLens.Encoding.Bytes.runBuilder
                                              ((ResetReapplyExcludeType -> Builder)
-> Vector ResetReapplyExcludeType -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                                 ((Int -> Builder)
-> (ResetReapplyExcludeType -> Int)
-> ResetReapplyExcludeType
-> 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)
                                                    ResetReapplyExcludeType -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum)
                                                 Vector ResetReapplyExcludeType
p))))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike
  FieldSet
  ResetWorkflowExecutionRequest
  ResetWorkflowExecutionRequest
  FieldSet
  FieldSet
-> ResetWorkflowExecutionRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ResetWorkflowExecutionRequest
  ResetWorkflowExecutionRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResetWorkflowExecutionRequest FieldSet
Data.ProtoLens.unknownFields ResetWorkflowExecutionRequest
_x))))))))
instance Control.DeepSeq.NFData ResetWorkflowExecutionRequest where
  rnf :: ResetWorkflowExecutionRequest -> ()
rnf
    = \ ResetWorkflowExecutionRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ResetWorkflowExecutionRequest -> FieldSet
_ResetWorkflowExecutionRequest'_unknownFields ResetWorkflowExecutionRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ResetWorkflowExecutionRequest -> Text
_ResetWorkflowExecutionRequest'namespace ResetWorkflowExecutionRequest
x__)
                (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ResetWorkflowExecutionRequest -> Maybe WorkflowExecution
_ResetWorkflowExecutionRequest'workflowExecution ResetWorkflowExecutionRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ResetWorkflowExecutionRequest -> Text
_ResetWorkflowExecutionRequest'reason ResetWorkflowExecutionRequest
x__)
                      (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ResetWorkflowExecutionRequest -> Int64
_ResetWorkflowExecutionRequest'workflowTaskFinishEventId ResetWorkflowExecutionRequest
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ResetWorkflowExecutionRequest -> Text
_ResetWorkflowExecutionRequest'requestId ResetWorkflowExecutionRequest
x__)
                            (ResetReapplyType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ResetWorkflowExecutionRequest -> ResetReapplyType
_ResetWorkflowExecutionRequest'resetReapplyType ResetWorkflowExecutionRequest
x__)
                               (Vector ResetReapplyExcludeType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (ResetWorkflowExecutionRequest -> Vector ResetReapplyExcludeType
_ResetWorkflowExecutionRequest'resetReapplyExcludeTypes ResetWorkflowExecutionRequest
x__)
                                  ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.runId' @:: Lens' ResetWorkflowExecutionResponse Data.Text.Text@ -}
data ResetWorkflowExecutionResponse
  = ResetWorkflowExecutionResponse'_constructor {ResetWorkflowExecutionResponse -> Text
_ResetWorkflowExecutionResponse'runId :: !Data.Text.Text,
                                                 ResetWorkflowExecutionResponse -> FieldSet
_ResetWorkflowExecutionResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Bool
(ResetWorkflowExecutionResponse
 -> ResetWorkflowExecutionResponse -> Bool)
-> (ResetWorkflowExecutionResponse
    -> ResetWorkflowExecutionResponse -> Bool)
-> Eq ResetWorkflowExecutionResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Bool
== :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Bool
$c/= :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Bool
/= :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Bool
Prelude.Eq, Eq ResetWorkflowExecutionResponse
Eq ResetWorkflowExecutionResponse =>
(ResetWorkflowExecutionResponse
 -> ResetWorkflowExecutionResponse -> Ordering)
-> (ResetWorkflowExecutionResponse
    -> ResetWorkflowExecutionResponse -> Bool)
-> (ResetWorkflowExecutionResponse
    -> ResetWorkflowExecutionResponse -> Bool)
-> (ResetWorkflowExecutionResponse
    -> ResetWorkflowExecutionResponse -> Bool)
-> (ResetWorkflowExecutionResponse
    -> ResetWorkflowExecutionResponse -> Bool)
-> (ResetWorkflowExecutionResponse
    -> ResetWorkflowExecutionResponse
    -> ResetWorkflowExecutionResponse)
-> (ResetWorkflowExecutionResponse
    -> ResetWorkflowExecutionResponse
    -> ResetWorkflowExecutionResponse)
-> Ord ResetWorkflowExecutionResponse
ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Bool
ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Ordering
ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> ResetWorkflowExecutionResponse
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 :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Ordering
compare :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Ordering
$c< :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Bool
< :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Bool
$c<= :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Bool
<= :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Bool
$c> :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Bool
> :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Bool
$c>= :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Bool
>= :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> Bool
$cmax :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> ResetWorkflowExecutionResponse
max :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> ResetWorkflowExecutionResponse
$cmin :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> ResetWorkflowExecutionResponse
min :: ResetWorkflowExecutionResponse
-> ResetWorkflowExecutionResponse -> ResetWorkflowExecutionResponse
Prelude.Ord)
instance Prelude.Show ResetWorkflowExecutionResponse where
  showsPrec :: Int -> ResetWorkflowExecutionResponse -> ShowS
showsPrec Int
_ ResetWorkflowExecutionResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ResetWorkflowExecutionResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResetWorkflowExecutionResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ResetWorkflowExecutionResponse "runId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "runId"
-> (Text -> f Text)
-> ResetWorkflowExecutionResponse
-> f ResetWorkflowExecutionResponse
fieldOf Proxy# "runId"
_
    = ((Text -> f Text)
 -> ResetWorkflowExecutionResponse
 -> f ResetWorkflowExecutionResponse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ResetWorkflowExecutionResponse
-> f ResetWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ResetWorkflowExecutionResponse -> Text)
-> (ResetWorkflowExecutionResponse
    -> Text -> ResetWorkflowExecutionResponse)
-> Lens
     ResetWorkflowExecutionResponse
     ResetWorkflowExecutionResponse
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ResetWorkflowExecutionResponse -> Text
_ResetWorkflowExecutionResponse'runId
           (\ ResetWorkflowExecutionResponse
x__ Text
y__ -> ResetWorkflowExecutionResponse
x__ {_ResetWorkflowExecutionResponse'runId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ResetWorkflowExecutionResponse where
  messageName :: Proxy ResetWorkflowExecutionResponse -> Text
messageName Proxy ResetWorkflowExecutionResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ResetWorkflowExecutionResponse"
  packedMessageDescriptor :: Proxy ResetWorkflowExecutionResponse -> ByteString
packedMessageDescriptor Proxy ResetWorkflowExecutionResponse
_
    = ByteString
"\n\
      \\RSResetWorkflowExecutionResponse\DC2\NAK\n\
      \\ACKrun_id\CAN\SOH \SOH(\tR\ENQrunId"
  packedFileDescriptor :: Proxy ResetWorkflowExecutionResponse -> ByteString
packedFileDescriptor Proxy ResetWorkflowExecutionResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ResetWorkflowExecutionResponse)
fieldsByTag
    = let
        runId__field_descriptor :: FieldDescriptor ResetWorkflowExecutionResponse
runId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ResetWorkflowExecutionResponse Text
-> FieldDescriptor ResetWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"run_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     ResetWorkflowExecutionResponse
     ResetWorkflowExecutionResponse
     Text
     Text
-> FieldAccessor ResetWorkflowExecutionResponse Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId")) ::
              Data.ProtoLens.FieldDescriptor ResetWorkflowExecutionResponse
      in
        [(Tag, FieldDescriptor ResetWorkflowExecutionResponse)]
-> Map Tag (FieldDescriptor ResetWorkflowExecutionResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ResetWorkflowExecutionResponse
runId__field_descriptor)]
  unknownFields :: Lens' ResetWorkflowExecutionResponse FieldSet
unknownFields
    = (ResetWorkflowExecutionResponse -> FieldSet)
-> (ResetWorkflowExecutionResponse
    -> FieldSet -> ResetWorkflowExecutionResponse)
-> Lens' ResetWorkflowExecutionResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ResetWorkflowExecutionResponse -> FieldSet
_ResetWorkflowExecutionResponse'_unknownFields
        (\ ResetWorkflowExecutionResponse
x__ FieldSet
y__
           -> ResetWorkflowExecutionResponse
x__ {_ResetWorkflowExecutionResponse'_unknownFields = y__})
  defMessage :: ResetWorkflowExecutionResponse
defMessage
    = ResetWorkflowExecutionResponse'_constructor
        {_ResetWorkflowExecutionResponse'runId :: Text
_ResetWorkflowExecutionResponse'runId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ResetWorkflowExecutionResponse'_unknownFields :: FieldSet
_ResetWorkflowExecutionResponse'_unknownFields = []}
  parseMessage :: Parser ResetWorkflowExecutionResponse
parseMessage
    = let
        loop ::
          ResetWorkflowExecutionResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser ResetWorkflowExecutionResponse
        loop :: ResetWorkflowExecutionResponse
-> Parser ResetWorkflowExecutionResponse
loop ResetWorkflowExecutionResponse
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"run_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"runId") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser ResetWorkflowExecutionResponse
-> String -> Parser ResetWorkflowExecutionResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ResetWorkflowExecutionResponse
-> Parser ResetWorkflowExecutionResponse
loop ResetWorkflowExecutionResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ResetWorkflowExecutionResponse"
  buildMessage :: ResetWorkflowExecutionResponse -> Builder
buildMessage
    = \ ResetWorkflowExecutionResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ResetWorkflowExecutionResponse
  ResetWorkflowExecutionResponse
  Text
  Text
-> ResetWorkflowExecutionResponse -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId") ResetWorkflowExecutionResponse
_x
              in
                if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                      ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         (\ ByteString
bs
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  ResetWorkflowExecutionResponse
  ResetWorkflowExecutionResponse
  FieldSet
  FieldSet
-> ResetWorkflowExecutionResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ResetWorkflowExecutionResponse
  ResetWorkflowExecutionResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResetWorkflowExecutionResponse FieldSet
Data.ProtoLens.unknownFields ResetWorkflowExecutionResponse
_x))
instance Control.DeepSeq.NFData ResetWorkflowExecutionResponse where
  rnf :: ResetWorkflowExecutionResponse -> ()
rnf
    = \ ResetWorkflowExecutionResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ResetWorkflowExecutionResponse -> FieldSet
_ResetWorkflowExecutionResponse'_unknownFields ResetWorkflowExecutionResponse
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ResetWorkflowExecutionResponse -> Text
_ResetWorkflowExecutionResponse'runId ResetWorkflowExecutionResponse
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' RespondActivityTaskCanceledByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowId' @:: Lens' RespondActivityTaskCanceledByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.runId' @:: Lens' RespondActivityTaskCanceledByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.activityId' @:: Lens' RespondActivityTaskCanceledByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.details' @:: Lens' RespondActivityTaskCanceledByIdRequest Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'details' @:: Lens' RespondActivityTaskCanceledByIdRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' RespondActivityTaskCanceledByIdRequest Data.Text.Text@ -}
data RespondActivityTaskCanceledByIdRequest
  = RespondActivityTaskCanceledByIdRequest'_constructor {RespondActivityTaskCanceledByIdRequest -> Text
_RespondActivityTaskCanceledByIdRequest'namespace :: !Data.Text.Text,
                                                         RespondActivityTaskCanceledByIdRequest -> Text
_RespondActivityTaskCanceledByIdRequest'workflowId :: !Data.Text.Text,
                                                         RespondActivityTaskCanceledByIdRequest -> Text
_RespondActivityTaskCanceledByIdRequest'runId :: !Data.Text.Text,
                                                         RespondActivityTaskCanceledByIdRequest -> Text
_RespondActivityTaskCanceledByIdRequest'activityId :: !Data.Text.Text,
                                                         RespondActivityTaskCanceledByIdRequest -> Maybe Payloads
_RespondActivityTaskCanceledByIdRequest'details :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                         RespondActivityTaskCanceledByIdRequest -> Text
_RespondActivityTaskCanceledByIdRequest'identity :: !Data.Text.Text,
                                                         RespondActivityTaskCanceledByIdRequest -> FieldSet
_RespondActivityTaskCanceledByIdRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Bool
(RespondActivityTaskCanceledByIdRequest
 -> RespondActivityTaskCanceledByIdRequest -> Bool)
-> (RespondActivityTaskCanceledByIdRequest
    -> RespondActivityTaskCanceledByIdRequest -> Bool)
-> Eq RespondActivityTaskCanceledByIdRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Bool
== :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Bool
$c/= :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Bool
/= :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Bool
Prelude.Eq, Eq RespondActivityTaskCanceledByIdRequest
Eq RespondActivityTaskCanceledByIdRequest =>
(RespondActivityTaskCanceledByIdRequest
 -> RespondActivityTaskCanceledByIdRequest -> Ordering)
-> (RespondActivityTaskCanceledByIdRequest
    -> RespondActivityTaskCanceledByIdRequest -> Bool)
-> (RespondActivityTaskCanceledByIdRequest
    -> RespondActivityTaskCanceledByIdRequest -> Bool)
-> (RespondActivityTaskCanceledByIdRequest
    -> RespondActivityTaskCanceledByIdRequest -> Bool)
-> (RespondActivityTaskCanceledByIdRequest
    -> RespondActivityTaskCanceledByIdRequest -> Bool)
-> (RespondActivityTaskCanceledByIdRequest
    -> RespondActivityTaskCanceledByIdRequest
    -> RespondActivityTaskCanceledByIdRequest)
-> (RespondActivityTaskCanceledByIdRequest
    -> RespondActivityTaskCanceledByIdRequest
    -> RespondActivityTaskCanceledByIdRequest)
-> Ord RespondActivityTaskCanceledByIdRequest
RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Bool
RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Ordering
RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest
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 :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Ordering
compare :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Ordering
$c< :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Bool
< :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Bool
$c<= :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Bool
<= :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Bool
$c> :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Bool
> :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Bool
$c>= :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Bool
>= :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest -> Bool
$cmax :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest
max :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest
$cmin :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest
min :: RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest
-> RespondActivityTaskCanceledByIdRequest
Prelude.Ord)
instance Prelude.Show RespondActivityTaskCanceledByIdRequest where
  showsPrec :: Int -> RespondActivityTaskCanceledByIdRequest -> ShowS
showsPrec Int
_ RespondActivityTaskCanceledByIdRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondActivityTaskCanceledByIdRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondActivityTaskCanceledByIdRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RespondActivityTaskCanceledByIdRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RespondActivityTaskCanceledByIdRequest
-> f RespondActivityTaskCanceledByIdRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RespondActivityTaskCanceledByIdRequest
 -> f RespondActivityTaskCanceledByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskCanceledByIdRequest
-> f RespondActivityTaskCanceledByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCanceledByIdRequest -> Text)
-> (RespondActivityTaskCanceledByIdRequest
    -> Text -> RespondActivityTaskCanceledByIdRequest)
-> Lens
     RespondActivityTaskCanceledByIdRequest
     RespondActivityTaskCanceledByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCanceledByIdRequest -> Text
_RespondActivityTaskCanceledByIdRequest'namespace
           (\ RespondActivityTaskCanceledByIdRequest
x__ Text
y__
              -> RespondActivityTaskCanceledByIdRequest
x__ {_RespondActivityTaskCanceledByIdRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCanceledByIdRequest "workflowId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowId"
-> (Text -> f Text)
-> RespondActivityTaskCanceledByIdRequest
-> f RespondActivityTaskCanceledByIdRequest
fieldOf Proxy# "workflowId"
_
    = ((Text -> f Text)
 -> RespondActivityTaskCanceledByIdRequest
 -> f RespondActivityTaskCanceledByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskCanceledByIdRequest
-> f RespondActivityTaskCanceledByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCanceledByIdRequest -> Text)
-> (RespondActivityTaskCanceledByIdRequest
    -> Text -> RespondActivityTaskCanceledByIdRequest)
-> Lens
     RespondActivityTaskCanceledByIdRequest
     RespondActivityTaskCanceledByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCanceledByIdRequest -> Text
_RespondActivityTaskCanceledByIdRequest'workflowId
           (\ RespondActivityTaskCanceledByIdRequest
x__ Text
y__
              -> RespondActivityTaskCanceledByIdRequest
x__ {_RespondActivityTaskCanceledByIdRequest'workflowId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCanceledByIdRequest "runId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "runId"
-> (Text -> f Text)
-> RespondActivityTaskCanceledByIdRequest
-> f RespondActivityTaskCanceledByIdRequest
fieldOf Proxy# "runId"
_
    = ((Text -> f Text)
 -> RespondActivityTaskCanceledByIdRequest
 -> f RespondActivityTaskCanceledByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskCanceledByIdRequest
-> f RespondActivityTaskCanceledByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCanceledByIdRequest -> Text)
-> (RespondActivityTaskCanceledByIdRequest
    -> Text -> RespondActivityTaskCanceledByIdRequest)
-> Lens
     RespondActivityTaskCanceledByIdRequest
     RespondActivityTaskCanceledByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCanceledByIdRequest -> Text
_RespondActivityTaskCanceledByIdRequest'runId
           (\ RespondActivityTaskCanceledByIdRequest
x__ Text
y__
              -> RespondActivityTaskCanceledByIdRequest
x__ {_RespondActivityTaskCanceledByIdRequest'runId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCanceledByIdRequest "activityId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityId"
-> (Text -> f Text)
-> RespondActivityTaskCanceledByIdRequest
-> f RespondActivityTaskCanceledByIdRequest
fieldOf Proxy# "activityId"
_
    = ((Text -> f Text)
 -> RespondActivityTaskCanceledByIdRequest
 -> f RespondActivityTaskCanceledByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskCanceledByIdRequest
-> f RespondActivityTaskCanceledByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCanceledByIdRequest -> Text)
-> (RespondActivityTaskCanceledByIdRequest
    -> Text -> RespondActivityTaskCanceledByIdRequest)
-> Lens
     RespondActivityTaskCanceledByIdRequest
     RespondActivityTaskCanceledByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCanceledByIdRequest -> Text
_RespondActivityTaskCanceledByIdRequest'activityId
           (\ RespondActivityTaskCanceledByIdRequest
x__ Text
y__
              -> RespondActivityTaskCanceledByIdRequest
x__ {_RespondActivityTaskCanceledByIdRequest'activityId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCanceledByIdRequest "details" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "details"
-> (Payloads -> f Payloads)
-> RespondActivityTaskCanceledByIdRequest
-> f RespondActivityTaskCanceledByIdRequest
fieldOf Proxy# "details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RespondActivityTaskCanceledByIdRequest
 -> f RespondActivityTaskCanceledByIdRequest)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> RespondActivityTaskCanceledByIdRequest
-> f RespondActivityTaskCanceledByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCanceledByIdRequest -> Maybe Payloads)
-> (RespondActivityTaskCanceledByIdRequest
    -> Maybe Payloads -> RespondActivityTaskCanceledByIdRequest)
-> Lens
     RespondActivityTaskCanceledByIdRequest
     RespondActivityTaskCanceledByIdRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCanceledByIdRequest -> Maybe Payloads
_RespondActivityTaskCanceledByIdRequest'details
           (\ RespondActivityTaskCanceledByIdRequest
x__ Maybe Payloads
y__
              -> RespondActivityTaskCanceledByIdRequest
x__ {_RespondActivityTaskCanceledByIdRequest'details = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondActivityTaskCanceledByIdRequest "maybe'details" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'details"
-> (Maybe Payloads -> f (Maybe Payloads))
-> RespondActivityTaskCanceledByIdRequest
-> f RespondActivityTaskCanceledByIdRequest
fieldOf Proxy# "maybe'details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RespondActivityTaskCanceledByIdRequest
 -> f RespondActivityTaskCanceledByIdRequest)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> RespondActivityTaskCanceledByIdRequest
-> f RespondActivityTaskCanceledByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCanceledByIdRequest -> Maybe Payloads)
-> (RespondActivityTaskCanceledByIdRequest
    -> Maybe Payloads -> RespondActivityTaskCanceledByIdRequest)
-> Lens
     RespondActivityTaskCanceledByIdRequest
     RespondActivityTaskCanceledByIdRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCanceledByIdRequest -> Maybe Payloads
_RespondActivityTaskCanceledByIdRequest'details
           (\ RespondActivityTaskCanceledByIdRequest
x__ Maybe Payloads
y__
              -> RespondActivityTaskCanceledByIdRequest
x__ {_RespondActivityTaskCanceledByIdRequest'details = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCanceledByIdRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> RespondActivityTaskCanceledByIdRequest
-> f RespondActivityTaskCanceledByIdRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> RespondActivityTaskCanceledByIdRequest
 -> f RespondActivityTaskCanceledByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskCanceledByIdRequest
-> f RespondActivityTaskCanceledByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCanceledByIdRequest -> Text)
-> (RespondActivityTaskCanceledByIdRequest
    -> Text -> RespondActivityTaskCanceledByIdRequest)
-> Lens
     RespondActivityTaskCanceledByIdRequest
     RespondActivityTaskCanceledByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCanceledByIdRequest -> Text
_RespondActivityTaskCanceledByIdRequest'identity
           (\ RespondActivityTaskCanceledByIdRequest
x__ Text
y__
              -> RespondActivityTaskCanceledByIdRequest
x__ {_RespondActivityTaskCanceledByIdRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RespondActivityTaskCanceledByIdRequest where
  messageName :: Proxy RespondActivityTaskCanceledByIdRequest -> Text
messageName Proxy RespondActivityTaskCanceledByIdRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondActivityTaskCanceledByIdRequest"
  packedMessageDescriptor :: Proxy RespondActivityTaskCanceledByIdRequest -> ByteString
packedMessageDescriptor Proxy RespondActivityTaskCanceledByIdRequest
_
    = ByteString
"\n\
      \&RespondActivityTaskCanceledByIdRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
      \\vworkflow_id\CAN\STX \SOH(\tR\n\
      \workflowId\DC2\NAK\n\
      \\ACKrun_id\CAN\ETX \SOH(\tR\ENQrunId\DC2\US\n\
      \\vactivity_id\CAN\EOT \SOH(\tR\n\
      \activityId\DC2:\n\
      \\adetails\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2\SUB\n\
      \\bidentity\CAN\ACK \SOH(\tR\bidentity"
  packedFileDescriptor :: Proxy RespondActivityTaskCanceledByIdRequest -> ByteString
packedFileDescriptor Proxy RespondActivityTaskCanceledByIdRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondActivityTaskCanceledByIdRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor RespondActivityTaskCanceledByIdRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskCanceledByIdRequest Text
-> FieldDescriptor RespondActivityTaskCanceledByIdRequest
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
     RespondActivityTaskCanceledByIdRequest
     RespondActivityTaskCanceledByIdRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskCanceledByIdRequest 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 RespondActivityTaskCanceledByIdRequest
        workflowId__field_descriptor :: FieldDescriptor RespondActivityTaskCanceledByIdRequest
workflowId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskCanceledByIdRequest Text
-> FieldDescriptor RespondActivityTaskCanceledByIdRequest
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
     RespondActivityTaskCanceledByIdRequest
     RespondActivityTaskCanceledByIdRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskCanceledByIdRequest 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 RespondActivityTaskCanceledByIdRequest
        runId__field_descriptor :: FieldDescriptor RespondActivityTaskCanceledByIdRequest
runId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskCanceledByIdRequest Text
-> FieldDescriptor RespondActivityTaskCanceledByIdRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"run_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondActivityTaskCanceledByIdRequest
     RespondActivityTaskCanceledByIdRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskCanceledByIdRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskCanceledByIdRequest
        activityId__field_descriptor :: FieldDescriptor RespondActivityTaskCanceledByIdRequest
activityId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskCanceledByIdRequest Text
-> FieldDescriptor RespondActivityTaskCanceledByIdRequest
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
     RespondActivityTaskCanceledByIdRequest
     RespondActivityTaskCanceledByIdRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskCanceledByIdRequest 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 RespondActivityTaskCanceledByIdRequest
        details__field_descriptor :: FieldDescriptor RespondActivityTaskCanceledByIdRequest
details__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor RespondActivityTaskCanceledByIdRequest Payloads
-> FieldDescriptor RespondActivityTaskCanceledByIdRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"details"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  RespondActivityTaskCanceledByIdRequest
  RespondActivityTaskCanceledByIdRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor RespondActivityTaskCanceledByIdRequest Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'details")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskCanceledByIdRequest
        identity__field_descriptor :: FieldDescriptor RespondActivityTaskCanceledByIdRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskCanceledByIdRequest Text
-> FieldDescriptor RespondActivityTaskCanceledByIdRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondActivityTaskCanceledByIdRequest
     RespondActivityTaskCanceledByIdRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskCanceledByIdRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskCanceledByIdRequest
      in
        [(Tag, FieldDescriptor RespondActivityTaskCanceledByIdRequest)]
-> Map Tag (FieldDescriptor RespondActivityTaskCanceledByIdRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RespondActivityTaskCanceledByIdRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RespondActivityTaskCanceledByIdRequest
workflowId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RespondActivityTaskCanceledByIdRequest
runId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor RespondActivityTaskCanceledByIdRequest
activityId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor RespondActivityTaskCanceledByIdRequest
details__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor RespondActivityTaskCanceledByIdRequest
identity__field_descriptor)]
  unknownFields :: Lens' RespondActivityTaskCanceledByIdRequest FieldSet
unknownFields
    = (RespondActivityTaskCanceledByIdRequest -> FieldSet)
-> (RespondActivityTaskCanceledByIdRequest
    -> FieldSet -> RespondActivityTaskCanceledByIdRequest)
-> Lens' RespondActivityTaskCanceledByIdRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondActivityTaskCanceledByIdRequest -> FieldSet
_RespondActivityTaskCanceledByIdRequest'_unknownFields
        (\ RespondActivityTaskCanceledByIdRequest
x__ FieldSet
y__
           -> RespondActivityTaskCanceledByIdRequest
x__
                {_RespondActivityTaskCanceledByIdRequest'_unknownFields = y__})
  defMessage :: RespondActivityTaskCanceledByIdRequest
defMessage
    = RespondActivityTaskCanceledByIdRequest'_constructor
        {_RespondActivityTaskCanceledByIdRequest'namespace :: Text
_RespondActivityTaskCanceledByIdRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCanceledByIdRequest'workflowId :: Text
_RespondActivityTaskCanceledByIdRequest'workflowId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCanceledByIdRequest'runId :: Text
_RespondActivityTaskCanceledByIdRequest'runId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCanceledByIdRequest'activityId :: Text
_RespondActivityTaskCanceledByIdRequest'activityId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCanceledByIdRequest'details :: Maybe Payloads
_RespondActivityTaskCanceledByIdRequest'details = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _RespondActivityTaskCanceledByIdRequest'identity :: Text
_RespondActivityTaskCanceledByIdRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCanceledByIdRequest'_unknownFields :: FieldSet
_RespondActivityTaskCanceledByIdRequest'_unknownFields = []}
  parseMessage :: Parser RespondActivityTaskCanceledByIdRequest
parseMessage
    = let
        loop ::
          RespondActivityTaskCanceledByIdRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondActivityTaskCanceledByIdRequest
        loop :: RespondActivityTaskCanceledByIdRequest
-> Parser RespondActivityTaskCanceledByIdRequest
loop RespondActivityTaskCanceledByIdRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"workflow_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"workflowId") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"run_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"runId") y x)
                        Word64
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
"activity_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"activityId") y x)
                        Word64
42
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"details"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"details") y x)
                        Word64
50
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser RespondActivityTaskCanceledByIdRequest
-> String -> Parser RespondActivityTaskCanceledByIdRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondActivityTaskCanceledByIdRequest
-> Parser RespondActivityTaskCanceledByIdRequest
loop RespondActivityTaskCanceledByIdRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondActivityTaskCanceledByIdRequest"
  buildMessage :: RespondActivityTaskCanceledByIdRequest -> Builder
buildMessage
    = \ RespondActivityTaskCanceledByIdRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  RespondActivityTaskCanceledByIdRequest
  RespondActivityTaskCanceledByIdRequest
  Text
  Text
-> RespondActivityTaskCanceledByIdRequest -> 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") RespondActivityTaskCanceledByIdRequest
_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
  RespondActivityTaskCanceledByIdRequest
  RespondActivityTaskCanceledByIdRequest
  Text
  Text
-> RespondActivityTaskCanceledByIdRequest -> 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") RespondActivityTaskCanceledByIdRequest
_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
  RespondActivityTaskCanceledByIdRequest
  RespondActivityTaskCanceledByIdRequest
  Text
  Text
-> RespondActivityTaskCanceledByIdRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId") RespondActivityTaskCanceledByIdRequest
_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
  RespondActivityTaskCanceledByIdRequest
  RespondActivityTaskCanceledByIdRequest
  Text
  Text
-> RespondActivityTaskCanceledByIdRequest -> 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") RespondActivityTaskCanceledByIdRequest
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Payloads)
  RespondActivityTaskCanceledByIdRequest
  RespondActivityTaskCanceledByIdRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> RespondActivityTaskCanceledByIdRequest -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'details") RespondActivityTaskCanceledByIdRequest
_x
                          of
                            Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just Payloads
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v = FoldLike
  Text
  RespondActivityTaskCanceledByIdRequest
  RespondActivityTaskCanceledByIdRequest
  Text
  Text
-> RespondActivityTaskCanceledByIdRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") RespondActivityTaskCanceledByIdRequest
_x
                             in
                               if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                     ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        (\ ByteString
bs
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                            (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                               (FoldLike
  FieldSet
  RespondActivityTaskCanceledByIdRequest
  RespondActivityTaskCanceledByIdRequest
  FieldSet
  FieldSet
-> RespondActivityTaskCanceledByIdRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondActivityTaskCanceledByIdRequest
  RespondActivityTaskCanceledByIdRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondActivityTaskCanceledByIdRequest FieldSet
Data.ProtoLens.unknownFields RespondActivityTaskCanceledByIdRequest
_x)))))))
instance Control.DeepSeq.NFData RespondActivityTaskCanceledByIdRequest where
  rnf :: RespondActivityTaskCanceledByIdRequest -> ()
rnf
    = \ RespondActivityTaskCanceledByIdRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondActivityTaskCanceledByIdRequest -> FieldSet
_RespondActivityTaskCanceledByIdRequest'_unknownFields RespondActivityTaskCanceledByIdRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RespondActivityTaskCanceledByIdRequest -> Text
_RespondActivityTaskCanceledByIdRequest'namespace RespondActivityTaskCanceledByIdRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RespondActivityTaskCanceledByIdRequest -> Text
_RespondActivityTaskCanceledByIdRequest'workflowId RespondActivityTaskCanceledByIdRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RespondActivityTaskCanceledByIdRequest -> Text
_RespondActivityTaskCanceledByIdRequest'runId RespondActivityTaskCanceledByIdRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RespondActivityTaskCanceledByIdRequest -> Text
_RespondActivityTaskCanceledByIdRequest'activityId RespondActivityTaskCanceledByIdRequest
x__)
                         (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RespondActivityTaskCanceledByIdRequest -> Maybe Payloads
_RespondActivityTaskCanceledByIdRequest'details RespondActivityTaskCanceledByIdRequest
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (RespondActivityTaskCanceledByIdRequest -> Text
_RespondActivityTaskCanceledByIdRequest'identity RespondActivityTaskCanceledByIdRequest
x__) ()))))))
{- | Fields :
      -}
data RespondActivityTaskCanceledByIdResponse
  = RespondActivityTaskCanceledByIdResponse'_constructor {RespondActivityTaskCanceledByIdResponse -> FieldSet
_RespondActivityTaskCanceledByIdResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Bool
(RespondActivityTaskCanceledByIdResponse
 -> RespondActivityTaskCanceledByIdResponse -> Bool)
-> (RespondActivityTaskCanceledByIdResponse
    -> RespondActivityTaskCanceledByIdResponse -> Bool)
-> Eq RespondActivityTaskCanceledByIdResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Bool
== :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Bool
$c/= :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Bool
/= :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Bool
Prelude.Eq, Eq RespondActivityTaskCanceledByIdResponse
Eq RespondActivityTaskCanceledByIdResponse =>
(RespondActivityTaskCanceledByIdResponse
 -> RespondActivityTaskCanceledByIdResponse -> Ordering)
-> (RespondActivityTaskCanceledByIdResponse
    -> RespondActivityTaskCanceledByIdResponse -> Bool)
-> (RespondActivityTaskCanceledByIdResponse
    -> RespondActivityTaskCanceledByIdResponse -> Bool)
-> (RespondActivityTaskCanceledByIdResponse
    -> RespondActivityTaskCanceledByIdResponse -> Bool)
-> (RespondActivityTaskCanceledByIdResponse
    -> RespondActivityTaskCanceledByIdResponse -> Bool)
-> (RespondActivityTaskCanceledByIdResponse
    -> RespondActivityTaskCanceledByIdResponse
    -> RespondActivityTaskCanceledByIdResponse)
-> (RespondActivityTaskCanceledByIdResponse
    -> RespondActivityTaskCanceledByIdResponse
    -> RespondActivityTaskCanceledByIdResponse)
-> Ord RespondActivityTaskCanceledByIdResponse
RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Bool
RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Ordering
RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse
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 :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Ordering
compare :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Ordering
$c< :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Bool
< :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Bool
$c<= :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Bool
<= :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Bool
$c> :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Bool
> :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Bool
$c>= :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Bool
>= :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse -> Bool
$cmax :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse
max :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse
$cmin :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse
min :: RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse
-> RespondActivityTaskCanceledByIdResponse
Prelude.Ord)
instance Prelude.Show RespondActivityTaskCanceledByIdResponse where
  showsPrec :: Int -> RespondActivityTaskCanceledByIdResponse -> ShowS
showsPrec Int
_ RespondActivityTaskCanceledByIdResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondActivityTaskCanceledByIdResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondActivityTaskCanceledByIdResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message RespondActivityTaskCanceledByIdResponse where
  messageName :: Proxy RespondActivityTaskCanceledByIdResponse -> Text
messageName Proxy RespondActivityTaskCanceledByIdResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondActivityTaskCanceledByIdResponse"
  packedMessageDescriptor :: Proxy RespondActivityTaskCanceledByIdResponse -> ByteString
packedMessageDescriptor Proxy RespondActivityTaskCanceledByIdResponse
_
    = ByteString
"\n\
      \'RespondActivityTaskCanceledByIdResponse"
  packedFileDescriptor :: Proxy RespondActivityTaskCanceledByIdResponse -> ByteString
packedFileDescriptor Proxy RespondActivityTaskCanceledByIdResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondActivityTaskCanceledByIdResponse)
fieldsByTag = let in [(Tag, FieldDescriptor RespondActivityTaskCanceledByIdResponse)]
-> Map
     Tag (FieldDescriptor RespondActivityTaskCanceledByIdResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' RespondActivityTaskCanceledByIdResponse FieldSet
unknownFields
    = (RespondActivityTaskCanceledByIdResponse -> FieldSet)
-> (RespondActivityTaskCanceledByIdResponse
    -> FieldSet -> RespondActivityTaskCanceledByIdResponse)
-> Lens' RespondActivityTaskCanceledByIdResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondActivityTaskCanceledByIdResponse -> FieldSet
_RespondActivityTaskCanceledByIdResponse'_unknownFields
        (\ RespondActivityTaskCanceledByIdResponse
x__ FieldSet
y__
           -> RespondActivityTaskCanceledByIdResponse
x__
                {_RespondActivityTaskCanceledByIdResponse'_unknownFields = y__})
  defMessage :: RespondActivityTaskCanceledByIdResponse
defMessage
    = RespondActivityTaskCanceledByIdResponse'_constructor
        {_RespondActivityTaskCanceledByIdResponse'_unknownFields :: FieldSet
_RespondActivityTaskCanceledByIdResponse'_unknownFields = []}
  parseMessage :: Parser RespondActivityTaskCanceledByIdResponse
parseMessage
    = let
        loop ::
          RespondActivityTaskCanceledByIdResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondActivityTaskCanceledByIdResponse
        loop :: RespondActivityTaskCanceledByIdResponse
-> Parser RespondActivityTaskCanceledByIdResponse
loop RespondActivityTaskCanceledByIdResponse
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 RespondActivityTaskCanceledByIdResponse
-> String -> Parser RespondActivityTaskCanceledByIdResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondActivityTaskCanceledByIdResponse
-> Parser RespondActivityTaskCanceledByIdResponse
loop RespondActivityTaskCanceledByIdResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondActivityTaskCanceledByIdResponse"
  buildMessage :: RespondActivityTaskCanceledByIdResponse -> Builder
buildMessage
    = \ RespondActivityTaskCanceledByIdResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  RespondActivityTaskCanceledByIdResponse
  RespondActivityTaskCanceledByIdResponse
  FieldSet
  FieldSet
-> RespondActivityTaskCanceledByIdResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondActivityTaskCanceledByIdResponse
  RespondActivityTaskCanceledByIdResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondActivityTaskCanceledByIdResponse FieldSet
Data.ProtoLens.unknownFields RespondActivityTaskCanceledByIdResponse
_x)
instance Control.DeepSeq.NFData RespondActivityTaskCanceledByIdResponse where
  rnf :: RespondActivityTaskCanceledByIdResponse -> ()
rnf
    = \ RespondActivityTaskCanceledByIdResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondActivityTaskCanceledByIdResponse -> FieldSet
_RespondActivityTaskCanceledByIdResponse'_unknownFields RespondActivityTaskCanceledByIdResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskToken' @:: Lens' RespondActivityTaskCanceledRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.details' @:: Lens' RespondActivityTaskCanceledRequest Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'details' @:: Lens' RespondActivityTaskCanceledRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' RespondActivityTaskCanceledRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' RespondActivityTaskCanceledRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workerVersion' @:: Lens' RespondActivityTaskCanceledRequest Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workerVersion' @:: Lens' RespondActivityTaskCanceledRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)@ -}
data RespondActivityTaskCanceledRequest
  = RespondActivityTaskCanceledRequest'_constructor {RespondActivityTaskCanceledRequest -> ByteString
_RespondActivityTaskCanceledRequest'taskToken :: !Data.ByteString.ByteString,
                                                     RespondActivityTaskCanceledRequest -> Maybe Payloads
_RespondActivityTaskCanceledRequest'details :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                     RespondActivityTaskCanceledRequest -> Text
_RespondActivityTaskCanceledRequest'identity :: !Data.Text.Text,
                                                     RespondActivityTaskCanceledRequest -> Text
_RespondActivityTaskCanceledRequest'namespace :: !Data.Text.Text,
                                                     RespondActivityTaskCanceledRequest -> Maybe WorkerVersionStamp
_RespondActivityTaskCanceledRequest'workerVersion :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp),
                                                     RespondActivityTaskCanceledRequest -> FieldSet
_RespondActivityTaskCanceledRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Bool
(RespondActivityTaskCanceledRequest
 -> RespondActivityTaskCanceledRequest -> Bool)
-> (RespondActivityTaskCanceledRequest
    -> RespondActivityTaskCanceledRequest -> Bool)
-> Eq RespondActivityTaskCanceledRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Bool
== :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Bool
$c/= :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Bool
/= :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Bool
Prelude.Eq, Eq RespondActivityTaskCanceledRequest
Eq RespondActivityTaskCanceledRequest =>
(RespondActivityTaskCanceledRequest
 -> RespondActivityTaskCanceledRequest -> Ordering)
-> (RespondActivityTaskCanceledRequest
    -> RespondActivityTaskCanceledRequest -> Bool)
-> (RespondActivityTaskCanceledRequest
    -> RespondActivityTaskCanceledRequest -> Bool)
-> (RespondActivityTaskCanceledRequest
    -> RespondActivityTaskCanceledRequest -> Bool)
-> (RespondActivityTaskCanceledRequest
    -> RespondActivityTaskCanceledRequest -> Bool)
-> (RespondActivityTaskCanceledRequest
    -> RespondActivityTaskCanceledRequest
    -> RespondActivityTaskCanceledRequest)
-> (RespondActivityTaskCanceledRequest
    -> RespondActivityTaskCanceledRequest
    -> RespondActivityTaskCanceledRequest)
-> Ord RespondActivityTaskCanceledRequest
RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Bool
RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Ordering
RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest
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 :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Ordering
compare :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Ordering
$c< :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Bool
< :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Bool
$c<= :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Bool
<= :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Bool
$c> :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Bool
> :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Bool
$c>= :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Bool
>= :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest -> Bool
$cmax :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest
max :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest
$cmin :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest
min :: RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest
-> RespondActivityTaskCanceledRequest
Prelude.Ord)
instance Prelude.Show RespondActivityTaskCanceledRequest where
  showsPrec :: Int -> RespondActivityTaskCanceledRequest -> ShowS
showsPrec Int
_ RespondActivityTaskCanceledRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondActivityTaskCanceledRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondActivityTaskCanceledRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RespondActivityTaskCanceledRequest "taskToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskToken"
-> (ByteString -> f ByteString)
-> RespondActivityTaskCanceledRequest
-> f RespondActivityTaskCanceledRequest
fieldOf Proxy# "taskToken"
_
    = ((ByteString -> f ByteString)
 -> RespondActivityTaskCanceledRequest
 -> f RespondActivityTaskCanceledRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> RespondActivityTaskCanceledRequest
-> f RespondActivityTaskCanceledRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCanceledRequest -> ByteString)
-> (RespondActivityTaskCanceledRequest
    -> ByteString -> RespondActivityTaskCanceledRequest)
-> Lens
     RespondActivityTaskCanceledRequest
     RespondActivityTaskCanceledRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCanceledRequest -> ByteString
_RespondActivityTaskCanceledRequest'taskToken
           (\ RespondActivityTaskCanceledRequest
x__ ByteString
y__
              -> RespondActivityTaskCanceledRequest
x__ {_RespondActivityTaskCanceledRequest'taskToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCanceledRequest "details" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "details"
-> (Payloads -> f Payloads)
-> RespondActivityTaskCanceledRequest
-> f RespondActivityTaskCanceledRequest
fieldOf Proxy# "details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RespondActivityTaskCanceledRequest
 -> f RespondActivityTaskCanceledRequest)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> RespondActivityTaskCanceledRequest
-> f RespondActivityTaskCanceledRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCanceledRequest -> Maybe Payloads)
-> (RespondActivityTaskCanceledRequest
    -> Maybe Payloads -> RespondActivityTaskCanceledRequest)
-> Lens
     RespondActivityTaskCanceledRequest
     RespondActivityTaskCanceledRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCanceledRequest -> Maybe Payloads
_RespondActivityTaskCanceledRequest'details
           (\ RespondActivityTaskCanceledRequest
x__ Maybe Payloads
y__
              -> RespondActivityTaskCanceledRequest
x__ {_RespondActivityTaskCanceledRequest'details = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondActivityTaskCanceledRequest "maybe'details" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'details"
-> (Maybe Payloads -> f (Maybe Payloads))
-> RespondActivityTaskCanceledRequest
-> f RespondActivityTaskCanceledRequest
fieldOf Proxy# "maybe'details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RespondActivityTaskCanceledRequest
 -> f RespondActivityTaskCanceledRequest)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> RespondActivityTaskCanceledRequest
-> f RespondActivityTaskCanceledRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCanceledRequest -> Maybe Payloads)
-> (RespondActivityTaskCanceledRequest
    -> Maybe Payloads -> RespondActivityTaskCanceledRequest)
-> Lens
     RespondActivityTaskCanceledRequest
     RespondActivityTaskCanceledRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCanceledRequest -> Maybe Payloads
_RespondActivityTaskCanceledRequest'details
           (\ RespondActivityTaskCanceledRequest
x__ Maybe Payloads
y__
              -> RespondActivityTaskCanceledRequest
x__ {_RespondActivityTaskCanceledRequest'details = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCanceledRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> RespondActivityTaskCanceledRequest
-> f RespondActivityTaskCanceledRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> RespondActivityTaskCanceledRequest
 -> f RespondActivityTaskCanceledRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskCanceledRequest
-> f RespondActivityTaskCanceledRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCanceledRequest -> Text)
-> (RespondActivityTaskCanceledRequest
    -> Text -> RespondActivityTaskCanceledRequest)
-> Lens
     RespondActivityTaskCanceledRequest
     RespondActivityTaskCanceledRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCanceledRequest -> Text
_RespondActivityTaskCanceledRequest'identity
           (\ RespondActivityTaskCanceledRequest
x__ Text
y__
              -> RespondActivityTaskCanceledRequest
x__ {_RespondActivityTaskCanceledRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCanceledRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RespondActivityTaskCanceledRequest
-> f RespondActivityTaskCanceledRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RespondActivityTaskCanceledRequest
 -> f RespondActivityTaskCanceledRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskCanceledRequest
-> f RespondActivityTaskCanceledRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCanceledRequest -> Text)
-> (RespondActivityTaskCanceledRequest
    -> Text -> RespondActivityTaskCanceledRequest)
-> Lens
     RespondActivityTaskCanceledRequest
     RespondActivityTaskCanceledRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCanceledRequest -> Text
_RespondActivityTaskCanceledRequest'namespace
           (\ RespondActivityTaskCanceledRequest
x__ Text
y__
              -> RespondActivityTaskCanceledRequest
x__ {_RespondActivityTaskCanceledRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCanceledRequest "workerVersion" Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerVersion"
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> RespondActivityTaskCanceledRequest
-> f RespondActivityTaskCanceledRequest
fieldOf Proxy# "workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> RespondActivityTaskCanceledRequest
 -> f RespondActivityTaskCanceledRequest)
-> ((WorkerVersionStamp -> f WorkerVersionStamp)
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> RespondActivityTaskCanceledRequest
-> f RespondActivityTaskCanceledRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCanceledRequest -> Maybe WorkerVersionStamp)
-> (RespondActivityTaskCanceledRequest
    -> Maybe WorkerVersionStamp -> RespondActivityTaskCanceledRequest)
-> Lens
     RespondActivityTaskCanceledRequest
     RespondActivityTaskCanceledRequest
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCanceledRequest -> Maybe WorkerVersionStamp
_RespondActivityTaskCanceledRequest'workerVersion
           (\ RespondActivityTaskCanceledRequest
x__ Maybe WorkerVersionStamp
y__
              -> RespondActivityTaskCanceledRequest
x__ {_RespondActivityTaskCanceledRequest'workerVersion = y__}))
        (WorkerVersionStamp
-> Lens' (Maybe WorkerVersionStamp) WorkerVersionStamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkerVersionStamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondActivityTaskCanceledRequest "maybe'workerVersion" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workerVersion"
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> RespondActivityTaskCanceledRequest
-> f RespondActivityTaskCanceledRequest
fieldOf Proxy# "maybe'workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> RespondActivityTaskCanceledRequest
 -> f RespondActivityTaskCanceledRequest)
-> ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> RespondActivityTaskCanceledRequest
-> f RespondActivityTaskCanceledRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCanceledRequest -> Maybe WorkerVersionStamp)
-> (RespondActivityTaskCanceledRequest
    -> Maybe WorkerVersionStamp -> RespondActivityTaskCanceledRequest)
-> Lens
     RespondActivityTaskCanceledRequest
     RespondActivityTaskCanceledRequest
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCanceledRequest -> Maybe WorkerVersionStamp
_RespondActivityTaskCanceledRequest'workerVersion
           (\ RespondActivityTaskCanceledRequest
x__ Maybe WorkerVersionStamp
y__
              -> RespondActivityTaskCanceledRequest
x__ {_RespondActivityTaskCanceledRequest'workerVersion = y__}))
        (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RespondActivityTaskCanceledRequest where
  messageName :: Proxy RespondActivityTaskCanceledRequest -> Text
messageName Proxy RespondActivityTaskCanceledRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondActivityTaskCanceledRequest"
  packedMessageDescriptor :: Proxy RespondActivityTaskCanceledRequest -> ByteString
packedMessageDescriptor Proxy RespondActivityTaskCanceledRequest
_
    = ByteString
"\n\
      \\"RespondActivityTaskCanceledRequest\DC2\GS\n\
      \\n\
      \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2:\n\
      \\adetails\CAN\STX \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2\SUB\n\
      \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2\FS\n\
      \\tnamespace\CAN\EOT \SOH(\tR\tnamespace\DC2Q\n\
      \\SOworker_version\CAN\ENQ \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion"
  packedFileDescriptor :: Proxy RespondActivityTaskCanceledRequest -> ByteString
packedFileDescriptor Proxy RespondActivityTaskCanceledRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondActivityTaskCanceledRequest)
fieldsByTag
    = let
        taskToken__field_descriptor :: FieldDescriptor RespondActivityTaskCanceledRequest
taskToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor RespondActivityTaskCanceledRequest ByteString
-> FieldDescriptor RespondActivityTaskCanceledRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     RespondActivityTaskCanceledRequest
     RespondActivityTaskCanceledRequest
     ByteString
     ByteString
-> FieldAccessor RespondActivityTaskCanceledRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskCanceledRequest
        details__field_descriptor :: FieldDescriptor RespondActivityTaskCanceledRequest
details__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor RespondActivityTaskCanceledRequest Payloads
-> FieldDescriptor RespondActivityTaskCanceledRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"details"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  RespondActivityTaskCanceledRequest
  RespondActivityTaskCanceledRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor RespondActivityTaskCanceledRequest Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'details")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskCanceledRequest
        identity__field_descriptor :: FieldDescriptor RespondActivityTaskCanceledRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskCanceledRequest Text
-> FieldDescriptor RespondActivityTaskCanceledRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondActivityTaskCanceledRequest
     RespondActivityTaskCanceledRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskCanceledRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskCanceledRequest
        namespace__field_descriptor :: FieldDescriptor RespondActivityTaskCanceledRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskCanceledRequest Text
-> FieldDescriptor RespondActivityTaskCanceledRequest
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
     RespondActivityTaskCanceledRequest
     RespondActivityTaskCanceledRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskCanceledRequest 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 RespondActivityTaskCanceledRequest
        workerVersion__field_descriptor :: FieldDescriptor RespondActivityTaskCanceledRequest
workerVersion__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionStamp
-> FieldAccessor
     RespondActivityTaskCanceledRequest WorkerVersionStamp
-> FieldDescriptor RespondActivityTaskCanceledRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_version"
              (MessageOrGroup -> FieldTypeDescriptor WorkerVersionStamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)
              (Lens
  RespondActivityTaskCanceledRequest
  RespondActivityTaskCanceledRequest
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> FieldAccessor
     RespondActivityTaskCanceledRequest WorkerVersionStamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workerVersion")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskCanceledRequest
      in
        [(Tag, FieldDescriptor RespondActivityTaskCanceledRequest)]
-> Map Tag (FieldDescriptor RespondActivityTaskCanceledRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RespondActivityTaskCanceledRequest
taskToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RespondActivityTaskCanceledRequest
details__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RespondActivityTaskCanceledRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor RespondActivityTaskCanceledRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor RespondActivityTaskCanceledRequest
workerVersion__field_descriptor)]
  unknownFields :: Lens' RespondActivityTaskCanceledRequest FieldSet
unknownFields
    = (RespondActivityTaskCanceledRequest -> FieldSet)
-> (RespondActivityTaskCanceledRequest
    -> FieldSet -> RespondActivityTaskCanceledRequest)
-> Lens' RespondActivityTaskCanceledRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondActivityTaskCanceledRequest -> FieldSet
_RespondActivityTaskCanceledRequest'_unknownFields
        (\ RespondActivityTaskCanceledRequest
x__ FieldSet
y__
           -> RespondActivityTaskCanceledRequest
x__ {_RespondActivityTaskCanceledRequest'_unknownFields = y__})
  defMessage :: RespondActivityTaskCanceledRequest
defMessage
    = RespondActivityTaskCanceledRequest'_constructor
        {_RespondActivityTaskCanceledRequest'taskToken :: ByteString
_RespondActivityTaskCanceledRequest'taskToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCanceledRequest'details :: Maybe Payloads
_RespondActivityTaskCanceledRequest'details = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _RespondActivityTaskCanceledRequest'identity :: Text
_RespondActivityTaskCanceledRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCanceledRequest'namespace :: Text
_RespondActivityTaskCanceledRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCanceledRequest'workerVersion :: Maybe WorkerVersionStamp
_RespondActivityTaskCanceledRequest'workerVersion = Maybe WorkerVersionStamp
forall a. Maybe a
Prelude.Nothing,
         _RespondActivityTaskCanceledRequest'_unknownFields :: FieldSet
_RespondActivityTaskCanceledRequest'_unknownFields = []}
  parseMessage :: Parser RespondActivityTaskCanceledRequest
parseMessage
    = let
        loop ::
          RespondActivityTaskCanceledRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondActivityTaskCanceledRequest
        loop :: RespondActivityTaskCanceledRequest
-> Parser RespondActivityTaskCanceledRequest
loop RespondActivityTaskCanceledRequest
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 ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"task_token"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskToken") y x)
                        Word64
18
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"details"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"details") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
42
                          -> do y <- Parser WorkerVersionStamp -> String -> Parser WorkerVersionStamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"worker_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerVersion") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser RespondActivityTaskCanceledRequest
-> String -> Parser RespondActivityTaskCanceledRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondActivityTaskCanceledRequest
-> Parser RespondActivityTaskCanceledRequest
loop RespondActivityTaskCanceledRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondActivityTaskCanceledRequest"
  buildMessage :: RespondActivityTaskCanceledRequest -> Builder
buildMessage
    = \ RespondActivityTaskCanceledRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: ByteString
_v = FoldLike
  ByteString
  RespondActivityTaskCanceledRequest
  RespondActivityTaskCanceledRequest
  ByteString
  ByteString
-> RespondActivityTaskCanceledRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken") RespondActivityTaskCanceledRequest
_x
              in
                if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
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
bs
                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         ByteString
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe Payloads)
  RespondActivityTaskCanceledRequest
  RespondActivityTaskCanceledRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> RespondActivityTaskCanceledRequest -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'details") RespondActivityTaskCanceledRequest
_x
                 of
                   Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just Payloads
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v = FoldLike
  Text
  RespondActivityTaskCanceledRequest
  RespondActivityTaskCanceledRequest
  Text
  Text
-> RespondActivityTaskCanceledRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") RespondActivityTaskCanceledRequest
_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
  RespondActivityTaskCanceledRequest
  RespondActivityTaskCanceledRequest
  Text
  Text
-> RespondActivityTaskCanceledRequest -> 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") RespondActivityTaskCanceledRequest
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe WorkerVersionStamp)
  RespondActivityTaskCanceledRequest
  RespondActivityTaskCanceledRequest
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> RespondActivityTaskCanceledRequest -> Maybe WorkerVersionStamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workerVersion") RespondActivityTaskCanceledRequest
_x
                          of
                            Maybe WorkerVersionStamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just WorkerVersionStamp
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (WorkerVersionStamp -> ByteString)
-> WorkerVersionStamp
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      WorkerVersionStamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkerVersionStamp
_v))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  RespondActivityTaskCanceledRequest
  RespondActivityTaskCanceledRequest
  FieldSet
  FieldSet
-> RespondActivityTaskCanceledRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondActivityTaskCanceledRequest
  RespondActivityTaskCanceledRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondActivityTaskCanceledRequest FieldSet
Data.ProtoLens.unknownFields RespondActivityTaskCanceledRequest
_x))))))
instance Control.DeepSeq.NFData RespondActivityTaskCanceledRequest where
  rnf :: RespondActivityTaskCanceledRequest -> ()
rnf
    = \ RespondActivityTaskCanceledRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondActivityTaskCanceledRequest -> FieldSet
_RespondActivityTaskCanceledRequest'_unknownFields RespondActivityTaskCanceledRequest
x__)
             (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RespondActivityTaskCanceledRequest -> ByteString
_RespondActivityTaskCanceledRequest'taskToken RespondActivityTaskCanceledRequest
x__)
                (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RespondActivityTaskCanceledRequest -> Maybe Payloads
_RespondActivityTaskCanceledRequest'details RespondActivityTaskCanceledRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RespondActivityTaskCanceledRequest -> Text
_RespondActivityTaskCanceledRequest'identity RespondActivityTaskCanceledRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RespondActivityTaskCanceledRequest -> Text
_RespondActivityTaskCanceledRequest'namespace RespondActivityTaskCanceledRequest
x__)
                         (Maybe WorkerVersionStamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RespondActivityTaskCanceledRequest -> Maybe WorkerVersionStamp
_RespondActivityTaskCanceledRequest'workerVersion RespondActivityTaskCanceledRequest
x__) ())))))
{- | Fields :
      -}
data RespondActivityTaskCanceledResponse
  = RespondActivityTaskCanceledResponse'_constructor {RespondActivityTaskCanceledResponse -> FieldSet
_RespondActivityTaskCanceledResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Bool
(RespondActivityTaskCanceledResponse
 -> RespondActivityTaskCanceledResponse -> Bool)
-> (RespondActivityTaskCanceledResponse
    -> RespondActivityTaskCanceledResponse -> Bool)
-> Eq RespondActivityTaskCanceledResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Bool
== :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Bool
$c/= :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Bool
/= :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Bool
Prelude.Eq, Eq RespondActivityTaskCanceledResponse
Eq RespondActivityTaskCanceledResponse =>
(RespondActivityTaskCanceledResponse
 -> RespondActivityTaskCanceledResponse -> Ordering)
-> (RespondActivityTaskCanceledResponse
    -> RespondActivityTaskCanceledResponse -> Bool)
-> (RespondActivityTaskCanceledResponse
    -> RespondActivityTaskCanceledResponse -> Bool)
-> (RespondActivityTaskCanceledResponse
    -> RespondActivityTaskCanceledResponse -> Bool)
-> (RespondActivityTaskCanceledResponse
    -> RespondActivityTaskCanceledResponse -> Bool)
-> (RespondActivityTaskCanceledResponse
    -> RespondActivityTaskCanceledResponse
    -> RespondActivityTaskCanceledResponse)
-> (RespondActivityTaskCanceledResponse
    -> RespondActivityTaskCanceledResponse
    -> RespondActivityTaskCanceledResponse)
-> Ord RespondActivityTaskCanceledResponse
RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Bool
RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Ordering
RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse
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 :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Ordering
compare :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Ordering
$c< :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Bool
< :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Bool
$c<= :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Bool
<= :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Bool
$c> :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Bool
> :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Bool
$c>= :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Bool
>= :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse -> Bool
$cmax :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse
max :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse
$cmin :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse
min :: RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse
-> RespondActivityTaskCanceledResponse
Prelude.Ord)
instance Prelude.Show RespondActivityTaskCanceledResponse where
  showsPrec :: Int -> RespondActivityTaskCanceledResponse -> ShowS
showsPrec Int
_ RespondActivityTaskCanceledResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondActivityTaskCanceledResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondActivityTaskCanceledResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message RespondActivityTaskCanceledResponse where
  messageName :: Proxy RespondActivityTaskCanceledResponse -> Text
messageName Proxy RespondActivityTaskCanceledResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondActivityTaskCanceledResponse"
  packedMessageDescriptor :: Proxy RespondActivityTaskCanceledResponse -> ByteString
packedMessageDescriptor Proxy RespondActivityTaskCanceledResponse
_
    = ByteString
"\n\
      \#RespondActivityTaskCanceledResponse"
  packedFileDescriptor :: Proxy RespondActivityTaskCanceledResponse -> ByteString
packedFileDescriptor Proxy RespondActivityTaskCanceledResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondActivityTaskCanceledResponse)
fieldsByTag = let in [(Tag, FieldDescriptor RespondActivityTaskCanceledResponse)]
-> Map Tag (FieldDescriptor RespondActivityTaskCanceledResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' RespondActivityTaskCanceledResponse FieldSet
unknownFields
    = (RespondActivityTaskCanceledResponse -> FieldSet)
-> (RespondActivityTaskCanceledResponse
    -> FieldSet -> RespondActivityTaskCanceledResponse)
-> Lens' RespondActivityTaskCanceledResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondActivityTaskCanceledResponse -> FieldSet
_RespondActivityTaskCanceledResponse'_unknownFields
        (\ RespondActivityTaskCanceledResponse
x__ FieldSet
y__
           -> RespondActivityTaskCanceledResponse
x__ {_RespondActivityTaskCanceledResponse'_unknownFields = y__})
  defMessage :: RespondActivityTaskCanceledResponse
defMessage
    = RespondActivityTaskCanceledResponse'_constructor
        {_RespondActivityTaskCanceledResponse'_unknownFields :: FieldSet
_RespondActivityTaskCanceledResponse'_unknownFields = []}
  parseMessage :: Parser RespondActivityTaskCanceledResponse
parseMessage
    = let
        loop ::
          RespondActivityTaskCanceledResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondActivityTaskCanceledResponse
        loop :: RespondActivityTaskCanceledResponse
-> Parser RespondActivityTaskCanceledResponse
loop RespondActivityTaskCanceledResponse
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 RespondActivityTaskCanceledResponse
-> String -> Parser RespondActivityTaskCanceledResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondActivityTaskCanceledResponse
-> Parser RespondActivityTaskCanceledResponse
loop RespondActivityTaskCanceledResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondActivityTaskCanceledResponse"
  buildMessage :: RespondActivityTaskCanceledResponse -> Builder
buildMessage
    = \ RespondActivityTaskCanceledResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  RespondActivityTaskCanceledResponse
  RespondActivityTaskCanceledResponse
  FieldSet
  FieldSet
-> RespondActivityTaskCanceledResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondActivityTaskCanceledResponse
  RespondActivityTaskCanceledResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondActivityTaskCanceledResponse FieldSet
Data.ProtoLens.unknownFields RespondActivityTaskCanceledResponse
_x)
instance Control.DeepSeq.NFData RespondActivityTaskCanceledResponse where
  rnf :: RespondActivityTaskCanceledResponse -> ()
rnf
    = \ RespondActivityTaskCanceledResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondActivityTaskCanceledResponse -> FieldSet
_RespondActivityTaskCanceledResponse'_unknownFields RespondActivityTaskCanceledResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' RespondActivityTaskCompletedByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowId' @:: Lens' RespondActivityTaskCompletedByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.runId' @:: Lens' RespondActivityTaskCompletedByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.activityId' @:: Lens' RespondActivityTaskCompletedByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.result' @:: Lens' RespondActivityTaskCompletedByIdRequest Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'result' @:: Lens' RespondActivityTaskCompletedByIdRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' RespondActivityTaskCompletedByIdRequest Data.Text.Text@ -}
data RespondActivityTaskCompletedByIdRequest
  = RespondActivityTaskCompletedByIdRequest'_constructor {RespondActivityTaskCompletedByIdRequest -> Text
_RespondActivityTaskCompletedByIdRequest'namespace :: !Data.Text.Text,
                                                          RespondActivityTaskCompletedByIdRequest -> Text
_RespondActivityTaskCompletedByIdRequest'workflowId :: !Data.Text.Text,
                                                          RespondActivityTaskCompletedByIdRequest -> Text
_RespondActivityTaskCompletedByIdRequest'runId :: !Data.Text.Text,
                                                          RespondActivityTaskCompletedByIdRequest -> Text
_RespondActivityTaskCompletedByIdRequest'activityId :: !Data.Text.Text,
                                                          RespondActivityTaskCompletedByIdRequest -> Maybe Payloads
_RespondActivityTaskCompletedByIdRequest'result :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                          RespondActivityTaskCompletedByIdRequest -> Text
_RespondActivityTaskCompletedByIdRequest'identity :: !Data.Text.Text,
                                                          RespondActivityTaskCompletedByIdRequest -> FieldSet
_RespondActivityTaskCompletedByIdRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Bool
(RespondActivityTaskCompletedByIdRequest
 -> RespondActivityTaskCompletedByIdRequest -> Bool)
-> (RespondActivityTaskCompletedByIdRequest
    -> RespondActivityTaskCompletedByIdRequest -> Bool)
-> Eq RespondActivityTaskCompletedByIdRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Bool
== :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Bool
$c/= :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Bool
/= :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Bool
Prelude.Eq, Eq RespondActivityTaskCompletedByIdRequest
Eq RespondActivityTaskCompletedByIdRequest =>
(RespondActivityTaskCompletedByIdRequest
 -> RespondActivityTaskCompletedByIdRequest -> Ordering)
-> (RespondActivityTaskCompletedByIdRequest
    -> RespondActivityTaskCompletedByIdRequest -> Bool)
-> (RespondActivityTaskCompletedByIdRequest
    -> RespondActivityTaskCompletedByIdRequest -> Bool)
-> (RespondActivityTaskCompletedByIdRequest
    -> RespondActivityTaskCompletedByIdRequest -> Bool)
-> (RespondActivityTaskCompletedByIdRequest
    -> RespondActivityTaskCompletedByIdRequest -> Bool)
-> (RespondActivityTaskCompletedByIdRequest
    -> RespondActivityTaskCompletedByIdRequest
    -> RespondActivityTaskCompletedByIdRequest)
-> (RespondActivityTaskCompletedByIdRequest
    -> RespondActivityTaskCompletedByIdRequest
    -> RespondActivityTaskCompletedByIdRequest)
-> Ord RespondActivityTaskCompletedByIdRequest
RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Bool
RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Ordering
RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest
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 :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Ordering
compare :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Ordering
$c< :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Bool
< :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Bool
$c<= :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Bool
<= :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Bool
$c> :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Bool
> :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Bool
$c>= :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Bool
>= :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest -> Bool
$cmax :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest
max :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest
$cmin :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest
min :: RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest
-> RespondActivityTaskCompletedByIdRequest
Prelude.Ord)
instance Prelude.Show RespondActivityTaskCompletedByIdRequest where
  showsPrec :: Int -> RespondActivityTaskCompletedByIdRequest -> ShowS
showsPrec Int
_ RespondActivityTaskCompletedByIdRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondActivityTaskCompletedByIdRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondActivityTaskCompletedByIdRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RespondActivityTaskCompletedByIdRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RespondActivityTaskCompletedByIdRequest
-> f RespondActivityTaskCompletedByIdRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RespondActivityTaskCompletedByIdRequest
 -> f RespondActivityTaskCompletedByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskCompletedByIdRequest
-> f RespondActivityTaskCompletedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCompletedByIdRequest -> Text)
-> (RespondActivityTaskCompletedByIdRequest
    -> Text -> RespondActivityTaskCompletedByIdRequest)
-> Lens
     RespondActivityTaskCompletedByIdRequest
     RespondActivityTaskCompletedByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCompletedByIdRequest -> Text
_RespondActivityTaskCompletedByIdRequest'namespace
           (\ RespondActivityTaskCompletedByIdRequest
x__ Text
y__
              -> RespondActivityTaskCompletedByIdRequest
x__ {_RespondActivityTaskCompletedByIdRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCompletedByIdRequest "workflowId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowId"
-> (Text -> f Text)
-> RespondActivityTaskCompletedByIdRequest
-> f RespondActivityTaskCompletedByIdRequest
fieldOf Proxy# "workflowId"
_
    = ((Text -> f Text)
 -> RespondActivityTaskCompletedByIdRequest
 -> f RespondActivityTaskCompletedByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskCompletedByIdRequest
-> f RespondActivityTaskCompletedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCompletedByIdRequest -> Text)
-> (RespondActivityTaskCompletedByIdRequest
    -> Text -> RespondActivityTaskCompletedByIdRequest)
-> Lens
     RespondActivityTaskCompletedByIdRequest
     RespondActivityTaskCompletedByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCompletedByIdRequest -> Text
_RespondActivityTaskCompletedByIdRequest'workflowId
           (\ RespondActivityTaskCompletedByIdRequest
x__ Text
y__
              -> RespondActivityTaskCompletedByIdRequest
x__
                   {_RespondActivityTaskCompletedByIdRequest'workflowId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCompletedByIdRequest "runId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "runId"
-> (Text -> f Text)
-> RespondActivityTaskCompletedByIdRequest
-> f RespondActivityTaskCompletedByIdRequest
fieldOf Proxy# "runId"
_
    = ((Text -> f Text)
 -> RespondActivityTaskCompletedByIdRequest
 -> f RespondActivityTaskCompletedByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskCompletedByIdRequest
-> f RespondActivityTaskCompletedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCompletedByIdRequest -> Text)
-> (RespondActivityTaskCompletedByIdRequest
    -> Text -> RespondActivityTaskCompletedByIdRequest)
-> Lens
     RespondActivityTaskCompletedByIdRequest
     RespondActivityTaskCompletedByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCompletedByIdRequest -> Text
_RespondActivityTaskCompletedByIdRequest'runId
           (\ RespondActivityTaskCompletedByIdRequest
x__ Text
y__
              -> RespondActivityTaskCompletedByIdRequest
x__ {_RespondActivityTaskCompletedByIdRequest'runId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCompletedByIdRequest "activityId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityId"
-> (Text -> f Text)
-> RespondActivityTaskCompletedByIdRequest
-> f RespondActivityTaskCompletedByIdRequest
fieldOf Proxy# "activityId"
_
    = ((Text -> f Text)
 -> RespondActivityTaskCompletedByIdRequest
 -> f RespondActivityTaskCompletedByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskCompletedByIdRequest
-> f RespondActivityTaskCompletedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCompletedByIdRequest -> Text)
-> (RespondActivityTaskCompletedByIdRequest
    -> Text -> RespondActivityTaskCompletedByIdRequest)
-> Lens
     RespondActivityTaskCompletedByIdRequest
     RespondActivityTaskCompletedByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCompletedByIdRequest -> Text
_RespondActivityTaskCompletedByIdRequest'activityId
           (\ RespondActivityTaskCompletedByIdRequest
x__ Text
y__
              -> RespondActivityTaskCompletedByIdRequest
x__
                   {_RespondActivityTaskCompletedByIdRequest'activityId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCompletedByIdRequest "result" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "result"
-> (Payloads -> f Payloads)
-> RespondActivityTaskCompletedByIdRequest
-> f RespondActivityTaskCompletedByIdRequest
fieldOf Proxy# "result"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RespondActivityTaskCompletedByIdRequest
 -> f RespondActivityTaskCompletedByIdRequest)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> RespondActivityTaskCompletedByIdRequest
-> f RespondActivityTaskCompletedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCompletedByIdRequest -> Maybe Payloads)
-> (RespondActivityTaskCompletedByIdRequest
    -> Maybe Payloads -> RespondActivityTaskCompletedByIdRequest)
-> Lens
     RespondActivityTaskCompletedByIdRequest
     RespondActivityTaskCompletedByIdRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCompletedByIdRequest -> Maybe Payloads
_RespondActivityTaskCompletedByIdRequest'result
           (\ RespondActivityTaskCompletedByIdRequest
x__ Maybe Payloads
y__
              -> RespondActivityTaskCompletedByIdRequest
x__ {_RespondActivityTaskCompletedByIdRequest'result = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondActivityTaskCompletedByIdRequest "maybe'result" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'result"
-> (Maybe Payloads -> f (Maybe Payloads))
-> RespondActivityTaskCompletedByIdRequest
-> f RespondActivityTaskCompletedByIdRequest
fieldOf Proxy# "maybe'result"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RespondActivityTaskCompletedByIdRequest
 -> f RespondActivityTaskCompletedByIdRequest)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> RespondActivityTaskCompletedByIdRequest
-> f RespondActivityTaskCompletedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCompletedByIdRequest -> Maybe Payloads)
-> (RespondActivityTaskCompletedByIdRequest
    -> Maybe Payloads -> RespondActivityTaskCompletedByIdRequest)
-> Lens
     RespondActivityTaskCompletedByIdRequest
     RespondActivityTaskCompletedByIdRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCompletedByIdRequest -> Maybe Payloads
_RespondActivityTaskCompletedByIdRequest'result
           (\ RespondActivityTaskCompletedByIdRequest
x__ Maybe Payloads
y__
              -> RespondActivityTaskCompletedByIdRequest
x__ {_RespondActivityTaskCompletedByIdRequest'result = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCompletedByIdRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> RespondActivityTaskCompletedByIdRequest
-> f RespondActivityTaskCompletedByIdRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> RespondActivityTaskCompletedByIdRequest
 -> f RespondActivityTaskCompletedByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskCompletedByIdRequest
-> f RespondActivityTaskCompletedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCompletedByIdRequest -> Text)
-> (RespondActivityTaskCompletedByIdRequest
    -> Text -> RespondActivityTaskCompletedByIdRequest)
-> Lens
     RespondActivityTaskCompletedByIdRequest
     RespondActivityTaskCompletedByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCompletedByIdRequest -> Text
_RespondActivityTaskCompletedByIdRequest'identity
           (\ RespondActivityTaskCompletedByIdRequest
x__ Text
y__
              -> RespondActivityTaskCompletedByIdRequest
x__ {_RespondActivityTaskCompletedByIdRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RespondActivityTaskCompletedByIdRequest where
  messageName :: Proxy RespondActivityTaskCompletedByIdRequest -> Text
messageName Proxy RespondActivityTaskCompletedByIdRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondActivityTaskCompletedByIdRequest"
  packedMessageDescriptor :: Proxy RespondActivityTaskCompletedByIdRequest -> ByteString
packedMessageDescriptor Proxy RespondActivityTaskCompletedByIdRequest
_
    = ByteString
"\n\
      \'RespondActivityTaskCompletedByIdRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
      \\vworkflow_id\CAN\STX \SOH(\tR\n\
      \workflowId\DC2\NAK\n\
      \\ACKrun_id\CAN\ETX \SOH(\tR\ENQrunId\DC2\US\n\
      \\vactivity_id\CAN\EOT \SOH(\tR\n\
      \activityId\DC28\n\
      \\ACKresult\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\ACKresult\DC2\SUB\n\
      \\bidentity\CAN\ACK \SOH(\tR\bidentity"
  packedFileDescriptor :: Proxy RespondActivityTaskCompletedByIdRequest -> ByteString
packedFileDescriptor Proxy RespondActivityTaskCompletedByIdRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondActivityTaskCompletedByIdRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor RespondActivityTaskCompletedByIdRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskCompletedByIdRequest Text
-> FieldDescriptor RespondActivityTaskCompletedByIdRequest
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
     RespondActivityTaskCompletedByIdRequest
     RespondActivityTaskCompletedByIdRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskCompletedByIdRequest 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 RespondActivityTaskCompletedByIdRequest
        workflowId__field_descriptor :: FieldDescriptor RespondActivityTaskCompletedByIdRequest
workflowId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskCompletedByIdRequest Text
-> FieldDescriptor RespondActivityTaskCompletedByIdRequest
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
     RespondActivityTaskCompletedByIdRequest
     RespondActivityTaskCompletedByIdRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskCompletedByIdRequest 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 RespondActivityTaskCompletedByIdRequest
        runId__field_descriptor :: FieldDescriptor RespondActivityTaskCompletedByIdRequest
runId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskCompletedByIdRequest Text
-> FieldDescriptor RespondActivityTaskCompletedByIdRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"run_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondActivityTaskCompletedByIdRequest
     RespondActivityTaskCompletedByIdRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskCompletedByIdRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskCompletedByIdRequest
        activityId__field_descriptor :: FieldDescriptor RespondActivityTaskCompletedByIdRequest
activityId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskCompletedByIdRequest Text
-> FieldDescriptor RespondActivityTaskCompletedByIdRequest
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
     RespondActivityTaskCompletedByIdRequest
     RespondActivityTaskCompletedByIdRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskCompletedByIdRequest 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 RespondActivityTaskCompletedByIdRequest
        result__field_descriptor :: FieldDescriptor RespondActivityTaskCompletedByIdRequest
result__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor RespondActivityTaskCompletedByIdRequest Payloads
-> FieldDescriptor RespondActivityTaskCompletedByIdRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"result"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  RespondActivityTaskCompletedByIdRequest
  RespondActivityTaskCompletedByIdRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor RespondActivityTaskCompletedByIdRequest Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'result")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskCompletedByIdRequest
        identity__field_descriptor :: FieldDescriptor RespondActivityTaskCompletedByIdRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskCompletedByIdRequest Text
-> FieldDescriptor RespondActivityTaskCompletedByIdRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondActivityTaskCompletedByIdRequest
     RespondActivityTaskCompletedByIdRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskCompletedByIdRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskCompletedByIdRequest
      in
        [(Tag, FieldDescriptor RespondActivityTaskCompletedByIdRequest)]
-> Map
     Tag (FieldDescriptor RespondActivityTaskCompletedByIdRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RespondActivityTaskCompletedByIdRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RespondActivityTaskCompletedByIdRequest
workflowId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RespondActivityTaskCompletedByIdRequest
runId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor RespondActivityTaskCompletedByIdRequest
activityId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor RespondActivityTaskCompletedByIdRequest
result__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor RespondActivityTaskCompletedByIdRequest
identity__field_descriptor)]
  unknownFields :: Lens' RespondActivityTaskCompletedByIdRequest FieldSet
unknownFields
    = (RespondActivityTaskCompletedByIdRequest -> FieldSet)
-> (RespondActivityTaskCompletedByIdRequest
    -> FieldSet -> RespondActivityTaskCompletedByIdRequest)
-> Lens' RespondActivityTaskCompletedByIdRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondActivityTaskCompletedByIdRequest -> FieldSet
_RespondActivityTaskCompletedByIdRequest'_unknownFields
        (\ RespondActivityTaskCompletedByIdRequest
x__ FieldSet
y__
           -> RespondActivityTaskCompletedByIdRequest
x__
                {_RespondActivityTaskCompletedByIdRequest'_unknownFields = y__})
  defMessage :: RespondActivityTaskCompletedByIdRequest
defMessage
    = RespondActivityTaskCompletedByIdRequest'_constructor
        {_RespondActivityTaskCompletedByIdRequest'namespace :: Text
_RespondActivityTaskCompletedByIdRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCompletedByIdRequest'workflowId :: Text
_RespondActivityTaskCompletedByIdRequest'workflowId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCompletedByIdRequest'runId :: Text
_RespondActivityTaskCompletedByIdRequest'runId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCompletedByIdRequest'activityId :: Text
_RespondActivityTaskCompletedByIdRequest'activityId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCompletedByIdRequest'result :: Maybe Payloads
_RespondActivityTaskCompletedByIdRequest'result = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _RespondActivityTaskCompletedByIdRequest'identity :: Text
_RespondActivityTaskCompletedByIdRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCompletedByIdRequest'_unknownFields :: FieldSet
_RespondActivityTaskCompletedByIdRequest'_unknownFields = []}
  parseMessage :: Parser RespondActivityTaskCompletedByIdRequest
parseMessage
    = let
        loop ::
          RespondActivityTaskCompletedByIdRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondActivityTaskCompletedByIdRequest
        loop :: RespondActivityTaskCompletedByIdRequest
-> Parser RespondActivityTaskCompletedByIdRequest
loop RespondActivityTaskCompletedByIdRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"workflow_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"workflowId") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"run_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"runId") y x)
                        Word64
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
"activity_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"activityId") y x)
                        Word64
42
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"result"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"result") y x)
                        Word64
50
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser RespondActivityTaskCompletedByIdRequest
-> String -> Parser RespondActivityTaskCompletedByIdRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondActivityTaskCompletedByIdRequest
-> Parser RespondActivityTaskCompletedByIdRequest
loop RespondActivityTaskCompletedByIdRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondActivityTaskCompletedByIdRequest"
  buildMessage :: RespondActivityTaskCompletedByIdRequest -> Builder
buildMessage
    = \ RespondActivityTaskCompletedByIdRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  RespondActivityTaskCompletedByIdRequest
  RespondActivityTaskCompletedByIdRequest
  Text
  Text
-> RespondActivityTaskCompletedByIdRequest -> 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") RespondActivityTaskCompletedByIdRequest
_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
  RespondActivityTaskCompletedByIdRequest
  RespondActivityTaskCompletedByIdRequest
  Text
  Text
-> RespondActivityTaskCompletedByIdRequest -> 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") RespondActivityTaskCompletedByIdRequest
_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
  RespondActivityTaskCompletedByIdRequest
  RespondActivityTaskCompletedByIdRequest
  Text
  Text
-> RespondActivityTaskCompletedByIdRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId") RespondActivityTaskCompletedByIdRequest
_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
  RespondActivityTaskCompletedByIdRequest
  RespondActivityTaskCompletedByIdRequest
  Text
  Text
-> RespondActivityTaskCompletedByIdRequest -> 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") RespondActivityTaskCompletedByIdRequest
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Payloads)
  RespondActivityTaskCompletedByIdRequest
  RespondActivityTaskCompletedByIdRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> RespondActivityTaskCompletedByIdRequest -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'result") RespondActivityTaskCompletedByIdRequest
_x
                          of
                            Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just Payloads
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v = FoldLike
  Text
  RespondActivityTaskCompletedByIdRequest
  RespondActivityTaskCompletedByIdRequest
  Text
  Text
-> RespondActivityTaskCompletedByIdRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") RespondActivityTaskCompletedByIdRequest
_x
                             in
                               if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                     ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        (\ ByteString
bs
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                            (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                               (FoldLike
  FieldSet
  RespondActivityTaskCompletedByIdRequest
  RespondActivityTaskCompletedByIdRequest
  FieldSet
  FieldSet
-> RespondActivityTaskCompletedByIdRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondActivityTaskCompletedByIdRequest
  RespondActivityTaskCompletedByIdRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondActivityTaskCompletedByIdRequest FieldSet
Data.ProtoLens.unknownFields RespondActivityTaskCompletedByIdRequest
_x)))))))
instance Control.DeepSeq.NFData RespondActivityTaskCompletedByIdRequest where
  rnf :: RespondActivityTaskCompletedByIdRequest -> ()
rnf
    = \ RespondActivityTaskCompletedByIdRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondActivityTaskCompletedByIdRequest -> FieldSet
_RespondActivityTaskCompletedByIdRequest'_unknownFields RespondActivityTaskCompletedByIdRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RespondActivityTaskCompletedByIdRequest -> Text
_RespondActivityTaskCompletedByIdRequest'namespace RespondActivityTaskCompletedByIdRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RespondActivityTaskCompletedByIdRequest -> Text
_RespondActivityTaskCompletedByIdRequest'workflowId RespondActivityTaskCompletedByIdRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RespondActivityTaskCompletedByIdRequest -> Text
_RespondActivityTaskCompletedByIdRequest'runId RespondActivityTaskCompletedByIdRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RespondActivityTaskCompletedByIdRequest -> Text
_RespondActivityTaskCompletedByIdRequest'activityId RespondActivityTaskCompletedByIdRequest
x__)
                         (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RespondActivityTaskCompletedByIdRequest -> Maybe Payloads
_RespondActivityTaskCompletedByIdRequest'result RespondActivityTaskCompletedByIdRequest
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (RespondActivityTaskCompletedByIdRequest -> Text
_RespondActivityTaskCompletedByIdRequest'identity RespondActivityTaskCompletedByIdRequest
x__) ()))))))
{- | Fields :
      -}
data RespondActivityTaskCompletedByIdResponse
  = RespondActivityTaskCompletedByIdResponse'_constructor {RespondActivityTaskCompletedByIdResponse -> FieldSet
_RespondActivityTaskCompletedByIdResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Bool
(RespondActivityTaskCompletedByIdResponse
 -> RespondActivityTaskCompletedByIdResponse -> Bool)
-> (RespondActivityTaskCompletedByIdResponse
    -> RespondActivityTaskCompletedByIdResponse -> Bool)
-> Eq RespondActivityTaskCompletedByIdResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Bool
== :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Bool
$c/= :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Bool
/= :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Bool
Prelude.Eq, Eq RespondActivityTaskCompletedByIdResponse
Eq RespondActivityTaskCompletedByIdResponse =>
(RespondActivityTaskCompletedByIdResponse
 -> RespondActivityTaskCompletedByIdResponse -> Ordering)
-> (RespondActivityTaskCompletedByIdResponse
    -> RespondActivityTaskCompletedByIdResponse -> Bool)
-> (RespondActivityTaskCompletedByIdResponse
    -> RespondActivityTaskCompletedByIdResponse -> Bool)
-> (RespondActivityTaskCompletedByIdResponse
    -> RespondActivityTaskCompletedByIdResponse -> Bool)
-> (RespondActivityTaskCompletedByIdResponse
    -> RespondActivityTaskCompletedByIdResponse -> Bool)
-> (RespondActivityTaskCompletedByIdResponse
    -> RespondActivityTaskCompletedByIdResponse
    -> RespondActivityTaskCompletedByIdResponse)
-> (RespondActivityTaskCompletedByIdResponse
    -> RespondActivityTaskCompletedByIdResponse
    -> RespondActivityTaskCompletedByIdResponse)
-> Ord RespondActivityTaskCompletedByIdResponse
RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Bool
RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Ordering
RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse
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 :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Ordering
compare :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Ordering
$c< :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Bool
< :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Bool
$c<= :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Bool
<= :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Bool
$c> :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Bool
> :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Bool
$c>= :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Bool
>= :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse -> Bool
$cmax :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse
max :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse
$cmin :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse
min :: RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse
-> RespondActivityTaskCompletedByIdResponse
Prelude.Ord)
instance Prelude.Show RespondActivityTaskCompletedByIdResponse where
  showsPrec :: Int -> RespondActivityTaskCompletedByIdResponse -> ShowS
showsPrec Int
_ RespondActivityTaskCompletedByIdResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondActivityTaskCompletedByIdResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondActivityTaskCompletedByIdResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message RespondActivityTaskCompletedByIdResponse where
  messageName :: Proxy RespondActivityTaskCompletedByIdResponse -> Text
messageName Proxy RespondActivityTaskCompletedByIdResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondActivityTaskCompletedByIdResponse"
  packedMessageDescriptor :: Proxy RespondActivityTaskCompletedByIdResponse -> ByteString
packedMessageDescriptor Proxy RespondActivityTaskCompletedByIdResponse
_
    = ByteString
"\n\
      \(RespondActivityTaskCompletedByIdResponse"
  packedFileDescriptor :: Proxy RespondActivityTaskCompletedByIdResponse -> ByteString
packedFileDescriptor Proxy RespondActivityTaskCompletedByIdResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondActivityTaskCompletedByIdResponse)
fieldsByTag = let in [(Tag, FieldDescriptor RespondActivityTaskCompletedByIdResponse)]
-> Map
     Tag (FieldDescriptor RespondActivityTaskCompletedByIdResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' RespondActivityTaskCompletedByIdResponse FieldSet
unknownFields
    = (RespondActivityTaskCompletedByIdResponse -> FieldSet)
-> (RespondActivityTaskCompletedByIdResponse
    -> FieldSet -> RespondActivityTaskCompletedByIdResponse)
-> Lens' RespondActivityTaskCompletedByIdResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondActivityTaskCompletedByIdResponse -> FieldSet
_RespondActivityTaskCompletedByIdResponse'_unknownFields
        (\ RespondActivityTaskCompletedByIdResponse
x__ FieldSet
y__
           -> RespondActivityTaskCompletedByIdResponse
x__
                {_RespondActivityTaskCompletedByIdResponse'_unknownFields = y__})
  defMessage :: RespondActivityTaskCompletedByIdResponse
defMessage
    = RespondActivityTaskCompletedByIdResponse'_constructor
        {_RespondActivityTaskCompletedByIdResponse'_unknownFields :: FieldSet
_RespondActivityTaskCompletedByIdResponse'_unknownFields = []}
  parseMessage :: Parser RespondActivityTaskCompletedByIdResponse
parseMessage
    = let
        loop ::
          RespondActivityTaskCompletedByIdResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondActivityTaskCompletedByIdResponse
        loop :: RespondActivityTaskCompletedByIdResponse
-> Parser RespondActivityTaskCompletedByIdResponse
loop RespondActivityTaskCompletedByIdResponse
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 RespondActivityTaskCompletedByIdResponse
-> String -> Parser RespondActivityTaskCompletedByIdResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondActivityTaskCompletedByIdResponse
-> Parser RespondActivityTaskCompletedByIdResponse
loop RespondActivityTaskCompletedByIdResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondActivityTaskCompletedByIdResponse"
  buildMessage :: RespondActivityTaskCompletedByIdResponse -> Builder
buildMessage
    = \ RespondActivityTaskCompletedByIdResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  RespondActivityTaskCompletedByIdResponse
  RespondActivityTaskCompletedByIdResponse
  FieldSet
  FieldSet
-> RespondActivityTaskCompletedByIdResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondActivityTaskCompletedByIdResponse
  RespondActivityTaskCompletedByIdResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondActivityTaskCompletedByIdResponse FieldSet
Data.ProtoLens.unknownFields RespondActivityTaskCompletedByIdResponse
_x)
instance Control.DeepSeq.NFData RespondActivityTaskCompletedByIdResponse where
  rnf :: RespondActivityTaskCompletedByIdResponse -> ()
rnf
    = \ RespondActivityTaskCompletedByIdResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondActivityTaskCompletedByIdResponse -> FieldSet
_RespondActivityTaskCompletedByIdResponse'_unknownFields RespondActivityTaskCompletedByIdResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskToken' @:: Lens' RespondActivityTaskCompletedRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.result' @:: Lens' RespondActivityTaskCompletedRequest Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'result' @:: Lens' RespondActivityTaskCompletedRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' RespondActivityTaskCompletedRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' RespondActivityTaskCompletedRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workerVersion' @:: Lens' RespondActivityTaskCompletedRequest Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workerVersion' @:: Lens' RespondActivityTaskCompletedRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)@ -}
data RespondActivityTaskCompletedRequest
  = RespondActivityTaskCompletedRequest'_constructor {RespondActivityTaskCompletedRequest -> ByteString
_RespondActivityTaskCompletedRequest'taskToken :: !Data.ByteString.ByteString,
                                                      RespondActivityTaskCompletedRequest -> Maybe Payloads
_RespondActivityTaskCompletedRequest'result :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                      RespondActivityTaskCompletedRequest -> Text
_RespondActivityTaskCompletedRequest'identity :: !Data.Text.Text,
                                                      RespondActivityTaskCompletedRequest -> Text
_RespondActivityTaskCompletedRequest'namespace :: !Data.Text.Text,
                                                      RespondActivityTaskCompletedRequest -> Maybe WorkerVersionStamp
_RespondActivityTaskCompletedRequest'workerVersion :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp),
                                                      RespondActivityTaskCompletedRequest -> FieldSet
_RespondActivityTaskCompletedRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Bool
(RespondActivityTaskCompletedRequest
 -> RespondActivityTaskCompletedRequest -> Bool)
-> (RespondActivityTaskCompletedRequest
    -> RespondActivityTaskCompletedRequest -> Bool)
-> Eq RespondActivityTaskCompletedRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Bool
== :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Bool
$c/= :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Bool
/= :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Bool
Prelude.Eq, Eq RespondActivityTaskCompletedRequest
Eq RespondActivityTaskCompletedRequest =>
(RespondActivityTaskCompletedRequest
 -> RespondActivityTaskCompletedRequest -> Ordering)
-> (RespondActivityTaskCompletedRequest
    -> RespondActivityTaskCompletedRequest -> Bool)
-> (RespondActivityTaskCompletedRequest
    -> RespondActivityTaskCompletedRequest -> Bool)
-> (RespondActivityTaskCompletedRequest
    -> RespondActivityTaskCompletedRequest -> Bool)
-> (RespondActivityTaskCompletedRequest
    -> RespondActivityTaskCompletedRequest -> Bool)
-> (RespondActivityTaskCompletedRequest
    -> RespondActivityTaskCompletedRequest
    -> RespondActivityTaskCompletedRequest)
-> (RespondActivityTaskCompletedRequest
    -> RespondActivityTaskCompletedRequest
    -> RespondActivityTaskCompletedRequest)
-> Ord RespondActivityTaskCompletedRequest
RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Bool
RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Ordering
RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest
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 :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Ordering
compare :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Ordering
$c< :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Bool
< :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Bool
$c<= :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Bool
<= :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Bool
$c> :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Bool
> :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Bool
$c>= :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Bool
>= :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest -> Bool
$cmax :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest
max :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest
$cmin :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest
min :: RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest
-> RespondActivityTaskCompletedRequest
Prelude.Ord)
instance Prelude.Show RespondActivityTaskCompletedRequest where
  showsPrec :: Int -> RespondActivityTaskCompletedRequest -> ShowS
showsPrec Int
_ RespondActivityTaskCompletedRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondActivityTaskCompletedRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondActivityTaskCompletedRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RespondActivityTaskCompletedRequest "taskToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskToken"
-> (ByteString -> f ByteString)
-> RespondActivityTaskCompletedRequest
-> f RespondActivityTaskCompletedRequest
fieldOf Proxy# "taskToken"
_
    = ((ByteString -> f ByteString)
 -> RespondActivityTaskCompletedRequest
 -> f RespondActivityTaskCompletedRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> RespondActivityTaskCompletedRequest
-> f RespondActivityTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCompletedRequest -> ByteString)
-> (RespondActivityTaskCompletedRequest
    -> ByteString -> RespondActivityTaskCompletedRequest)
-> Lens
     RespondActivityTaskCompletedRequest
     RespondActivityTaskCompletedRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCompletedRequest -> ByteString
_RespondActivityTaskCompletedRequest'taskToken
           (\ RespondActivityTaskCompletedRequest
x__ ByteString
y__
              -> RespondActivityTaskCompletedRequest
x__ {_RespondActivityTaskCompletedRequest'taskToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCompletedRequest "result" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "result"
-> (Payloads -> f Payloads)
-> RespondActivityTaskCompletedRequest
-> f RespondActivityTaskCompletedRequest
fieldOf Proxy# "result"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RespondActivityTaskCompletedRequest
 -> f RespondActivityTaskCompletedRequest)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> RespondActivityTaskCompletedRequest
-> f RespondActivityTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCompletedRequest -> Maybe Payloads)
-> (RespondActivityTaskCompletedRequest
    -> Maybe Payloads -> RespondActivityTaskCompletedRequest)
-> Lens
     RespondActivityTaskCompletedRequest
     RespondActivityTaskCompletedRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCompletedRequest -> Maybe Payloads
_RespondActivityTaskCompletedRequest'result
           (\ RespondActivityTaskCompletedRequest
x__ Maybe Payloads
y__
              -> RespondActivityTaskCompletedRequest
x__ {_RespondActivityTaskCompletedRequest'result = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondActivityTaskCompletedRequest "maybe'result" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'result"
-> (Maybe Payloads -> f (Maybe Payloads))
-> RespondActivityTaskCompletedRequest
-> f RespondActivityTaskCompletedRequest
fieldOf Proxy# "maybe'result"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RespondActivityTaskCompletedRequest
 -> f RespondActivityTaskCompletedRequest)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> RespondActivityTaskCompletedRequest
-> f RespondActivityTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCompletedRequest -> Maybe Payloads)
-> (RespondActivityTaskCompletedRequest
    -> Maybe Payloads -> RespondActivityTaskCompletedRequest)
-> Lens
     RespondActivityTaskCompletedRequest
     RespondActivityTaskCompletedRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCompletedRequest -> Maybe Payloads
_RespondActivityTaskCompletedRequest'result
           (\ RespondActivityTaskCompletedRequest
x__ Maybe Payloads
y__
              -> RespondActivityTaskCompletedRequest
x__ {_RespondActivityTaskCompletedRequest'result = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCompletedRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> RespondActivityTaskCompletedRequest
-> f RespondActivityTaskCompletedRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> RespondActivityTaskCompletedRequest
 -> f RespondActivityTaskCompletedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskCompletedRequest
-> f RespondActivityTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCompletedRequest -> Text)
-> (RespondActivityTaskCompletedRequest
    -> Text -> RespondActivityTaskCompletedRequest)
-> Lens
     RespondActivityTaskCompletedRequest
     RespondActivityTaskCompletedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCompletedRequest -> Text
_RespondActivityTaskCompletedRequest'identity
           (\ RespondActivityTaskCompletedRequest
x__ Text
y__
              -> RespondActivityTaskCompletedRequest
x__ {_RespondActivityTaskCompletedRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCompletedRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RespondActivityTaskCompletedRequest
-> f RespondActivityTaskCompletedRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RespondActivityTaskCompletedRequest
 -> f RespondActivityTaskCompletedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskCompletedRequest
-> f RespondActivityTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCompletedRequest -> Text)
-> (RespondActivityTaskCompletedRequest
    -> Text -> RespondActivityTaskCompletedRequest)
-> Lens
     RespondActivityTaskCompletedRequest
     RespondActivityTaskCompletedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCompletedRequest -> Text
_RespondActivityTaskCompletedRequest'namespace
           (\ RespondActivityTaskCompletedRequest
x__ Text
y__
              -> RespondActivityTaskCompletedRequest
x__ {_RespondActivityTaskCompletedRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskCompletedRequest "workerVersion" Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerVersion"
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> RespondActivityTaskCompletedRequest
-> f RespondActivityTaskCompletedRequest
fieldOf Proxy# "workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> RespondActivityTaskCompletedRequest
 -> f RespondActivityTaskCompletedRequest)
-> ((WorkerVersionStamp -> f WorkerVersionStamp)
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> RespondActivityTaskCompletedRequest
-> f RespondActivityTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCompletedRequest -> Maybe WorkerVersionStamp)
-> (RespondActivityTaskCompletedRequest
    -> Maybe WorkerVersionStamp -> RespondActivityTaskCompletedRequest)
-> Lens
     RespondActivityTaskCompletedRequest
     RespondActivityTaskCompletedRequest
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCompletedRequest -> Maybe WorkerVersionStamp
_RespondActivityTaskCompletedRequest'workerVersion
           (\ RespondActivityTaskCompletedRequest
x__ Maybe WorkerVersionStamp
y__
              -> RespondActivityTaskCompletedRequest
x__ {_RespondActivityTaskCompletedRequest'workerVersion = y__}))
        (WorkerVersionStamp
-> Lens' (Maybe WorkerVersionStamp) WorkerVersionStamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkerVersionStamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondActivityTaskCompletedRequest "maybe'workerVersion" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workerVersion"
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> RespondActivityTaskCompletedRequest
-> f RespondActivityTaskCompletedRequest
fieldOf Proxy# "maybe'workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> RespondActivityTaskCompletedRequest
 -> f RespondActivityTaskCompletedRequest)
-> ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> RespondActivityTaskCompletedRequest
-> f RespondActivityTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskCompletedRequest -> Maybe WorkerVersionStamp)
-> (RespondActivityTaskCompletedRequest
    -> Maybe WorkerVersionStamp -> RespondActivityTaskCompletedRequest)
-> Lens
     RespondActivityTaskCompletedRequest
     RespondActivityTaskCompletedRequest
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskCompletedRequest -> Maybe WorkerVersionStamp
_RespondActivityTaskCompletedRequest'workerVersion
           (\ RespondActivityTaskCompletedRequest
x__ Maybe WorkerVersionStamp
y__
              -> RespondActivityTaskCompletedRequest
x__ {_RespondActivityTaskCompletedRequest'workerVersion = y__}))
        (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RespondActivityTaskCompletedRequest where
  messageName :: Proxy RespondActivityTaskCompletedRequest -> Text
messageName Proxy RespondActivityTaskCompletedRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondActivityTaskCompletedRequest"
  packedMessageDescriptor :: Proxy RespondActivityTaskCompletedRequest -> ByteString
packedMessageDescriptor Proxy RespondActivityTaskCompletedRequest
_
    = ByteString
"\n\
      \#RespondActivityTaskCompletedRequest\DC2\GS\n\
      \\n\
      \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC28\n\
      \\ACKresult\CAN\STX \SOH(\v2 .temporal.api.common.v1.PayloadsR\ACKresult\DC2\SUB\n\
      \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2\FS\n\
      \\tnamespace\CAN\EOT \SOH(\tR\tnamespace\DC2Q\n\
      \\SOworker_version\CAN\ENQ \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion"
  packedFileDescriptor :: Proxy RespondActivityTaskCompletedRequest -> ByteString
packedFileDescriptor Proxy RespondActivityTaskCompletedRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondActivityTaskCompletedRequest)
fieldsByTag
    = let
        taskToken__field_descriptor :: FieldDescriptor RespondActivityTaskCompletedRequest
taskToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor RespondActivityTaskCompletedRequest ByteString
-> FieldDescriptor RespondActivityTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     RespondActivityTaskCompletedRequest
     RespondActivityTaskCompletedRequest
     ByteString
     ByteString
-> FieldAccessor RespondActivityTaskCompletedRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskCompletedRequest
        result__field_descriptor :: FieldDescriptor RespondActivityTaskCompletedRequest
result__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor RespondActivityTaskCompletedRequest Payloads
-> FieldDescriptor RespondActivityTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"result"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  RespondActivityTaskCompletedRequest
  RespondActivityTaskCompletedRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor RespondActivityTaskCompletedRequest Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'result")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskCompletedRequest
        identity__field_descriptor :: FieldDescriptor RespondActivityTaskCompletedRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskCompletedRequest Text
-> FieldDescriptor RespondActivityTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondActivityTaskCompletedRequest
     RespondActivityTaskCompletedRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskCompletedRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskCompletedRequest
        namespace__field_descriptor :: FieldDescriptor RespondActivityTaskCompletedRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskCompletedRequest Text
-> FieldDescriptor RespondActivityTaskCompletedRequest
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
     RespondActivityTaskCompletedRequest
     RespondActivityTaskCompletedRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskCompletedRequest 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 RespondActivityTaskCompletedRequest
        workerVersion__field_descriptor :: FieldDescriptor RespondActivityTaskCompletedRequest
workerVersion__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionStamp
-> FieldAccessor
     RespondActivityTaskCompletedRequest WorkerVersionStamp
-> FieldDescriptor RespondActivityTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_version"
              (MessageOrGroup -> FieldTypeDescriptor WorkerVersionStamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)
              (Lens
  RespondActivityTaskCompletedRequest
  RespondActivityTaskCompletedRequest
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> FieldAccessor
     RespondActivityTaskCompletedRequest WorkerVersionStamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workerVersion")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskCompletedRequest
      in
        [(Tag, FieldDescriptor RespondActivityTaskCompletedRequest)]
-> Map Tag (FieldDescriptor RespondActivityTaskCompletedRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RespondActivityTaskCompletedRequest
taskToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RespondActivityTaskCompletedRequest
result__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RespondActivityTaskCompletedRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor RespondActivityTaskCompletedRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor RespondActivityTaskCompletedRequest
workerVersion__field_descriptor)]
  unknownFields :: Lens' RespondActivityTaskCompletedRequest FieldSet
unknownFields
    = (RespondActivityTaskCompletedRequest -> FieldSet)
-> (RespondActivityTaskCompletedRequest
    -> FieldSet -> RespondActivityTaskCompletedRequest)
-> Lens' RespondActivityTaskCompletedRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondActivityTaskCompletedRequest -> FieldSet
_RespondActivityTaskCompletedRequest'_unknownFields
        (\ RespondActivityTaskCompletedRequest
x__ FieldSet
y__
           -> RespondActivityTaskCompletedRequest
x__ {_RespondActivityTaskCompletedRequest'_unknownFields = y__})
  defMessage :: RespondActivityTaskCompletedRequest
defMessage
    = RespondActivityTaskCompletedRequest'_constructor
        {_RespondActivityTaskCompletedRequest'taskToken :: ByteString
_RespondActivityTaskCompletedRequest'taskToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCompletedRequest'result :: Maybe Payloads
_RespondActivityTaskCompletedRequest'result = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _RespondActivityTaskCompletedRequest'identity :: Text
_RespondActivityTaskCompletedRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCompletedRequest'namespace :: Text
_RespondActivityTaskCompletedRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskCompletedRequest'workerVersion :: Maybe WorkerVersionStamp
_RespondActivityTaskCompletedRequest'workerVersion = Maybe WorkerVersionStamp
forall a. Maybe a
Prelude.Nothing,
         _RespondActivityTaskCompletedRequest'_unknownFields :: FieldSet
_RespondActivityTaskCompletedRequest'_unknownFields = []}
  parseMessage :: Parser RespondActivityTaskCompletedRequest
parseMessage
    = let
        loop ::
          RespondActivityTaskCompletedRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondActivityTaskCompletedRequest
        loop :: RespondActivityTaskCompletedRequest
-> Parser RespondActivityTaskCompletedRequest
loop RespondActivityTaskCompletedRequest
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 ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"task_token"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskToken") y x)
                        Word64
18
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"result"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"result") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
42
                          -> do y <- Parser WorkerVersionStamp -> String -> Parser WorkerVersionStamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"worker_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerVersion") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser RespondActivityTaskCompletedRequest
-> String -> Parser RespondActivityTaskCompletedRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondActivityTaskCompletedRequest
-> Parser RespondActivityTaskCompletedRequest
loop RespondActivityTaskCompletedRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondActivityTaskCompletedRequest"
  buildMessage :: RespondActivityTaskCompletedRequest -> Builder
buildMessage
    = \ RespondActivityTaskCompletedRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: ByteString
_v = FoldLike
  ByteString
  RespondActivityTaskCompletedRequest
  RespondActivityTaskCompletedRequest
  ByteString
  ByteString
-> RespondActivityTaskCompletedRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken") RespondActivityTaskCompletedRequest
_x
              in
                if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
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
bs
                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         ByteString
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe Payloads)
  RespondActivityTaskCompletedRequest
  RespondActivityTaskCompletedRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> RespondActivityTaskCompletedRequest -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'result") RespondActivityTaskCompletedRequest
_x
                 of
                   Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just Payloads
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v = FoldLike
  Text
  RespondActivityTaskCompletedRequest
  RespondActivityTaskCompletedRequest
  Text
  Text
-> RespondActivityTaskCompletedRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") RespondActivityTaskCompletedRequest
_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
  RespondActivityTaskCompletedRequest
  RespondActivityTaskCompletedRequest
  Text
  Text
-> RespondActivityTaskCompletedRequest -> 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") RespondActivityTaskCompletedRequest
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe WorkerVersionStamp)
  RespondActivityTaskCompletedRequest
  RespondActivityTaskCompletedRequest
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> RespondActivityTaskCompletedRequest -> Maybe WorkerVersionStamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workerVersion") RespondActivityTaskCompletedRequest
_x
                          of
                            Maybe WorkerVersionStamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just WorkerVersionStamp
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (WorkerVersionStamp -> ByteString)
-> WorkerVersionStamp
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      WorkerVersionStamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkerVersionStamp
_v))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  RespondActivityTaskCompletedRequest
  RespondActivityTaskCompletedRequest
  FieldSet
  FieldSet
-> RespondActivityTaskCompletedRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondActivityTaskCompletedRequest
  RespondActivityTaskCompletedRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondActivityTaskCompletedRequest FieldSet
Data.ProtoLens.unknownFields RespondActivityTaskCompletedRequest
_x))))))
instance Control.DeepSeq.NFData RespondActivityTaskCompletedRequest where
  rnf :: RespondActivityTaskCompletedRequest -> ()
rnf
    = \ RespondActivityTaskCompletedRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondActivityTaskCompletedRequest -> FieldSet
_RespondActivityTaskCompletedRequest'_unknownFields RespondActivityTaskCompletedRequest
x__)
             (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RespondActivityTaskCompletedRequest -> ByteString
_RespondActivityTaskCompletedRequest'taskToken RespondActivityTaskCompletedRequest
x__)
                (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RespondActivityTaskCompletedRequest -> Maybe Payloads
_RespondActivityTaskCompletedRequest'result RespondActivityTaskCompletedRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RespondActivityTaskCompletedRequest -> Text
_RespondActivityTaskCompletedRequest'identity RespondActivityTaskCompletedRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RespondActivityTaskCompletedRequest -> Text
_RespondActivityTaskCompletedRequest'namespace RespondActivityTaskCompletedRequest
x__)
                         (Maybe WorkerVersionStamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RespondActivityTaskCompletedRequest -> Maybe WorkerVersionStamp
_RespondActivityTaskCompletedRequest'workerVersion RespondActivityTaskCompletedRequest
x__) ())))))
{- | Fields :
      -}
data RespondActivityTaskCompletedResponse
  = RespondActivityTaskCompletedResponse'_constructor {RespondActivityTaskCompletedResponse -> FieldSet
_RespondActivityTaskCompletedResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Bool
(RespondActivityTaskCompletedResponse
 -> RespondActivityTaskCompletedResponse -> Bool)
-> (RespondActivityTaskCompletedResponse
    -> RespondActivityTaskCompletedResponse -> Bool)
-> Eq RespondActivityTaskCompletedResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Bool
== :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Bool
$c/= :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Bool
/= :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Bool
Prelude.Eq, Eq RespondActivityTaskCompletedResponse
Eq RespondActivityTaskCompletedResponse =>
(RespondActivityTaskCompletedResponse
 -> RespondActivityTaskCompletedResponse -> Ordering)
-> (RespondActivityTaskCompletedResponse
    -> RespondActivityTaskCompletedResponse -> Bool)
-> (RespondActivityTaskCompletedResponse
    -> RespondActivityTaskCompletedResponse -> Bool)
-> (RespondActivityTaskCompletedResponse
    -> RespondActivityTaskCompletedResponse -> Bool)
-> (RespondActivityTaskCompletedResponse
    -> RespondActivityTaskCompletedResponse -> Bool)
-> (RespondActivityTaskCompletedResponse
    -> RespondActivityTaskCompletedResponse
    -> RespondActivityTaskCompletedResponse)
-> (RespondActivityTaskCompletedResponse
    -> RespondActivityTaskCompletedResponse
    -> RespondActivityTaskCompletedResponse)
-> Ord RespondActivityTaskCompletedResponse
RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Bool
RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Ordering
RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse
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 :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Ordering
compare :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Ordering
$c< :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Bool
< :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Bool
$c<= :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Bool
<= :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Bool
$c> :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Bool
> :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Bool
$c>= :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Bool
>= :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse -> Bool
$cmax :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse
max :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse
$cmin :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse
min :: RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse
-> RespondActivityTaskCompletedResponse
Prelude.Ord)
instance Prelude.Show RespondActivityTaskCompletedResponse where
  showsPrec :: Int -> RespondActivityTaskCompletedResponse -> ShowS
showsPrec Int
_ RespondActivityTaskCompletedResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondActivityTaskCompletedResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondActivityTaskCompletedResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message RespondActivityTaskCompletedResponse where
  messageName :: Proxy RespondActivityTaskCompletedResponse -> Text
messageName Proxy RespondActivityTaskCompletedResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondActivityTaskCompletedResponse"
  packedMessageDescriptor :: Proxy RespondActivityTaskCompletedResponse -> ByteString
packedMessageDescriptor Proxy RespondActivityTaskCompletedResponse
_
    = ByteString
"\n\
      \$RespondActivityTaskCompletedResponse"
  packedFileDescriptor :: Proxy RespondActivityTaskCompletedResponse -> ByteString
packedFileDescriptor Proxy RespondActivityTaskCompletedResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondActivityTaskCompletedResponse)
fieldsByTag = let in [(Tag, FieldDescriptor RespondActivityTaskCompletedResponse)]
-> Map Tag (FieldDescriptor RespondActivityTaskCompletedResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' RespondActivityTaskCompletedResponse FieldSet
unknownFields
    = (RespondActivityTaskCompletedResponse -> FieldSet)
-> (RespondActivityTaskCompletedResponse
    -> FieldSet -> RespondActivityTaskCompletedResponse)
-> Lens' RespondActivityTaskCompletedResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondActivityTaskCompletedResponse -> FieldSet
_RespondActivityTaskCompletedResponse'_unknownFields
        (\ RespondActivityTaskCompletedResponse
x__ FieldSet
y__
           -> RespondActivityTaskCompletedResponse
x__
                {_RespondActivityTaskCompletedResponse'_unknownFields = y__})
  defMessage :: RespondActivityTaskCompletedResponse
defMessage
    = RespondActivityTaskCompletedResponse'_constructor
        {_RespondActivityTaskCompletedResponse'_unknownFields :: FieldSet
_RespondActivityTaskCompletedResponse'_unknownFields = []}
  parseMessage :: Parser RespondActivityTaskCompletedResponse
parseMessage
    = let
        loop ::
          RespondActivityTaskCompletedResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondActivityTaskCompletedResponse
        loop :: RespondActivityTaskCompletedResponse
-> Parser RespondActivityTaskCompletedResponse
loop RespondActivityTaskCompletedResponse
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 RespondActivityTaskCompletedResponse
-> String -> Parser RespondActivityTaskCompletedResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondActivityTaskCompletedResponse
-> Parser RespondActivityTaskCompletedResponse
loop RespondActivityTaskCompletedResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondActivityTaskCompletedResponse"
  buildMessage :: RespondActivityTaskCompletedResponse -> Builder
buildMessage
    = \ RespondActivityTaskCompletedResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  RespondActivityTaskCompletedResponse
  RespondActivityTaskCompletedResponse
  FieldSet
  FieldSet
-> RespondActivityTaskCompletedResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondActivityTaskCompletedResponse
  RespondActivityTaskCompletedResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondActivityTaskCompletedResponse FieldSet
Data.ProtoLens.unknownFields RespondActivityTaskCompletedResponse
_x)
instance Control.DeepSeq.NFData RespondActivityTaskCompletedResponse where
  rnf :: RespondActivityTaskCompletedResponse -> ()
rnf
    = \ RespondActivityTaskCompletedResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondActivityTaskCompletedResponse -> FieldSet
_RespondActivityTaskCompletedResponse'_unknownFields RespondActivityTaskCompletedResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' RespondActivityTaskFailedByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowId' @:: Lens' RespondActivityTaskFailedByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.runId' @:: Lens' RespondActivityTaskFailedByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.activityId' @:: Lens' RespondActivityTaskFailedByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.failure' @:: Lens' RespondActivityTaskFailedByIdRequest Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'failure' @:: Lens' RespondActivityTaskFailedByIdRequest (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' RespondActivityTaskFailedByIdRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.lastHeartbeatDetails' @:: Lens' RespondActivityTaskFailedByIdRequest Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'lastHeartbeatDetails' @:: Lens' RespondActivityTaskFailedByIdRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@ -}
data RespondActivityTaskFailedByIdRequest
  = RespondActivityTaskFailedByIdRequest'_constructor {RespondActivityTaskFailedByIdRequest -> Text
_RespondActivityTaskFailedByIdRequest'namespace :: !Data.Text.Text,
                                                       RespondActivityTaskFailedByIdRequest -> Text
_RespondActivityTaskFailedByIdRequest'workflowId :: !Data.Text.Text,
                                                       RespondActivityTaskFailedByIdRequest -> Text
_RespondActivityTaskFailedByIdRequest'runId :: !Data.Text.Text,
                                                       RespondActivityTaskFailedByIdRequest -> Text
_RespondActivityTaskFailedByIdRequest'activityId :: !Data.Text.Text,
                                                       RespondActivityTaskFailedByIdRequest -> Maybe Failure
_RespondActivityTaskFailedByIdRequest'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                       RespondActivityTaskFailedByIdRequest -> Text
_RespondActivityTaskFailedByIdRequest'identity :: !Data.Text.Text,
                                                       RespondActivityTaskFailedByIdRequest -> Maybe Payloads
_RespondActivityTaskFailedByIdRequest'lastHeartbeatDetails :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                       RespondActivityTaskFailedByIdRequest -> FieldSet
_RespondActivityTaskFailedByIdRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Bool
(RespondActivityTaskFailedByIdRequest
 -> RespondActivityTaskFailedByIdRequest -> Bool)
-> (RespondActivityTaskFailedByIdRequest
    -> RespondActivityTaskFailedByIdRequest -> Bool)
-> Eq RespondActivityTaskFailedByIdRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Bool
== :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Bool
$c/= :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Bool
/= :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Bool
Prelude.Eq, Eq RespondActivityTaskFailedByIdRequest
Eq RespondActivityTaskFailedByIdRequest =>
(RespondActivityTaskFailedByIdRequest
 -> RespondActivityTaskFailedByIdRequest -> Ordering)
-> (RespondActivityTaskFailedByIdRequest
    -> RespondActivityTaskFailedByIdRequest -> Bool)
-> (RespondActivityTaskFailedByIdRequest
    -> RespondActivityTaskFailedByIdRequest -> Bool)
-> (RespondActivityTaskFailedByIdRequest
    -> RespondActivityTaskFailedByIdRequest -> Bool)
-> (RespondActivityTaskFailedByIdRequest
    -> RespondActivityTaskFailedByIdRequest -> Bool)
-> (RespondActivityTaskFailedByIdRequest
    -> RespondActivityTaskFailedByIdRequest
    -> RespondActivityTaskFailedByIdRequest)
-> (RespondActivityTaskFailedByIdRequest
    -> RespondActivityTaskFailedByIdRequest
    -> RespondActivityTaskFailedByIdRequest)
-> Ord RespondActivityTaskFailedByIdRequest
RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Bool
RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Ordering
RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest
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 :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Ordering
compare :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Ordering
$c< :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Bool
< :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Bool
$c<= :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Bool
<= :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Bool
$c> :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Bool
> :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Bool
$c>= :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Bool
>= :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest -> Bool
$cmax :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest
max :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest
$cmin :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest
min :: RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest
-> RespondActivityTaskFailedByIdRequest
Prelude.Ord)
instance Prelude.Show RespondActivityTaskFailedByIdRequest where
  showsPrec :: Int -> RespondActivityTaskFailedByIdRequest -> ShowS
showsPrec Int
_ RespondActivityTaskFailedByIdRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondActivityTaskFailedByIdRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondActivityTaskFailedByIdRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedByIdRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RespondActivityTaskFailedByIdRequest
 -> f RespondActivityTaskFailedByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedByIdRequest -> Text)
-> (RespondActivityTaskFailedByIdRequest
    -> Text -> RespondActivityTaskFailedByIdRequest)
-> Lens
     RespondActivityTaskFailedByIdRequest
     RespondActivityTaskFailedByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedByIdRequest -> Text
_RespondActivityTaskFailedByIdRequest'namespace
           (\ RespondActivityTaskFailedByIdRequest
x__ Text
y__
              -> RespondActivityTaskFailedByIdRequest
x__ {_RespondActivityTaskFailedByIdRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedByIdRequest "workflowId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowId"
-> (Text -> f Text)
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
fieldOf Proxy# "workflowId"
_
    = ((Text -> f Text)
 -> RespondActivityTaskFailedByIdRequest
 -> f RespondActivityTaskFailedByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedByIdRequest -> Text)
-> (RespondActivityTaskFailedByIdRequest
    -> Text -> RespondActivityTaskFailedByIdRequest)
-> Lens
     RespondActivityTaskFailedByIdRequest
     RespondActivityTaskFailedByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedByIdRequest -> Text
_RespondActivityTaskFailedByIdRequest'workflowId
           (\ RespondActivityTaskFailedByIdRequest
x__ Text
y__
              -> RespondActivityTaskFailedByIdRequest
x__ {_RespondActivityTaskFailedByIdRequest'workflowId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedByIdRequest "runId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "runId"
-> (Text -> f Text)
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
fieldOf Proxy# "runId"
_
    = ((Text -> f Text)
 -> RespondActivityTaskFailedByIdRequest
 -> f RespondActivityTaskFailedByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedByIdRequest -> Text)
-> (RespondActivityTaskFailedByIdRequest
    -> Text -> RespondActivityTaskFailedByIdRequest)
-> Lens
     RespondActivityTaskFailedByIdRequest
     RespondActivityTaskFailedByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedByIdRequest -> Text
_RespondActivityTaskFailedByIdRequest'runId
           (\ RespondActivityTaskFailedByIdRequest
x__ Text
y__
              -> RespondActivityTaskFailedByIdRequest
x__ {_RespondActivityTaskFailedByIdRequest'runId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedByIdRequest "activityId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityId"
-> (Text -> f Text)
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
fieldOf Proxy# "activityId"
_
    = ((Text -> f Text)
 -> RespondActivityTaskFailedByIdRequest
 -> f RespondActivityTaskFailedByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedByIdRequest -> Text)
-> (RespondActivityTaskFailedByIdRequest
    -> Text -> RespondActivityTaskFailedByIdRequest)
-> Lens
     RespondActivityTaskFailedByIdRequest
     RespondActivityTaskFailedByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedByIdRequest -> Text
_RespondActivityTaskFailedByIdRequest'activityId
           (\ RespondActivityTaskFailedByIdRequest
x__ Text
y__
              -> RespondActivityTaskFailedByIdRequest
x__ {_RespondActivityTaskFailedByIdRequest'activityId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedByIdRequest "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> RespondActivityTaskFailedByIdRequest
 -> f RespondActivityTaskFailedByIdRequest)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedByIdRequest -> Maybe Failure)
-> (RespondActivityTaskFailedByIdRequest
    -> Maybe Failure -> RespondActivityTaskFailedByIdRequest)
-> Lens
     RespondActivityTaskFailedByIdRequest
     RespondActivityTaskFailedByIdRequest
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedByIdRequest -> Maybe Failure
_RespondActivityTaskFailedByIdRequest'failure
           (\ RespondActivityTaskFailedByIdRequest
x__ Maybe Failure
y__
              -> RespondActivityTaskFailedByIdRequest
x__ {_RespondActivityTaskFailedByIdRequest'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 RespondActivityTaskFailedByIdRequest "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))
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> RespondActivityTaskFailedByIdRequest
 -> f RespondActivityTaskFailedByIdRequest)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedByIdRequest -> Maybe Failure)
-> (RespondActivityTaskFailedByIdRequest
    -> Maybe Failure -> RespondActivityTaskFailedByIdRequest)
-> Lens
     RespondActivityTaskFailedByIdRequest
     RespondActivityTaskFailedByIdRequest
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedByIdRequest -> Maybe Failure
_RespondActivityTaskFailedByIdRequest'failure
           (\ RespondActivityTaskFailedByIdRequest
x__ Maybe Failure
y__
              -> RespondActivityTaskFailedByIdRequest
x__ {_RespondActivityTaskFailedByIdRequest'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedByIdRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> RespondActivityTaskFailedByIdRequest
 -> f RespondActivityTaskFailedByIdRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedByIdRequest -> Text)
-> (RespondActivityTaskFailedByIdRequest
    -> Text -> RespondActivityTaskFailedByIdRequest)
-> Lens
     RespondActivityTaskFailedByIdRequest
     RespondActivityTaskFailedByIdRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedByIdRequest -> Text
_RespondActivityTaskFailedByIdRequest'identity
           (\ RespondActivityTaskFailedByIdRequest
x__ Text
y__
              -> RespondActivityTaskFailedByIdRequest
x__ {_RespondActivityTaskFailedByIdRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedByIdRequest "lastHeartbeatDetails" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastHeartbeatDetails"
-> (Payloads -> f Payloads)
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
fieldOf Proxy# "lastHeartbeatDetails"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RespondActivityTaskFailedByIdRequest
 -> f RespondActivityTaskFailedByIdRequest)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedByIdRequest -> Maybe Payloads)
-> (RespondActivityTaskFailedByIdRequest
    -> Maybe Payloads -> RespondActivityTaskFailedByIdRequest)
-> Lens
     RespondActivityTaskFailedByIdRequest
     RespondActivityTaskFailedByIdRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedByIdRequest -> Maybe Payloads
_RespondActivityTaskFailedByIdRequest'lastHeartbeatDetails
           (\ RespondActivityTaskFailedByIdRequest
x__ Maybe Payloads
y__
              -> RespondActivityTaskFailedByIdRequest
x__
                   {_RespondActivityTaskFailedByIdRequest'lastHeartbeatDetails = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedByIdRequest "maybe'lastHeartbeatDetails" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastHeartbeatDetails"
-> (Maybe Payloads -> f (Maybe Payloads))
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
fieldOf Proxy# "maybe'lastHeartbeatDetails"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RespondActivityTaskFailedByIdRequest
 -> f RespondActivityTaskFailedByIdRequest)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> RespondActivityTaskFailedByIdRequest
-> f RespondActivityTaskFailedByIdRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedByIdRequest -> Maybe Payloads)
-> (RespondActivityTaskFailedByIdRequest
    -> Maybe Payloads -> RespondActivityTaskFailedByIdRequest)
-> Lens
     RespondActivityTaskFailedByIdRequest
     RespondActivityTaskFailedByIdRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedByIdRequest -> Maybe Payloads
_RespondActivityTaskFailedByIdRequest'lastHeartbeatDetails
           (\ RespondActivityTaskFailedByIdRequest
x__ Maybe Payloads
y__
              -> RespondActivityTaskFailedByIdRequest
x__
                   {_RespondActivityTaskFailedByIdRequest'lastHeartbeatDetails = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RespondActivityTaskFailedByIdRequest where
  messageName :: Proxy RespondActivityTaskFailedByIdRequest -> Text
messageName Proxy RespondActivityTaskFailedByIdRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondActivityTaskFailedByIdRequest"
  packedMessageDescriptor :: Proxy RespondActivityTaskFailedByIdRequest -> ByteString
packedMessageDescriptor Proxy RespondActivityTaskFailedByIdRequest
_
    = ByteString
"\n\
      \$RespondActivityTaskFailedByIdRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
      \\vworkflow_id\CAN\STX \SOH(\tR\n\
      \workflowId\DC2\NAK\n\
      \\ACKrun_id\CAN\ETX \SOH(\tR\ENQrunId\DC2\US\n\
      \\vactivity_id\CAN\EOT \SOH(\tR\n\
      \activityId\DC2:\n\
      \\afailure\CAN\ENQ \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2\SUB\n\
      \\bidentity\CAN\ACK \SOH(\tR\bidentity\DC2V\n\
      \\SYNlast_heartbeat_details\CAN\a \SOH(\v2 .temporal.api.common.v1.PayloadsR\DC4lastHeartbeatDetails"
  packedFileDescriptor :: Proxy RespondActivityTaskFailedByIdRequest -> ByteString
packedFileDescriptor Proxy RespondActivityTaskFailedByIdRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondActivityTaskFailedByIdRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor RespondActivityTaskFailedByIdRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskFailedByIdRequest Text
-> FieldDescriptor RespondActivityTaskFailedByIdRequest
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
     RespondActivityTaskFailedByIdRequest
     RespondActivityTaskFailedByIdRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskFailedByIdRequest 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 RespondActivityTaskFailedByIdRequest
        workflowId__field_descriptor :: FieldDescriptor RespondActivityTaskFailedByIdRequest
workflowId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskFailedByIdRequest Text
-> FieldDescriptor RespondActivityTaskFailedByIdRequest
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
     RespondActivityTaskFailedByIdRequest
     RespondActivityTaskFailedByIdRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskFailedByIdRequest 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 RespondActivityTaskFailedByIdRequest
        runId__field_descriptor :: FieldDescriptor RespondActivityTaskFailedByIdRequest
runId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskFailedByIdRequest Text
-> FieldDescriptor RespondActivityTaskFailedByIdRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"run_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondActivityTaskFailedByIdRequest
     RespondActivityTaskFailedByIdRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskFailedByIdRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskFailedByIdRequest
        activityId__field_descriptor :: FieldDescriptor RespondActivityTaskFailedByIdRequest
activityId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskFailedByIdRequest Text
-> FieldDescriptor RespondActivityTaskFailedByIdRequest
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
     RespondActivityTaskFailedByIdRequest
     RespondActivityTaskFailedByIdRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskFailedByIdRequest 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 RespondActivityTaskFailedByIdRequest
        failure__field_descriptor :: FieldDescriptor RespondActivityTaskFailedByIdRequest
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor RespondActivityTaskFailedByIdRequest Failure
-> FieldDescriptor RespondActivityTaskFailedByIdRequest
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
  RespondActivityTaskFailedByIdRequest
  RespondActivityTaskFailedByIdRequest
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor RespondActivityTaskFailedByIdRequest 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 RespondActivityTaskFailedByIdRequest
        identity__field_descriptor :: FieldDescriptor RespondActivityTaskFailedByIdRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskFailedByIdRequest Text
-> FieldDescriptor RespondActivityTaskFailedByIdRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondActivityTaskFailedByIdRequest
     RespondActivityTaskFailedByIdRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskFailedByIdRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskFailedByIdRequest
        lastHeartbeatDetails__field_descriptor :: FieldDescriptor RespondActivityTaskFailedByIdRequest
lastHeartbeatDetails__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor RespondActivityTaskFailedByIdRequest Payloads
-> FieldDescriptor RespondActivityTaskFailedByIdRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"last_heartbeat_details"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  RespondActivityTaskFailedByIdRequest
  RespondActivityTaskFailedByIdRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor RespondActivityTaskFailedByIdRequest Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastHeartbeatDetails")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskFailedByIdRequest
      in
        [(Tag, FieldDescriptor RespondActivityTaskFailedByIdRequest)]
-> Map Tag (FieldDescriptor RespondActivityTaskFailedByIdRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RespondActivityTaskFailedByIdRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RespondActivityTaskFailedByIdRequest
workflowId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RespondActivityTaskFailedByIdRequest
runId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor RespondActivityTaskFailedByIdRequest
activityId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor RespondActivityTaskFailedByIdRequest
failure__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor RespondActivityTaskFailedByIdRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor RespondActivityTaskFailedByIdRequest
lastHeartbeatDetails__field_descriptor)]
  unknownFields :: Lens' RespondActivityTaskFailedByIdRequest FieldSet
unknownFields
    = (RespondActivityTaskFailedByIdRequest -> FieldSet)
-> (RespondActivityTaskFailedByIdRequest
    -> FieldSet -> RespondActivityTaskFailedByIdRequest)
-> Lens' RespondActivityTaskFailedByIdRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondActivityTaskFailedByIdRequest -> FieldSet
_RespondActivityTaskFailedByIdRequest'_unknownFields
        (\ RespondActivityTaskFailedByIdRequest
x__ FieldSet
y__
           -> RespondActivityTaskFailedByIdRequest
x__
                {_RespondActivityTaskFailedByIdRequest'_unknownFields = y__})
  defMessage :: RespondActivityTaskFailedByIdRequest
defMessage
    = RespondActivityTaskFailedByIdRequest'_constructor
        {_RespondActivityTaskFailedByIdRequest'namespace :: Text
_RespondActivityTaskFailedByIdRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskFailedByIdRequest'workflowId :: Text
_RespondActivityTaskFailedByIdRequest'workflowId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskFailedByIdRequest'runId :: Text
_RespondActivityTaskFailedByIdRequest'runId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskFailedByIdRequest'activityId :: Text
_RespondActivityTaskFailedByIdRequest'activityId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskFailedByIdRequest'failure :: Maybe Failure
_RespondActivityTaskFailedByIdRequest'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _RespondActivityTaskFailedByIdRequest'identity :: Text
_RespondActivityTaskFailedByIdRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskFailedByIdRequest'lastHeartbeatDetails :: Maybe Payloads
_RespondActivityTaskFailedByIdRequest'lastHeartbeatDetails = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _RespondActivityTaskFailedByIdRequest'_unknownFields :: FieldSet
_RespondActivityTaskFailedByIdRequest'_unknownFields = []}
  parseMessage :: Parser RespondActivityTaskFailedByIdRequest
parseMessage
    = let
        loop ::
          RespondActivityTaskFailedByIdRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondActivityTaskFailedByIdRequest
        loop :: RespondActivityTaskFailedByIdRequest
-> Parser RespondActivityTaskFailedByIdRequest
loop RespondActivityTaskFailedByIdRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"workflow_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"workflowId") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"run_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"runId") y x)
                        Word64
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
"activity_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"activityId") y x)
                        Word64
42
                          -> do y <- Parser Failure -> String -> Parser Failure
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"failure"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"failure") y x)
                        Word64
50
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
58
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"last_heartbeat_details"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"lastHeartbeatDetails") 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 RespondActivityTaskFailedByIdRequest
-> String -> Parser RespondActivityTaskFailedByIdRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondActivityTaskFailedByIdRequest
-> Parser RespondActivityTaskFailedByIdRequest
loop RespondActivityTaskFailedByIdRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondActivityTaskFailedByIdRequest"
  buildMessage :: RespondActivityTaskFailedByIdRequest -> Builder
buildMessage
    = \ RespondActivityTaskFailedByIdRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  RespondActivityTaskFailedByIdRequest
  RespondActivityTaskFailedByIdRequest
  Text
  Text
-> RespondActivityTaskFailedByIdRequest -> 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") RespondActivityTaskFailedByIdRequest
_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
  RespondActivityTaskFailedByIdRequest
  RespondActivityTaskFailedByIdRequest
  Text
  Text
-> RespondActivityTaskFailedByIdRequest -> 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") RespondActivityTaskFailedByIdRequest
_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
  RespondActivityTaskFailedByIdRequest
  RespondActivityTaskFailedByIdRequest
  Text
  Text
-> RespondActivityTaskFailedByIdRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId") RespondActivityTaskFailedByIdRequest
_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
  RespondActivityTaskFailedByIdRequest
  RespondActivityTaskFailedByIdRequest
  Text
  Text
-> RespondActivityTaskFailedByIdRequest -> 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") RespondActivityTaskFailedByIdRequest
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Failure)
  RespondActivityTaskFailedByIdRequest
  RespondActivityTaskFailedByIdRequest
  (Maybe Failure)
  (Maybe Failure)
-> RespondActivityTaskFailedByIdRequest -> 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") RespondActivityTaskFailedByIdRequest
_x
                          of
                            Maybe Failure
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just Failure
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (Failure -> ByteString) -> Failure -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      Failure -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Failure
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v = FoldLike
  Text
  RespondActivityTaskFailedByIdRequest
  RespondActivityTaskFailedByIdRequest
  Text
  Text
-> RespondActivityTaskFailedByIdRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") RespondActivityTaskFailedByIdRequest
_x
                             in
                               if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                     ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        (\ ByteString
bs
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (case
                                    FoldLike
  (Maybe Payloads)
  RespondActivityTaskFailedByIdRequest
  RespondActivityTaskFailedByIdRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> RespondActivityTaskFailedByIdRequest -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                      (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastHeartbeatDetails") RespondActivityTaskFailedByIdRequest
_x
                                of
                                  Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  (Prelude.Just Payloads
_v)
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                         ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                            (\ ByteString
bs
                                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                          (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                            Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike
  FieldSet
  RespondActivityTaskFailedByIdRequest
  RespondActivityTaskFailedByIdRequest
  FieldSet
  FieldSet
-> RespondActivityTaskFailedByIdRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondActivityTaskFailedByIdRequest
  RespondActivityTaskFailedByIdRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondActivityTaskFailedByIdRequest FieldSet
Data.ProtoLens.unknownFields RespondActivityTaskFailedByIdRequest
_x))))))))
instance Control.DeepSeq.NFData RespondActivityTaskFailedByIdRequest where
  rnf :: RespondActivityTaskFailedByIdRequest -> ()
rnf
    = \ RespondActivityTaskFailedByIdRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondActivityTaskFailedByIdRequest -> FieldSet
_RespondActivityTaskFailedByIdRequest'_unknownFields RespondActivityTaskFailedByIdRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RespondActivityTaskFailedByIdRequest -> Text
_RespondActivityTaskFailedByIdRequest'namespace RespondActivityTaskFailedByIdRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RespondActivityTaskFailedByIdRequest -> Text
_RespondActivityTaskFailedByIdRequest'workflowId RespondActivityTaskFailedByIdRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RespondActivityTaskFailedByIdRequest -> Text
_RespondActivityTaskFailedByIdRequest'runId RespondActivityTaskFailedByIdRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RespondActivityTaskFailedByIdRequest -> Text
_RespondActivityTaskFailedByIdRequest'activityId RespondActivityTaskFailedByIdRequest
x__)
                         (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RespondActivityTaskFailedByIdRequest -> Maybe Failure
_RespondActivityTaskFailedByIdRequest'failure RespondActivityTaskFailedByIdRequest
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (RespondActivityTaskFailedByIdRequest -> Text
_RespondActivityTaskFailedByIdRequest'identity RespondActivityTaskFailedByIdRequest
x__)
                               (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (RespondActivityTaskFailedByIdRequest -> Maybe Payloads
_RespondActivityTaskFailedByIdRequest'lastHeartbeatDetails RespondActivityTaskFailedByIdRequest
x__)
                                  ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.failures' @:: Lens' RespondActivityTaskFailedByIdResponse [Proto.Temporal.Api.Failure.V1.Message.Failure]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'failures' @:: Lens' RespondActivityTaskFailedByIdResponse (Data.Vector.Vector Proto.Temporal.Api.Failure.V1.Message.Failure)@ -}
data RespondActivityTaskFailedByIdResponse
  = RespondActivityTaskFailedByIdResponse'_constructor {RespondActivityTaskFailedByIdResponse -> Vector Failure
_RespondActivityTaskFailedByIdResponse'failures :: !(Data.Vector.Vector Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                        RespondActivityTaskFailedByIdResponse -> FieldSet
_RespondActivityTaskFailedByIdResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Bool
(RespondActivityTaskFailedByIdResponse
 -> RespondActivityTaskFailedByIdResponse -> Bool)
-> (RespondActivityTaskFailedByIdResponse
    -> RespondActivityTaskFailedByIdResponse -> Bool)
-> Eq RespondActivityTaskFailedByIdResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Bool
== :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Bool
$c/= :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Bool
/= :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Bool
Prelude.Eq, Eq RespondActivityTaskFailedByIdResponse
Eq RespondActivityTaskFailedByIdResponse =>
(RespondActivityTaskFailedByIdResponse
 -> RespondActivityTaskFailedByIdResponse -> Ordering)
-> (RespondActivityTaskFailedByIdResponse
    -> RespondActivityTaskFailedByIdResponse -> Bool)
-> (RespondActivityTaskFailedByIdResponse
    -> RespondActivityTaskFailedByIdResponse -> Bool)
-> (RespondActivityTaskFailedByIdResponse
    -> RespondActivityTaskFailedByIdResponse -> Bool)
-> (RespondActivityTaskFailedByIdResponse
    -> RespondActivityTaskFailedByIdResponse -> Bool)
-> (RespondActivityTaskFailedByIdResponse
    -> RespondActivityTaskFailedByIdResponse
    -> RespondActivityTaskFailedByIdResponse)
-> (RespondActivityTaskFailedByIdResponse
    -> RespondActivityTaskFailedByIdResponse
    -> RespondActivityTaskFailedByIdResponse)
-> Ord RespondActivityTaskFailedByIdResponse
RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Bool
RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Ordering
RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse
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 :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Ordering
compare :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Ordering
$c< :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Bool
< :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Bool
$c<= :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Bool
<= :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Bool
$c> :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Bool
> :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Bool
$c>= :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Bool
>= :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse -> Bool
$cmax :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse
max :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse
$cmin :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse
min :: RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse
-> RespondActivityTaskFailedByIdResponse
Prelude.Ord)
instance Prelude.Show RespondActivityTaskFailedByIdResponse where
  showsPrec :: Int -> RespondActivityTaskFailedByIdResponse -> ShowS
showsPrec Int
_ RespondActivityTaskFailedByIdResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondActivityTaskFailedByIdResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondActivityTaskFailedByIdResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedByIdResponse "failures" [Proto.Temporal.Api.Failure.V1.Message.Failure] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failures"
-> ([Failure] -> f [Failure])
-> RespondActivityTaskFailedByIdResponse
-> f RespondActivityTaskFailedByIdResponse
fieldOf Proxy# "failures"
_
    = ((Vector Failure -> f (Vector Failure))
 -> RespondActivityTaskFailedByIdResponse
 -> f RespondActivityTaskFailedByIdResponse)
-> (([Failure] -> f [Failure])
    -> Vector Failure -> f (Vector Failure))
-> ([Failure] -> f [Failure])
-> RespondActivityTaskFailedByIdResponse
-> f RespondActivityTaskFailedByIdResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedByIdResponse -> Vector Failure)
-> (RespondActivityTaskFailedByIdResponse
    -> Vector Failure -> RespondActivityTaskFailedByIdResponse)
-> Lens
     RespondActivityTaskFailedByIdResponse
     RespondActivityTaskFailedByIdResponse
     (Vector Failure)
     (Vector Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedByIdResponse -> Vector Failure
_RespondActivityTaskFailedByIdResponse'failures
           (\ RespondActivityTaskFailedByIdResponse
x__ Vector Failure
y__
              -> RespondActivityTaskFailedByIdResponse
x__ {_RespondActivityTaskFailedByIdResponse'failures = y__}))
        ((Vector Failure -> [Failure])
-> (Vector Failure -> [Failure] -> Vector Failure)
-> Lens (Vector Failure) (Vector Failure) [Failure] [Failure]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Failure -> [Failure]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Failure
_ [Failure]
y__ -> [Failure] -> Vector Failure
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Failure]
y__))
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedByIdResponse "vec'failures" (Data.Vector.Vector Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'failures"
-> (Vector Failure -> f (Vector Failure))
-> RespondActivityTaskFailedByIdResponse
-> f RespondActivityTaskFailedByIdResponse
fieldOf Proxy# "vec'failures"
_
    = ((Vector Failure -> f (Vector Failure))
 -> RespondActivityTaskFailedByIdResponse
 -> f RespondActivityTaskFailedByIdResponse)
-> ((Vector Failure -> f (Vector Failure))
    -> Vector Failure -> f (Vector Failure))
-> (Vector Failure -> f (Vector Failure))
-> RespondActivityTaskFailedByIdResponse
-> f RespondActivityTaskFailedByIdResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedByIdResponse -> Vector Failure)
-> (RespondActivityTaskFailedByIdResponse
    -> Vector Failure -> RespondActivityTaskFailedByIdResponse)
-> Lens
     RespondActivityTaskFailedByIdResponse
     RespondActivityTaskFailedByIdResponse
     (Vector Failure)
     (Vector Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedByIdResponse -> Vector Failure
_RespondActivityTaskFailedByIdResponse'failures
           (\ RespondActivityTaskFailedByIdResponse
x__ Vector Failure
y__
              -> RespondActivityTaskFailedByIdResponse
x__ {_RespondActivityTaskFailedByIdResponse'failures = y__}))
        (Vector Failure -> f (Vector Failure))
-> Vector Failure -> f (Vector Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RespondActivityTaskFailedByIdResponse where
  messageName :: Proxy RespondActivityTaskFailedByIdResponse -> Text
messageName Proxy RespondActivityTaskFailedByIdResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondActivityTaskFailedByIdResponse"
  packedMessageDescriptor :: Proxy RespondActivityTaskFailedByIdResponse -> ByteString
packedMessageDescriptor Proxy RespondActivityTaskFailedByIdResponse
_
    = ByteString
"\n\
      \%RespondActivityTaskFailedByIdResponse\DC2<\n\
      \\bfailures\CAN\SOH \ETX(\v2 .temporal.api.failure.v1.FailureR\bfailures"
  packedFileDescriptor :: Proxy RespondActivityTaskFailedByIdResponse -> ByteString
packedFileDescriptor Proxy RespondActivityTaskFailedByIdResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondActivityTaskFailedByIdResponse)
fieldsByTag
    = let
        failures__field_descriptor :: FieldDescriptor RespondActivityTaskFailedByIdResponse
failures__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor RespondActivityTaskFailedByIdResponse Failure
-> FieldDescriptor RespondActivityTaskFailedByIdResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"failures"
              (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)
              (Packing
-> Lens' RespondActivityTaskFailedByIdResponse [Failure]
-> FieldAccessor RespondActivityTaskFailedByIdResponse Failure
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 @"failures")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskFailedByIdResponse
      in
        [(Tag, FieldDescriptor RespondActivityTaskFailedByIdResponse)]
-> Map Tag (FieldDescriptor RespondActivityTaskFailedByIdResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RespondActivityTaskFailedByIdResponse
failures__field_descriptor)]
  unknownFields :: Lens' RespondActivityTaskFailedByIdResponse FieldSet
unknownFields
    = (RespondActivityTaskFailedByIdResponse -> FieldSet)
-> (RespondActivityTaskFailedByIdResponse
    -> FieldSet -> RespondActivityTaskFailedByIdResponse)
-> Lens' RespondActivityTaskFailedByIdResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondActivityTaskFailedByIdResponse -> FieldSet
_RespondActivityTaskFailedByIdResponse'_unknownFields
        (\ RespondActivityTaskFailedByIdResponse
x__ FieldSet
y__
           -> RespondActivityTaskFailedByIdResponse
x__
                {_RespondActivityTaskFailedByIdResponse'_unknownFields = y__})
  defMessage :: RespondActivityTaskFailedByIdResponse
defMessage
    = RespondActivityTaskFailedByIdResponse'_constructor
        {_RespondActivityTaskFailedByIdResponse'failures :: Vector Failure
_RespondActivityTaskFailedByIdResponse'failures = Vector Failure
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _RespondActivityTaskFailedByIdResponse'_unknownFields :: FieldSet
_RespondActivityTaskFailedByIdResponse'_unknownFields = []}
  parseMessage :: Parser RespondActivityTaskFailedByIdResponse
parseMessage
    = let
        loop ::
          RespondActivityTaskFailedByIdResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Failure.V1.Message.Failure
             -> Data.ProtoLens.Encoding.Bytes.Parser RespondActivityTaskFailedByIdResponse
        loop :: RespondActivityTaskFailedByIdResponse
-> Growing Vector RealWorld Failure
-> Parser RespondActivityTaskFailedByIdResponse
loop RespondActivityTaskFailedByIdResponse
x Growing Vector RealWorld Failure
mutable'failures
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'failures <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                              mutable'failures)
                      (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'failures") frozen'failures 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
"failures"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'failures y)
                                loop x v
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
                                  mutable'failures
      in
        Parser RespondActivityTaskFailedByIdResponse
-> String -> Parser RespondActivityTaskFailedByIdResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'failures <- IO (Growing Vector RealWorld Failure)
-> Parser (Growing Vector RealWorld Failure)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                    IO (Growing Vector RealWorld Failure)
IO (Growing Vector (PrimState IO) Failure)
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'failures)
          String
"RespondActivityTaskFailedByIdResponse"
  buildMessage :: RespondActivityTaskFailedByIdResponse -> Builder
buildMessage
    = \ RespondActivityTaskFailedByIdResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((Failure -> Builder) -> Vector Failure -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ 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))
                (FoldLike
  (Vector Failure)
  RespondActivityTaskFailedByIdResponse
  RespondActivityTaskFailedByIdResponse
  (Vector Failure)
  (Vector Failure)
-> RespondActivityTaskFailedByIdResponse -> Vector 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 @"vec'failures") RespondActivityTaskFailedByIdResponse
_x))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  RespondActivityTaskFailedByIdResponse
  RespondActivityTaskFailedByIdResponse
  FieldSet
  FieldSet
-> RespondActivityTaskFailedByIdResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondActivityTaskFailedByIdResponse
  RespondActivityTaskFailedByIdResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondActivityTaskFailedByIdResponse FieldSet
Data.ProtoLens.unknownFields RespondActivityTaskFailedByIdResponse
_x))
instance Control.DeepSeq.NFData RespondActivityTaskFailedByIdResponse where
  rnf :: RespondActivityTaskFailedByIdResponse -> ()
rnf
    = \ RespondActivityTaskFailedByIdResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondActivityTaskFailedByIdResponse -> FieldSet
_RespondActivityTaskFailedByIdResponse'_unknownFields RespondActivityTaskFailedByIdResponse
x__)
             (Vector Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RespondActivityTaskFailedByIdResponse -> Vector Failure
_RespondActivityTaskFailedByIdResponse'failures RespondActivityTaskFailedByIdResponse
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskToken' @:: Lens' RespondActivityTaskFailedRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.failure' @:: Lens' RespondActivityTaskFailedRequest Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'failure' @:: Lens' RespondActivityTaskFailedRequest (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' RespondActivityTaskFailedRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' RespondActivityTaskFailedRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.lastHeartbeatDetails' @:: Lens' RespondActivityTaskFailedRequest Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'lastHeartbeatDetails' @:: Lens' RespondActivityTaskFailedRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workerVersion' @:: Lens' RespondActivityTaskFailedRequest Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workerVersion' @:: Lens' RespondActivityTaskFailedRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)@ -}
data RespondActivityTaskFailedRequest
  = RespondActivityTaskFailedRequest'_constructor {RespondActivityTaskFailedRequest -> ByteString
_RespondActivityTaskFailedRequest'taskToken :: !Data.ByteString.ByteString,
                                                   RespondActivityTaskFailedRequest -> Maybe Failure
_RespondActivityTaskFailedRequest'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                   RespondActivityTaskFailedRequest -> Text
_RespondActivityTaskFailedRequest'identity :: !Data.Text.Text,
                                                   RespondActivityTaskFailedRequest -> Text
_RespondActivityTaskFailedRequest'namespace :: !Data.Text.Text,
                                                   RespondActivityTaskFailedRequest -> Maybe Payloads
_RespondActivityTaskFailedRequest'lastHeartbeatDetails :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                   RespondActivityTaskFailedRequest -> Maybe WorkerVersionStamp
_RespondActivityTaskFailedRequest'workerVersion :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp),
                                                   RespondActivityTaskFailedRequest -> FieldSet
_RespondActivityTaskFailedRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Bool
(RespondActivityTaskFailedRequest
 -> RespondActivityTaskFailedRequest -> Bool)
-> (RespondActivityTaskFailedRequest
    -> RespondActivityTaskFailedRequest -> Bool)
-> Eq RespondActivityTaskFailedRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Bool
== :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Bool
$c/= :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Bool
/= :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Bool
Prelude.Eq, Eq RespondActivityTaskFailedRequest
Eq RespondActivityTaskFailedRequest =>
(RespondActivityTaskFailedRequest
 -> RespondActivityTaskFailedRequest -> Ordering)
-> (RespondActivityTaskFailedRequest
    -> RespondActivityTaskFailedRequest -> Bool)
-> (RespondActivityTaskFailedRequest
    -> RespondActivityTaskFailedRequest -> Bool)
-> (RespondActivityTaskFailedRequest
    -> RespondActivityTaskFailedRequest -> Bool)
-> (RespondActivityTaskFailedRequest
    -> RespondActivityTaskFailedRequest -> Bool)
-> (RespondActivityTaskFailedRequest
    -> RespondActivityTaskFailedRequest
    -> RespondActivityTaskFailedRequest)
-> (RespondActivityTaskFailedRequest
    -> RespondActivityTaskFailedRequest
    -> RespondActivityTaskFailedRequest)
-> Ord RespondActivityTaskFailedRequest
RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Bool
RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Ordering
RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest
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 :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Ordering
compare :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Ordering
$c< :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Bool
< :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Bool
$c<= :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Bool
<= :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Bool
$c> :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Bool
> :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Bool
$c>= :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Bool
>= :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest -> Bool
$cmax :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest
max :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest
$cmin :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest
min :: RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest
-> RespondActivityTaskFailedRequest
Prelude.Ord)
instance Prelude.Show RespondActivityTaskFailedRequest where
  showsPrec :: Int -> RespondActivityTaskFailedRequest -> ShowS
showsPrec Int
_ RespondActivityTaskFailedRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondActivityTaskFailedRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondActivityTaskFailedRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedRequest "taskToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskToken"
-> (ByteString -> f ByteString)
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
fieldOf Proxy# "taskToken"
_
    = ((ByteString -> f ByteString)
 -> RespondActivityTaskFailedRequest
 -> f RespondActivityTaskFailedRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedRequest -> ByteString)
-> (RespondActivityTaskFailedRequest
    -> ByteString -> RespondActivityTaskFailedRequest)
-> Lens
     RespondActivityTaskFailedRequest
     RespondActivityTaskFailedRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedRequest -> ByteString
_RespondActivityTaskFailedRequest'taskToken
           (\ RespondActivityTaskFailedRequest
x__ ByteString
y__
              -> RespondActivityTaskFailedRequest
x__ {_RespondActivityTaskFailedRequest'taskToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedRequest "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> RespondActivityTaskFailedRequest
 -> f RespondActivityTaskFailedRequest)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedRequest -> Maybe Failure)
-> (RespondActivityTaskFailedRequest
    -> Maybe Failure -> RespondActivityTaskFailedRequest)
-> Lens
     RespondActivityTaskFailedRequest
     RespondActivityTaskFailedRequest
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedRequest -> Maybe Failure
_RespondActivityTaskFailedRequest'failure
           (\ RespondActivityTaskFailedRequest
x__ Maybe Failure
y__
              -> RespondActivityTaskFailedRequest
x__ {_RespondActivityTaskFailedRequest'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 RespondActivityTaskFailedRequest "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))
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> RespondActivityTaskFailedRequest
 -> f RespondActivityTaskFailedRequest)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedRequest -> Maybe Failure)
-> (RespondActivityTaskFailedRequest
    -> Maybe Failure -> RespondActivityTaskFailedRequest)
-> Lens
     RespondActivityTaskFailedRequest
     RespondActivityTaskFailedRequest
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedRequest -> Maybe Failure
_RespondActivityTaskFailedRequest'failure
           (\ RespondActivityTaskFailedRequest
x__ Maybe Failure
y__
              -> RespondActivityTaskFailedRequest
x__ {_RespondActivityTaskFailedRequest'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> RespondActivityTaskFailedRequest
 -> f RespondActivityTaskFailedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedRequest -> Text)
-> (RespondActivityTaskFailedRequest
    -> Text -> RespondActivityTaskFailedRequest)
-> Lens
     RespondActivityTaskFailedRequest
     RespondActivityTaskFailedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedRequest -> Text
_RespondActivityTaskFailedRequest'identity
           (\ RespondActivityTaskFailedRequest
x__ Text
y__
              -> RespondActivityTaskFailedRequest
x__ {_RespondActivityTaskFailedRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RespondActivityTaskFailedRequest
 -> f RespondActivityTaskFailedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedRequest -> Text)
-> (RespondActivityTaskFailedRequest
    -> Text -> RespondActivityTaskFailedRequest)
-> Lens
     RespondActivityTaskFailedRequest
     RespondActivityTaskFailedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedRequest -> Text
_RespondActivityTaskFailedRequest'namespace
           (\ RespondActivityTaskFailedRequest
x__ Text
y__
              -> RespondActivityTaskFailedRequest
x__ {_RespondActivityTaskFailedRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedRequest "lastHeartbeatDetails" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastHeartbeatDetails"
-> (Payloads -> f Payloads)
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
fieldOf Proxy# "lastHeartbeatDetails"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RespondActivityTaskFailedRequest
 -> f RespondActivityTaskFailedRequest)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedRequest -> Maybe Payloads)
-> (RespondActivityTaskFailedRequest
    -> Maybe Payloads -> RespondActivityTaskFailedRequest)
-> Lens
     RespondActivityTaskFailedRequest
     RespondActivityTaskFailedRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedRequest -> Maybe Payloads
_RespondActivityTaskFailedRequest'lastHeartbeatDetails
           (\ RespondActivityTaskFailedRequest
x__ Maybe Payloads
y__
              -> RespondActivityTaskFailedRequest
x__
                   {_RespondActivityTaskFailedRequest'lastHeartbeatDetails = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedRequest "maybe'lastHeartbeatDetails" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastHeartbeatDetails"
-> (Maybe Payloads -> f (Maybe Payloads))
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
fieldOf Proxy# "maybe'lastHeartbeatDetails"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RespondActivityTaskFailedRequest
 -> f RespondActivityTaskFailedRequest)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedRequest -> Maybe Payloads)
-> (RespondActivityTaskFailedRequest
    -> Maybe Payloads -> RespondActivityTaskFailedRequest)
-> Lens
     RespondActivityTaskFailedRequest
     RespondActivityTaskFailedRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedRequest -> Maybe Payloads
_RespondActivityTaskFailedRequest'lastHeartbeatDetails
           (\ RespondActivityTaskFailedRequest
x__ Maybe Payloads
y__
              -> RespondActivityTaskFailedRequest
x__
                   {_RespondActivityTaskFailedRequest'lastHeartbeatDetails = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedRequest "workerVersion" Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerVersion"
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
fieldOf Proxy# "workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> RespondActivityTaskFailedRequest
 -> f RespondActivityTaskFailedRequest)
-> ((WorkerVersionStamp -> f WorkerVersionStamp)
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedRequest -> Maybe WorkerVersionStamp)
-> (RespondActivityTaskFailedRequest
    -> Maybe WorkerVersionStamp -> RespondActivityTaskFailedRequest)
-> Lens
     RespondActivityTaskFailedRequest
     RespondActivityTaskFailedRequest
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedRequest -> Maybe WorkerVersionStamp
_RespondActivityTaskFailedRequest'workerVersion
           (\ RespondActivityTaskFailedRequest
x__ Maybe WorkerVersionStamp
y__
              -> RespondActivityTaskFailedRequest
x__ {_RespondActivityTaskFailedRequest'workerVersion = y__}))
        (WorkerVersionStamp
-> Lens' (Maybe WorkerVersionStamp) WorkerVersionStamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkerVersionStamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedRequest "maybe'workerVersion" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workerVersion"
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
fieldOf Proxy# "maybe'workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> RespondActivityTaskFailedRequest
 -> f RespondActivityTaskFailedRequest)
-> ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> RespondActivityTaskFailedRequest
-> f RespondActivityTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedRequest -> Maybe WorkerVersionStamp)
-> (RespondActivityTaskFailedRequest
    -> Maybe WorkerVersionStamp -> RespondActivityTaskFailedRequest)
-> Lens
     RespondActivityTaskFailedRequest
     RespondActivityTaskFailedRequest
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedRequest -> Maybe WorkerVersionStamp
_RespondActivityTaskFailedRequest'workerVersion
           (\ RespondActivityTaskFailedRequest
x__ Maybe WorkerVersionStamp
y__
              -> RespondActivityTaskFailedRequest
x__ {_RespondActivityTaskFailedRequest'workerVersion = y__}))
        (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RespondActivityTaskFailedRequest where
  messageName :: Proxy RespondActivityTaskFailedRequest -> Text
messageName Proxy RespondActivityTaskFailedRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondActivityTaskFailedRequest"
  packedMessageDescriptor :: Proxy RespondActivityTaskFailedRequest -> ByteString
packedMessageDescriptor Proxy RespondActivityTaskFailedRequest
_
    = ByteString
"\n\
      \ RespondActivityTaskFailedRequest\DC2\GS\n\
      \\n\
      \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2:\n\
      \\afailure\CAN\STX \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2\SUB\n\
      \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2\FS\n\
      \\tnamespace\CAN\EOT \SOH(\tR\tnamespace\DC2V\n\
      \\SYNlast_heartbeat_details\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\DC4lastHeartbeatDetails\DC2Q\n\
      \\SOworker_version\CAN\ACK \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion"
  packedFileDescriptor :: Proxy RespondActivityTaskFailedRequest -> ByteString
packedFileDescriptor Proxy RespondActivityTaskFailedRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondActivityTaskFailedRequest)
fieldsByTag
    = let
        taskToken__field_descriptor :: FieldDescriptor RespondActivityTaskFailedRequest
taskToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor RespondActivityTaskFailedRequest ByteString
-> FieldDescriptor RespondActivityTaskFailedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     RespondActivityTaskFailedRequest
     RespondActivityTaskFailedRequest
     ByteString
     ByteString
-> FieldAccessor RespondActivityTaskFailedRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskFailedRequest
        failure__field_descriptor :: FieldDescriptor RespondActivityTaskFailedRequest
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor RespondActivityTaskFailedRequest Failure
-> FieldDescriptor RespondActivityTaskFailedRequest
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
  RespondActivityTaskFailedRequest
  RespondActivityTaskFailedRequest
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor RespondActivityTaskFailedRequest 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 RespondActivityTaskFailedRequest
        identity__field_descriptor :: FieldDescriptor RespondActivityTaskFailedRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskFailedRequest Text
-> FieldDescriptor RespondActivityTaskFailedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondActivityTaskFailedRequest
     RespondActivityTaskFailedRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskFailedRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskFailedRequest
        namespace__field_descriptor :: FieldDescriptor RespondActivityTaskFailedRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondActivityTaskFailedRequest Text
-> FieldDescriptor RespondActivityTaskFailedRequest
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
     RespondActivityTaskFailedRequest
     RespondActivityTaskFailedRequest
     Text
     Text
-> FieldAccessor RespondActivityTaskFailedRequest 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 RespondActivityTaskFailedRequest
        lastHeartbeatDetails__field_descriptor :: FieldDescriptor RespondActivityTaskFailedRequest
lastHeartbeatDetails__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor RespondActivityTaskFailedRequest Payloads
-> FieldDescriptor RespondActivityTaskFailedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"last_heartbeat_details"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  RespondActivityTaskFailedRequest
  RespondActivityTaskFailedRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor RespondActivityTaskFailedRequest Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastHeartbeatDetails")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskFailedRequest
        workerVersion__field_descriptor :: FieldDescriptor RespondActivityTaskFailedRequest
workerVersion__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionStamp
-> FieldAccessor
     RespondActivityTaskFailedRequest WorkerVersionStamp
-> FieldDescriptor RespondActivityTaskFailedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_version"
              (MessageOrGroup -> FieldTypeDescriptor WorkerVersionStamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)
              (Lens
  RespondActivityTaskFailedRequest
  RespondActivityTaskFailedRequest
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> FieldAccessor
     RespondActivityTaskFailedRequest WorkerVersionStamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workerVersion")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskFailedRequest
      in
        [(Tag, FieldDescriptor RespondActivityTaskFailedRequest)]
-> Map Tag (FieldDescriptor RespondActivityTaskFailedRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RespondActivityTaskFailedRequest
taskToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RespondActivityTaskFailedRequest
failure__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RespondActivityTaskFailedRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor RespondActivityTaskFailedRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor RespondActivityTaskFailedRequest
lastHeartbeatDetails__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor RespondActivityTaskFailedRequest
workerVersion__field_descriptor)]
  unknownFields :: Lens' RespondActivityTaskFailedRequest FieldSet
unknownFields
    = (RespondActivityTaskFailedRequest -> FieldSet)
-> (RespondActivityTaskFailedRequest
    -> FieldSet -> RespondActivityTaskFailedRequest)
-> Lens' RespondActivityTaskFailedRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondActivityTaskFailedRequest -> FieldSet
_RespondActivityTaskFailedRequest'_unknownFields
        (\ RespondActivityTaskFailedRequest
x__ FieldSet
y__
           -> RespondActivityTaskFailedRequest
x__ {_RespondActivityTaskFailedRequest'_unknownFields = y__})
  defMessage :: RespondActivityTaskFailedRequest
defMessage
    = RespondActivityTaskFailedRequest'_constructor
        {_RespondActivityTaskFailedRequest'taskToken :: ByteString
_RespondActivityTaskFailedRequest'taskToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskFailedRequest'failure :: Maybe Failure
_RespondActivityTaskFailedRequest'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _RespondActivityTaskFailedRequest'identity :: Text
_RespondActivityTaskFailedRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskFailedRequest'namespace :: Text
_RespondActivityTaskFailedRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondActivityTaskFailedRequest'lastHeartbeatDetails :: Maybe Payloads
_RespondActivityTaskFailedRequest'lastHeartbeatDetails = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _RespondActivityTaskFailedRequest'workerVersion :: Maybe WorkerVersionStamp
_RespondActivityTaskFailedRequest'workerVersion = Maybe WorkerVersionStamp
forall a. Maybe a
Prelude.Nothing,
         _RespondActivityTaskFailedRequest'_unknownFields :: FieldSet
_RespondActivityTaskFailedRequest'_unknownFields = []}
  parseMessage :: Parser RespondActivityTaskFailedRequest
parseMessage
    = let
        loop ::
          RespondActivityTaskFailedRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondActivityTaskFailedRequest
        loop :: RespondActivityTaskFailedRequest
-> Parser RespondActivityTaskFailedRequest
loop RespondActivityTaskFailedRequest
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 ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"task_token"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskToken") y x)
                        Word64
18
                          -> do y <- Parser Failure -> String -> Parser Failure
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"failure"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"failure") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
42
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"last_heartbeat_details"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"lastHeartbeatDetails") y x)
                        Word64
50
                          -> do y <- Parser WorkerVersionStamp -> String -> Parser WorkerVersionStamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"worker_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerVersion") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser RespondActivityTaskFailedRequest
-> String -> Parser RespondActivityTaskFailedRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondActivityTaskFailedRequest
-> Parser RespondActivityTaskFailedRequest
loop RespondActivityTaskFailedRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondActivityTaskFailedRequest"
  buildMessage :: RespondActivityTaskFailedRequest -> Builder
buildMessage
    = \ RespondActivityTaskFailedRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: ByteString
_v = FoldLike
  ByteString
  RespondActivityTaskFailedRequest
  RespondActivityTaskFailedRequest
  ByteString
  ByteString
-> RespondActivityTaskFailedRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken") RespondActivityTaskFailedRequest
_x
              in
                if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
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
bs
                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         ByteString
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe Failure)
  RespondActivityTaskFailedRequest
  RespondActivityTaskFailedRequest
  (Maybe Failure)
  (Maybe Failure)
-> RespondActivityTaskFailedRequest -> 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") RespondActivityTaskFailedRequest
_x
                 of
                   Maybe Failure
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just Failure
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (Failure -> ByteString) -> Failure -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             Failure -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Failure
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v = FoldLike
  Text
  RespondActivityTaskFailedRequest
  RespondActivityTaskFailedRequest
  Text
  Text
-> RespondActivityTaskFailedRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") RespondActivityTaskFailedRequest
_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
  RespondActivityTaskFailedRequest
  RespondActivityTaskFailedRequest
  Text
  Text
-> RespondActivityTaskFailedRequest -> 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") RespondActivityTaskFailedRequest
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Payloads)
  RespondActivityTaskFailedRequest
  RespondActivityTaskFailedRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> RespondActivityTaskFailedRequest -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastHeartbeatDetails") RespondActivityTaskFailedRequest
_x
                          of
                            Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just Payloads
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (case
                                 FoldLike
  (Maybe WorkerVersionStamp)
  RespondActivityTaskFailedRequest
  RespondActivityTaskFailedRequest
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> RespondActivityTaskFailedRequest -> Maybe WorkerVersionStamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                   (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workerVersion") RespondActivityTaskFailedRequest
_x
                             of
                               Maybe WorkerVersionStamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               (Prelude.Just WorkerVersionStamp
_v)
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                      ((ByteString -> Builder)
-> (WorkerVersionStamp -> ByteString)
-> WorkerVersionStamp
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                         (\ ByteString
bs
                                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                       (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                         WorkerVersionStamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkerVersionStamp
_v))
                            (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                               (FoldLike
  FieldSet
  RespondActivityTaskFailedRequest
  RespondActivityTaskFailedRequest
  FieldSet
  FieldSet
-> RespondActivityTaskFailedRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondActivityTaskFailedRequest
  RespondActivityTaskFailedRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondActivityTaskFailedRequest FieldSet
Data.ProtoLens.unknownFields RespondActivityTaskFailedRequest
_x)))))))
instance Control.DeepSeq.NFData RespondActivityTaskFailedRequest where
  rnf :: RespondActivityTaskFailedRequest -> ()
rnf
    = \ RespondActivityTaskFailedRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondActivityTaskFailedRequest -> FieldSet
_RespondActivityTaskFailedRequest'_unknownFields RespondActivityTaskFailedRequest
x__)
             (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RespondActivityTaskFailedRequest -> ByteString
_RespondActivityTaskFailedRequest'taskToken RespondActivityTaskFailedRequest
x__)
                (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RespondActivityTaskFailedRequest -> Maybe Failure
_RespondActivityTaskFailedRequest'failure RespondActivityTaskFailedRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RespondActivityTaskFailedRequest -> Text
_RespondActivityTaskFailedRequest'identity RespondActivityTaskFailedRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RespondActivityTaskFailedRequest -> Text
_RespondActivityTaskFailedRequest'namespace RespondActivityTaskFailedRequest
x__)
                         (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RespondActivityTaskFailedRequest -> Maybe Payloads
_RespondActivityTaskFailedRequest'lastHeartbeatDetails RespondActivityTaskFailedRequest
x__)
                            (Maybe WorkerVersionStamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (RespondActivityTaskFailedRequest -> Maybe WorkerVersionStamp
_RespondActivityTaskFailedRequest'workerVersion RespondActivityTaskFailedRequest
x__) ()))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.failures' @:: Lens' RespondActivityTaskFailedResponse [Proto.Temporal.Api.Failure.V1.Message.Failure]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'failures' @:: Lens' RespondActivityTaskFailedResponse (Data.Vector.Vector Proto.Temporal.Api.Failure.V1.Message.Failure)@ -}
data RespondActivityTaskFailedResponse
  = RespondActivityTaskFailedResponse'_constructor {RespondActivityTaskFailedResponse -> Vector Failure
_RespondActivityTaskFailedResponse'failures :: !(Data.Vector.Vector Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                    RespondActivityTaskFailedResponse -> FieldSet
_RespondActivityTaskFailedResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Bool
(RespondActivityTaskFailedResponse
 -> RespondActivityTaskFailedResponse -> Bool)
-> (RespondActivityTaskFailedResponse
    -> RespondActivityTaskFailedResponse -> Bool)
-> Eq RespondActivityTaskFailedResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Bool
== :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Bool
$c/= :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Bool
/= :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Bool
Prelude.Eq, Eq RespondActivityTaskFailedResponse
Eq RespondActivityTaskFailedResponse =>
(RespondActivityTaskFailedResponse
 -> RespondActivityTaskFailedResponse -> Ordering)
-> (RespondActivityTaskFailedResponse
    -> RespondActivityTaskFailedResponse -> Bool)
-> (RespondActivityTaskFailedResponse
    -> RespondActivityTaskFailedResponse -> Bool)
-> (RespondActivityTaskFailedResponse
    -> RespondActivityTaskFailedResponse -> Bool)
-> (RespondActivityTaskFailedResponse
    -> RespondActivityTaskFailedResponse -> Bool)
-> (RespondActivityTaskFailedResponse
    -> RespondActivityTaskFailedResponse
    -> RespondActivityTaskFailedResponse)
-> (RespondActivityTaskFailedResponse
    -> RespondActivityTaskFailedResponse
    -> RespondActivityTaskFailedResponse)
-> Ord RespondActivityTaskFailedResponse
RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Bool
RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Ordering
RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse
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 :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Ordering
compare :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Ordering
$c< :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Bool
< :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Bool
$c<= :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Bool
<= :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Bool
$c> :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Bool
> :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Bool
$c>= :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Bool
>= :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse -> Bool
$cmax :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse
max :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse
$cmin :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse
min :: RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse
-> RespondActivityTaskFailedResponse
Prelude.Ord)
instance Prelude.Show RespondActivityTaskFailedResponse where
  showsPrec :: Int -> RespondActivityTaskFailedResponse -> ShowS
showsPrec Int
_ RespondActivityTaskFailedResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondActivityTaskFailedResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondActivityTaskFailedResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedResponse "failures" [Proto.Temporal.Api.Failure.V1.Message.Failure] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failures"
-> ([Failure] -> f [Failure])
-> RespondActivityTaskFailedResponse
-> f RespondActivityTaskFailedResponse
fieldOf Proxy# "failures"
_
    = ((Vector Failure -> f (Vector Failure))
 -> RespondActivityTaskFailedResponse
 -> f RespondActivityTaskFailedResponse)
-> (([Failure] -> f [Failure])
    -> Vector Failure -> f (Vector Failure))
-> ([Failure] -> f [Failure])
-> RespondActivityTaskFailedResponse
-> f RespondActivityTaskFailedResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedResponse -> Vector Failure)
-> (RespondActivityTaskFailedResponse
    -> Vector Failure -> RespondActivityTaskFailedResponse)
-> Lens
     RespondActivityTaskFailedResponse
     RespondActivityTaskFailedResponse
     (Vector Failure)
     (Vector Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedResponse -> Vector Failure
_RespondActivityTaskFailedResponse'failures
           (\ RespondActivityTaskFailedResponse
x__ Vector Failure
y__
              -> RespondActivityTaskFailedResponse
x__ {_RespondActivityTaskFailedResponse'failures = y__}))
        ((Vector Failure -> [Failure])
-> (Vector Failure -> [Failure] -> Vector Failure)
-> Lens (Vector Failure) (Vector Failure) [Failure] [Failure]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Failure -> [Failure]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Failure
_ [Failure]
y__ -> [Failure] -> Vector Failure
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Failure]
y__))
instance Data.ProtoLens.Field.HasField RespondActivityTaskFailedResponse "vec'failures" (Data.Vector.Vector Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'failures"
-> (Vector Failure -> f (Vector Failure))
-> RespondActivityTaskFailedResponse
-> f RespondActivityTaskFailedResponse
fieldOf Proxy# "vec'failures"
_
    = ((Vector Failure -> f (Vector Failure))
 -> RespondActivityTaskFailedResponse
 -> f RespondActivityTaskFailedResponse)
-> ((Vector Failure -> f (Vector Failure))
    -> Vector Failure -> f (Vector Failure))
-> (Vector Failure -> f (Vector Failure))
-> RespondActivityTaskFailedResponse
-> f RespondActivityTaskFailedResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondActivityTaskFailedResponse -> Vector Failure)
-> (RespondActivityTaskFailedResponse
    -> Vector Failure -> RespondActivityTaskFailedResponse)
-> Lens
     RespondActivityTaskFailedResponse
     RespondActivityTaskFailedResponse
     (Vector Failure)
     (Vector Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondActivityTaskFailedResponse -> Vector Failure
_RespondActivityTaskFailedResponse'failures
           (\ RespondActivityTaskFailedResponse
x__ Vector Failure
y__
              -> RespondActivityTaskFailedResponse
x__ {_RespondActivityTaskFailedResponse'failures = y__}))
        (Vector Failure -> f (Vector Failure))
-> Vector Failure -> f (Vector Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RespondActivityTaskFailedResponse where
  messageName :: Proxy RespondActivityTaskFailedResponse -> Text
messageName Proxy RespondActivityTaskFailedResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondActivityTaskFailedResponse"
  packedMessageDescriptor :: Proxy RespondActivityTaskFailedResponse -> ByteString
packedMessageDescriptor Proxy RespondActivityTaskFailedResponse
_
    = ByteString
"\n\
      \!RespondActivityTaskFailedResponse\DC2<\n\
      \\bfailures\CAN\SOH \ETX(\v2 .temporal.api.failure.v1.FailureR\bfailures"
  packedFileDescriptor :: Proxy RespondActivityTaskFailedResponse -> ByteString
packedFileDescriptor Proxy RespondActivityTaskFailedResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondActivityTaskFailedResponse)
fieldsByTag
    = let
        failures__field_descriptor :: FieldDescriptor RespondActivityTaskFailedResponse
failures__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor RespondActivityTaskFailedResponse Failure
-> FieldDescriptor RespondActivityTaskFailedResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"failures"
              (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)
              (Packing
-> Lens' RespondActivityTaskFailedResponse [Failure]
-> FieldAccessor RespondActivityTaskFailedResponse Failure
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 @"failures")) ::
              Data.ProtoLens.FieldDescriptor RespondActivityTaskFailedResponse
      in
        [(Tag, FieldDescriptor RespondActivityTaskFailedResponse)]
-> Map Tag (FieldDescriptor RespondActivityTaskFailedResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RespondActivityTaskFailedResponse
failures__field_descriptor)]
  unknownFields :: Lens' RespondActivityTaskFailedResponse FieldSet
unknownFields
    = (RespondActivityTaskFailedResponse -> FieldSet)
-> (RespondActivityTaskFailedResponse
    -> FieldSet -> RespondActivityTaskFailedResponse)
-> Lens' RespondActivityTaskFailedResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondActivityTaskFailedResponse -> FieldSet
_RespondActivityTaskFailedResponse'_unknownFields
        (\ RespondActivityTaskFailedResponse
x__ FieldSet
y__
           -> RespondActivityTaskFailedResponse
x__ {_RespondActivityTaskFailedResponse'_unknownFields = y__})
  defMessage :: RespondActivityTaskFailedResponse
defMessage
    = RespondActivityTaskFailedResponse'_constructor
        {_RespondActivityTaskFailedResponse'failures :: Vector Failure
_RespondActivityTaskFailedResponse'failures = Vector Failure
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _RespondActivityTaskFailedResponse'_unknownFields :: FieldSet
_RespondActivityTaskFailedResponse'_unknownFields = []}
  parseMessage :: Parser RespondActivityTaskFailedResponse
parseMessage
    = let
        loop ::
          RespondActivityTaskFailedResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Failure.V1.Message.Failure
             -> Data.ProtoLens.Encoding.Bytes.Parser RespondActivityTaskFailedResponse
        loop :: RespondActivityTaskFailedResponse
-> Growing Vector RealWorld Failure
-> Parser RespondActivityTaskFailedResponse
loop RespondActivityTaskFailedResponse
x Growing Vector RealWorld Failure
mutable'failures
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'failures <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                              mutable'failures)
                      (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'failures") frozen'failures 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
"failures"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'failures y)
                                loop x v
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
                                  mutable'failures
      in
        Parser RespondActivityTaskFailedResponse
-> String -> Parser RespondActivityTaskFailedResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'failures <- IO (Growing Vector RealWorld Failure)
-> Parser (Growing Vector RealWorld Failure)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                    IO (Growing Vector RealWorld Failure)
IO (Growing Vector (PrimState IO) Failure)
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'failures)
          String
"RespondActivityTaskFailedResponse"
  buildMessage :: RespondActivityTaskFailedResponse -> Builder
buildMessage
    = \ RespondActivityTaskFailedResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((Failure -> Builder) -> Vector Failure -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ 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))
                (FoldLike
  (Vector Failure)
  RespondActivityTaskFailedResponse
  RespondActivityTaskFailedResponse
  (Vector Failure)
  (Vector Failure)
-> RespondActivityTaskFailedResponse -> Vector 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 @"vec'failures") RespondActivityTaskFailedResponse
_x))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  RespondActivityTaskFailedResponse
  RespondActivityTaskFailedResponse
  FieldSet
  FieldSet
-> RespondActivityTaskFailedResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondActivityTaskFailedResponse
  RespondActivityTaskFailedResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondActivityTaskFailedResponse FieldSet
Data.ProtoLens.unknownFields RespondActivityTaskFailedResponse
_x))
instance Control.DeepSeq.NFData RespondActivityTaskFailedResponse where
  rnf :: RespondActivityTaskFailedResponse -> ()
rnf
    = \ RespondActivityTaskFailedResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondActivityTaskFailedResponse -> FieldSet
_RespondActivityTaskFailedResponse'_unknownFields RespondActivityTaskFailedResponse
x__)
             (Vector Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RespondActivityTaskFailedResponse -> Vector Failure
_RespondActivityTaskFailedResponse'failures RespondActivityTaskFailedResponse
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' RespondNexusTaskCompletedRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' RespondNexusTaskCompletedRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskToken' @:: Lens' RespondNexusTaskCompletedRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.response' @:: Lens' RespondNexusTaskCompletedRequest Proto.Temporal.Api.Nexus.V1.Message.Response@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'response' @:: Lens' RespondNexusTaskCompletedRequest (Prelude.Maybe Proto.Temporal.Api.Nexus.V1.Message.Response)@ -}
data RespondNexusTaskCompletedRequest
  = RespondNexusTaskCompletedRequest'_constructor {RespondNexusTaskCompletedRequest -> Text
_RespondNexusTaskCompletedRequest'namespace :: !Data.Text.Text,
                                                   RespondNexusTaskCompletedRequest -> Text
_RespondNexusTaskCompletedRequest'identity :: !Data.Text.Text,
                                                   RespondNexusTaskCompletedRequest -> ByteString
_RespondNexusTaskCompletedRequest'taskToken :: !Data.ByteString.ByteString,
                                                   RespondNexusTaskCompletedRequest -> Maybe Response
_RespondNexusTaskCompletedRequest'response :: !(Prelude.Maybe Proto.Temporal.Api.Nexus.V1.Message.Response),
                                                   RespondNexusTaskCompletedRequest -> FieldSet
_RespondNexusTaskCompletedRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Bool
(RespondNexusTaskCompletedRequest
 -> RespondNexusTaskCompletedRequest -> Bool)
-> (RespondNexusTaskCompletedRequest
    -> RespondNexusTaskCompletedRequest -> Bool)
-> Eq RespondNexusTaskCompletedRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Bool
== :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Bool
$c/= :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Bool
/= :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Bool
Prelude.Eq, Eq RespondNexusTaskCompletedRequest
Eq RespondNexusTaskCompletedRequest =>
(RespondNexusTaskCompletedRequest
 -> RespondNexusTaskCompletedRequest -> Ordering)
-> (RespondNexusTaskCompletedRequest
    -> RespondNexusTaskCompletedRequest -> Bool)
-> (RespondNexusTaskCompletedRequest
    -> RespondNexusTaskCompletedRequest -> Bool)
-> (RespondNexusTaskCompletedRequest
    -> RespondNexusTaskCompletedRequest -> Bool)
-> (RespondNexusTaskCompletedRequest
    -> RespondNexusTaskCompletedRequest -> Bool)
-> (RespondNexusTaskCompletedRequest
    -> RespondNexusTaskCompletedRequest
    -> RespondNexusTaskCompletedRequest)
-> (RespondNexusTaskCompletedRequest
    -> RespondNexusTaskCompletedRequest
    -> RespondNexusTaskCompletedRequest)
-> Ord RespondNexusTaskCompletedRequest
RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Bool
RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Ordering
RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest
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 :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Ordering
compare :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Ordering
$c< :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Bool
< :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Bool
$c<= :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Bool
<= :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Bool
$c> :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Bool
> :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Bool
$c>= :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Bool
>= :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest -> Bool
$cmax :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest
max :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest
$cmin :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest
min :: RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest
-> RespondNexusTaskCompletedRequest
Prelude.Ord)
instance Prelude.Show RespondNexusTaskCompletedRequest where
  showsPrec :: Int -> RespondNexusTaskCompletedRequest -> ShowS
showsPrec Int
_ RespondNexusTaskCompletedRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondNexusTaskCompletedRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondNexusTaskCompletedRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RespondNexusTaskCompletedRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RespondNexusTaskCompletedRequest
-> f RespondNexusTaskCompletedRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RespondNexusTaskCompletedRequest
 -> f RespondNexusTaskCompletedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondNexusTaskCompletedRequest
-> f RespondNexusTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondNexusTaskCompletedRequest -> Text)
-> (RespondNexusTaskCompletedRequest
    -> Text -> RespondNexusTaskCompletedRequest)
-> Lens
     RespondNexusTaskCompletedRequest
     RespondNexusTaskCompletedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondNexusTaskCompletedRequest -> Text
_RespondNexusTaskCompletedRequest'namespace
           (\ RespondNexusTaskCompletedRequest
x__ Text
y__
              -> RespondNexusTaskCompletedRequest
x__ {_RespondNexusTaskCompletedRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondNexusTaskCompletedRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> RespondNexusTaskCompletedRequest
-> f RespondNexusTaskCompletedRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> RespondNexusTaskCompletedRequest
 -> f RespondNexusTaskCompletedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondNexusTaskCompletedRequest
-> f RespondNexusTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondNexusTaskCompletedRequest -> Text)
-> (RespondNexusTaskCompletedRequest
    -> Text -> RespondNexusTaskCompletedRequest)
-> Lens
     RespondNexusTaskCompletedRequest
     RespondNexusTaskCompletedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondNexusTaskCompletedRequest -> Text
_RespondNexusTaskCompletedRequest'identity
           (\ RespondNexusTaskCompletedRequest
x__ Text
y__
              -> RespondNexusTaskCompletedRequest
x__ {_RespondNexusTaskCompletedRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondNexusTaskCompletedRequest "taskToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskToken"
-> (ByteString -> f ByteString)
-> RespondNexusTaskCompletedRequest
-> f RespondNexusTaskCompletedRequest
fieldOf Proxy# "taskToken"
_
    = ((ByteString -> f ByteString)
 -> RespondNexusTaskCompletedRequest
 -> f RespondNexusTaskCompletedRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> RespondNexusTaskCompletedRequest
-> f RespondNexusTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondNexusTaskCompletedRequest -> ByteString)
-> (RespondNexusTaskCompletedRequest
    -> ByteString -> RespondNexusTaskCompletedRequest)
-> Lens
     RespondNexusTaskCompletedRequest
     RespondNexusTaskCompletedRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondNexusTaskCompletedRequest -> ByteString
_RespondNexusTaskCompletedRequest'taskToken
           (\ RespondNexusTaskCompletedRequest
x__ ByteString
y__
              -> RespondNexusTaskCompletedRequest
x__ {_RespondNexusTaskCompletedRequest'taskToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondNexusTaskCompletedRequest "response" Proto.Temporal.Api.Nexus.V1.Message.Response where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "response"
-> (Response -> f Response)
-> RespondNexusTaskCompletedRequest
-> f RespondNexusTaskCompletedRequest
fieldOf Proxy# "response"
_
    = ((Maybe Response -> f (Maybe Response))
 -> RespondNexusTaskCompletedRequest
 -> f RespondNexusTaskCompletedRequest)
-> ((Response -> f Response)
    -> Maybe Response -> f (Maybe Response))
-> (Response -> f Response)
-> RespondNexusTaskCompletedRequest
-> f RespondNexusTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondNexusTaskCompletedRequest -> Maybe Response)
-> (RespondNexusTaskCompletedRequest
    -> Maybe Response -> RespondNexusTaskCompletedRequest)
-> Lens
     RespondNexusTaskCompletedRequest
     RespondNexusTaskCompletedRequest
     (Maybe Response)
     (Maybe Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondNexusTaskCompletedRequest -> Maybe Response
_RespondNexusTaskCompletedRequest'response
           (\ RespondNexusTaskCompletedRequest
x__ Maybe Response
y__
              -> RespondNexusTaskCompletedRequest
x__ {_RespondNexusTaskCompletedRequest'response = y__}))
        (Response -> Lens' (Maybe Response) Response
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Response
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondNexusTaskCompletedRequest "maybe'response" (Prelude.Maybe Proto.Temporal.Api.Nexus.V1.Message.Response) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'response"
-> (Maybe Response -> f (Maybe Response))
-> RespondNexusTaskCompletedRequest
-> f RespondNexusTaskCompletedRequest
fieldOf Proxy# "maybe'response"
_
    = ((Maybe Response -> f (Maybe Response))
 -> RespondNexusTaskCompletedRequest
 -> f RespondNexusTaskCompletedRequest)
-> ((Maybe Response -> f (Maybe Response))
    -> Maybe Response -> f (Maybe Response))
-> (Maybe Response -> f (Maybe Response))
-> RespondNexusTaskCompletedRequest
-> f RespondNexusTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondNexusTaskCompletedRequest -> Maybe Response)
-> (RespondNexusTaskCompletedRequest
    -> Maybe Response -> RespondNexusTaskCompletedRequest)
-> Lens
     RespondNexusTaskCompletedRequest
     RespondNexusTaskCompletedRequest
     (Maybe Response)
     (Maybe Response)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondNexusTaskCompletedRequest -> Maybe Response
_RespondNexusTaskCompletedRequest'response
           (\ RespondNexusTaskCompletedRequest
x__ Maybe Response
y__
              -> RespondNexusTaskCompletedRequest
x__ {_RespondNexusTaskCompletedRequest'response = y__}))
        (Maybe Response -> f (Maybe Response))
-> Maybe Response -> f (Maybe Response)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RespondNexusTaskCompletedRequest where
  messageName :: Proxy RespondNexusTaskCompletedRequest -> Text
messageName Proxy RespondNexusTaskCompletedRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondNexusTaskCompletedRequest"
  packedMessageDescriptor :: Proxy RespondNexusTaskCompletedRequest -> ByteString
packedMessageDescriptor Proxy RespondNexusTaskCompletedRequest
_
    = ByteString
"\n\
      \ RespondNexusTaskCompletedRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\SUB\n\
      \\bidentity\CAN\STX \SOH(\tR\bidentity\DC2\GS\n\
      \\n\
      \task_token\CAN\ETX \SOH(\fR\ttaskToken\DC2;\n\
      \\bresponse\CAN\EOT \SOH(\v2\US.temporal.api.nexus.v1.ResponseR\bresponse"
  packedFileDescriptor :: Proxy RespondNexusTaskCompletedRequest -> ByteString
packedFileDescriptor Proxy RespondNexusTaskCompletedRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondNexusTaskCompletedRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor RespondNexusTaskCompletedRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondNexusTaskCompletedRequest Text
-> FieldDescriptor RespondNexusTaskCompletedRequest
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
     RespondNexusTaskCompletedRequest
     RespondNexusTaskCompletedRequest
     Text
     Text
-> FieldAccessor RespondNexusTaskCompletedRequest 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 RespondNexusTaskCompletedRequest
        identity__field_descriptor :: FieldDescriptor RespondNexusTaskCompletedRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondNexusTaskCompletedRequest Text
-> FieldDescriptor RespondNexusTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondNexusTaskCompletedRequest
     RespondNexusTaskCompletedRequest
     Text
     Text
-> FieldAccessor RespondNexusTaskCompletedRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor RespondNexusTaskCompletedRequest
        taskToken__field_descriptor :: FieldDescriptor RespondNexusTaskCompletedRequest
taskToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor RespondNexusTaskCompletedRequest ByteString
-> FieldDescriptor RespondNexusTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     RespondNexusTaskCompletedRequest
     RespondNexusTaskCompletedRequest
     ByteString
     ByteString
-> FieldAccessor RespondNexusTaskCompletedRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken")) ::
              Data.ProtoLens.FieldDescriptor RespondNexusTaskCompletedRequest
        response__field_descriptor :: FieldDescriptor RespondNexusTaskCompletedRequest
response__field_descriptor
          = String
-> FieldTypeDescriptor Response
-> FieldAccessor RespondNexusTaskCompletedRequest Response
-> FieldDescriptor RespondNexusTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"response"
              (MessageOrGroup -> FieldTypeDescriptor Response
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Nexus.V1.Message.Response)
              (Lens
  RespondNexusTaskCompletedRequest
  RespondNexusTaskCompletedRequest
  (Maybe Response)
  (Maybe Response)
-> FieldAccessor RespondNexusTaskCompletedRequest Response
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.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 RespondNexusTaskCompletedRequest
      in
        [(Tag, FieldDescriptor RespondNexusTaskCompletedRequest)]
-> Map Tag (FieldDescriptor RespondNexusTaskCompletedRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RespondNexusTaskCompletedRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RespondNexusTaskCompletedRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RespondNexusTaskCompletedRequest
taskToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor RespondNexusTaskCompletedRequest
response__field_descriptor)]
  unknownFields :: Lens' RespondNexusTaskCompletedRequest FieldSet
unknownFields
    = (RespondNexusTaskCompletedRequest -> FieldSet)
-> (RespondNexusTaskCompletedRequest
    -> FieldSet -> RespondNexusTaskCompletedRequest)
-> Lens' RespondNexusTaskCompletedRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondNexusTaskCompletedRequest -> FieldSet
_RespondNexusTaskCompletedRequest'_unknownFields
        (\ RespondNexusTaskCompletedRequest
x__ FieldSet
y__
           -> RespondNexusTaskCompletedRequest
x__ {_RespondNexusTaskCompletedRequest'_unknownFields = y__})
  defMessage :: RespondNexusTaskCompletedRequest
defMessage
    = RespondNexusTaskCompletedRequest'_constructor
        {_RespondNexusTaskCompletedRequest'namespace :: Text
_RespondNexusTaskCompletedRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondNexusTaskCompletedRequest'identity :: Text
_RespondNexusTaskCompletedRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondNexusTaskCompletedRequest'taskToken :: ByteString
_RespondNexusTaskCompletedRequest'taskToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondNexusTaskCompletedRequest'response :: Maybe Response
_RespondNexusTaskCompletedRequest'response = Maybe Response
forall a. Maybe a
Prelude.Nothing,
         _RespondNexusTaskCompletedRequest'_unknownFields :: FieldSet
_RespondNexusTaskCompletedRequest'_unknownFields = []}
  parseMessage :: Parser RespondNexusTaskCompletedRequest
parseMessage
    = let
        loop ::
          RespondNexusTaskCompletedRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondNexusTaskCompletedRequest
        loop :: RespondNexusTaskCompletedRequest
-> Parser RespondNexusTaskCompletedRequest
loop RespondNexusTaskCompletedRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
26
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"task_token"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskToken") y x)
                        Word64
34
                          -> do y <- Parser Response -> String -> Parser Response
forall a. Parser a -> String -> Parser a
(Data.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 RespondNexusTaskCompletedRequest
-> String -> Parser RespondNexusTaskCompletedRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondNexusTaskCompletedRequest
-> Parser RespondNexusTaskCompletedRequest
loop RespondNexusTaskCompletedRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondNexusTaskCompletedRequest"
  buildMessage :: RespondNexusTaskCompletedRequest -> Builder
buildMessage
    = \ RespondNexusTaskCompletedRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  RespondNexusTaskCompletedRequest
  RespondNexusTaskCompletedRequest
  Text
  Text
-> RespondNexusTaskCompletedRequest -> 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") RespondNexusTaskCompletedRequest
_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
  RespondNexusTaskCompletedRequest
  RespondNexusTaskCompletedRequest
  Text
  Text
-> RespondNexusTaskCompletedRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") RespondNexusTaskCompletedRequest
_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 :: ByteString
_v = FoldLike
  ByteString
  RespondNexusTaskCompletedRequest
  RespondNexusTaskCompletedRequest
  ByteString
  ByteString
-> RespondNexusTaskCompletedRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken") RespondNexusTaskCompletedRequest
_x
                    in
                      if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
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
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               ByteString
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe Response)
  RespondNexusTaskCompletedRequest
  RespondNexusTaskCompletedRequest
  (Maybe Response)
  (Maybe Response)
-> RespondNexusTaskCompletedRequest -> Maybe 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") RespondNexusTaskCompletedRequest
_x
                       of
                         Maybe Response
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just Response
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (Response -> ByteString) -> Response -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   Response -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Response
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  RespondNexusTaskCompletedRequest
  RespondNexusTaskCompletedRequest
  FieldSet
  FieldSet
-> RespondNexusTaskCompletedRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondNexusTaskCompletedRequest
  RespondNexusTaskCompletedRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondNexusTaskCompletedRequest FieldSet
Data.ProtoLens.unknownFields RespondNexusTaskCompletedRequest
_x)))))
instance Control.DeepSeq.NFData RespondNexusTaskCompletedRequest where
  rnf :: RespondNexusTaskCompletedRequest -> ()
rnf
    = \ RespondNexusTaskCompletedRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondNexusTaskCompletedRequest -> FieldSet
_RespondNexusTaskCompletedRequest'_unknownFields RespondNexusTaskCompletedRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RespondNexusTaskCompletedRequest -> Text
_RespondNexusTaskCompletedRequest'namespace RespondNexusTaskCompletedRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RespondNexusTaskCompletedRequest -> Text
_RespondNexusTaskCompletedRequest'identity RespondNexusTaskCompletedRequest
x__)
                   (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RespondNexusTaskCompletedRequest -> ByteString
_RespondNexusTaskCompletedRequest'taskToken RespondNexusTaskCompletedRequest
x__)
                      (Maybe Response -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RespondNexusTaskCompletedRequest -> Maybe Response
_RespondNexusTaskCompletedRequest'response RespondNexusTaskCompletedRequest
x__) ()))))
{- | Fields :
      -}
data RespondNexusTaskCompletedResponse
  = RespondNexusTaskCompletedResponse'_constructor {RespondNexusTaskCompletedResponse -> FieldSet
_RespondNexusTaskCompletedResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Bool
(RespondNexusTaskCompletedResponse
 -> RespondNexusTaskCompletedResponse -> Bool)
-> (RespondNexusTaskCompletedResponse
    -> RespondNexusTaskCompletedResponse -> Bool)
-> Eq RespondNexusTaskCompletedResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Bool
== :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Bool
$c/= :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Bool
/= :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Bool
Prelude.Eq, Eq RespondNexusTaskCompletedResponse
Eq RespondNexusTaskCompletedResponse =>
(RespondNexusTaskCompletedResponse
 -> RespondNexusTaskCompletedResponse -> Ordering)
-> (RespondNexusTaskCompletedResponse
    -> RespondNexusTaskCompletedResponse -> Bool)
-> (RespondNexusTaskCompletedResponse
    -> RespondNexusTaskCompletedResponse -> Bool)
-> (RespondNexusTaskCompletedResponse
    -> RespondNexusTaskCompletedResponse -> Bool)
-> (RespondNexusTaskCompletedResponse
    -> RespondNexusTaskCompletedResponse -> Bool)
-> (RespondNexusTaskCompletedResponse
    -> RespondNexusTaskCompletedResponse
    -> RespondNexusTaskCompletedResponse)
-> (RespondNexusTaskCompletedResponse
    -> RespondNexusTaskCompletedResponse
    -> RespondNexusTaskCompletedResponse)
-> Ord RespondNexusTaskCompletedResponse
RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Bool
RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Ordering
RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse
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 :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Ordering
compare :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Ordering
$c< :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Bool
< :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Bool
$c<= :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Bool
<= :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Bool
$c> :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Bool
> :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Bool
$c>= :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Bool
>= :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse -> Bool
$cmax :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse
max :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse
$cmin :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse
min :: RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse
-> RespondNexusTaskCompletedResponse
Prelude.Ord)
instance Prelude.Show RespondNexusTaskCompletedResponse where
  showsPrec :: Int -> RespondNexusTaskCompletedResponse -> ShowS
showsPrec Int
_ RespondNexusTaskCompletedResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondNexusTaskCompletedResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondNexusTaskCompletedResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message RespondNexusTaskCompletedResponse where
  messageName :: Proxy RespondNexusTaskCompletedResponse -> Text
messageName Proxy RespondNexusTaskCompletedResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondNexusTaskCompletedResponse"
  packedMessageDescriptor :: Proxy RespondNexusTaskCompletedResponse -> ByteString
packedMessageDescriptor Proxy RespondNexusTaskCompletedResponse
_
    = ByteString
"\n\
      \!RespondNexusTaskCompletedResponse"
  packedFileDescriptor :: Proxy RespondNexusTaskCompletedResponse -> ByteString
packedFileDescriptor Proxy RespondNexusTaskCompletedResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondNexusTaskCompletedResponse)
fieldsByTag = let in [(Tag, FieldDescriptor RespondNexusTaskCompletedResponse)]
-> Map Tag (FieldDescriptor RespondNexusTaskCompletedResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' RespondNexusTaskCompletedResponse FieldSet
unknownFields
    = (RespondNexusTaskCompletedResponse -> FieldSet)
-> (RespondNexusTaskCompletedResponse
    -> FieldSet -> RespondNexusTaskCompletedResponse)
-> Lens' RespondNexusTaskCompletedResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondNexusTaskCompletedResponse -> FieldSet
_RespondNexusTaskCompletedResponse'_unknownFields
        (\ RespondNexusTaskCompletedResponse
x__ FieldSet
y__
           -> RespondNexusTaskCompletedResponse
x__ {_RespondNexusTaskCompletedResponse'_unknownFields = y__})
  defMessage :: RespondNexusTaskCompletedResponse
defMessage
    = RespondNexusTaskCompletedResponse'_constructor
        {_RespondNexusTaskCompletedResponse'_unknownFields :: FieldSet
_RespondNexusTaskCompletedResponse'_unknownFields = []}
  parseMessage :: Parser RespondNexusTaskCompletedResponse
parseMessage
    = let
        loop ::
          RespondNexusTaskCompletedResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondNexusTaskCompletedResponse
        loop :: RespondNexusTaskCompletedResponse
-> Parser RespondNexusTaskCompletedResponse
loop RespondNexusTaskCompletedResponse
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 RespondNexusTaskCompletedResponse
-> String -> Parser RespondNexusTaskCompletedResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondNexusTaskCompletedResponse
-> Parser RespondNexusTaskCompletedResponse
loop RespondNexusTaskCompletedResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondNexusTaskCompletedResponse"
  buildMessage :: RespondNexusTaskCompletedResponse -> Builder
buildMessage
    = \ RespondNexusTaskCompletedResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  RespondNexusTaskCompletedResponse
  RespondNexusTaskCompletedResponse
  FieldSet
  FieldSet
-> RespondNexusTaskCompletedResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondNexusTaskCompletedResponse
  RespondNexusTaskCompletedResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondNexusTaskCompletedResponse FieldSet
Data.ProtoLens.unknownFields RespondNexusTaskCompletedResponse
_x)
instance Control.DeepSeq.NFData RespondNexusTaskCompletedResponse where
  rnf :: RespondNexusTaskCompletedResponse -> ()
rnf
    = \ RespondNexusTaskCompletedResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondNexusTaskCompletedResponse -> FieldSet
_RespondNexusTaskCompletedResponse'_unknownFields RespondNexusTaskCompletedResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' RespondNexusTaskFailedRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' RespondNexusTaskFailedRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskToken' @:: Lens' RespondNexusTaskFailedRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.error' @:: Lens' RespondNexusTaskFailedRequest Proto.Temporal.Api.Nexus.V1.Message.HandlerError@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'error' @:: Lens' RespondNexusTaskFailedRequest (Prelude.Maybe Proto.Temporal.Api.Nexus.V1.Message.HandlerError)@ -}
data RespondNexusTaskFailedRequest
  = RespondNexusTaskFailedRequest'_constructor {RespondNexusTaskFailedRequest -> Text
_RespondNexusTaskFailedRequest'namespace :: !Data.Text.Text,
                                                RespondNexusTaskFailedRequest -> Text
_RespondNexusTaskFailedRequest'identity :: !Data.Text.Text,
                                                RespondNexusTaskFailedRequest -> ByteString
_RespondNexusTaskFailedRequest'taskToken :: !Data.ByteString.ByteString,
                                                RespondNexusTaskFailedRequest -> Maybe HandlerError
_RespondNexusTaskFailedRequest'error :: !(Prelude.Maybe Proto.Temporal.Api.Nexus.V1.Message.HandlerError),
                                                RespondNexusTaskFailedRequest -> FieldSet
_RespondNexusTaskFailedRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Bool
(RespondNexusTaskFailedRequest
 -> RespondNexusTaskFailedRequest -> Bool)
-> (RespondNexusTaskFailedRequest
    -> RespondNexusTaskFailedRequest -> Bool)
-> Eq RespondNexusTaskFailedRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Bool
== :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Bool
$c/= :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Bool
/= :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Bool
Prelude.Eq, Eq RespondNexusTaskFailedRequest
Eq RespondNexusTaskFailedRequest =>
(RespondNexusTaskFailedRequest
 -> RespondNexusTaskFailedRequest -> Ordering)
-> (RespondNexusTaskFailedRequest
    -> RespondNexusTaskFailedRequest -> Bool)
-> (RespondNexusTaskFailedRequest
    -> RespondNexusTaskFailedRequest -> Bool)
-> (RespondNexusTaskFailedRequest
    -> RespondNexusTaskFailedRequest -> Bool)
-> (RespondNexusTaskFailedRequest
    -> RespondNexusTaskFailedRequest -> Bool)
-> (RespondNexusTaskFailedRequest
    -> RespondNexusTaskFailedRequest -> RespondNexusTaskFailedRequest)
-> (RespondNexusTaskFailedRequest
    -> RespondNexusTaskFailedRequest -> RespondNexusTaskFailedRequest)
-> Ord RespondNexusTaskFailedRequest
RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Bool
RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Ordering
RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> RespondNexusTaskFailedRequest
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 :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Ordering
compare :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Ordering
$c< :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Bool
< :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Bool
$c<= :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Bool
<= :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Bool
$c> :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Bool
> :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Bool
$c>= :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Bool
>= :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> Bool
$cmax :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> RespondNexusTaskFailedRequest
max :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> RespondNexusTaskFailedRequest
$cmin :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> RespondNexusTaskFailedRequest
min :: RespondNexusTaskFailedRequest
-> RespondNexusTaskFailedRequest -> RespondNexusTaskFailedRequest
Prelude.Ord)
instance Prelude.Show RespondNexusTaskFailedRequest where
  showsPrec :: Int -> RespondNexusTaskFailedRequest -> ShowS
showsPrec Int
_ RespondNexusTaskFailedRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondNexusTaskFailedRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondNexusTaskFailedRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RespondNexusTaskFailedRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RespondNexusTaskFailedRequest
-> f RespondNexusTaskFailedRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RespondNexusTaskFailedRequest
 -> f RespondNexusTaskFailedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondNexusTaskFailedRequest
-> f RespondNexusTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondNexusTaskFailedRequest -> Text)
-> (RespondNexusTaskFailedRequest
    -> Text -> RespondNexusTaskFailedRequest)
-> Lens
     RespondNexusTaskFailedRequest
     RespondNexusTaskFailedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondNexusTaskFailedRequest -> Text
_RespondNexusTaskFailedRequest'namespace
           (\ RespondNexusTaskFailedRequest
x__ Text
y__
              -> RespondNexusTaskFailedRequest
x__ {_RespondNexusTaskFailedRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondNexusTaskFailedRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> RespondNexusTaskFailedRequest
-> f RespondNexusTaskFailedRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> RespondNexusTaskFailedRequest
 -> f RespondNexusTaskFailedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondNexusTaskFailedRequest
-> f RespondNexusTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondNexusTaskFailedRequest -> Text)
-> (RespondNexusTaskFailedRequest
    -> Text -> RespondNexusTaskFailedRequest)
-> Lens
     RespondNexusTaskFailedRequest
     RespondNexusTaskFailedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondNexusTaskFailedRequest -> Text
_RespondNexusTaskFailedRequest'identity
           (\ RespondNexusTaskFailedRequest
x__ Text
y__ -> RespondNexusTaskFailedRequest
x__ {_RespondNexusTaskFailedRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondNexusTaskFailedRequest "taskToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskToken"
-> (ByteString -> f ByteString)
-> RespondNexusTaskFailedRequest
-> f RespondNexusTaskFailedRequest
fieldOf Proxy# "taskToken"
_
    = ((ByteString -> f ByteString)
 -> RespondNexusTaskFailedRequest
 -> f RespondNexusTaskFailedRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> RespondNexusTaskFailedRequest
-> f RespondNexusTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondNexusTaskFailedRequest -> ByteString)
-> (RespondNexusTaskFailedRequest
    -> ByteString -> RespondNexusTaskFailedRequest)
-> Lens
     RespondNexusTaskFailedRequest
     RespondNexusTaskFailedRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondNexusTaskFailedRequest -> ByteString
_RespondNexusTaskFailedRequest'taskToken
           (\ RespondNexusTaskFailedRequest
x__ ByteString
y__
              -> RespondNexusTaskFailedRequest
x__ {_RespondNexusTaskFailedRequest'taskToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondNexusTaskFailedRequest "error" Proto.Temporal.Api.Nexus.V1.Message.HandlerError where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "error"
-> (HandlerError -> f HandlerError)
-> RespondNexusTaskFailedRequest
-> f RespondNexusTaskFailedRequest
fieldOf Proxy# "error"
_
    = ((Maybe HandlerError -> f (Maybe HandlerError))
 -> RespondNexusTaskFailedRequest
 -> f RespondNexusTaskFailedRequest)
-> ((HandlerError -> f HandlerError)
    -> Maybe HandlerError -> f (Maybe HandlerError))
-> (HandlerError -> f HandlerError)
-> RespondNexusTaskFailedRequest
-> f RespondNexusTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondNexusTaskFailedRequest -> Maybe HandlerError)
-> (RespondNexusTaskFailedRequest
    -> Maybe HandlerError -> RespondNexusTaskFailedRequest)
-> Lens
     RespondNexusTaskFailedRequest
     RespondNexusTaskFailedRequest
     (Maybe HandlerError)
     (Maybe HandlerError)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondNexusTaskFailedRequest -> Maybe HandlerError
_RespondNexusTaskFailedRequest'error
           (\ RespondNexusTaskFailedRequest
x__ Maybe HandlerError
y__ -> RespondNexusTaskFailedRequest
x__ {_RespondNexusTaskFailedRequest'error = y__}))
        (HandlerError -> Lens' (Maybe HandlerError) HandlerError
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens HandlerError
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondNexusTaskFailedRequest "maybe'error" (Prelude.Maybe Proto.Temporal.Api.Nexus.V1.Message.HandlerError) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'error"
-> (Maybe HandlerError -> f (Maybe HandlerError))
-> RespondNexusTaskFailedRequest
-> f RespondNexusTaskFailedRequest
fieldOf Proxy# "maybe'error"
_
    = ((Maybe HandlerError -> f (Maybe HandlerError))
 -> RespondNexusTaskFailedRequest
 -> f RespondNexusTaskFailedRequest)
-> ((Maybe HandlerError -> f (Maybe HandlerError))
    -> Maybe HandlerError -> f (Maybe HandlerError))
-> (Maybe HandlerError -> f (Maybe HandlerError))
-> RespondNexusTaskFailedRequest
-> f RespondNexusTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondNexusTaskFailedRequest -> Maybe HandlerError)
-> (RespondNexusTaskFailedRequest
    -> Maybe HandlerError -> RespondNexusTaskFailedRequest)
-> Lens
     RespondNexusTaskFailedRequest
     RespondNexusTaskFailedRequest
     (Maybe HandlerError)
     (Maybe HandlerError)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondNexusTaskFailedRequest -> Maybe HandlerError
_RespondNexusTaskFailedRequest'error
           (\ RespondNexusTaskFailedRequest
x__ Maybe HandlerError
y__ -> RespondNexusTaskFailedRequest
x__ {_RespondNexusTaskFailedRequest'error = y__}))
        (Maybe HandlerError -> f (Maybe HandlerError))
-> Maybe HandlerError -> f (Maybe HandlerError)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RespondNexusTaskFailedRequest where
  messageName :: Proxy RespondNexusTaskFailedRequest -> Text
messageName Proxy RespondNexusTaskFailedRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondNexusTaskFailedRequest"
  packedMessageDescriptor :: Proxy RespondNexusTaskFailedRequest -> ByteString
packedMessageDescriptor Proxy RespondNexusTaskFailedRequest
_
    = ByteString
"\n\
      \\GSRespondNexusTaskFailedRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\SUB\n\
      \\bidentity\CAN\STX \SOH(\tR\bidentity\DC2\GS\n\
      \\n\
      \task_token\CAN\ETX \SOH(\fR\ttaskToken\DC29\n\
      \\ENQerror\CAN\EOT \SOH(\v2#.temporal.api.nexus.v1.HandlerErrorR\ENQerror"
  packedFileDescriptor :: Proxy RespondNexusTaskFailedRequest -> ByteString
packedFileDescriptor Proxy RespondNexusTaskFailedRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondNexusTaskFailedRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor RespondNexusTaskFailedRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondNexusTaskFailedRequest Text
-> FieldDescriptor RespondNexusTaskFailedRequest
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
     RespondNexusTaskFailedRequest
     RespondNexusTaskFailedRequest
     Text
     Text
-> FieldAccessor RespondNexusTaskFailedRequest 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 RespondNexusTaskFailedRequest
        identity__field_descriptor :: FieldDescriptor RespondNexusTaskFailedRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondNexusTaskFailedRequest Text
-> FieldDescriptor RespondNexusTaskFailedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondNexusTaskFailedRequest
     RespondNexusTaskFailedRequest
     Text
     Text
-> FieldAccessor RespondNexusTaskFailedRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor RespondNexusTaskFailedRequest
        taskToken__field_descriptor :: FieldDescriptor RespondNexusTaskFailedRequest
taskToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor RespondNexusTaskFailedRequest ByteString
-> FieldDescriptor RespondNexusTaskFailedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     RespondNexusTaskFailedRequest
     RespondNexusTaskFailedRequest
     ByteString
     ByteString
-> FieldAccessor RespondNexusTaskFailedRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken")) ::
              Data.ProtoLens.FieldDescriptor RespondNexusTaskFailedRequest
        error__field_descriptor :: FieldDescriptor RespondNexusTaskFailedRequest
error__field_descriptor
          = String
-> FieldTypeDescriptor HandlerError
-> FieldAccessor RespondNexusTaskFailedRequest HandlerError
-> FieldDescriptor RespondNexusTaskFailedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"error"
              (MessageOrGroup -> FieldTypeDescriptor HandlerError
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Nexus.V1.Message.HandlerError)
              (Lens
  RespondNexusTaskFailedRequest
  RespondNexusTaskFailedRequest
  (Maybe HandlerError)
  (Maybe HandlerError)
-> FieldAccessor RespondNexusTaskFailedRequest HandlerError
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'error")) ::
              Data.ProtoLens.FieldDescriptor RespondNexusTaskFailedRequest
      in
        [(Tag, FieldDescriptor RespondNexusTaskFailedRequest)]
-> Map Tag (FieldDescriptor RespondNexusTaskFailedRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RespondNexusTaskFailedRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RespondNexusTaskFailedRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RespondNexusTaskFailedRequest
taskToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor RespondNexusTaskFailedRequest
error__field_descriptor)]
  unknownFields :: Lens' RespondNexusTaskFailedRequest FieldSet
unknownFields
    = (RespondNexusTaskFailedRequest -> FieldSet)
-> (RespondNexusTaskFailedRequest
    -> FieldSet -> RespondNexusTaskFailedRequest)
-> Lens' RespondNexusTaskFailedRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondNexusTaskFailedRequest -> FieldSet
_RespondNexusTaskFailedRequest'_unknownFields
        (\ RespondNexusTaskFailedRequest
x__ FieldSet
y__
           -> RespondNexusTaskFailedRequest
x__ {_RespondNexusTaskFailedRequest'_unknownFields = y__})
  defMessage :: RespondNexusTaskFailedRequest
defMessage
    = RespondNexusTaskFailedRequest'_constructor
        {_RespondNexusTaskFailedRequest'namespace :: Text
_RespondNexusTaskFailedRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondNexusTaskFailedRequest'identity :: Text
_RespondNexusTaskFailedRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondNexusTaskFailedRequest'taskToken :: ByteString
_RespondNexusTaskFailedRequest'taskToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondNexusTaskFailedRequest'error :: Maybe HandlerError
_RespondNexusTaskFailedRequest'error = Maybe HandlerError
forall a. Maybe a
Prelude.Nothing,
         _RespondNexusTaskFailedRequest'_unknownFields :: FieldSet
_RespondNexusTaskFailedRequest'_unknownFields = []}
  parseMessage :: Parser RespondNexusTaskFailedRequest
parseMessage
    = let
        loop ::
          RespondNexusTaskFailedRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondNexusTaskFailedRequest
        loop :: RespondNexusTaskFailedRequest
-> Parser RespondNexusTaskFailedRequest
loop RespondNexusTaskFailedRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
26
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"task_token"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskToken") y x)
                        Word64
34
                          -> do y <- Parser HandlerError -> String -> Parser HandlerError
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"error"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"error") 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 RespondNexusTaskFailedRequest
-> String -> Parser RespondNexusTaskFailedRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondNexusTaskFailedRequest
-> Parser RespondNexusTaskFailedRequest
loop RespondNexusTaskFailedRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"RespondNexusTaskFailedRequest"
  buildMessage :: RespondNexusTaskFailedRequest -> Builder
buildMessage
    = \ RespondNexusTaskFailedRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  RespondNexusTaskFailedRequest
  RespondNexusTaskFailedRequest
  Text
  Text
-> RespondNexusTaskFailedRequest -> 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") RespondNexusTaskFailedRequest
_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
  RespondNexusTaskFailedRequest
  RespondNexusTaskFailedRequest
  Text
  Text
-> RespondNexusTaskFailedRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") RespondNexusTaskFailedRequest
_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 :: ByteString
_v = FoldLike
  ByteString
  RespondNexusTaskFailedRequest
  RespondNexusTaskFailedRequest
  ByteString
  ByteString
-> RespondNexusTaskFailedRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken") RespondNexusTaskFailedRequest
_x
                    in
                      if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
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
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               ByteString
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe HandlerError)
  RespondNexusTaskFailedRequest
  RespondNexusTaskFailedRequest
  (Maybe HandlerError)
  (Maybe HandlerError)
-> RespondNexusTaskFailedRequest -> Maybe HandlerError
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'error") RespondNexusTaskFailedRequest
_x
                       of
                         Maybe HandlerError
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just HandlerError
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (HandlerError -> ByteString) -> HandlerError -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   HandlerError -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage HandlerError
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  RespondNexusTaskFailedRequest
  RespondNexusTaskFailedRequest
  FieldSet
  FieldSet
-> RespondNexusTaskFailedRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondNexusTaskFailedRequest
  RespondNexusTaskFailedRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondNexusTaskFailedRequest FieldSet
Data.ProtoLens.unknownFields RespondNexusTaskFailedRequest
_x)))))
instance Control.DeepSeq.NFData RespondNexusTaskFailedRequest where
  rnf :: RespondNexusTaskFailedRequest -> ()
rnf
    = \ RespondNexusTaskFailedRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondNexusTaskFailedRequest -> FieldSet
_RespondNexusTaskFailedRequest'_unknownFields RespondNexusTaskFailedRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RespondNexusTaskFailedRequest -> Text
_RespondNexusTaskFailedRequest'namespace RespondNexusTaskFailedRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RespondNexusTaskFailedRequest -> Text
_RespondNexusTaskFailedRequest'identity RespondNexusTaskFailedRequest
x__)
                   (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RespondNexusTaskFailedRequest -> ByteString
_RespondNexusTaskFailedRequest'taskToken RespondNexusTaskFailedRequest
x__)
                      (Maybe HandlerError -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RespondNexusTaskFailedRequest -> Maybe HandlerError
_RespondNexusTaskFailedRequest'error RespondNexusTaskFailedRequest
x__) ()))))
{- | Fields :
      -}
data RespondNexusTaskFailedResponse
  = RespondNexusTaskFailedResponse'_constructor {RespondNexusTaskFailedResponse -> FieldSet
_RespondNexusTaskFailedResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Bool
(RespondNexusTaskFailedResponse
 -> RespondNexusTaskFailedResponse -> Bool)
-> (RespondNexusTaskFailedResponse
    -> RespondNexusTaskFailedResponse -> Bool)
-> Eq RespondNexusTaskFailedResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Bool
== :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Bool
$c/= :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Bool
/= :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Bool
Prelude.Eq, Eq RespondNexusTaskFailedResponse
Eq RespondNexusTaskFailedResponse =>
(RespondNexusTaskFailedResponse
 -> RespondNexusTaskFailedResponse -> Ordering)
-> (RespondNexusTaskFailedResponse
    -> RespondNexusTaskFailedResponse -> Bool)
-> (RespondNexusTaskFailedResponse
    -> RespondNexusTaskFailedResponse -> Bool)
-> (RespondNexusTaskFailedResponse
    -> RespondNexusTaskFailedResponse -> Bool)
-> (RespondNexusTaskFailedResponse
    -> RespondNexusTaskFailedResponse -> Bool)
-> (RespondNexusTaskFailedResponse
    -> RespondNexusTaskFailedResponse
    -> RespondNexusTaskFailedResponse)
-> (RespondNexusTaskFailedResponse
    -> RespondNexusTaskFailedResponse
    -> RespondNexusTaskFailedResponse)
-> Ord RespondNexusTaskFailedResponse
RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Bool
RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Ordering
RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> RespondNexusTaskFailedResponse
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 :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Ordering
compare :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Ordering
$c< :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Bool
< :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Bool
$c<= :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Bool
<= :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Bool
$c> :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Bool
> :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Bool
$c>= :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Bool
>= :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> Bool
$cmax :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> RespondNexusTaskFailedResponse
max :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> RespondNexusTaskFailedResponse
$cmin :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> RespondNexusTaskFailedResponse
min :: RespondNexusTaskFailedResponse
-> RespondNexusTaskFailedResponse -> RespondNexusTaskFailedResponse
Prelude.Ord)
instance Prelude.Show RespondNexusTaskFailedResponse where
  showsPrec :: Int -> RespondNexusTaskFailedResponse -> ShowS
showsPrec Int
_ RespondNexusTaskFailedResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondNexusTaskFailedResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondNexusTaskFailedResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message RespondNexusTaskFailedResponse where
  messageName :: Proxy RespondNexusTaskFailedResponse -> Text
messageName Proxy RespondNexusTaskFailedResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondNexusTaskFailedResponse"
  packedMessageDescriptor :: Proxy RespondNexusTaskFailedResponse -> ByteString
packedMessageDescriptor Proxy RespondNexusTaskFailedResponse
_
    = ByteString
"\n\
      \\RSRespondNexusTaskFailedResponse"
  packedFileDescriptor :: Proxy RespondNexusTaskFailedResponse -> ByteString
packedFileDescriptor Proxy RespondNexusTaskFailedResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondNexusTaskFailedResponse)
fieldsByTag = let in [(Tag, FieldDescriptor RespondNexusTaskFailedResponse)]
-> Map Tag (FieldDescriptor RespondNexusTaskFailedResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' RespondNexusTaskFailedResponse FieldSet
unknownFields
    = (RespondNexusTaskFailedResponse -> FieldSet)
-> (RespondNexusTaskFailedResponse
    -> FieldSet -> RespondNexusTaskFailedResponse)
-> Lens' RespondNexusTaskFailedResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondNexusTaskFailedResponse -> FieldSet
_RespondNexusTaskFailedResponse'_unknownFields
        (\ RespondNexusTaskFailedResponse
x__ FieldSet
y__
           -> RespondNexusTaskFailedResponse
x__ {_RespondNexusTaskFailedResponse'_unknownFields = y__})
  defMessage :: RespondNexusTaskFailedResponse
defMessage
    = RespondNexusTaskFailedResponse'_constructor
        {_RespondNexusTaskFailedResponse'_unknownFields :: FieldSet
_RespondNexusTaskFailedResponse'_unknownFields = []}
  parseMessage :: Parser RespondNexusTaskFailedResponse
parseMessage
    = let
        loop ::
          RespondNexusTaskFailedResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondNexusTaskFailedResponse
        loop :: RespondNexusTaskFailedResponse
-> Parser RespondNexusTaskFailedResponse
loop RespondNexusTaskFailedResponse
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 RespondNexusTaskFailedResponse
-> String -> Parser RespondNexusTaskFailedResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondNexusTaskFailedResponse
-> Parser RespondNexusTaskFailedResponse
loop RespondNexusTaskFailedResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondNexusTaskFailedResponse"
  buildMessage :: RespondNexusTaskFailedResponse -> Builder
buildMessage
    = \ RespondNexusTaskFailedResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  RespondNexusTaskFailedResponse
  RespondNexusTaskFailedResponse
  FieldSet
  FieldSet
-> RespondNexusTaskFailedResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondNexusTaskFailedResponse
  RespondNexusTaskFailedResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondNexusTaskFailedResponse FieldSet
Data.ProtoLens.unknownFields RespondNexusTaskFailedResponse
_x)
instance Control.DeepSeq.NFData RespondNexusTaskFailedResponse where
  rnf :: RespondNexusTaskFailedResponse -> ()
rnf
    = \ RespondNexusTaskFailedResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondNexusTaskFailedResponse -> FieldSet
_RespondNexusTaskFailedResponse'_unknownFields RespondNexusTaskFailedResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskToken' @:: Lens' RespondQueryTaskCompletedRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.completedType' @:: Lens' RespondQueryTaskCompletedRequest Proto.Temporal.Api.Enums.V1.Query.QueryResultType@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.queryResult' @:: Lens' RespondQueryTaskCompletedRequest Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'queryResult' @:: Lens' RespondQueryTaskCompletedRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.errorMessage' @:: Lens' RespondQueryTaskCompletedRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' RespondQueryTaskCompletedRequest Data.Text.Text@ -}
data RespondQueryTaskCompletedRequest
  = RespondQueryTaskCompletedRequest'_constructor {RespondQueryTaskCompletedRequest -> ByteString
_RespondQueryTaskCompletedRequest'taskToken :: !Data.ByteString.ByteString,
                                                   RespondQueryTaskCompletedRequest -> QueryResultType
_RespondQueryTaskCompletedRequest'completedType :: !Proto.Temporal.Api.Enums.V1.Query.QueryResultType,
                                                   RespondQueryTaskCompletedRequest -> Maybe Payloads
_RespondQueryTaskCompletedRequest'queryResult :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                   RespondQueryTaskCompletedRequest -> Text
_RespondQueryTaskCompletedRequest'errorMessage :: !Data.Text.Text,
                                                   RespondQueryTaskCompletedRequest -> Text
_RespondQueryTaskCompletedRequest'namespace :: !Data.Text.Text,
                                                   RespondQueryTaskCompletedRequest -> FieldSet
_RespondQueryTaskCompletedRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Bool
(RespondQueryTaskCompletedRequest
 -> RespondQueryTaskCompletedRequest -> Bool)
-> (RespondQueryTaskCompletedRequest
    -> RespondQueryTaskCompletedRequest -> Bool)
-> Eq RespondQueryTaskCompletedRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Bool
== :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Bool
$c/= :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Bool
/= :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Bool
Prelude.Eq, Eq RespondQueryTaskCompletedRequest
Eq RespondQueryTaskCompletedRequest =>
(RespondQueryTaskCompletedRequest
 -> RespondQueryTaskCompletedRequest -> Ordering)
-> (RespondQueryTaskCompletedRequest
    -> RespondQueryTaskCompletedRequest -> Bool)
-> (RespondQueryTaskCompletedRequest
    -> RespondQueryTaskCompletedRequest -> Bool)
-> (RespondQueryTaskCompletedRequest
    -> RespondQueryTaskCompletedRequest -> Bool)
-> (RespondQueryTaskCompletedRequest
    -> RespondQueryTaskCompletedRequest -> Bool)
-> (RespondQueryTaskCompletedRequest
    -> RespondQueryTaskCompletedRequest
    -> RespondQueryTaskCompletedRequest)
-> (RespondQueryTaskCompletedRequest
    -> RespondQueryTaskCompletedRequest
    -> RespondQueryTaskCompletedRequest)
-> Ord RespondQueryTaskCompletedRequest
RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Bool
RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Ordering
RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest
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 :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Ordering
compare :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Ordering
$c< :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Bool
< :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Bool
$c<= :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Bool
<= :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Bool
$c> :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Bool
> :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Bool
$c>= :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Bool
>= :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest -> Bool
$cmax :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest
max :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest
$cmin :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest
min :: RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest
-> RespondQueryTaskCompletedRequest
Prelude.Ord)
instance Prelude.Show RespondQueryTaskCompletedRequest where
  showsPrec :: Int -> RespondQueryTaskCompletedRequest -> ShowS
showsPrec Int
_ RespondQueryTaskCompletedRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondQueryTaskCompletedRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondQueryTaskCompletedRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RespondQueryTaskCompletedRequest "taskToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskToken"
-> (ByteString -> f ByteString)
-> RespondQueryTaskCompletedRequest
-> f RespondQueryTaskCompletedRequest
fieldOf Proxy# "taskToken"
_
    = ((ByteString -> f ByteString)
 -> RespondQueryTaskCompletedRequest
 -> f RespondQueryTaskCompletedRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> RespondQueryTaskCompletedRequest
-> f RespondQueryTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondQueryTaskCompletedRequest -> ByteString)
-> (RespondQueryTaskCompletedRequest
    -> ByteString -> RespondQueryTaskCompletedRequest)
-> Lens
     RespondQueryTaskCompletedRequest
     RespondQueryTaskCompletedRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondQueryTaskCompletedRequest -> ByteString
_RespondQueryTaskCompletedRequest'taskToken
           (\ RespondQueryTaskCompletedRequest
x__ ByteString
y__
              -> RespondQueryTaskCompletedRequest
x__ {_RespondQueryTaskCompletedRequest'taskToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondQueryTaskCompletedRequest "completedType" Proto.Temporal.Api.Enums.V1.Query.QueryResultType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "completedType"
-> (QueryResultType -> f QueryResultType)
-> RespondQueryTaskCompletedRequest
-> f RespondQueryTaskCompletedRequest
fieldOf Proxy# "completedType"
_
    = ((QueryResultType -> f QueryResultType)
 -> RespondQueryTaskCompletedRequest
 -> f RespondQueryTaskCompletedRequest)
-> ((QueryResultType -> f QueryResultType)
    -> QueryResultType -> f QueryResultType)
-> (QueryResultType -> f QueryResultType)
-> RespondQueryTaskCompletedRequest
-> f RespondQueryTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondQueryTaskCompletedRequest -> QueryResultType)
-> (RespondQueryTaskCompletedRequest
    -> QueryResultType -> RespondQueryTaskCompletedRequest)
-> Lens
     RespondQueryTaskCompletedRequest
     RespondQueryTaskCompletedRequest
     QueryResultType
     QueryResultType
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondQueryTaskCompletedRequest -> QueryResultType
_RespondQueryTaskCompletedRequest'completedType
           (\ RespondQueryTaskCompletedRequest
x__ QueryResultType
y__
              -> RespondQueryTaskCompletedRequest
x__ {_RespondQueryTaskCompletedRequest'completedType = y__}))
        (QueryResultType -> f QueryResultType)
-> QueryResultType -> f QueryResultType
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondQueryTaskCompletedRequest "queryResult" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "queryResult"
-> (Payloads -> f Payloads)
-> RespondQueryTaskCompletedRequest
-> f RespondQueryTaskCompletedRequest
fieldOf Proxy# "queryResult"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RespondQueryTaskCompletedRequest
 -> f RespondQueryTaskCompletedRequest)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> RespondQueryTaskCompletedRequest
-> f RespondQueryTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondQueryTaskCompletedRequest -> Maybe Payloads)
-> (RespondQueryTaskCompletedRequest
    -> Maybe Payloads -> RespondQueryTaskCompletedRequest)
-> Lens
     RespondQueryTaskCompletedRequest
     RespondQueryTaskCompletedRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondQueryTaskCompletedRequest -> Maybe Payloads
_RespondQueryTaskCompletedRequest'queryResult
           (\ RespondQueryTaskCompletedRequest
x__ Maybe Payloads
y__
              -> RespondQueryTaskCompletedRequest
x__ {_RespondQueryTaskCompletedRequest'queryResult = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondQueryTaskCompletedRequest "maybe'queryResult" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'queryResult"
-> (Maybe Payloads -> f (Maybe Payloads))
-> RespondQueryTaskCompletedRequest
-> f RespondQueryTaskCompletedRequest
fieldOf Proxy# "maybe'queryResult"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> RespondQueryTaskCompletedRequest
 -> f RespondQueryTaskCompletedRequest)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> RespondQueryTaskCompletedRequest
-> f RespondQueryTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondQueryTaskCompletedRequest -> Maybe Payloads)
-> (RespondQueryTaskCompletedRequest
    -> Maybe Payloads -> RespondQueryTaskCompletedRequest)
-> Lens
     RespondQueryTaskCompletedRequest
     RespondQueryTaskCompletedRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondQueryTaskCompletedRequest -> Maybe Payloads
_RespondQueryTaskCompletedRequest'queryResult
           (\ RespondQueryTaskCompletedRequest
x__ Maybe Payloads
y__
              -> RespondQueryTaskCompletedRequest
x__ {_RespondQueryTaskCompletedRequest'queryResult = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondQueryTaskCompletedRequest "errorMessage" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "errorMessage"
-> (Text -> f Text)
-> RespondQueryTaskCompletedRequest
-> f RespondQueryTaskCompletedRequest
fieldOf Proxy# "errorMessage"
_
    = ((Text -> f Text)
 -> RespondQueryTaskCompletedRequest
 -> f RespondQueryTaskCompletedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondQueryTaskCompletedRequest
-> f RespondQueryTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondQueryTaskCompletedRequest -> Text)
-> (RespondQueryTaskCompletedRequest
    -> Text -> RespondQueryTaskCompletedRequest)
-> Lens
     RespondQueryTaskCompletedRequest
     RespondQueryTaskCompletedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondQueryTaskCompletedRequest -> Text
_RespondQueryTaskCompletedRequest'errorMessage
           (\ RespondQueryTaskCompletedRequest
x__ Text
y__
              -> RespondQueryTaskCompletedRequest
x__ {_RespondQueryTaskCompletedRequest'errorMessage = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondQueryTaskCompletedRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RespondQueryTaskCompletedRequest
-> f RespondQueryTaskCompletedRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RespondQueryTaskCompletedRequest
 -> f RespondQueryTaskCompletedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondQueryTaskCompletedRequest
-> f RespondQueryTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondQueryTaskCompletedRequest -> Text)
-> (RespondQueryTaskCompletedRequest
    -> Text -> RespondQueryTaskCompletedRequest)
-> Lens
     RespondQueryTaskCompletedRequest
     RespondQueryTaskCompletedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondQueryTaskCompletedRequest -> Text
_RespondQueryTaskCompletedRequest'namespace
           (\ RespondQueryTaskCompletedRequest
x__ Text
y__
              -> RespondQueryTaskCompletedRequest
x__ {_RespondQueryTaskCompletedRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RespondQueryTaskCompletedRequest where
  messageName :: Proxy RespondQueryTaskCompletedRequest -> Text
messageName Proxy RespondQueryTaskCompletedRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondQueryTaskCompletedRequest"
  packedMessageDescriptor :: Proxy RespondQueryTaskCompletedRequest -> ByteString
packedMessageDescriptor Proxy RespondQueryTaskCompletedRequest
_
    = ByteString
"\n\
      \ RespondQueryTaskCompletedRequest\DC2\GS\n\
      \\n\
      \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2M\n\
      \\SOcompleted_type\CAN\STX \SOH(\SO2&.temporal.api.enums.v1.QueryResultTypeR\rcompletedType\DC2C\n\
      \\fquery_result\CAN\ETX \SOH(\v2 .temporal.api.common.v1.PayloadsR\vqueryResult\DC2#\n\
      \\rerror_message\CAN\EOT \SOH(\tR\ferrorMessage\DC2\FS\n\
      \\tnamespace\CAN\ACK \SOH(\tR\tnamespaceJ\EOT\b\ENQ\DLE\ACK"
  packedFileDescriptor :: Proxy RespondQueryTaskCompletedRequest -> ByteString
packedFileDescriptor Proxy RespondQueryTaskCompletedRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondQueryTaskCompletedRequest)
fieldsByTag
    = let
        taskToken__field_descriptor :: FieldDescriptor RespondQueryTaskCompletedRequest
taskToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor RespondQueryTaskCompletedRequest ByteString
-> FieldDescriptor RespondQueryTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     RespondQueryTaskCompletedRequest
     RespondQueryTaskCompletedRequest
     ByteString
     ByteString
-> FieldAccessor RespondQueryTaskCompletedRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken")) ::
              Data.ProtoLens.FieldDescriptor RespondQueryTaskCompletedRequest
        completedType__field_descriptor :: FieldDescriptor RespondQueryTaskCompletedRequest
completedType__field_descriptor
          = String
-> FieldTypeDescriptor QueryResultType
-> FieldAccessor RespondQueryTaskCompletedRequest QueryResultType
-> FieldDescriptor RespondQueryTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"completed_type"
              (ScalarField QueryResultType -> FieldTypeDescriptor QueryResultType
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField QueryResultType
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Query.QueryResultType)
              (WireDefault QueryResultType
-> Lens
     RespondQueryTaskCompletedRequest
     RespondQueryTaskCompletedRequest
     QueryResultType
     QueryResultType
-> FieldAccessor RespondQueryTaskCompletedRequest QueryResultType
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault QueryResultType
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"completedType")) ::
              Data.ProtoLens.FieldDescriptor RespondQueryTaskCompletedRequest
        queryResult__field_descriptor :: FieldDescriptor RespondQueryTaskCompletedRequest
queryResult__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor RespondQueryTaskCompletedRequest Payloads
-> FieldDescriptor RespondQueryTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"query_result"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  RespondQueryTaskCompletedRequest
  RespondQueryTaskCompletedRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor RespondQueryTaskCompletedRequest Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'queryResult")) ::
              Data.ProtoLens.FieldDescriptor RespondQueryTaskCompletedRequest
        errorMessage__field_descriptor :: FieldDescriptor RespondQueryTaskCompletedRequest
errorMessage__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondQueryTaskCompletedRequest Text
-> FieldDescriptor RespondQueryTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"error_message"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondQueryTaskCompletedRequest
     RespondQueryTaskCompletedRequest
     Text
     Text
-> FieldAccessor RespondQueryTaskCompletedRequest 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 @"errorMessage")) ::
              Data.ProtoLens.FieldDescriptor RespondQueryTaskCompletedRequest
        namespace__field_descriptor :: FieldDescriptor RespondQueryTaskCompletedRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondQueryTaskCompletedRequest Text
-> FieldDescriptor RespondQueryTaskCompletedRequest
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
     RespondQueryTaskCompletedRequest
     RespondQueryTaskCompletedRequest
     Text
     Text
-> FieldAccessor RespondQueryTaskCompletedRequest 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 RespondQueryTaskCompletedRequest
      in
        [(Tag, FieldDescriptor RespondQueryTaskCompletedRequest)]
-> Map Tag (FieldDescriptor RespondQueryTaskCompletedRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RespondQueryTaskCompletedRequest
taskToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RespondQueryTaskCompletedRequest
completedType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RespondQueryTaskCompletedRequest
queryResult__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor RespondQueryTaskCompletedRequest
errorMessage__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor RespondQueryTaskCompletedRequest
namespace__field_descriptor)]
  unknownFields :: Lens' RespondQueryTaskCompletedRequest FieldSet
unknownFields
    = (RespondQueryTaskCompletedRequest -> FieldSet)
-> (RespondQueryTaskCompletedRequest
    -> FieldSet -> RespondQueryTaskCompletedRequest)
-> Lens' RespondQueryTaskCompletedRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondQueryTaskCompletedRequest -> FieldSet
_RespondQueryTaskCompletedRequest'_unknownFields
        (\ RespondQueryTaskCompletedRequest
x__ FieldSet
y__
           -> RespondQueryTaskCompletedRequest
x__ {_RespondQueryTaskCompletedRequest'_unknownFields = y__})
  defMessage :: RespondQueryTaskCompletedRequest
defMessage
    = RespondQueryTaskCompletedRequest'_constructor
        {_RespondQueryTaskCompletedRequest'taskToken :: ByteString
_RespondQueryTaskCompletedRequest'taskToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondQueryTaskCompletedRequest'completedType :: QueryResultType
_RespondQueryTaskCompletedRequest'completedType = QueryResultType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondQueryTaskCompletedRequest'queryResult :: Maybe Payloads
_RespondQueryTaskCompletedRequest'queryResult = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _RespondQueryTaskCompletedRequest'errorMessage :: Text
_RespondQueryTaskCompletedRequest'errorMessage = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondQueryTaskCompletedRequest'namespace :: Text
_RespondQueryTaskCompletedRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondQueryTaskCompletedRequest'_unknownFields :: FieldSet
_RespondQueryTaskCompletedRequest'_unknownFields = []}
  parseMessage :: Parser RespondQueryTaskCompletedRequest
parseMessage
    = let
        loop ::
          RespondQueryTaskCompletedRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondQueryTaskCompletedRequest
        loop :: RespondQueryTaskCompletedRequest
-> Parser RespondQueryTaskCompletedRequest
loop RespondQueryTaskCompletedRequest
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 ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"task_token"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskToken") y x)
                        Word64
16
                          -> do y <- Parser QueryResultType -> String -> Parser QueryResultType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> QueryResultType) -> Parser Int -> Parser QueryResultType
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> QueryResultType
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
"completed_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"completedType") y x)
                        Word64
26
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"query_result"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"queryResult") y x)
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"error_message"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"errorMessage") y x)
                        Word64
50
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") 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 RespondQueryTaskCompletedRequest
-> String -> Parser RespondQueryTaskCompletedRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondQueryTaskCompletedRequest
-> Parser RespondQueryTaskCompletedRequest
loop RespondQueryTaskCompletedRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondQueryTaskCompletedRequest"
  buildMessage :: RespondQueryTaskCompletedRequest -> Builder
buildMessage
    = \ RespondQueryTaskCompletedRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: ByteString
_v = FoldLike
  ByteString
  RespondQueryTaskCompletedRequest
  RespondQueryTaskCompletedRequest
  ByteString
  ByteString
-> RespondQueryTaskCompletedRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken") RespondQueryTaskCompletedRequest
_x
              in
                if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
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
bs
                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         ByteString
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: QueryResultType
_v
                     = FoldLike
  QueryResultType
  RespondQueryTaskCompletedRequest
  RespondQueryTaskCompletedRequest
  QueryResultType
  QueryResultType
-> RespondQueryTaskCompletedRequest -> QueryResultType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"completedType") RespondQueryTaskCompletedRequest
_x
                 in
                   if QueryResultType -> QueryResultType -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) QueryResultType
_v QueryResultType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
16)
                         ((Int -> Builder)
-> (QueryResultType -> Int) -> QueryResultType -> 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)
                            QueryResultType -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum QueryResultType
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe Payloads)
  RespondQueryTaskCompletedRequest
  RespondQueryTaskCompletedRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> RespondQueryTaskCompletedRequest -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                          (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'queryResult") RespondQueryTaskCompletedRequest
_x
                    of
                      Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just Payloads
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Text
_v
                           = FoldLike
  Text
  RespondQueryTaskCompletedRequest
  RespondQueryTaskCompletedRequest
  Text
  Text
-> RespondQueryTaskCompletedRequest -> 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 @"errorMessage") RespondQueryTaskCompletedRequest
_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
  RespondQueryTaskCompletedRequest
  RespondQueryTaskCompletedRequest
  Text
  Text
-> RespondQueryTaskCompletedRequest -> 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") RespondQueryTaskCompletedRequest
_x
                          in
                            if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                  ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     (\ ByteString
bs
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                     Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  RespondQueryTaskCompletedRequest
  RespondQueryTaskCompletedRequest
  FieldSet
  FieldSet
-> RespondQueryTaskCompletedRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondQueryTaskCompletedRequest
  RespondQueryTaskCompletedRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondQueryTaskCompletedRequest FieldSet
Data.ProtoLens.unknownFields RespondQueryTaskCompletedRequest
_x))))))
instance Control.DeepSeq.NFData RespondQueryTaskCompletedRequest where
  rnf :: RespondQueryTaskCompletedRequest -> ()
rnf
    = \ RespondQueryTaskCompletedRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondQueryTaskCompletedRequest -> FieldSet
_RespondQueryTaskCompletedRequest'_unknownFields RespondQueryTaskCompletedRequest
x__)
             (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RespondQueryTaskCompletedRequest -> ByteString
_RespondQueryTaskCompletedRequest'taskToken RespondQueryTaskCompletedRequest
x__)
                (QueryResultType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RespondQueryTaskCompletedRequest -> QueryResultType
_RespondQueryTaskCompletedRequest'completedType RespondQueryTaskCompletedRequest
x__)
                   (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RespondQueryTaskCompletedRequest -> Maybe Payloads
_RespondQueryTaskCompletedRequest'queryResult RespondQueryTaskCompletedRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RespondQueryTaskCompletedRequest -> Text
_RespondQueryTaskCompletedRequest'errorMessage RespondQueryTaskCompletedRequest
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RespondQueryTaskCompletedRequest -> Text
_RespondQueryTaskCompletedRequest'namespace RespondQueryTaskCompletedRequest
x__) ())))))
{- | Fields :
      -}
data RespondQueryTaskCompletedResponse
  = RespondQueryTaskCompletedResponse'_constructor {RespondQueryTaskCompletedResponse -> FieldSet
_RespondQueryTaskCompletedResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Bool
(RespondQueryTaskCompletedResponse
 -> RespondQueryTaskCompletedResponse -> Bool)
-> (RespondQueryTaskCompletedResponse
    -> RespondQueryTaskCompletedResponse -> Bool)
-> Eq RespondQueryTaskCompletedResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Bool
== :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Bool
$c/= :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Bool
/= :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Bool
Prelude.Eq, Eq RespondQueryTaskCompletedResponse
Eq RespondQueryTaskCompletedResponse =>
(RespondQueryTaskCompletedResponse
 -> RespondQueryTaskCompletedResponse -> Ordering)
-> (RespondQueryTaskCompletedResponse
    -> RespondQueryTaskCompletedResponse -> Bool)
-> (RespondQueryTaskCompletedResponse
    -> RespondQueryTaskCompletedResponse -> Bool)
-> (RespondQueryTaskCompletedResponse
    -> RespondQueryTaskCompletedResponse -> Bool)
-> (RespondQueryTaskCompletedResponse
    -> RespondQueryTaskCompletedResponse -> Bool)
-> (RespondQueryTaskCompletedResponse
    -> RespondQueryTaskCompletedResponse
    -> RespondQueryTaskCompletedResponse)
-> (RespondQueryTaskCompletedResponse
    -> RespondQueryTaskCompletedResponse
    -> RespondQueryTaskCompletedResponse)
-> Ord RespondQueryTaskCompletedResponse
RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Bool
RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Ordering
RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse
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 :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Ordering
compare :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Ordering
$c< :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Bool
< :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Bool
$c<= :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Bool
<= :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Bool
$c> :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Bool
> :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Bool
$c>= :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Bool
>= :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse -> Bool
$cmax :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse
max :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse
$cmin :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse
min :: RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse
-> RespondQueryTaskCompletedResponse
Prelude.Ord)
instance Prelude.Show RespondQueryTaskCompletedResponse where
  showsPrec :: Int -> RespondQueryTaskCompletedResponse -> ShowS
showsPrec Int
_ RespondQueryTaskCompletedResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondQueryTaskCompletedResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondQueryTaskCompletedResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message RespondQueryTaskCompletedResponse where
  messageName :: Proxy RespondQueryTaskCompletedResponse -> Text
messageName Proxy RespondQueryTaskCompletedResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondQueryTaskCompletedResponse"
  packedMessageDescriptor :: Proxy RespondQueryTaskCompletedResponse -> ByteString
packedMessageDescriptor Proxy RespondQueryTaskCompletedResponse
_
    = ByteString
"\n\
      \!RespondQueryTaskCompletedResponse"
  packedFileDescriptor :: Proxy RespondQueryTaskCompletedResponse -> ByteString
packedFileDescriptor Proxy RespondQueryTaskCompletedResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondQueryTaskCompletedResponse)
fieldsByTag = let in [(Tag, FieldDescriptor RespondQueryTaskCompletedResponse)]
-> Map Tag (FieldDescriptor RespondQueryTaskCompletedResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' RespondQueryTaskCompletedResponse FieldSet
unknownFields
    = (RespondQueryTaskCompletedResponse -> FieldSet)
-> (RespondQueryTaskCompletedResponse
    -> FieldSet -> RespondQueryTaskCompletedResponse)
-> Lens' RespondQueryTaskCompletedResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondQueryTaskCompletedResponse -> FieldSet
_RespondQueryTaskCompletedResponse'_unknownFields
        (\ RespondQueryTaskCompletedResponse
x__ FieldSet
y__
           -> RespondQueryTaskCompletedResponse
x__ {_RespondQueryTaskCompletedResponse'_unknownFields = y__})
  defMessage :: RespondQueryTaskCompletedResponse
defMessage
    = RespondQueryTaskCompletedResponse'_constructor
        {_RespondQueryTaskCompletedResponse'_unknownFields :: FieldSet
_RespondQueryTaskCompletedResponse'_unknownFields = []}
  parseMessage :: Parser RespondQueryTaskCompletedResponse
parseMessage
    = let
        loop ::
          RespondQueryTaskCompletedResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondQueryTaskCompletedResponse
        loop :: RespondQueryTaskCompletedResponse
-> Parser RespondQueryTaskCompletedResponse
loop RespondQueryTaskCompletedResponse
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 RespondQueryTaskCompletedResponse
-> String -> Parser RespondQueryTaskCompletedResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondQueryTaskCompletedResponse
-> Parser RespondQueryTaskCompletedResponse
loop RespondQueryTaskCompletedResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondQueryTaskCompletedResponse"
  buildMessage :: RespondQueryTaskCompletedResponse -> Builder
buildMessage
    = \ RespondQueryTaskCompletedResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  RespondQueryTaskCompletedResponse
  RespondQueryTaskCompletedResponse
  FieldSet
  FieldSet
-> RespondQueryTaskCompletedResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondQueryTaskCompletedResponse
  RespondQueryTaskCompletedResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondQueryTaskCompletedResponse FieldSet
Data.ProtoLens.unknownFields RespondQueryTaskCompletedResponse
_x)
instance Control.DeepSeq.NFData RespondQueryTaskCompletedResponse where
  rnf :: RespondQueryTaskCompletedResponse -> ()
rnf
    = \ RespondQueryTaskCompletedResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondQueryTaskCompletedResponse -> FieldSet
_RespondQueryTaskCompletedResponse'_unknownFields RespondQueryTaskCompletedResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskToken' @:: Lens' RespondWorkflowTaskCompletedRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.commands' @:: Lens' RespondWorkflowTaskCompletedRequest [Proto.Temporal.Api.Command.V1.Message.Command]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'commands' @:: Lens' RespondWorkflowTaskCompletedRequest (Data.Vector.Vector Proto.Temporal.Api.Command.V1.Message.Command)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' RespondWorkflowTaskCompletedRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.stickyAttributes' @:: Lens' RespondWorkflowTaskCompletedRequest Proto.Temporal.Api.Taskqueue.V1.Message.StickyExecutionAttributes@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'stickyAttributes' @:: Lens' RespondWorkflowTaskCompletedRequest (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.StickyExecutionAttributes)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.returnNewWorkflowTask' @:: Lens' RespondWorkflowTaskCompletedRequest Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.forceCreateNewWorkflowTask' @:: Lens' RespondWorkflowTaskCompletedRequest Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.binaryChecksum' @:: Lens' RespondWorkflowTaskCompletedRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.queryResults' @:: Lens' RespondWorkflowTaskCompletedRequest (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Query.V1.Message.WorkflowQueryResult)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' RespondWorkflowTaskCompletedRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workerVersionStamp' @:: Lens' RespondWorkflowTaskCompletedRequest Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workerVersionStamp' @:: Lens' RespondWorkflowTaskCompletedRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.messages' @:: Lens' RespondWorkflowTaskCompletedRequest [Proto.Temporal.Api.Protocol.V1.Message.Message]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'messages' @:: Lens' RespondWorkflowTaskCompletedRequest (Data.Vector.Vector Proto.Temporal.Api.Protocol.V1.Message.Message)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.sdkMetadata' @:: Lens' RespondWorkflowTaskCompletedRequest Proto.Temporal.Api.Sdk.V1.TaskCompleteMetadata.WorkflowTaskCompletedMetadata@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'sdkMetadata' @:: Lens' RespondWorkflowTaskCompletedRequest (Prelude.Maybe Proto.Temporal.Api.Sdk.V1.TaskCompleteMetadata.WorkflowTaskCompletedMetadata)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.meteringMetadata' @:: Lens' RespondWorkflowTaskCompletedRequest Proto.Temporal.Api.Common.V1.Message.MeteringMetadata@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'meteringMetadata' @:: Lens' RespondWorkflowTaskCompletedRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.MeteringMetadata)@ -}
data RespondWorkflowTaskCompletedRequest
  = RespondWorkflowTaskCompletedRequest'_constructor {RespondWorkflowTaskCompletedRequest -> ByteString
_RespondWorkflowTaskCompletedRequest'taskToken :: !Data.ByteString.ByteString,
                                                      RespondWorkflowTaskCompletedRequest -> Vector Command
_RespondWorkflowTaskCompletedRequest'commands :: !(Data.Vector.Vector Proto.Temporal.Api.Command.V1.Message.Command),
                                                      RespondWorkflowTaskCompletedRequest -> Text
_RespondWorkflowTaskCompletedRequest'identity :: !Data.Text.Text,
                                                      RespondWorkflowTaskCompletedRequest
-> Maybe StickyExecutionAttributes
_RespondWorkflowTaskCompletedRequest'stickyAttributes :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.StickyExecutionAttributes),
                                                      RespondWorkflowTaskCompletedRequest -> Bool
_RespondWorkflowTaskCompletedRequest'returnNewWorkflowTask :: !Prelude.Bool,
                                                      RespondWorkflowTaskCompletedRequest -> Bool
_RespondWorkflowTaskCompletedRequest'forceCreateNewWorkflowTask :: !Prelude.Bool,
                                                      RespondWorkflowTaskCompletedRequest -> Text
_RespondWorkflowTaskCompletedRequest'binaryChecksum :: !Data.Text.Text,
                                                      RespondWorkflowTaskCompletedRequest -> Map Text WorkflowQueryResult
_RespondWorkflowTaskCompletedRequest'queryResults :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Query.V1.Message.WorkflowQueryResult),
                                                      RespondWorkflowTaskCompletedRequest -> Text
_RespondWorkflowTaskCompletedRequest'namespace :: !Data.Text.Text,
                                                      RespondWorkflowTaskCompletedRequest -> Maybe WorkerVersionStamp
_RespondWorkflowTaskCompletedRequest'workerVersionStamp :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp),
                                                      RespondWorkflowTaskCompletedRequest -> Vector Message
_RespondWorkflowTaskCompletedRequest'messages :: !(Data.Vector.Vector Proto.Temporal.Api.Protocol.V1.Message.Message),
                                                      RespondWorkflowTaskCompletedRequest
-> Maybe WorkflowTaskCompletedMetadata
_RespondWorkflowTaskCompletedRequest'sdkMetadata :: !(Prelude.Maybe Proto.Temporal.Api.Sdk.V1.TaskCompleteMetadata.WorkflowTaskCompletedMetadata),
                                                      RespondWorkflowTaskCompletedRequest -> Maybe MeteringMetadata
_RespondWorkflowTaskCompletedRequest'meteringMetadata :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.MeteringMetadata),
                                                      RespondWorkflowTaskCompletedRequest -> FieldSet
_RespondWorkflowTaskCompletedRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Bool
(RespondWorkflowTaskCompletedRequest
 -> RespondWorkflowTaskCompletedRequest -> Bool)
-> (RespondWorkflowTaskCompletedRequest
    -> RespondWorkflowTaskCompletedRequest -> Bool)
-> Eq RespondWorkflowTaskCompletedRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Bool
== :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Bool
$c/= :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Bool
/= :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Bool
Prelude.Eq, Eq RespondWorkflowTaskCompletedRequest
Eq RespondWorkflowTaskCompletedRequest =>
(RespondWorkflowTaskCompletedRequest
 -> RespondWorkflowTaskCompletedRequest -> Ordering)
-> (RespondWorkflowTaskCompletedRequest
    -> RespondWorkflowTaskCompletedRequest -> Bool)
-> (RespondWorkflowTaskCompletedRequest
    -> RespondWorkflowTaskCompletedRequest -> Bool)
-> (RespondWorkflowTaskCompletedRequest
    -> RespondWorkflowTaskCompletedRequest -> Bool)
-> (RespondWorkflowTaskCompletedRequest
    -> RespondWorkflowTaskCompletedRequest -> Bool)
-> (RespondWorkflowTaskCompletedRequest
    -> RespondWorkflowTaskCompletedRequest
    -> RespondWorkflowTaskCompletedRequest)
-> (RespondWorkflowTaskCompletedRequest
    -> RespondWorkflowTaskCompletedRequest
    -> RespondWorkflowTaskCompletedRequest)
-> Ord RespondWorkflowTaskCompletedRequest
RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Bool
RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Ordering
RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest
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 :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Ordering
compare :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Ordering
$c< :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Bool
< :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Bool
$c<= :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Bool
<= :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Bool
$c> :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Bool
> :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Bool
$c>= :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Bool
>= :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest -> Bool
$cmax :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest
max :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest
$cmin :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest
min :: RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest
-> RespondWorkflowTaskCompletedRequest
Prelude.Ord)
instance Prelude.Show RespondWorkflowTaskCompletedRequest where
  showsPrec :: Int -> RespondWorkflowTaskCompletedRequest -> ShowS
showsPrec Int
_ RespondWorkflowTaskCompletedRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondWorkflowTaskCompletedRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondWorkflowTaskCompletedRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "taskToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskToken"
-> (ByteString -> f ByteString)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "taskToken"
_
    = ((ByteString -> f ByteString)
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest -> ByteString)
-> (RespondWorkflowTaskCompletedRequest
    -> ByteString -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest -> ByteString
_RespondWorkflowTaskCompletedRequest'taskToken
           (\ RespondWorkflowTaskCompletedRequest
x__ ByteString
y__
              -> RespondWorkflowTaskCompletedRequest
x__ {_RespondWorkflowTaskCompletedRequest'taskToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "commands" [Proto.Temporal.Api.Command.V1.Message.Command] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "commands"
-> ([Command] -> f [Command])
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "commands"
_
    = ((Vector Command -> f (Vector Command))
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> (([Command] -> f [Command])
    -> Vector Command -> f (Vector Command))
-> ([Command] -> f [Command])
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest -> Vector Command)
-> (RespondWorkflowTaskCompletedRequest
    -> Vector Command -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     (Vector Command)
     (Vector Command)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest -> Vector Command
_RespondWorkflowTaskCompletedRequest'commands
           (\ RespondWorkflowTaskCompletedRequest
x__ Vector Command
y__
              -> RespondWorkflowTaskCompletedRequest
x__ {_RespondWorkflowTaskCompletedRequest'commands = y__}))
        ((Vector Command -> [Command])
-> (Vector Command -> [Command] -> Vector Command)
-> Lens (Vector Command) (Vector Command) [Command] [Command]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Command -> [Command]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Command
_ [Command]
y__ -> [Command] -> Vector Command
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Command]
y__))
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "vec'commands" (Data.Vector.Vector Proto.Temporal.Api.Command.V1.Message.Command) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'commands"
-> (Vector Command -> f (Vector Command))
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "vec'commands"
_
    = ((Vector Command -> f (Vector Command))
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((Vector Command -> f (Vector Command))
    -> Vector Command -> f (Vector Command))
-> (Vector Command -> f (Vector Command))
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest -> Vector Command)
-> (RespondWorkflowTaskCompletedRequest
    -> Vector Command -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     (Vector Command)
     (Vector Command)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest -> Vector Command
_RespondWorkflowTaskCompletedRequest'commands
           (\ RespondWorkflowTaskCompletedRequest
x__ Vector Command
y__
              -> RespondWorkflowTaskCompletedRequest
x__ {_RespondWorkflowTaskCompletedRequest'commands = y__}))
        (Vector Command -> f (Vector Command))
-> Vector Command -> f (Vector Command)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest -> Text)
-> (RespondWorkflowTaskCompletedRequest
    -> Text -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest -> Text
_RespondWorkflowTaskCompletedRequest'identity
           (\ RespondWorkflowTaskCompletedRequest
x__ Text
y__
              -> RespondWorkflowTaskCompletedRequest
x__ {_RespondWorkflowTaskCompletedRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "stickyAttributes" Proto.Temporal.Api.Taskqueue.V1.Message.StickyExecutionAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "stickyAttributes"
-> (StickyExecutionAttributes -> f StickyExecutionAttributes)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "stickyAttributes"
_
    = ((Maybe StickyExecutionAttributes
  -> f (Maybe StickyExecutionAttributes))
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((StickyExecutionAttributes -> f StickyExecutionAttributes)
    -> Maybe StickyExecutionAttributes
    -> f (Maybe StickyExecutionAttributes))
-> (StickyExecutionAttributes -> f StickyExecutionAttributes)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest
 -> Maybe StickyExecutionAttributes)
-> (RespondWorkflowTaskCompletedRequest
    -> Maybe StickyExecutionAttributes
    -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     (Maybe StickyExecutionAttributes)
     (Maybe StickyExecutionAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest
-> Maybe StickyExecutionAttributes
_RespondWorkflowTaskCompletedRequest'stickyAttributes
           (\ RespondWorkflowTaskCompletedRequest
x__ Maybe StickyExecutionAttributes
y__
              -> RespondWorkflowTaskCompletedRequest
x__
                   {_RespondWorkflowTaskCompletedRequest'stickyAttributes = y__}))
        (StickyExecutionAttributes
-> Lens'
     (Maybe StickyExecutionAttributes) StickyExecutionAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens StickyExecutionAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "maybe'stickyAttributes" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.StickyExecutionAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'stickyAttributes"
-> (Maybe StickyExecutionAttributes
    -> f (Maybe StickyExecutionAttributes))
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "maybe'stickyAttributes"
_
    = ((Maybe StickyExecutionAttributes
  -> f (Maybe StickyExecutionAttributes))
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((Maybe StickyExecutionAttributes
     -> f (Maybe StickyExecutionAttributes))
    -> Maybe StickyExecutionAttributes
    -> f (Maybe StickyExecutionAttributes))
-> (Maybe StickyExecutionAttributes
    -> f (Maybe StickyExecutionAttributes))
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest
 -> Maybe StickyExecutionAttributes)
-> (RespondWorkflowTaskCompletedRequest
    -> Maybe StickyExecutionAttributes
    -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     (Maybe StickyExecutionAttributes)
     (Maybe StickyExecutionAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest
-> Maybe StickyExecutionAttributes
_RespondWorkflowTaskCompletedRequest'stickyAttributes
           (\ RespondWorkflowTaskCompletedRequest
x__ Maybe StickyExecutionAttributes
y__
              -> RespondWorkflowTaskCompletedRequest
x__
                   {_RespondWorkflowTaskCompletedRequest'stickyAttributes = y__}))
        (Maybe StickyExecutionAttributes
 -> f (Maybe StickyExecutionAttributes))
-> Maybe StickyExecutionAttributes
-> f (Maybe StickyExecutionAttributes)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "returnNewWorkflowTask" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "returnNewWorkflowTask"
-> (Bool -> f Bool)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "returnNewWorkflowTask"
_
    = ((Bool -> f Bool)
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest -> Bool)
-> (RespondWorkflowTaskCompletedRequest
    -> Bool -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest -> Bool
_RespondWorkflowTaskCompletedRequest'returnNewWorkflowTask
           (\ RespondWorkflowTaskCompletedRequest
x__ Bool
y__
              -> RespondWorkflowTaskCompletedRequest
x__
                   {_RespondWorkflowTaskCompletedRequest'returnNewWorkflowTask = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "forceCreateNewWorkflowTask" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "forceCreateNewWorkflowTask"
-> (Bool -> f Bool)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "forceCreateNewWorkflowTask"
_
    = ((Bool -> f Bool)
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest -> Bool)
-> (RespondWorkflowTaskCompletedRequest
    -> Bool -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest -> Bool
_RespondWorkflowTaskCompletedRequest'forceCreateNewWorkflowTask
           (\ RespondWorkflowTaskCompletedRequest
x__ Bool
y__
              -> RespondWorkflowTaskCompletedRequest
x__
                   {_RespondWorkflowTaskCompletedRequest'forceCreateNewWorkflowTask = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "binaryChecksum" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "binaryChecksum"
-> (Text -> f Text)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "binaryChecksum"
_
    = ((Text -> f Text)
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest -> Text)
-> (RespondWorkflowTaskCompletedRequest
    -> Text -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest -> Text
_RespondWorkflowTaskCompletedRequest'binaryChecksum
           (\ RespondWorkflowTaskCompletedRequest
x__ Text
y__
              -> RespondWorkflowTaskCompletedRequest
x__
                   {_RespondWorkflowTaskCompletedRequest'binaryChecksum = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "queryResults" (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Query.V1.Message.WorkflowQueryResult) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "queryResults"
-> (Map Text WorkflowQueryResult
    -> f (Map Text WorkflowQueryResult))
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "queryResults"
_
    = ((Map Text WorkflowQueryResult -> f (Map Text WorkflowQueryResult))
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((Map Text WorkflowQueryResult
     -> f (Map Text WorkflowQueryResult))
    -> Map Text WorkflowQueryResult
    -> f (Map Text WorkflowQueryResult))
-> (Map Text WorkflowQueryResult
    -> f (Map Text WorkflowQueryResult))
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest
 -> Map Text WorkflowQueryResult)
-> (RespondWorkflowTaskCompletedRequest
    -> Map Text WorkflowQueryResult
    -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     (Map Text WorkflowQueryResult)
     (Map Text WorkflowQueryResult)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest -> Map Text WorkflowQueryResult
_RespondWorkflowTaskCompletedRequest'queryResults
           (\ RespondWorkflowTaskCompletedRequest
x__ Map Text WorkflowQueryResult
y__
              -> RespondWorkflowTaskCompletedRequest
x__ {_RespondWorkflowTaskCompletedRequest'queryResults = y__}))
        (Map Text WorkflowQueryResult -> f (Map Text WorkflowQueryResult))
-> Map Text WorkflowQueryResult -> f (Map Text WorkflowQueryResult)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest -> Text)
-> (RespondWorkflowTaskCompletedRequest
    -> Text -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest -> Text
_RespondWorkflowTaskCompletedRequest'namespace
           (\ RespondWorkflowTaskCompletedRequest
x__ Text
y__
              -> RespondWorkflowTaskCompletedRequest
x__ {_RespondWorkflowTaskCompletedRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "workerVersionStamp" Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerVersionStamp"
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "workerVersionStamp"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((WorkerVersionStamp -> f WorkerVersionStamp)
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest -> Maybe WorkerVersionStamp)
-> (RespondWorkflowTaskCompletedRequest
    -> Maybe WorkerVersionStamp -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest -> Maybe WorkerVersionStamp
_RespondWorkflowTaskCompletedRequest'workerVersionStamp
           (\ RespondWorkflowTaskCompletedRequest
x__ Maybe WorkerVersionStamp
y__
              -> RespondWorkflowTaskCompletedRequest
x__
                   {_RespondWorkflowTaskCompletedRequest'workerVersionStamp = y__}))
        (WorkerVersionStamp
-> Lens' (Maybe WorkerVersionStamp) WorkerVersionStamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkerVersionStamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "maybe'workerVersionStamp" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workerVersionStamp"
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "maybe'workerVersionStamp"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest -> Maybe WorkerVersionStamp)
-> (RespondWorkflowTaskCompletedRequest
    -> Maybe WorkerVersionStamp -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest -> Maybe WorkerVersionStamp
_RespondWorkflowTaskCompletedRequest'workerVersionStamp
           (\ RespondWorkflowTaskCompletedRequest
x__ Maybe WorkerVersionStamp
y__
              -> RespondWorkflowTaskCompletedRequest
x__
                   {_RespondWorkflowTaskCompletedRequest'workerVersionStamp = y__}))
        (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "messages" [Proto.Temporal.Api.Protocol.V1.Message.Message] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "messages"
-> ([Message] -> f [Message])
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "messages"
_
    = ((Vector Message -> f (Vector Message))
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> (([Message] -> f [Message])
    -> Vector Message -> f (Vector Message))
-> ([Message] -> f [Message])
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest -> Vector Message)
-> (RespondWorkflowTaskCompletedRequest
    -> Vector Message -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     (Vector Message)
     (Vector Message)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest -> Vector Message
_RespondWorkflowTaskCompletedRequest'messages
           (\ RespondWorkflowTaskCompletedRequest
x__ Vector Message
y__
              -> RespondWorkflowTaskCompletedRequest
x__ {_RespondWorkflowTaskCompletedRequest'messages = y__}))
        ((Vector Message -> [Message])
-> (Vector Message -> [Message] -> Vector Message)
-> Lens (Vector Message) (Vector Message) [Message] [Message]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Message -> [Message]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Message
_ [Message]
y__ -> [Message] -> Vector Message
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Message]
y__))
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "vec'messages" (Data.Vector.Vector Proto.Temporal.Api.Protocol.V1.Message.Message) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'messages"
-> (Vector Message -> f (Vector Message))
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "vec'messages"
_
    = ((Vector Message -> f (Vector Message))
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((Vector Message -> f (Vector Message))
    -> Vector Message -> f (Vector Message))
-> (Vector Message -> f (Vector Message))
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest -> Vector Message)
-> (RespondWorkflowTaskCompletedRequest
    -> Vector Message -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     (Vector Message)
     (Vector Message)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest -> Vector Message
_RespondWorkflowTaskCompletedRequest'messages
           (\ RespondWorkflowTaskCompletedRequest
x__ Vector Message
y__
              -> RespondWorkflowTaskCompletedRequest
x__ {_RespondWorkflowTaskCompletedRequest'messages = y__}))
        (Vector Message -> f (Vector Message))
-> Vector Message -> f (Vector Message)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "sdkMetadata" Proto.Temporal.Api.Sdk.V1.TaskCompleteMetadata.WorkflowTaskCompletedMetadata where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "sdkMetadata"
-> (WorkflowTaskCompletedMetadata
    -> f WorkflowTaskCompletedMetadata)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "sdkMetadata"
_
    = ((Maybe WorkflowTaskCompletedMetadata
  -> f (Maybe WorkflowTaskCompletedMetadata))
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((WorkflowTaskCompletedMetadata
     -> f WorkflowTaskCompletedMetadata)
    -> Maybe WorkflowTaskCompletedMetadata
    -> f (Maybe WorkflowTaskCompletedMetadata))
-> (WorkflowTaskCompletedMetadata
    -> f WorkflowTaskCompletedMetadata)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest
 -> Maybe WorkflowTaskCompletedMetadata)
-> (RespondWorkflowTaskCompletedRequest
    -> Maybe WorkflowTaskCompletedMetadata
    -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     (Maybe WorkflowTaskCompletedMetadata)
     (Maybe WorkflowTaskCompletedMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest
-> Maybe WorkflowTaskCompletedMetadata
_RespondWorkflowTaskCompletedRequest'sdkMetadata
           (\ RespondWorkflowTaskCompletedRequest
x__ Maybe WorkflowTaskCompletedMetadata
y__
              -> RespondWorkflowTaskCompletedRequest
x__ {_RespondWorkflowTaskCompletedRequest'sdkMetadata = y__}))
        (WorkflowTaskCompletedMetadata
-> Lens'
     (Maybe WorkflowTaskCompletedMetadata) WorkflowTaskCompletedMetadata
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowTaskCompletedMetadata
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "maybe'sdkMetadata" (Prelude.Maybe Proto.Temporal.Api.Sdk.V1.TaskCompleteMetadata.WorkflowTaskCompletedMetadata) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'sdkMetadata"
-> (Maybe WorkflowTaskCompletedMetadata
    -> f (Maybe WorkflowTaskCompletedMetadata))
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "maybe'sdkMetadata"
_
    = ((Maybe WorkflowTaskCompletedMetadata
  -> f (Maybe WorkflowTaskCompletedMetadata))
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((Maybe WorkflowTaskCompletedMetadata
     -> f (Maybe WorkflowTaskCompletedMetadata))
    -> Maybe WorkflowTaskCompletedMetadata
    -> f (Maybe WorkflowTaskCompletedMetadata))
-> (Maybe WorkflowTaskCompletedMetadata
    -> f (Maybe WorkflowTaskCompletedMetadata))
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest
 -> Maybe WorkflowTaskCompletedMetadata)
-> (RespondWorkflowTaskCompletedRequest
    -> Maybe WorkflowTaskCompletedMetadata
    -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     (Maybe WorkflowTaskCompletedMetadata)
     (Maybe WorkflowTaskCompletedMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest
-> Maybe WorkflowTaskCompletedMetadata
_RespondWorkflowTaskCompletedRequest'sdkMetadata
           (\ RespondWorkflowTaskCompletedRequest
x__ Maybe WorkflowTaskCompletedMetadata
y__
              -> RespondWorkflowTaskCompletedRequest
x__ {_RespondWorkflowTaskCompletedRequest'sdkMetadata = y__}))
        (Maybe WorkflowTaskCompletedMetadata
 -> f (Maybe WorkflowTaskCompletedMetadata))
-> Maybe WorkflowTaskCompletedMetadata
-> f (Maybe WorkflowTaskCompletedMetadata)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "meteringMetadata" Proto.Temporal.Api.Common.V1.Message.MeteringMetadata where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "meteringMetadata"
-> (MeteringMetadata -> f MeteringMetadata)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "meteringMetadata"
_
    = ((Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((MeteringMetadata -> f MeteringMetadata)
    -> Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
-> (MeteringMetadata -> f MeteringMetadata)
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest -> Maybe MeteringMetadata)
-> (RespondWorkflowTaskCompletedRequest
    -> Maybe MeteringMetadata -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     (Maybe MeteringMetadata)
     (Maybe MeteringMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest -> Maybe MeteringMetadata
_RespondWorkflowTaskCompletedRequest'meteringMetadata
           (\ RespondWorkflowTaskCompletedRequest
x__ Maybe MeteringMetadata
y__
              -> RespondWorkflowTaskCompletedRequest
x__
                   {_RespondWorkflowTaskCompletedRequest'meteringMetadata = y__}))
        (MeteringMetadata -> Lens' (Maybe MeteringMetadata) MeteringMetadata
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens MeteringMetadata
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest "maybe'meteringMetadata" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.MeteringMetadata) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'meteringMetadata"
-> (Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
fieldOf Proxy# "maybe'meteringMetadata"
_
    = ((Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
 -> RespondWorkflowTaskCompletedRequest
 -> f RespondWorkflowTaskCompletedRequest)
-> ((Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
    -> Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
-> (Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
-> RespondWorkflowTaskCompletedRequest
-> f RespondWorkflowTaskCompletedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest -> Maybe MeteringMetadata)
-> (RespondWorkflowTaskCompletedRequest
    -> Maybe MeteringMetadata -> RespondWorkflowTaskCompletedRequest)
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     (Maybe MeteringMetadata)
     (Maybe MeteringMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest -> Maybe MeteringMetadata
_RespondWorkflowTaskCompletedRequest'meteringMetadata
           (\ RespondWorkflowTaskCompletedRequest
x__ Maybe MeteringMetadata
y__
              -> RespondWorkflowTaskCompletedRequest
x__
                   {_RespondWorkflowTaskCompletedRequest'meteringMetadata = y__}))
        (Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
-> Maybe MeteringMetadata -> f (Maybe MeteringMetadata)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RespondWorkflowTaskCompletedRequest where
  messageName :: Proxy RespondWorkflowTaskCompletedRequest -> Text
messageName Proxy RespondWorkflowTaskCompletedRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondWorkflowTaskCompletedRequest"
  packedMessageDescriptor :: Proxy RespondWorkflowTaskCompletedRequest -> ByteString
packedMessageDescriptor Proxy RespondWorkflowTaskCompletedRequest
_
    = ByteString
"\n\
      \#RespondWorkflowTaskCompletedRequest\DC2\GS\n\
      \\n\
      \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2<\n\
      \\bcommands\CAN\STX \ETX(\v2 .temporal.api.command.v1.CommandR\bcommands\DC2\SUB\n\
      \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2a\n\
      \\DC1sticky_attributes\CAN\EOT \SOH(\v24.temporal.api.taskqueue.v1.StickyExecutionAttributesR\DLEstickyAttributes\DC27\n\
      \\CANreturn_new_workflow_task\CAN\ENQ \SOH(\bR\NAKreturnNewWorkflowTask\DC2B\n\
      \\RSforce_create_new_workflow_task\CAN\ACK \SOH(\bR\SUBforceCreateNewWorkflowTask\DC2'\n\
      \\SIbinary_checksum\CAN\a \SOH(\tR\SObinaryChecksum\DC2{\n\
      \\rquery_results\CAN\b \ETX(\v2V.temporal.api.workflowservice.v1.RespondWorkflowTaskCompletedRequest.QueryResultsEntryR\fqueryResults\DC2\FS\n\
      \\tnamespace\CAN\t \SOH(\tR\tnamespace\DC2\\\n\
      \\DC4worker_version_stamp\CAN\n\
      \ \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\DC2workerVersionStamp\DC2=\n\
      \\bmessages\CAN\v \ETX(\v2!.temporal.api.protocol.v1.MessageR\bmessages\DC2U\n\
      \\fsdk_metadata\CAN\f \SOH(\v22.temporal.api.sdk.v1.WorkflowTaskCompletedMetadataR\vsdkMetadata\DC2U\n\
      \\DC1metering_metadata\CAN\r \SOH(\v2(.temporal.api.common.v1.MeteringMetadataR\DLEmeteringMetadata\SUBk\n\
      \\DC1QueryResultsEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2@\n\
      \\ENQvalue\CAN\STX \SOH(\v2*.temporal.api.query.v1.WorkflowQueryResultR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy RespondWorkflowTaskCompletedRequest -> ByteString
packedFileDescriptor Proxy RespondWorkflowTaskCompletedRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondWorkflowTaskCompletedRequest)
fieldsByTag
    = let
        taskToken__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedRequest
taskToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor RespondWorkflowTaskCompletedRequest ByteString
-> FieldDescriptor RespondWorkflowTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     ByteString
     ByteString
-> FieldAccessor RespondWorkflowTaskCompletedRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskCompletedRequest
        commands__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedRequest
commands__field_descriptor
          = String
-> FieldTypeDescriptor Command
-> FieldAccessor RespondWorkflowTaskCompletedRequest Command
-> FieldDescriptor RespondWorkflowTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"commands"
              (MessageOrGroup -> FieldTypeDescriptor Command
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Command.V1.Message.Command)
              (Packing
-> Lens' RespondWorkflowTaskCompletedRequest [Command]
-> FieldAccessor RespondWorkflowTaskCompletedRequest Command
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 @"commands")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskCompletedRequest
        identity__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondWorkflowTaskCompletedRequest Text
-> FieldDescriptor RespondWorkflowTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     Text
     Text
-> FieldAccessor RespondWorkflowTaskCompletedRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskCompletedRequest
        stickyAttributes__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedRequest
stickyAttributes__field_descriptor
          = String
-> FieldTypeDescriptor StickyExecutionAttributes
-> FieldAccessor
     RespondWorkflowTaskCompletedRequest StickyExecutionAttributes
-> FieldDescriptor RespondWorkflowTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"sticky_attributes"
              (MessageOrGroup -> FieldTypeDescriptor StickyExecutionAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.StickyExecutionAttributes)
              (Lens
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  (Maybe StickyExecutionAttributes)
  (Maybe StickyExecutionAttributes)
-> FieldAccessor
     RespondWorkflowTaskCompletedRequest StickyExecutionAttributes
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'stickyAttributes")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskCompletedRequest
        returnNewWorkflowTask__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedRequest
returnNewWorkflowTask__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor RespondWorkflowTaskCompletedRequest Bool
-> FieldDescriptor RespondWorkflowTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"return_new_workflow_task"
              (ScalarField Bool -> FieldTypeDescriptor Bool
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Bool
Data.ProtoLens.BoolField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
              (WireDefault Bool
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     Bool
     Bool
-> FieldAccessor RespondWorkflowTaskCompletedRequest 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 @"returnNewWorkflowTask")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskCompletedRequest
        forceCreateNewWorkflowTask__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedRequest
forceCreateNewWorkflowTask__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor RespondWorkflowTaskCompletedRequest Bool
-> FieldDescriptor RespondWorkflowTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"force_create_new_workflow_task"
              (ScalarField Bool -> FieldTypeDescriptor Bool
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Bool
Data.ProtoLens.BoolField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
              (WireDefault Bool
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     Bool
     Bool
-> FieldAccessor RespondWorkflowTaskCompletedRequest 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 @"forceCreateNewWorkflowTask")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskCompletedRequest
        binaryChecksum__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedRequest
binaryChecksum__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondWorkflowTaskCompletedRequest Text
-> FieldDescriptor RespondWorkflowTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"binary_checksum"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     Text
     Text
-> FieldAccessor RespondWorkflowTaskCompletedRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"binaryChecksum")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskCompletedRequest
        queryResults__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedRequest
queryResults__field_descriptor
          = String
-> FieldTypeDescriptor
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> FieldAccessor
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> FieldDescriptor RespondWorkflowTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"query_results"
              (MessageOrGroup
-> FieldTypeDescriptor
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor RespondWorkflowTaskCompletedRequest'QueryResultsEntry)
              (Lens' RespondWorkflowTaskCompletedRequest'QueryResultsEntry Text
-> Lens'
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry
     WorkflowQueryResult
-> Lens
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     (Map Text WorkflowQueryResult)
     (Map Text WorkflowQueryResult)
-> FieldAccessor
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry
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 @"queryResults")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskCompletedRequest
        namespace__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondWorkflowTaskCompletedRequest Text
-> FieldDescriptor RespondWorkflowTaskCompletedRequest
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
     RespondWorkflowTaskCompletedRequest
     RespondWorkflowTaskCompletedRequest
     Text
     Text
-> FieldAccessor RespondWorkflowTaskCompletedRequest 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 RespondWorkflowTaskCompletedRequest
        workerVersionStamp__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedRequest
workerVersionStamp__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionStamp
-> FieldAccessor
     RespondWorkflowTaskCompletedRequest WorkerVersionStamp
-> FieldDescriptor RespondWorkflowTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_version_stamp"
              (MessageOrGroup -> FieldTypeDescriptor WorkerVersionStamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)
              (Lens
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> FieldAccessor
     RespondWorkflowTaskCompletedRequest WorkerVersionStamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workerVersionStamp")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskCompletedRequest
        messages__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedRequest
messages__field_descriptor
          = String
-> FieldTypeDescriptor Message
-> FieldAccessor RespondWorkflowTaskCompletedRequest Message
-> FieldDescriptor RespondWorkflowTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"messages"
              (MessageOrGroup -> FieldTypeDescriptor Message
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Protocol.V1.Message.Message)
              (Packing
-> Lens' RespondWorkflowTaskCompletedRequest [Message]
-> FieldAccessor RespondWorkflowTaskCompletedRequest Message
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 @"messages")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskCompletedRequest
        sdkMetadata__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedRequest
sdkMetadata__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowTaskCompletedMetadata
-> FieldAccessor
     RespondWorkflowTaskCompletedRequest WorkflowTaskCompletedMetadata
-> FieldDescriptor RespondWorkflowTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"sdk_metadata"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowTaskCompletedMetadata
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Sdk.V1.TaskCompleteMetadata.WorkflowTaskCompletedMetadata)
              (Lens
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  (Maybe WorkflowTaskCompletedMetadata)
  (Maybe WorkflowTaskCompletedMetadata)
-> FieldAccessor
     RespondWorkflowTaskCompletedRequest WorkflowTaskCompletedMetadata
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'sdkMetadata")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskCompletedRequest
        meteringMetadata__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedRequest
meteringMetadata__field_descriptor
          = String
-> FieldTypeDescriptor MeteringMetadata
-> FieldAccessor
     RespondWorkflowTaskCompletedRequest MeteringMetadata
-> FieldDescriptor RespondWorkflowTaskCompletedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"metering_metadata"
              (MessageOrGroup -> FieldTypeDescriptor MeteringMetadata
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.MeteringMetadata)
              (Lens
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  (Maybe MeteringMetadata)
  (Maybe MeteringMetadata)
-> FieldAccessor
     RespondWorkflowTaskCompletedRequest MeteringMetadata
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'meteringMetadata")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskCompletedRequest
      in
        [(Tag, FieldDescriptor RespondWorkflowTaskCompletedRequest)]
-> Map Tag (FieldDescriptor RespondWorkflowTaskCompletedRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RespondWorkflowTaskCompletedRequest
taskToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RespondWorkflowTaskCompletedRequest
commands__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RespondWorkflowTaskCompletedRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor RespondWorkflowTaskCompletedRequest
stickyAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor RespondWorkflowTaskCompletedRequest
returnNewWorkflowTask__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, 
            FieldDescriptor RespondWorkflowTaskCompletedRequest
forceCreateNewWorkflowTask__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor RespondWorkflowTaskCompletedRequest
binaryChecksum__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor RespondWorkflowTaskCompletedRequest
queryResults__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor RespondWorkflowTaskCompletedRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor RespondWorkflowTaskCompletedRequest
workerVersionStamp__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor RespondWorkflowTaskCompletedRequest
messages__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor RespondWorkflowTaskCompletedRequest
sdkMetadata__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor RespondWorkflowTaskCompletedRequest
meteringMetadata__field_descriptor)]
  unknownFields :: Lens' RespondWorkflowTaskCompletedRequest FieldSet
unknownFields
    = (RespondWorkflowTaskCompletedRequest -> FieldSet)
-> (RespondWorkflowTaskCompletedRequest
    -> FieldSet -> RespondWorkflowTaskCompletedRequest)
-> Lens' RespondWorkflowTaskCompletedRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondWorkflowTaskCompletedRequest -> FieldSet
_RespondWorkflowTaskCompletedRequest'_unknownFields
        (\ RespondWorkflowTaskCompletedRequest
x__ FieldSet
y__
           -> RespondWorkflowTaskCompletedRequest
x__ {_RespondWorkflowTaskCompletedRequest'_unknownFields = y__})
  defMessage :: RespondWorkflowTaskCompletedRequest
defMessage
    = RespondWorkflowTaskCompletedRequest'_constructor
        {_RespondWorkflowTaskCompletedRequest'taskToken :: ByteString
_RespondWorkflowTaskCompletedRequest'taskToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondWorkflowTaskCompletedRequest'commands :: Vector Command
_RespondWorkflowTaskCompletedRequest'commands = Vector Command
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _RespondWorkflowTaskCompletedRequest'identity :: Text
_RespondWorkflowTaskCompletedRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondWorkflowTaskCompletedRequest'stickyAttributes :: Maybe StickyExecutionAttributes
_RespondWorkflowTaskCompletedRequest'stickyAttributes = Maybe StickyExecutionAttributes
forall a. Maybe a
Prelude.Nothing,
         _RespondWorkflowTaskCompletedRequest'returnNewWorkflowTask :: Bool
_RespondWorkflowTaskCompletedRequest'returnNewWorkflowTask = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondWorkflowTaskCompletedRequest'forceCreateNewWorkflowTask :: Bool
_RespondWorkflowTaskCompletedRequest'forceCreateNewWorkflowTask = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondWorkflowTaskCompletedRequest'binaryChecksum :: Text
_RespondWorkflowTaskCompletedRequest'binaryChecksum = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondWorkflowTaskCompletedRequest'queryResults :: Map Text WorkflowQueryResult
_RespondWorkflowTaskCompletedRequest'queryResults = Map Text WorkflowQueryResult
forall k a. Map k a
Data.Map.empty,
         _RespondWorkflowTaskCompletedRequest'namespace :: Text
_RespondWorkflowTaskCompletedRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondWorkflowTaskCompletedRequest'workerVersionStamp :: Maybe WorkerVersionStamp
_RespondWorkflowTaskCompletedRequest'workerVersionStamp = Maybe WorkerVersionStamp
forall a. Maybe a
Prelude.Nothing,
         _RespondWorkflowTaskCompletedRequest'messages :: Vector Message
_RespondWorkflowTaskCompletedRequest'messages = Vector Message
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _RespondWorkflowTaskCompletedRequest'sdkMetadata :: Maybe WorkflowTaskCompletedMetadata
_RespondWorkflowTaskCompletedRequest'sdkMetadata = Maybe WorkflowTaskCompletedMetadata
forall a. Maybe a
Prelude.Nothing,
         _RespondWorkflowTaskCompletedRequest'meteringMetadata :: Maybe MeteringMetadata
_RespondWorkflowTaskCompletedRequest'meteringMetadata = Maybe MeteringMetadata
forall a. Maybe a
Prelude.Nothing,
         _RespondWorkflowTaskCompletedRequest'_unknownFields :: FieldSet
_RespondWorkflowTaskCompletedRequest'_unknownFields = []}
  parseMessage :: Parser RespondWorkflowTaskCompletedRequest
parseMessage
    = let
        loop ::
          RespondWorkflowTaskCompletedRequest
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Command.V1.Message.Command
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Protocol.V1.Message.Message
                -> Data.ProtoLens.Encoding.Bytes.Parser RespondWorkflowTaskCompletedRequest
        loop :: RespondWorkflowTaskCompletedRequest
-> Growing Vector RealWorld Command
-> Growing Vector RealWorld Message
-> Parser RespondWorkflowTaskCompletedRequest
loop RespondWorkflowTaskCompletedRequest
x Growing Vector RealWorld Command
mutable'commands Growing Vector RealWorld Message
mutable'messages
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'commands <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                              mutable'commands)
                      frozen'messages <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                              mutable'messages)
                      (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'commands") frozen'commands
                              (Lens.Family2.set
                                 (Data.ProtoLens.Field.field @"vec'messages") frozen'messages x)))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"task_token"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskToken") y x)
                                  mutable'commands mutable'messages
                        Word64
18
                          -> do !y <- Parser Command -> String -> Parser Command
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"commands"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'commands y)
                                loop x v mutable'messages
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                                  mutable'commands mutable'messages
                        Word64
34
                          -> do y <- Parser StickyExecutionAttributes
-> String -> Parser StickyExecutionAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"sticky_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"stickyAttributes") y x)
                                  mutable'commands mutable'messages
                        Word64
40
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"return_new_workflow_task"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"returnNewWorkflowTask") y x)
                                  mutable'commands mutable'messages
                        Word64
48
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"force_create_new_workflow_task"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"forceCreateNewWorkflowTask") y x)
                                  mutable'commands mutable'messages
                        Word64
58
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"binary_checksum"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"binaryChecksum") y x)
                                  mutable'commands mutable'messages
                        Word64
66
                          -> do !(entry :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry) <- Parser RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> String
-> Parser RespondWorkflowTaskCompletedRequest'QueryResultsEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                                                                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                                                                                           Data.ProtoLens.Encoding.Bytes.isolate
                                                                                                             (Prelude.fromIntegral
                                                                                                                len)
                                                                                                             Data.ProtoLens.parseMessage)
                                                                                                       String
"query_results"
                                (let
                                   key = FoldLike
  Text
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  Text
  Text
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> 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") RespondWorkflowTaskCompletedRequest'QueryResultsEntry
entry
                                   value
                                     = FoldLike
  WorkflowQueryResult
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  WorkflowQueryResult
  WorkflowQueryResult
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> WorkflowQueryResult
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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") RespondWorkflowTaskCompletedRequest'QueryResultsEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"queryResults")
                                        (\ !Map Text WorkflowQueryResult
t -> Text
-> WorkflowQueryResult
-> Map Text WorkflowQueryResult
-> Map Text WorkflowQueryResult
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key WorkflowQueryResult
value Map Text WorkflowQueryResult
t) x)
                                     mutable'commands mutable'messages)
                        Word64
74
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                                  mutable'commands mutable'messages
                        Word64
82
                          -> do y <- Parser WorkerVersionStamp -> String -> Parser WorkerVersionStamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"worker_version_stamp"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerVersionStamp") y x)
                                  mutable'commands mutable'messages
                        Word64
90
                          -> do !y <- Parser Message -> String -> Parser Message
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"messages"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'messages y)
                                loop x mutable'commands v
                        Word64
98
                          -> do y <- Parser WorkflowTaskCompletedMetadata
-> String -> Parser WorkflowTaskCompletedMetadata
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"sdk_metadata"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"sdkMetadata") y x)
                                  mutable'commands mutable'messages
                        Word64
106
                          -> do y <- Parser MeteringMetadata -> String -> Parser MeteringMetadata
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"metering_metadata"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"meteringMetadata") y x)
                                  mutable'commands mutable'messages
                        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'commands mutable'messages
      in
        Parser RespondWorkflowTaskCompletedRequest
-> String -> Parser RespondWorkflowTaskCompletedRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'commands <- IO (Growing Vector RealWorld Command)
-> Parser (Growing Vector RealWorld Command)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                    IO (Growing Vector RealWorld Command)
IO (Growing Vector (PrimState IO) Command)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              mutable'messages <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                    Data.ProtoLens.Encoding.Growing.new
              loop Data.ProtoLens.defMessage mutable'commands mutable'messages)
          String
"RespondWorkflowTaskCompletedRequest"
  buildMessage :: RespondWorkflowTaskCompletedRequest -> Builder
buildMessage
    = \ RespondWorkflowTaskCompletedRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: ByteString
_v = FoldLike
  ByteString
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  ByteString
  ByteString
-> RespondWorkflowTaskCompletedRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken") RespondWorkflowTaskCompletedRequest
_x
              in
                if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
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
bs
                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         ByteString
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                ((Command -> Builder) -> Vector Command -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                   (\ Command
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                           ((ByteString -> Builder)
-> (Command -> ByteString) -> Command -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ ByteString
bs
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                              Command -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Command
_v))
                   (FoldLike
  (Vector Command)
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  (Vector Command)
  (Vector Command)
-> RespondWorkflowTaskCompletedRequest -> Vector Command
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'commands") RespondWorkflowTaskCompletedRequest
_x))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v = FoldLike
  Text
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  Text
  Text
-> RespondWorkflowTaskCompletedRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") RespondWorkflowTaskCompletedRequest
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe StickyExecutionAttributes)
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  (Maybe StickyExecutionAttributes)
  (Maybe StickyExecutionAttributes)
-> RespondWorkflowTaskCompletedRequest
-> Maybe StickyExecutionAttributes
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'stickyAttributes") RespondWorkflowTaskCompletedRequest
_x
                       of
                         Maybe StickyExecutionAttributes
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just StickyExecutionAttributes
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (StickyExecutionAttributes -> ByteString)
-> StickyExecutionAttributes
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   StickyExecutionAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage StickyExecutionAttributes
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Bool
_v
                              = FoldLike
  Bool
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  Bool
  Bool
-> RespondWorkflowTaskCompletedRequest -> 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 @"returnNewWorkflowTask") RespondWorkflowTaskCompletedRequest
_x
                          in
                            if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
40)
                                  ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (\ Bool
b -> if Bool
b then Word64
1 else Word64
0) Bool
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Bool
_v
                                 = FoldLike
  Bool
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  Bool
  Bool
-> RespondWorkflowTaskCompletedRequest -> 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 @"forceCreateNewWorkflowTask") RespondWorkflowTaskCompletedRequest
_x
                             in
                               if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
48)
                                     ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (\ Bool
b -> if Bool
b then Word64
1 else Word64
0) Bool
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Text
_v
                                    = FoldLike
  Text
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  Text
  Text
-> RespondWorkflowTaskCompletedRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                        (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"binaryChecksum") RespondWorkflowTaskCompletedRequest
_x
                                in
                                  if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                      Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  else
                                      Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                        ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                           (\ ByteString
bs
                                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                         (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                           Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                                     (((Text, WorkflowQueryResult) -> Builder)
-> [(Text, WorkflowQueryResult)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                                        (\ (Text, WorkflowQueryResult)
_v
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                                                ((ByteString -> Builder)
-> (RespondWorkflowTaskCompletedRequest'QueryResultsEntry
    -> ByteString)
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                   (\ ByteString
bs
                                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                 (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                              ByteString
bs))
                                                   RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                   (Setter
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  Text
  Text
-> Text
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
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, WorkflowQueryResult) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, WorkflowQueryResult)
_v)
                                                      (Setter
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  WorkflowQueryResult
  WorkflowQueryResult
-> WorkflowQueryResult
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
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, WorkflowQueryResult) -> WorkflowQueryResult
forall a b. (a, b) -> b
Prelude.snd (Text, WorkflowQueryResult)
_v)
                                                         (RespondWorkflowTaskCompletedRequest'QueryResultsEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                            RespondWorkflowTaskCompletedRequest'QueryResultsEntry)))))
                                        (Map Text WorkflowQueryResult -> [(Text, WorkflowQueryResult)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                           (FoldLike
  (Map Text WorkflowQueryResult)
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  (Map Text WorkflowQueryResult)
  (Map Text WorkflowQueryResult)
-> RespondWorkflowTaskCompletedRequest
-> Map Text WorkflowQueryResult
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"queryResults") RespondWorkflowTaskCompletedRequest
_x))))
                                  (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (let
                                        _v :: Text
_v
                                          = FoldLike
  Text
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  Text
  Text
-> RespondWorkflowTaskCompletedRequest -> 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") RespondWorkflowTaskCompletedRequest
_x
                                      in
                                        if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                            Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                        else
                                            Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
                                              ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                 (\ ByteString
bs
                                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                            (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                               (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                         (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                            ByteString
bs))
                                                 Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                                     (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (case
                                             FoldLike
  (Maybe WorkerVersionStamp)
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> RespondWorkflowTaskCompletedRequest -> Maybe WorkerVersionStamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                  @"maybe'workerVersionStamp")
                                               RespondWorkflowTaskCompletedRequest
_x
                                         of
                                           Maybe WorkerVersionStamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                           (Prelude.Just WorkerVersionStamp
_v)
                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
                                                  ((ByteString -> Builder)
-> (WorkerVersionStamp -> ByteString)
-> WorkerVersionStamp
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                     (\ ByteString
bs
                                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                   (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                ByteString
bs))
                                                     WorkerVersionStamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkerVersionStamp
_v))
                                        (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           ((Message -> Builder) -> Vector Message -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                              (\ Message
_v
                                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
90)
                                                      ((ByteString -> Builder)
-> (Message -> ByteString) -> Message -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                         (\ ByteString
bs
                                                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                       (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                    ByteString
bs))
                                                         Message -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Message
_v))
                                              (FoldLike
  (Vector Message)
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  (Vector Message)
  (Vector Message)
-> RespondWorkflowTaskCompletedRequest -> Vector Message
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'messages") RespondWorkflowTaskCompletedRequest
_x))
                                           (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (case
                                                   FoldLike
  (Maybe WorkflowTaskCompletedMetadata)
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  (Maybe WorkflowTaskCompletedMetadata)
  (Maybe WorkflowTaskCompletedMetadata)
-> RespondWorkflowTaskCompletedRequest
-> Maybe WorkflowTaskCompletedMetadata
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                        @"maybe'sdkMetadata")
                                                     RespondWorkflowTaskCompletedRequest
_x
                                               of
                                                 Maybe WorkflowTaskCompletedMetadata
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                 (Prelude.Just WorkflowTaskCompletedMetadata
_v)
                                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
98)
                                                        ((ByteString -> Builder)
-> (WorkflowTaskCompletedMetadata -> ByteString)
-> WorkflowTaskCompletedMetadata
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                           (\ ByteString
bs
                                                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                         (ByteString -> Int
Data.ByteString.length
                                                                            ByteString
bs)))
                                                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                      ByteString
bs))
                                                           WorkflowTaskCompletedMetadata -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowTaskCompletedMetadata
_v))
                                              (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (case
                                                      FoldLike
  (Maybe MeteringMetadata)
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  (Maybe MeteringMetadata)
  (Maybe MeteringMetadata)
-> RespondWorkflowTaskCompletedRequest -> Maybe MeteringMetadata
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                        (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                           @"maybe'meteringMetadata")
                                                        RespondWorkflowTaskCompletedRequest
_x
                                                  of
                                                    Maybe MeteringMetadata
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                    (Prelude.Just MeteringMetadata
_v)
                                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                              Word64
106)
                                                           ((ByteString -> Builder)
-> (MeteringMetadata -> ByteString) -> MeteringMetadata -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                              (\ ByteString
bs
                                                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                            (ByteString -> Int
Data.ByteString.length
                                                                               ByteString
bs)))
                                                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                         ByteString
bs))
                                                              MeteringMetadata -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage MeteringMetadata
_v))
                                                 (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                                    (FoldLike
  FieldSet
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  FieldSet
  FieldSet
-> RespondWorkflowTaskCompletedRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                       FoldLike
  FieldSet
  RespondWorkflowTaskCompletedRequest
  RespondWorkflowTaskCompletedRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondWorkflowTaskCompletedRequest FieldSet
Data.ProtoLens.unknownFields RespondWorkflowTaskCompletedRequest
_x))))))))))))))
instance Control.DeepSeq.NFData RespondWorkflowTaskCompletedRequest where
  rnf :: RespondWorkflowTaskCompletedRequest -> ()
rnf
    = \ RespondWorkflowTaskCompletedRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondWorkflowTaskCompletedRequest -> FieldSet
_RespondWorkflowTaskCompletedRequest'_unknownFields RespondWorkflowTaskCompletedRequest
x__)
             (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RespondWorkflowTaskCompletedRequest -> ByteString
_RespondWorkflowTaskCompletedRequest'taskToken RespondWorkflowTaskCompletedRequest
x__)
                (Vector Command -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RespondWorkflowTaskCompletedRequest -> Vector Command
_RespondWorkflowTaskCompletedRequest'commands RespondWorkflowTaskCompletedRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RespondWorkflowTaskCompletedRequest -> Text
_RespondWorkflowTaskCompletedRequest'identity RespondWorkflowTaskCompletedRequest
x__)
                      (Maybe StickyExecutionAttributes -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RespondWorkflowTaskCompletedRequest
-> Maybe StickyExecutionAttributes
_RespondWorkflowTaskCompletedRequest'stickyAttributes RespondWorkflowTaskCompletedRequest
x__)
                         (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RespondWorkflowTaskCompletedRequest -> Bool
_RespondWorkflowTaskCompletedRequest'returnNewWorkflowTask RespondWorkflowTaskCompletedRequest
x__)
                            (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (RespondWorkflowTaskCompletedRequest -> Bool
_RespondWorkflowTaskCompletedRequest'forceCreateNewWorkflowTask
                                  RespondWorkflowTaskCompletedRequest
x__)
                               (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (RespondWorkflowTaskCompletedRequest -> Text
_RespondWorkflowTaskCompletedRequest'binaryChecksum RespondWorkflowTaskCompletedRequest
x__)
                                  (Map Text WorkflowQueryResult -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (RespondWorkflowTaskCompletedRequest -> Map Text WorkflowQueryResult
_RespondWorkflowTaskCompletedRequest'queryResults RespondWorkflowTaskCompletedRequest
x__)
                                     (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (RespondWorkflowTaskCompletedRequest -> Text
_RespondWorkflowTaskCompletedRequest'namespace RespondWorkflowTaskCompletedRequest
x__)
                                        (Maybe WorkerVersionStamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (RespondWorkflowTaskCompletedRequest -> Maybe WorkerVersionStamp
_RespondWorkflowTaskCompletedRequest'workerVersionStamp
                                              RespondWorkflowTaskCompletedRequest
x__)
                                           (Vector Message -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (RespondWorkflowTaskCompletedRequest -> Vector Message
_RespondWorkflowTaskCompletedRequest'messages RespondWorkflowTaskCompletedRequest
x__)
                                              (Maybe WorkflowTaskCompletedMetadata -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (RespondWorkflowTaskCompletedRequest
-> Maybe WorkflowTaskCompletedMetadata
_RespondWorkflowTaskCompletedRequest'sdkMetadata
                                                    RespondWorkflowTaskCompletedRequest
x__)
                                                 (Maybe MeteringMetadata -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (RespondWorkflowTaskCompletedRequest -> Maybe MeteringMetadata
_RespondWorkflowTaskCompletedRequest'meteringMetadata
                                                       RespondWorkflowTaskCompletedRequest
x__)
                                                    ())))))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.key' @:: Lens' RespondWorkflowTaskCompletedRequest'QueryResultsEntry Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.value' @:: Lens' RespondWorkflowTaskCompletedRequest'QueryResultsEntry Proto.Temporal.Api.Query.V1.Message.WorkflowQueryResult@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'value' @:: Lens' RespondWorkflowTaskCompletedRequest'QueryResultsEntry (Prelude.Maybe Proto.Temporal.Api.Query.V1.Message.WorkflowQueryResult)@ -}
data RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  = RespondWorkflowTaskCompletedRequest'QueryResultsEntry'_constructor {RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Text
_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'key :: !Data.Text.Text,
                                                                        RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> Maybe WorkflowQueryResult
_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Query.V1.Message.WorkflowQueryResult),
                                                                        RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> FieldSet
_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool
(RespondWorkflowTaskCompletedRequest'QueryResultsEntry
 -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool)
-> (RespondWorkflowTaskCompletedRequest'QueryResultsEntry
    -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool)
-> Eq RespondWorkflowTaskCompletedRequest'QueryResultsEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool
== :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool
$c/= :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool
/= :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool
Prelude.Eq, Eq RespondWorkflowTaskCompletedRequest'QueryResultsEntry
Eq RespondWorkflowTaskCompletedRequest'QueryResultsEntry =>
(RespondWorkflowTaskCompletedRequest'QueryResultsEntry
 -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
 -> Ordering)
-> (RespondWorkflowTaskCompletedRequest'QueryResultsEntry
    -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool)
-> (RespondWorkflowTaskCompletedRequest'QueryResultsEntry
    -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool)
-> (RespondWorkflowTaskCompletedRequest'QueryResultsEntry
    -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool)
-> (RespondWorkflowTaskCompletedRequest'QueryResultsEntry
    -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool)
-> (RespondWorkflowTaskCompletedRequest'QueryResultsEntry
    -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
    -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry)
-> (RespondWorkflowTaskCompletedRequest'QueryResultsEntry
    -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
    -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry)
-> Ord RespondWorkflowTaskCompletedRequest'QueryResultsEntry
RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool
RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> Ordering
RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
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 :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> Ordering
compare :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> Ordering
$c< :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool
< :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool
$c<= :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool
<= :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool
$c> :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool
> :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool
$c>= :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool
>= :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Bool
$cmax :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
max :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
$cmin :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
min :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
Prelude.Ord)
instance Prelude.Show RespondWorkflowTaskCompletedRequest'QueryResultsEntry where
  showsPrec :: Int
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> ShowS
showsPrec Int
_ RespondWorkflowTaskCompletedRequest'QueryResultsEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondWorkflowTaskCompletedRequest'QueryResultsEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest'QueryResultsEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> f RespondWorkflowTaskCompletedRequest'QueryResultsEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
 -> f RespondWorkflowTaskCompletedRequest'QueryResultsEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> f RespondWorkflowTaskCompletedRequest'QueryResultsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Text)
-> (RespondWorkflowTaskCompletedRequest'QueryResultsEntry
    -> Text -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry)
-> Lens' RespondWorkflowTaskCompletedRequest'QueryResultsEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Text
_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'key
           (\ RespondWorkflowTaskCompletedRequest'QueryResultsEntry
x__ Text
y__
              -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
x__
                   {_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest'QueryResultsEntry "value" Proto.Temporal.Api.Query.V1.Message.WorkflowQueryResult where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (WorkflowQueryResult -> f WorkflowQueryResult)
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> f RespondWorkflowTaskCompletedRequest'QueryResultsEntry
fieldOf Proxy# "value"
_
    = ((Maybe WorkflowQueryResult -> f (Maybe WorkflowQueryResult))
 -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
 -> f RespondWorkflowTaskCompletedRequest'QueryResultsEntry)
-> ((WorkflowQueryResult -> f WorkflowQueryResult)
    -> Maybe WorkflowQueryResult -> f (Maybe WorkflowQueryResult))
-> (WorkflowQueryResult -> f WorkflowQueryResult)
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> f RespondWorkflowTaskCompletedRequest'QueryResultsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest'QueryResultsEntry
 -> Maybe WorkflowQueryResult)
-> (RespondWorkflowTaskCompletedRequest'QueryResultsEntry
    -> Maybe WorkflowQueryResult
    -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry)
-> Lens
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry
     (Maybe WorkflowQueryResult)
     (Maybe WorkflowQueryResult)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> Maybe WorkflowQueryResult
_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'value
           (\ RespondWorkflowTaskCompletedRequest'QueryResultsEntry
x__ Maybe WorkflowQueryResult
y__
              -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
x__
                   {_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'value = y__}))
        (WorkflowQueryResult
-> Lens' (Maybe WorkflowQueryResult) WorkflowQueryResult
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowQueryResult
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedRequest'QueryResultsEntry "maybe'value" (Prelude.Maybe Proto.Temporal.Api.Query.V1.Message.WorkflowQueryResult) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'value"
-> (Maybe WorkflowQueryResult -> f (Maybe WorkflowQueryResult))
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> f RespondWorkflowTaskCompletedRequest'QueryResultsEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe WorkflowQueryResult -> f (Maybe WorkflowQueryResult))
 -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
 -> f RespondWorkflowTaskCompletedRequest'QueryResultsEntry)
-> ((Maybe WorkflowQueryResult -> f (Maybe WorkflowQueryResult))
    -> Maybe WorkflowQueryResult -> f (Maybe WorkflowQueryResult))
-> (Maybe WorkflowQueryResult -> f (Maybe WorkflowQueryResult))
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> f RespondWorkflowTaskCompletedRequest'QueryResultsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedRequest'QueryResultsEntry
 -> Maybe WorkflowQueryResult)
-> (RespondWorkflowTaskCompletedRequest'QueryResultsEntry
    -> Maybe WorkflowQueryResult
    -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry)
-> Lens
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry
     (Maybe WorkflowQueryResult)
     (Maybe WorkflowQueryResult)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> Maybe WorkflowQueryResult
_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'value
           (\ RespondWorkflowTaskCompletedRequest'QueryResultsEntry
x__ Maybe WorkflowQueryResult
y__
              -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
x__
                   {_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'value = y__}))
        (Maybe WorkflowQueryResult -> f (Maybe WorkflowQueryResult))
-> Maybe WorkflowQueryResult -> f (Maybe WorkflowQueryResult)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RespondWorkflowTaskCompletedRequest'QueryResultsEntry where
  messageName :: Proxy RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Text
messageName Proxy RespondWorkflowTaskCompletedRequest'QueryResultsEntry
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondWorkflowTaskCompletedRequest.QueryResultsEntry"
  packedMessageDescriptor :: Proxy RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> ByteString
packedMessageDescriptor Proxy RespondWorkflowTaskCompletedRequest'QueryResultsEntry
_
    = ByteString
"\n\
      \\DC1QueryResultsEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2@\n\
      \\ENQvalue\CAN\STX \SOH(\v2*.temporal.api.query.v1.WorkflowQueryResultR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> ByteString
packedFileDescriptor Proxy RespondWorkflowTaskCompletedRequest'QueryResultsEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry Text
-> FieldDescriptor
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry
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' RespondWorkflowTaskCompletedRequest'QueryResultsEntry Text
-> FieldAccessor
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry 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 RespondWorkflowTaskCompletedRequest'QueryResultsEntry
        value__field_descriptor :: FieldDescriptor
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowQueryResult
-> FieldAccessor
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry
     WorkflowQueryResult
-> FieldDescriptor
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"value"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowQueryResult
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Query.V1.Message.WorkflowQueryResult)
              (Lens
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  (Maybe WorkflowQueryResult)
  (Maybe WorkflowQueryResult)
-> FieldAccessor
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry
     WorkflowQueryResult
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.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 RespondWorkflowTaskCompletedRequest'QueryResultsEntry
      in
        [(Tag,
  FieldDescriptor
    RespondWorkflowTaskCompletedRequest'QueryResultsEntry)]
-> Map
     Tag
     (FieldDescriptor
        RespondWorkflowTaskCompletedRequest'QueryResultsEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
value__field_descriptor)]
  unknownFields :: Lens'
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry FieldSet
unknownFields
    = (RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> FieldSet)
-> (RespondWorkflowTaskCompletedRequest'QueryResultsEntry
    -> FieldSet
    -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry)
-> Lens'
     RespondWorkflowTaskCompletedRequest'QueryResultsEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> FieldSet
_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'_unknownFields
        (\ RespondWorkflowTaskCompletedRequest'QueryResultsEntry
x__ FieldSet
y__
           -> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
x__
                {_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'_unknownFields = y__})
  defMessage :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
defMessage
    = RespondWorkflowTaskCompletedRequest'QueryResultsEntry'_constructor
        {_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'key :: Text
_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondWorkflowTaskCompletedRequest'QueryResultsEntry'value :: Maybe WorkflowQueryResult
_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'value = Maybe WorkflowQueryResult
forall a. Maybe a
Prelude.Nothing,
         _RespondWorkflowTaskCompletedRequest'QueryResultsEntry'_unknownFields :: FieldSet
_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'_unknownFields = []}
  parseMessage :: Parser RespondWorkflowTaskCompletedRequest'QueryResultsEntry
parseMessage
    = let
        loop ::
          RespondWorkflowTaskCompletedRequest'QueryResultsEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondWorkflowTaskCompletedRequest'QueryResultsEntry
        loop :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> Parser RespondWorkflowTaskCompletedRequest'QueryResultsEntry
loop RespondWorkflowTaskCompletedRequest'QueryResultsEntry
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 WorkflowQueryResult -> String -> Parser WorkflowQueryResult
forall a. Parser a -> String -> Parser a
(Data.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 RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> String
-> Parser RespondWorkflowTaskCompletedRequest'QueryResultsEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> Parser RespondWorkflowTaskCompletedRequest'QueryResultsEntry
loop RespondWorkflowTaskCompletedRequest'QueryResultsEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"QueryResultsEntry"
  buildMessage :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Builder
buildMessage
    = \ RespondWorkflowTaskCompletedRequest'QueryResultsEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  Text
  Text
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> 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") RespondWorkflowTaskCompletedRequest'QueryResultsEntry
_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 WorkflowQueryResult)
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  (Maybe WorkflowQueryResult)
  (Maybe WorkflowQueryResult)
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> Maybe WorkflowQueryResult
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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") RespondWorkflowTaskCompletedRequest'QueryResultsEntry
_x
                 of
                   Maybe WorkflowQueryResult
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just WorkflowQueryResult
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (WorkflowQueryResult -> ByteString)
-> WorkflowQueryResult
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             WorkflowQueryResult -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowQueryResult
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  FieldSet
  FieldSet
-> RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens'
  RespondWorkflowTaskCompletedRequest'QueryResultsEntry FieldSet
Data.ProtoLens.unknownFields RespondWorkflowTaskCompletedRequest'QueryResultsEntry
_x)))
instance Control.DeepSeq.NFData RespondWorkflowTaskCompletedRequest'QueryResultsEntry where
  rnf :: RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> ()
rnf
    = \ RespondWorkflowTaskCompletedRequest'QueryResultsEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> FieldSet
_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'_unknownFields
                RespondWorkflowTaskCompletedRequest'QueryResultsEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RespondWorkflowTaskCompletedRequest'QueryResultsEntry -> Text
_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'key RespondWorkflowTaskCompletedRequest'QueryResultsEntry
x__)
                (Maybe WorkflowQueryResult -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RespondWorkflowTaskCompletedRequest'QueryResultsEntry
-> Maybe WorkflowQueryResult
_RespondWorkflowTaskCompletedRequest'QueryResultsEntry'value RespondWorkflowTaskCompletedRequest'QueryResultsEntry
x__)
                   ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowTask' @:: Lens' RespondWorkflowTaskCompletedResponse PollWorkflowTaskQueueResponse@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowTask' @:: Lens' RespondWorkflowTaskCompletedResponse (Prelude.Maybe PollWorkflowTaskQueueResponse)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.activityTasks' @:: Lens' RespondWorkflowTaskCompletedResponse [PollActivityTaskQueueResponse]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'activityTasks' @:: Lens' RespondWorkflowTaskCompletedResponse (Data.Vector.Vector PollActivityTaskQueueResponse)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.resetHistoryEventId' @:: Lens' RespondWorkflowTaskCompletedResponse Data.Int.Int64@ -}
data RespondWorkflowTaskCompletedResponse
  = RespondWorkflowTaskCompletedResponse'_constructor {RespondWorkflowTaskCompletedResponse
-> Maybe PollWorkflowTaskQueueResponse
_RespondWorkflowTaskCompletedResponse'workflowTask :: !(Prelude.Maybe PollWorkflowTaskQueueResponse),
                                                       RespondWorkflowTaskCompletedResponse
-> Vector PollActivityTaskQueueResponse
_RespondWorkflowTaskCompletedResponse'activityTasks :: !(Data.Vector.Vector PollActivityTaskQueueResponse),
                                                       RespondWorkflowTaskCompletedResponse -> Int64
_RespondWorkflowTaskCompletedResponse'resetHistoryEventId :: !Data.Int.Int64,
                                                       RespondWorkflowTaskCompletedResponse -> FieldSet
_RespondWorkflowTaskCompletedResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Bool
(RespondWorkflowTaskCompletedResponse
 -> RespondWorkflowTaskCompletedResponse -> Bool)
-> (RespondWorkflowTaskCompletedResponse
    -> RespondWorkflowTaskCompletedResponse -> Bool)
-> Eq RespondWorkflowTaskCompletedResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Bool
== :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Bool
$c/= :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Bool
/= :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Bool
Prelude.Eq, Eq RespondWorkflowTaskCompletedResponse
Eq RespondWorkflowTaskCompletedResponse =>
(RespondWorkflowTaskCompletedResponse
 -> RespondWorkflowTaskCompletedResponse -> Ordering)
-> (RespondWorkflowTaskCompletedResponse
    -> RespondWorkflowTaskCompletedResponse -> Bool)
-> (RespondWorkflowTaskCompletedResponse
    -> RespondWorkflowTaskCompletedResponse -> Bool)
-> (RespondWorkflowTaskCompletedResponse
    -> RespondWorkflowTaskCompletedResponse -> Bool)
-> (RespondWorkflowTaskCompletedResponse
    -> RespondWorkflowTaskCompletedResponse -> Bool)
-> (RespondWorkflowTaskCompletedResponse
    -> RespondWorkflowTaskCompletedResponse
    -> RespondWorkflowTaskCompletedResponse)
-> (RespondWorkflowTaskCompletedResponse
    -> RespondWorkflowTaskCompletedResponse
    -> RespondWorkflowTaskCompletedResponse)
-> Ord RespondWorkflowTaskCompletedResponse
RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Bool
RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Ordering
RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse
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 :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Ordering
compare :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Ordering
$c< :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Bool
< :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Bool
$c<= :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Bool
<= :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Bool
$c> :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Bool
> :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Bool
$c>= :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Bool
>= :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse -> Bool
$cmax :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse
max :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse
$cmin :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse
min :: RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse
-> RespondWorkflowTaskCompletedResponse
Prelude.Ord)
instance Prelude.Show RespondWorkflowTaskCompletedResponse where
  showsPrec :: Int -> RespondWorkflowTaskCompletedResponse -> ShowS
showsPrec Int
_ RespondWorkflowTaskCompletedResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondWorkflowTaskCompletedResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondWorkflowTaskCompletedResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedResponse "workflowTask" PollWorkflowTaskQueueResponse where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTask"
-> (PollWorkflowTaskQueueResponse
    -> f PollWorkflowTaskQueueResponse)
-> RespondWorkflowTaskCompletedResponse
-> f RespondWorkflowTaskCompletedResponse
fieldOf Proxy# "workflowTask"
_
    = ((Maybe PollWorkflowTaskQueueResponse
  -> f (Maybe PollWorkflowTaskQueueResponse))
 -> RespondWorkflowTaskCompletedResponse
 -> f RespondWorkflowTaskCompletedResponse)
-> ((PollWorkflowTaskQueueResponse
     -> f PollWorkflowTaskQueueResponse)
    -> Maybe PollWorkflowTaskQueueResponse
    -> f (Maybe PollWorkflowTaskQueueResponse))
-> (PollWorkflowTaskQueueResponse
    -> f PollWorkflowTaskQueueResponse)
-> RespondWorkflowTaskCompletedResponse
-> f RespondWorkflowTaskCompletedResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedResponse
 -> Maybe PollWorkflowTaskQueueResponse)
-> (RespondWorkflowTaskCompletedResponse
    -> Maybe PollWorkflowTaskQueueResponse
    -> RespondWorkflowTaskCompletedResponse)
-> Lens
     RespondWorkflowTaskCompletedResponse
     RespondWorkflowTaskCompletedResponse
     (Maybe PollWorkflowTaskQueueResponse)
     (Maybe PollWorkflowTaskQueueResponse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedResponse
-> Maybe PollWorkflowTaskQueueResponse
_RespondWorkflowTaskCompletedResponse'workflowTask
           (\ RespondWorkflowTaskCompletedResponse
x__ Maybe PollWorkflowTaskQueueResponse
y__
              -> RespondWorkflowTaskCompletedResponse
x__ {_RespondWorkflowTaskCompletedResponse'workflowTask = y__}))
        (PollWorkflowTaskQueueResponse
-> Lens'
     (Maybe PollWorkflowTaskQueueResponse) PollWorkflowTaskQueueResponse
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens PollWorkflowTaskQueueResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedResponse "maybe'workflowTask" (Prelude.Maybe PollWorkflowTaskQueueResponse) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowTask"
-> (Maybe PollWorkflowTaskQueueResponse
    -> f (Maybe PollWorkflowTaskQueueResponse))
-> RespondWorkflowTaskCompletedResponse
-> f RespondWorkflowTaskCompletedResponse
fieldOf Proxy# "maybe'workflowTask"
_
    = ((Maybe PollWorkflowTaskQueueResponse
  -> f (Maybe PollWorkflowTaskQueueResponse))
 -> RespondWorkflowTaskCompletedResponse
 -> f RespondWorkflowTaskCompletedResponse)
-> ((Maybe PollWorkflowTaskQueueResponse
     -> f (Maybe PollWorkflowTaskQueueResponse))
    -> Maybe PollWorkflowTaskQueueResponse
    -> f (Maybe PollWorkflowTaskQueueResponse))
-> (Maybe PollWorkflowTaskQueueResponse
    -> f (Maybe PollWorkflowTaskQueueResponse))
-> RespondWorkflowTaskCompletedResponse
-> f RespondWorkflowTaskCompletedResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedResponse
 -> Maybe PollWorkflowTaskQueueResponse)
-> (RespondWorkflowTaskCompletedResponse
    -> Maybe PollWorkflowTaskQueueResponse
    -> RespondWorkflowTaskCompletedResponse)
-> Lens
     RespondWorkflowTaskCompletedResponse
     RespondWorkflowTaskCompletedResponse
     (Maybe PollWorkflowTaskQueueResponse)
     (Maybe PollWorkflowTaskQueueResponse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedResponse
-> Maybe PollWorkflowTaskQueueResponse
_RespondWorkflowTaskCompletedResponse'workflowTask
           (\ RespondWorkflowTaskCompletedResponse
x__ Maybe PollWorkflowTaskQueueResponse
y__
              -> RespondWorkflowTaskCompletedResponse
x__ {_RespondWorkflowTaskCompletedResponse'workflowTask = y__}))
        (Maybe PollWorkflowTaskQueueResponse
 -> f (Maybe PollWorkflowTaskQueueResponse))
-> Maybe PollWorkflowTaskQueueResponse
-> f (Maybe PollWorkflowTaskQueueResponse)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedResponse "activityTasks" [PollActivityTaskQueueResponse] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityTasks"
-> ([PollActivityTaskQueueResponse]
    -> f [PollActivityTaskQueueResponse])
-> RespondWorkflowTaskCompletedResponse
-> f RespondWorkflowTaskCompletedResponse
fieldOf Proxy# "activityTasks"
_
    = ((Vector PollActivityTaskQueueResponse
  -> f (Vector PollActivityTaskQueueResponse))
 -> RespondWorkflowTaskCompletedResponse
 -> f RespondWorkflowTaskCompletedResponse)
-> (([PollActivityTaskQueueResponse]
     -> f [PollActivityTaskQueueResponse])
    -> Vector PollActivityTaskQueueResponse
    -> f (Vector PollActivityTaskQueueResponse))
-> ([PollActivityTaskQueueResponse]
    -> f [PollActivityTaskQueueResponse])
-> RespondWorkflowTaskCompletedResponse
-> f RespondWorkflowTaskCompletedResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedResponse
 -> Vector PollActivityTaskQueueResponse)
-> (RespondWorkflowTaskCompletedResponse
    -> Vector PollActivityTaskQueueResponse
    -> RespondWorkflowTaskCompletedResponse)
-> Lens
     RespondWorkflowTaskCompletedResponse
     RespondWorkflowTaskCompletedResponse
     (Vector PollActivityTaskQueueResponse)
     (Vector PollActivityTaskQueueResponse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedResponse
-> Vector PollActivityTaskQueueResponse
_RespondWorkflowTaskCompletedResponse'activityTasks
           (\ RespondWorkflowTaskCompletedResponse
x__ Vector PollActivityTaskQueueResponse
y__
              -> RespondWorkflowTaskCompletedResponse
x__
                   {_RespondWorkflowTaskCompletedResponse'activityTasks = y__}))
        ((Vector PollActivityTaskQueueResponse
 -> [PollActivityTaskQueueResponse])
-> (Vector PollActivityTaskQueueResponse
    -> [PollActivityTaskQueueResponse]
    -> Vector PollActivityTaskQueueResponse)
-> Lens
     (Vector PollActivityTaskQueueResponse)
     (Vector PollActivityTaskQueueResponse)
     [PollActivityTaskQueueResponse]
     [PollActivityTaskQueueResponse]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector PollActivityTaskQueueResponse
-> [PollActivityTaskQueueResponse]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector PollActivityTaskQueueResponse
_ [PollActivityTaskQueueResponse]
y__ -> [PollActivityTaskQueueResponse]
-> Vector PollActivityTaskQueueResponse
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [PollActivityTaskQueueResponse]
y__))
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedResponse "vec'activityTasks" (Data.Vector.Vector PollActivityTaskQueueResponse) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'activityTasks"
-> (Vector PollActivityTaskQueueResponse
    -> f (Vector PollActivityTaskQueueResponse))
-> RespondWorkflowTaskCompletedResponse
-> f RespondWorkflowTaskCompletedResponse
fieldOf Proxy# "vec'activityTasks"
_
    = ((Vector PollActivityTaskQueueResponse
  -> f (Vector PollActivityTaskQueueResponse))
 -> RespondWorkflowTaskCompletedResponse
 -> f RespondWorkflowTaskCompletedResponse)
-> ((Vector PollActivityTaskQueueResponse
     -> f (Vector PollActivityTaskQueueResponse))
    -> Vector PollActivityTaskQueueResponse
    -> f (Vector PollActivityTaskQueueResponse))
-> (Vector PollActivityTaskQueueResponse
    -> f (Vector PollActivityTaskQueueResponse))
-> RespondWorkflowTaskCompletedResponse
-> f RespondWorkflowTaskCompletedResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedResponse
 -> Vector PollActivityTaskQueueResponse)
-> (RespondWorkflowTaskCompletedResponse
    -> Vector PollActivityTaskQueueResponse
    -> RespondWorkflowTaskCompletedResponse)
-> Lens
     RespondWorkflowTaskCompletedResponse
     RespondWorkflowTaskCompletedResponse
     (Vector PollActivityTaskQueueResponse)
     (Vector PollActivityTaskQueueResponse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedResponse
-> Vector PollActivityTaskQueueResponse
_RespondWorkflowTaskCompletedResponse'activityTasks
           (\ RespondWorkflowTaskCompletedResponse
x__ Vector PollActivityTaskQueueResponse
y__
              -> RespondWorkflowTaskCompletedResponse
x__
                   {_RespondWorkflowTaskCompletedResponse'activityTasks = y__}))
        (Vector PollActivityTaskQueueResponse
 -> f (Vector PollActivityTaskQueueResponse))
-> Vector PollActivityTaskQueueResponse
-> f (Vector PollActivityTaskQueueResponse)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskCompletedResponse "resetHistoryEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "resetHistoryEventId"
-> (Int64 -> f Int64)
-> RespondWorkflowTaskCompletedResponse
-> f RespondWorkflowTaskCompletedResponse
fieldOf Proxy# "resetHistoryEventId"
_
    = ((Int64 -> f Int64)
 -> RespondWorkflowTaskCompletedResponse
 -> f RespondWorkflowTaskCompletedResponse)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> RespondWorkflowTaskCompletedResponse
-> f RespondWorkflowTaskCompletedResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskCompletedResponse -> Int64)
-> (RespondWorkflowTaskCompletedResponse
    -> Int64 -> RespondWorkflowTaskCompletedResponse)
-> Lens
     RespondWorkflowTaskCompletedResponse
     RespondWorkflowTaskCompletedResponse
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskCompletedResponse -> Int64
_RespondWorkflowTaskCompletedResponse'resetHistoryEventId
           (\ RespondWorkflowTaskCompletedResponse
x__ Int64
y__
              -> RespondWorkflowTaskCompletedResponse
x__
                   {_RespondWorkflowTaskCompletedResponse'resetHistoryEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RespondWorkflowTaskCompletedResponse where
  messageName :: Proxy RespondWorkflowTaskCompletedResponse -> Text
messageName Proxy RespondWorkflowTaskCompletedResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondWorkflowTaskCompletedResponse"
  packedMessageDescriptor :: Proxy RespondWorkflowTaskCompletedResponse -> ByteString
packedMessageDescriptor Proxy RespondWorkflowTaskCompletedResponse
_
    = ByteString
"\n\
      \$RespondWorkflowTaskCompletedResponse\DC2c\n\
      \\rworkflow_task\CAN\SOH \SOH(\v2>.temporal.api.workflowservice.v1.PollWorkflowTaskQueueResponseR\fworkflowTask\DC2e\n\
      \\SOactivity_tasks\CAN\STX \ETX(\v2>.temporal.api.workflowservice.v1.PollActivityTaskQueueResponseR\ractivityTasks\DC23\n\
      \\SYNreset_history_event_id\CAN\ETX \SOH(\ETXR\DC3resetHistoryEventId"
  packedFileDescriptor :: Proxy RespondWorkflowTaskCompletedResponse -> ByteString
packedFileDescriptor Proxy RespondWorkflowTaskCompletedResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondWorkflowTaskCompletedResponse)
fieldsByTag
    = let
        workflowTask__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedResponse
workflowTask__field_descriptor
          = String
-> FieldTypeDescriptor PollWorkflowTaskQueueResponse
-> FieldAccessor
     RespondWorkflowTaskCompletedResponse PollWorkflowTaskQueueResponse
-> FieldDescriptor RespondWorkflowTaskCompletedResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task"
              (MessageOrGroup -> FieldTypeDescriptor PollWorkflowTaskQueueResponse
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor PollWorkflowTaskQueueResponse)
              (Lens
  RespondWorkflowTaskCompletedResponse
  RespondWorkflowTaskCompletedResponse
  (Maybe PollWorkflowTaskQueueResponse)
  (Maybe PollWorkflowTaskQueueResponse)
-> FieldAccessor
     RespondWorkflowTaskCompletedResponse PollWorkflowTaskQueueResponse
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowTask")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskCompletedResponse
        activityTasks__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedResponse
activityTasks__field_descriptor
          = String
-> FieldTypeDescriptor PollActivityTaskQueueResponse
-> FieldAccessor
     RespondWorkflowTaskCompletedResponse PollActivityTaskQueueResponse
-> FieldDescriptor RespondWorkflowTaskCompletedResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_tasks"
              (MessageOrGroup -> FieldTypeDescriptor PollActivityTaskQueueResponse
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor PollActivityTaskQueueResponse)
              (Packing
-> Lens'
     RespondWorkflowTaskCompletedResponse
     [PollActivityTaskQueueResponse]
-> FieldAccessor
     RespondWorkflowTaskCompletedResponse PollActivityTaskQueueResponse
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 @"activityTasks")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskCompletedResponse
        resetHistoryEventId__field_descriptor :: FieldDescriptor RespondWorkflowTaskCompletedResponse
resetHistoryEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor RespondWorkflowTaskCompletedResponse Int64
-> FieldDescriptor RespondWorkflowTaskCompletedResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"reset_history_event_id"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens
     RespondWorkflowTaskCompletedResponse
     RespondWorkflowTaskCompletedResponse
     Int64
     Int64
-> FieldAccessor RespondWorkflowTaskCompletedResponse Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"resetHistoryEventId")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskCompletedResponse
      in
        [(Tag, FieldDescriptor RespondWorkflowTaskCompletedResponse)]
-> Map Tag (FieldDescriptor RespondWorkflowTaskCompletedResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RespondWorkflowTaskCompletedResponse
workflowTask__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RespondWorkflowTaskCompletedResponse
activityTasks__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RespondWorkflowTaskCompletedResponse
resetHistoryEventId__field_descriptor)]
  unknownFields :: Lens' RespondWorkflowTaskCompletedResponse FieldSet
unknownFields
    = (RespondWorkflowTaskCompletedResponse -> FieldSet)
-> (RespondWorkflowTaskCompletedResponse
    -> FieldSet -> RespondWorkflowTaskCompletedResponse)
-> Lens' RespondWorkflowTaskCompletedResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondWorkflowTaskCompletedResponse -> FieldSet
_RespondWorkflowTaskCompletedResponse'_unknownFields
        (\ RespondWorkflowTaskCompletedResponse
x__ FieldSet
y__
           -> RespondWorkflowTaskCompletedResponse
x__
                {_RespondWorkflowTaskCompletedResponse'_unknownFields = y__})
  defMessage :: RespondWorkflowTaskCompletedResponse
defMessage
    = RespondWorkflowTaskCompletedResponse'_constructor
        {_RespondWorkflowTaskCompletedResponse'workflowTask :: Maybe PollWorkflowTaskQueueResponse
_RespondWorkflowTaskCompletedResponse'workflowTask = Maybe PollWorkflowTaskQueueResponse
forall a. Maybe a
Prelude.Nothing,
         _RespondWorkflowTaskCompletedResponse'activityTasks :: Vector PollActivityTaskQueueResponse
_RespondWorkflowTaskCompletedResponse'activityTasks = Vector PollActivityTaskQueueResponse
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _RespondWorkflowTaskCompletedResponse'resetHistoryEventId :: Int64
_RespondWorkflowTaskCompletedResponse'resetHistoryEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondWorkflowTaskCompletedResponse'_unknownFields :: FieldSet
_RespondWorkflowTaskCompletedResponse'_unknownFields = []}
  parseMessage :: Parser RespondWorkflowTaskCompletedResponse
parseMessage
    = let
        loop ::
          RespondWorkflowTaskCompletedResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld PollActivityTaskQueueResponse
             -> Data.ProtoLens.Encoding.Bytes.Parser RespondWorkflowTaskCompletedResponse
        loop :: RespondWorkflowTaskCompletedResponse
-> Growing Vector RealWorld PollActivityTaskQueueResponse
-> Parser RespondWorkflowTaskCompletedResponse
loop RespondWorkflowTaskCompletedResponse
x Growing Vector RealWorld PollActivityTaskQueueResponse
mutable'activityTasks
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'activityTasks <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                   mutable'activityTasks)
                      (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'activityTasks")
                              frozen'activityTasks x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser PollWorkflowTaskQueueResponse
-> String -> Parser PollWorkflowTaskQueueResponse
forall a. Parser a -> String -> Parser a
(Data.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"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTask") y x)
                                  mutable'activityTasks
                        Word64
18
                          -> do !y <- Parser PollActivityTaskQueueResponse
-> String -> Parser PollActivityTaskQueueResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"activity_tasks"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'activityTasks y)
                                loop x v
                        Word64
24
                          -> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"reset_history_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"resetHistoryEventId") y x)
                                  mutable'activityTasks
                        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'activityTasks
      in
        Parser RespondWorkflowTaskCompletedResponse
-> String -> Parser RespondWorkflowTaskCompletedResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'activityTasks <- IO (Growing Vector RealWorld PollActivityTaskQueueResponse)
-> Parser (Growing Vector RealWorld PollActivityTaskQueueResponse)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                         IO (Growing Vector RealWorld PollActivityTaskQueueResponse)
IO (Growing Vector (PrimState IO) PollActivityTaskQueueResponse)
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'activityTasks)
          String
"RespondWorkflowTaskCompletedResponse"
  buildMessage :: RespondWorkflowTaskCompletedResponse -> Builder
buildMessage
    = \ RespondWorkflowTaskCompletedResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe PollWorkflowTaskQueueResponse)
  RespondWorkflowTaskCompletedResponse
  RespondWorkflowTaskCompletedResponse
  (Maybe PollWorkflowTaskQueueResponse)
  (Maybe PollWorkflowTaskQueueResponse)
-> RespondWorkflowTaskCompletedResponse
-> Maybe PollWorkflowTaskQueueResponse
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'workflowTask") RespondWorkflowTaskCompletedResponse
_x
              of
                Maybe PollWorkflowTaskQueueResponse
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just PollWorkflowTaskQueueResponse
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (PollWorkflowTaskQueueResponse -> ByteString)
-> PollWorkflowTaskQueueResponse
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          PollWorkflowTaskQueueResponse -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage PollWorkflowTaskQueueResponse
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                ((PollActivityTaskQueueResponse -> Builder)
-> Vector PollActivityTaskQueueResponse -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                   (\ PollActivityTaskQueueResponse
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                           ((ByteString -> Builder)
-> (PollActivityTaskQueueResponse -> ByteString)
-> PollActivityTaskQueueResponse
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ ByteString
bs
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                              PollActivityTaskQueueResponse -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage PollActivityTaskQueueResponse
_v))
                   (FoldLike
  (Vector PollActivityTaskQueueResponse)
  RespondWorkflowTaskCompletedResponse
  RespondWorkflowTaskCompletedResponse
  (Vector PollActivityTaskQueueResponse)
  (Vector PollActivityTaskQueueResponse)
-> RespondWorkflowTaskCompletedResponse
-> Vector PollActivityTaskQueueResponse
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'activityTasks") RespondWorkflowTaskCompletedResponse
_x))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Int64
_v
                        = FoldLike
  Int64
  RespondWorkflowTaskCompletedResponse
  RespondWorkflowTaskCompletedResponse
  Int64
  Int64
-> RespondWorkflowTaskCompletedResponse -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"resetHistoryEventId") RespondWorkflowTaskCompletedResponse
_x
                    in
                      if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
24)
                            ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  RespondWorkflowTaskCompletedResponse
  RespondWorkflowTaskCompletedResponse
  FieldSet
  FieldSet
-> RespondWorkflowTaskCompletedResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondWorkflowTaskCompletedResponse
  RespondWorkflowTaskCompletedResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondWorkflowTaskCompletedResponse FieldSet
Data.ProtoLens.unknownFields RespondWorkflowTaskCompletedResponse
_x))))
instance Control.DeepSeq.NFData RespondWorkflowTaskCompletedResponse where
  rnf :: RespondWorkflowTaskCompletedResponse -> ()
rnf
    = \ RespondWorkflowTaskCompletedResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondWorkflowTaskCompletedResponse -> FieldSet
_RespondWorkflowTaskCompletedResponse'_unknownFields RespondWorkflowTaskCompletedResponse
x__)
             (Maybe PollWorkflowTaskQueueResponse -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RespondWorkflowTaskCompletedResponse
-> Maybe PollWorkflowTaskQueueResponse
_RespondWorkflowTaskCompletedResponse'workflowTask RespondWorkflowTaskCompletedResponse
x__)
                (Vector PollActivityTaskQueueResponse -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RespondWorkflowTaskCompletedResponse
-> Vector PollActivityTaskQueueResponse
_RespondWorkflowTaskCompletedResponse'activityTasks RespondWorkflowTaskCompletedResponse
x__)
                   (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RespondWorkflowTaskCompletedResponse -> Int64
_RespondWorkflowTaskCompletedResponse'resetHistoryEventId RespondWorkflowTaskCompletedResponse
x__)
                      ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskToken' @:: Lens' RespondWorkflowTaskFailedRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.cause' @:: Lens' RespondWorkflowTaskFailedRequest Proto.Temporal.Api.Enums.V1.FailedCause.WorkflowTaskFailedCause@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.failure' @:: Lens' RespondWorkflowTaskFailedRequest Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'failure' @:: Lens' RespondWorkflowTaskFailedRequest (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' RespondWorkflowTaskFailedRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.binaryChecksum' @:: Lens' RespondWorkflowTaskFailedRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' RespondWorkflowTaskFailedRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.messages' @:: Lens' RespondWorkflowTaskFailedRequest [Proto.Temporal.Api.Protocol.V1.Message.Message]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'messages' @:: Lens' RespondWorkflowTaskFailedRequest (Data.Vector.Vector Proto.Temporal.Api.Protocol.V1.Message.Message)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workerVersion' @:: Lens' RespondWorkflowTaskFailedRequest Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workerVersion' @:: Lens' RespondWorkflowTaskFailedRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)@ -}
data RespondWorkflowTaskFailedRequest
  = RespondWorkflowTaskFailedRequest'_constructor {RespondWorkflowTaskFailedRequest -> ByteString
_RespondWorkflowTaskFailedRequest'taskToken :: !Data.ByteString.ByteString,
                                                   RespondWorkflowTaskFailedRequest -> WorkflowTaskFailedCause
_RespondWorkflowTaskFailedRequest'cause :: !Proto.Temporal.Api.Enums.V1.FailedCause.WorkflowTaskFailedCause,
                                                   RespondWorkflowTaskFailedRequest -> Maybe Failure
_RespondWorkflowTaskFailedRequest'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                   RespondWorkflowTaskFailedRequest -> Text
_RespondWorkflowTaskFailedRequest'identity :: !Data.Text.Text,
                                                   RespondWorkflowTaskFailedRequest -> Text
_RespondWorkflowTaskFailedRequest'binaryChecksum :: !Data.Text.Text,
                                                   RespondWorkflowTaskFailedRequest -> Text
_RespondWorkflowTaskFailedRequest'namespace :: !Data.Text.Text,
                                                   RespondWorkflowTaskFailedRequest -> Vector Message
_RespondWorkflowTaskFailedRequest'messages :: !(Data.Vector.Vector Proto.Temporal.Api.Protocol.V1.Message.Message),
                                                   RespondWorkflowTaskFailedRequest -> Maybe WorkerVersionStamp
_RespondWorkflowTaskFailedRequest'workerVersion :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp),
                                                   RespondWorkflowTaskFailedRequest -> FieldSet
_RespondWorkflowTaskFailedRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Bool
(RespondWorkflowTaskFailedRequest
 -> RespondWorkflowTaskFailedRequest -> Bool)
-> (RespondWorkflowTaskFailedRequest
    -> RespondWorkflowTaskFailedRequest -> Bool)
-> Eq RespondWorkflowTaskFailedRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Bool
== :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Bool
$c/= :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Bool
/= :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Bool
Prelude.Eq, Eq RespondWorkflowTaskFailedRequest
Eq RespondWorkflowTaskFailedRequest =>
(RespondWorkflowTaskFailedRequest
 -> RespondWorkflowTaskFailedRequest -> Ordering)
-> (RespondWorkflowTaskFailedRequest
    -> RespondWorkflowTaskFailedRequest -> Bool)
-> (RespondWorkflowTaskFailedRequest
    -> RespondWorkflowTaskFailedRequest -> Bool)
-> (RespondWorkflowTaskFailedRequest
    -> RespondWorkflowTaskFailedRequest -> Bool)
-> (RespondWorkflowTaskFailedRequest
    -> RespondWorkflowTaskFailedRequest -> Bool)
-> (RespondWorkflowTaskFailedRequest
    -> RespondWorkflowTaskFailedRequest
    -> RespondWorkflowTaskFailedRequest)
-> (RespondWorkflowTaskFailedRequest
    -> RespondWorkflowTaskFailedRequest
    -> RespondWorkflowTaskFailedRequest)
-> Ord RespondWorkflowTaskFailedRequest
RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Bool
RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Ordering
RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest
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 :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Ordering
compare :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Ordering
$c< :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Bool
< :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Bool
$c<= :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Bool
<= :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Bool
$c> :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Bool
> :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Bool
$c>= :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Bool
>= :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest -> Bool
$cmax :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest
max :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest
$cmin :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest
min :: RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest
-> RespondWorkflowTaskFailedRequest
Prelude.Ord)
instance Prelude.Show RespondWorkflowTaskFailedRequest where
  showsPrec :: Int -> RespondWorkflowTaskFailedRequest -> ShowS
showsPrec Int
_ RespondWorkflowTaskFailedRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondWorkflowTaskFailedRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondWorkflowTaskFailedRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskFailedRequest "taskToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskToken"
-> (ByteString -> f ByteString)
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
fieldOf Proxy# "taskToken"
_
    = ((ByteString -> f ByteString)
 -> RespondWorkflowTaskFailedRequest
 -> f RespondWorkflowTaskFailedRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskFailedRequest -> ByteString)
-> (RespondWorkflowTaskFailedRequest
    -> ByteString -> RespondWorkflowTaskFailedRequest)
-> Lens
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskFailedRequest -> ByteString
_RespondWorkflowTaskFailedRequest'taskToken
           (\ RespondWorkflowTaskFailedRequest
x__ ByteString
y__
              -> RespondWorkflowTaskFailedRequest
x__ {_RespondWorkflowTaskFailedRequest'taskToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskFailedRequest "cause" Proto.Temporal.Api.Enums.V1.FailedCause.WorkflowTaskFailedCause where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cause"
-> (WorkflowTaskFailedCause -> f WorkflowTaskFailedCause)
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
fieldOf Proxy# "cause"
_
    = ((WorkflowTaskFailedCause -> f WorkflowTaskFailedCause)
 -> RespondWorkflowTaskFailedRequest
 -> f RespondWorkflowTaskFailedRequest)
-> ((WorkflowTaskFailedCause -> f WorkflowTaskFailedCause)
    -> WorkflowTaskFailedCause -> f WorkflowTaskFailedCause)
-> (WorkflowTaskFailedCause -> f WorkflowTaskFailedCause)
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskFailedRequest -> WorkflowTaskFailedCause)
-> (RespondWorkflowTaskFailedRequest
    -> WorkflowTaskFailedCause -> RespondWorkflowTaskFailedRequest)
-> Lens
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     WorkflowTaskFailedCause
     WorkflowTaskFailedCause
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskFailedRequest -> WorkflowTaskFailedCause
_RespondWorkflowTaskFailedRequest'cause
           (\ RespondWorkflowTaskFailedRequest
x__ WorkflowTaskFailedCause
y__ -> RespondWorkflowTaskFailedRequest
x__ {_RespondWorkflowTaskFailedRequest'cause = y__}))
        (WorkflowTaskFailedCause -> f WorkflowTaskFailedCause)
-> WorkflowTaskFailedCause -> f WorkflowTaskFailedCause
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskFailedRequest "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> RespondWorkflowTaskFailedRequest
 -> f RespondWorkflowTaskFailedRequest)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskFailedRequest -> Maybe Failure)
-> (RespondWorkflowTaskFailedRequest
    -> Maybe Failure -> RespondWorkflowTaskFailedRequest)
-> Lens
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskFailedRequest -> Maybe Failure
_RespondWorkflowTaskFailedRequest'failure
           (\ RespondWorkflowTaskFailedRequest
x__ Maybe Failure
y__
              -> RespondWorkflowTaskFailedRequest
x__ {_RespondWorkflowTaskFailedRequest'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 RespondWorkflowTaskFailedRequest "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))
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> RespondWorkflowTaskFailedRequest
 -> f RespondWorkflowTaskFailedRequest)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskFailedRequest -> Maybe Failure)
-> (RespondWorkflowTaskFailedRequest
    -> Maybe Failure -> RespondWorkflowTaskFailedRequest)
-> Lens
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskFailedRequest -> Maybe Failure
_RespondWorkflowTaskFailedRequest'failure
           (\ RespondWorkflowTaskFailedRequest
x__ Maybe Failure
y__
              -> RespondWorkflowTaskFailedRequest
x__ {_RespondWorkflowTaskFailedRequest'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskFailedRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> RespondWorkflowTaskFailedRequest
 -> f RespondWorkflowTaskFailedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskFailedRequest -> Text)
-> (RespondWorkflowTaskFailedRequest
    -> Text -> RespondWorkflowTaskFailedRequest)
-> Lens
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskFailedRequest -> Text
_RespondWorkflowTaskFailedRequest'identity
           (\ RespondWorkflowTaskFailedRequest
x__ Text
y__
              -> RespondWorkflowTaskFailedRequest
x__ {_RespondWorkflowTaskFailedRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskFailedRequest "binaryChecksum" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "binaryChecksum"
-> (Text -> f Text)
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
fieldOf Proxy# "binaryChecksum"
_
    = ((Text -> f Text)
 -> RespondWorkflowTaskFailedRequest
 -> f RespondWorkflowTaskFailedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskFailedRequest -> Text)
-> (RespondWorkflowTaskFailedRequest
    -> Text -> RespondWorkflowTaskFailedRequest)
-> Lens
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskFailedRequest -> Text
_RespondWorkflowTaskFailedRequest'binaryChecksum
           (\ RespondWorkflowTaskFailedRequest
x__ Text
y__
              -> RespondWorkflowTaskFailedRequest
x__ {_RespondWorkflowTaskFailedRequest'binaryChecksum = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskFailedRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RespondWorkflowTaskFailedRequest
 -> f RespondWorkflowTaskFailedRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskFailedRequest -> Text)
-> (RespondWorkflowTaskFailedRequest
    -> Text -> RespondWorkflowTaskFailedRequest)
-> Lens
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskFailedRequest -> Text
_RespondWorkflowTaskFailedRequest'namespace
           (\ RespondWorkflowTaskFailedRequest
x__ Text
y__
              -> RespondWorkflowTaskFailedRequest
x__ {_RespondWorkflowTaskFailedRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskFailedRequest "messages" [Proto.Temporal.Api.Protocol.V1.Message.Message] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "messages"
-> ([Message] -> f [Message])
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
fieldOf Proxy# "messages"
_
    = ((Vector Message -> f (Vector Message))
 -> RespondWorkflowTaskFailedRequest
 -> f RespondWorkflowTaskFailedRequest)
-> (([Message] -> f [Message])
    -> Vector Message -> f (Vector Message))
-> ([Message] -> f [Message])
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskFailedRequest -> Vector Message)
-> (RespondWorkflowTaskFailedRequest
    -> Vector Message -> RespondWorkflowTaskFailedRequest)
-> Lens
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     (Vector Message)
     (Vector Message)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskFailedRequest -> Vector Message
_RespondWorkflowTaskFailedRequest'messages
           (\ RespondWorkflowTaskFailedRequest
x__ Vector Message
y__
              -> RespondWorkflowTaskFailedRequest
x__ {_RespondWorkflowTaskFailedRequest'messages = y__}))
        ((Vector Message -> [Message])
-> (Vector Message -> [Message] -> Vector Message)
-> Lens (Vector Message) (Vector Message) [Message] [Message]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Message -> [Message]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Message
_ [Message]
y__ -> [Message] -> Vector Message
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Message]
y__))
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskFailedRequest "vec'messages" (Data.Vector.Vector Proto.Temporal.Api.Protocol.V1.Message.Message) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'messages"
-> (Vector Message -> f (Vector Message))
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
fieldOf Proxy# "vec'messages"
_
    = ((Vector Message -> f (Vector Message))
 -> RespondWorkflowTaskFailedRequest
 -> f RespondWorkflowTaskFailedRequest)
-> ((Vector Message -> f (Vector Message))
    -> Vector Message -> f (Vector Message))
-> (Vector Message -> f (Vector Message))
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskFailedRequest -> Vector Message)
-> (RespondWorkflowTaskFailedRequest
    -> Vector Message -> RespondWorkflowTaskFailedRequest)
-> Lens
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     (Vector Message)
     (Vector Message)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskFailedRequest -> Vector Message
_RespondWorkflowTaskFailedRequest'messages
           (\ RespondWorkflowTaskFailedRequest
x__ Vector Message
y__
              -> RespondWorkflowTaskFailedRequest
x__ {_RespondWorkflowTaskFailedRequest'messages = y__}))
        (Vector Message -> f (Vector Message))
-> Vector Message -> f (Vector Message)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskFailedRequest "workerVersion" Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerVersion"
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
fieldOf Proxy# "workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> RespondWorkflowTaskFailedRequest
 -> f RespondWorkflowTaskFailedRequest)
-> ((WorkerVersionStamp -> f WorkerVersionStamp)
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskFailedRequest -> Maybe WorkerVersionStamp)
-> (RespondWorkflowTaskFailedRequest
    -> Maybe WorkerVersionStamp -> RespondWorkflowTaskFailedRequest)
-> Lens
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskFailedRequest -> Maybe WorkerVersionStamp
_RespondWorkflowTaskFailedRequest'workerVersion
           (\ RespondWorkflowTaskFailedRequest
x__ Maybe WorkerVersionStamp
y__
              -> RespondWorkflowTaskFailedRequest
x__ {_RespondWorkflowTaskFailedRequest'workerVersion = y__}))
        (WorkerVersionStamp
-> Lens' (Maybe WorkerVersionStamp) WorkerVersionStamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkerVersionStamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField RespondWorkflowTaskFailedRequest "maybe'workerVersion" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workerVersion"
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
fieldOf Proxy# "maybe'workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> RespondWorkflowTaskFailedRequest
 -> f RespondWorkflowTaskFailedRequest)
-> ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> RespondWorkflowTaskFailedRequest
-> f RespondWorkflowTaskFailedRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RespondWorkflowTaskFailedRequest -> Maybe WorkerVersionStamp)
-> (RespondWorkflowTaskFailedRequest
    -> Maybe WorkerVersionStamp -> RespondWorkflowTaskFailedRequest)
-> Lens
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RespondWorkflowTaskFailedRequest -> Maybe WorkerVersionStamp
_RespondWorkflowTaskFailedRequest'workerVersion
           (\ RespondWorkflowTaskFailedRequest
x__ Maybe WorkerVersionStamp
y__
              -> RespondWorkflowTaskFailedRequest
x__ {_RespondWorkflowTaskFailedRequest'workerVersion = y__}))
        (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RespondWorkflowTaskFailedRequest where
  messageName :: Proxy RespondWorkflowTaskFailedRequest -> Text
messageName Proxy RespondWorkflowTaskFailedRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondWorkflowTaskFailedRequest"
  packedMessageDescriptor :: Proxy RespondWorkflowTaskFailedRequest -> ByteString
packedMessageDescriptor Proxy RespondWorkflowTaskFailedRequest
_
    = ByteString
"\n\
      \ RespondWorkflowTaskFailedRequest\DC2\GS\n\
      \\n\
      \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2D\n\
      \\ENQcause\CAN\STX \SOH(\SO2..temporal.api.enums.v1.WorkflowTaskFailedCauseR\ENQcause\DC2:\n\
      \\afailure\CAN\ETX \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2\SUB\n\
      \\bidentity\CAN\EOT \SOH(\tR\bidentity\DC2'\n\
      \\SIbinary_checksum\CAN\ENQ \SOH(\tR\SObinaryChecksum\DC2\FS\n\
      \\tnamespace\CAN\ACK \SOH(\tR\tnamespace\DC2=\n\
      \\bmessages\CAN\a \ETX(\v2!.temporal.api.protocol.v1.MessageR\bmessages\DC2Q\n\
      \\SOworker_version\CAN\b \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion"
  packedFileDescriptor :: Proxy RespondWorkflowTaskFailedRequest -> ByteString
packedFileDescriptor Proxy RespondWorkflowTaskFailedRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondWorkflowTaskFailedRequest)
fieldsByTag
    = let
        taskToken__field_descriptor :: FieldDescriptor RespondWorkflowTaskFailedRequest
taskToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor RespondWorkflowTaskFailedRequest ByteString
-> FieldDescriptor RespondWorkflowTaskFailedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     ByteString
     ByteString
-> FieldAccessor RespondWorkflowTaskFailedRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskFailedRequest
        cause__field_descriptor :: FieldDescriptor RespondWorkflowTaskFailedRequest
cause__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowTaskFailedCause
-> FieldAccessor
     RespondWorkflowTaskFailedRequest WorkflowTaskFailedCause
-> FieldDescriptor RespondWorkflowTaskFailedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cause"
              (ScalarField WorkflowTaskFailedCause
-> FieldTypeDescriptor WorkflowTaskFailedCause
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField WorkflowTaskFailedCause
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.FailedCause.WorkflowTaskFailedCause)
              (WireDefault WorkflowTaskFailedCause
-> Lens
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     WorkflowTaskFailedCause
     WorkflowTaskFailedCause
-> FieldAccessor
     RespondWorkflowTaskFailedRequest WorkflowTaskFailedCause
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault WorkflowTaskFailedCause
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cause")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskFailedRequest
        failure__field_descriptor :: FieldDescriptor RespondWorkflowTaskFailedRequest
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor RespondWorkflowTaskFailedRequest Failure
-> FieldDescriptor RespondWorkflowTaskFailedRequest
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
  RespondWorkflowTaskFailedRequest
  RespondWorkflowTaskFailedRequest
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor RespondWorkflowTaskFailedRequest 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 RespondWorkflowTaskFailedRequest
        identity__field_descriptor :: FieldDescriptor RespondWorkflowTaskFailedRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondWorkflowTaskFailedRequest Text
-> FieldDescriptor RespondWorkflowTaskFailedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     Text
     Text
-> FieldAccessor RespondWorkflowTaskFailedRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskFailedRequest
        binaryChecksum__field_descriptor :: FieldDescriptor RespondWorkflowTaskFailedRequest
binaryChecksum__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondWorkflowTaskFailedRequest Text
-> FieldDescriptor RespondWorkflowTaskFailedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"binary_checksum"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     Text
     Text
-> FieldAccessor RespondWorkflowTaskFailedRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"binaryChecksum")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskFailedRequest
        namespace__field_descriptor :: FieldDescriptor RespondWorkflowTaskFailedRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor RespondWorkflowTaskFailedRequest Text
-> FieldDescriptor RespondWorkflowTaskFailedRequest
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
     RespondWorkflowTaskFailedRequest
     RespondWorkflowTaskFailedRequest
     Text
     Text
-> FieldAccessor RespondWorkflowTaskFailedRequest 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 RespondWorkflowTaskFailedRequest
        messages__field_descriptor :: FieldDescriptor RespondWorkflowTaskFailedRequest
messages__field_descriptor
          = String
-> FieldTypeDescriptor Message
-> FieldAccessor RespondWorkflowTaskFailedRequest Message
-> FieldDescriptor RespondWorkflowTaskFailedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"messages"
              (MessageOrGroup -> FieldTypeDescriptor Message
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Protocol.V1.Message.Message)
              (Packing
-> Lens' RespondWorkflowTaskFailedRequest [Message]
-> FieldAccessor RespondWorkflowTaskFailedRequest Message
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 @"messages")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskFailedRequest
        workerVersion__field_descriptor :: FieldDescriptor RespondWorkflowTaskFailedRequest
workerVersion__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionStamp
-> FieldAccessor
     RespondWorkflowTaskFailedRequest WorkerVersionStamp
-> FieldDescriptor RespondWorkflowTaskFailedRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_version"
              (MessageOrGroup -> FieldTypeDescriptor WorkerVersionStamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)
              (Lens
  RespondWorkflowTaskFailedRequest
  RespondWorkflowTaskFailedRequest
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> FieldAccessor
     RespondWorkflowTaskFailedRequest WorkerVersionStamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workerVersion")) ::
              Data.ProtoLens.FieldDescriptor RespondWorkflowTaskFailedRequest
      in
        [(Tag, FieldDescriptor RespondWorkflowTaskFailedRequest)]
-> Map Tag (FieldDescriptor RespondWorkflowTaskFailedRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor RespondWorkflowTaskFailedRequest
taskToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor RespondWorkflowTaskFailedRequest
cause__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor RespondWorkflowTaskFailedRequest
failure__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor RespondWorkflowTaskFailedRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor RespondWorkflowTaskFailedRequest
binaryChecksum__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor RespondWorkflowTaskFailedRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor RespondWorkflowTaskFailedRequest
messages__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor RespondWorkflowTaskFailedRequest
workerVersion__field_descriptor)]
  unknownFields :: Lens' RespondWorkflowTaskFailedRequest FieldSet
unknownFields
    = (RespondWorkflowTaskFailedRequest -> FieldSet)
-> (RespondWorkflowTaskFailedRequest
    -> FieldSet -> RespondWorkflowTaskFailedRequest)
-> Lens' RespondWorkflowTaskFailedRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondWorkflowTaskFailedRequest -> FieldSet
_RespondWorkflowTaskFailedRequest'_unknownFields
        (\ RespondWorkflowTaskFailedRequest
x__ FieldSet
y__
           -> RespondWorkflowTaskFailedRequest
x__ {_RespondWorkflowTaskFailedRequest'_unknownFields = y__})
  defMessage :: RespondWorkflowTaskFailedRequest
defMessage
    = RespondWorkflowTaskFailedRequest'_constructor
        {_RespondWorkflowTaskFailedRequest'taskToken :: ByteString
_RespondWorkflowTaskFailedRequest'taskToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondWorkflowTaskFailedRequest'cause :: WorkflowTaskFailedCause
_RespondWorkflowTaskFailedRequest'cause = WorkflowTaskFailedCause
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondWorkflowTaskFailedRequest'failure :: Maybe Failure
_RespondWorkflowTaskFailedRequest'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _RespondWorkflowTaskFailedRequest'identity :: Text
_RespondWorkflowTaskFailedRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondWorkflowTaskFailedRequest'binaryChecksum :: Text
_RespondWorkflowTaskFailedRequest'binaryChecksum = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondWorkflowTaskFailedRequest'namespace :: Text
_RespondWorkflowTaskFailedRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RespondWorkflowTaskFailedRequest'messages :: Vector Message
_RespondWorkflowTaskFailedRequest'messages = Vector Message
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _RespondWorkflowTaskFailedRequest'workerVersion :: Maybe WorkerVersionStamp
_RespondWorkflowTaskFailedRequest'workerVersion = Maybe WorkerVersionStamp
forall a. Maybe a
Prelude.Nothing,
         _RespondWorkflowTaskFailedRequest'_unknownFields :: FieldSet
_RespondWorkflowTaskFailedRequest'_unknownFields = []}
  parseMessage :: Parser RespondWorkflowTaskFailedRequest
parseMessage
    = let
        loop ::
          RespondWorkflowTaskFailedRequest
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Protocol.V1.Message.Message
             -> Data.ProtoLens.Encoding.Bytes.Parser RespondWorkflowTaskFailedRequest
        loop :: RespondWorkflowTaskFailedRequest
-> Growing Vector RealWorld Message
-> Parser RespondWorkflowTaskFailedRequest
loop RespondWorkflowTaskFailedRequest
x Growing Vector RealWorld Message
mutable'messages
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'messages <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                              mutable'messages)
                      (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'messages") frozen'messages x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"task_token"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskToken") y x)
                                  mutable'messages
                        Word64
16
                          -> do y <- Parser WorkflowTaskFailedCause
-> String -> Parser WorkflowTaskFailedCause
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> WorkflowTaskFailedCause)
-> Parser Int -> Parser WorkflowTaskFailedCause
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> WorkflowTaskFailedCause
forall a. Enum a => Int -> a
Prelude.toEnum
                                          ((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                             Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                             Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
                                       String
"cause"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"cause") y x)
                                  mutable'messages
                        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
"failure"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"failure") y x)
                                  mutable'messages
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                                  mutable'messages
                        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
"binary_checksum"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"binaryChecksum") y x)
                                  mutable'messages
                        Word64
50
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                                  mutable'messages
                        Word64
58
                          -> do !y <- Parser Message -> String -> Parser Message
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"messages"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'messages y)
                                loop x v
                        Word64
66
                          -> do y <- Parser WorkerVersionStamp -> String -> Parser WorkerVersionStamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"worker_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerVersion") y x)
                                  mutable'messages
                        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'messages
      in
        Parser RespondWorkflowTaskFailedRequest
-> String -> Parser RespondWorkflowTaskFailedRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'messages <- IO (Growing Vector RealWorld Message)
-> Parser (Growing Vector RealWorld Message)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                    IO (Growing Vector RealWorld Message)
IO (Growing Vector (PrimState IO) Message)
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'messages)
          String
"RespondWorkflowTaskFailedRequest"
  buildMessage :: RespondWorkflowTaskFailedRequest -> Builder
buildMessage
    = \ RespondWorkflowTaskFailedRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: ByteString
_v = FoldLike
  ByteString
  RespondWorkflowTaskFailedRequest
  RespondWorkflowTaskFailedRequest
  ByteString
  ByteString
-> RespondWorkflowTaskFailedRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskToken") RespondWorkflowTaskFailedRequest
_x
              in
                if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
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
bs
                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         ByteString
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: WorkflowTaskFailedCause
_v = FoldLike
  WorkflowTaskFailedCause
  RespondWorkflowTaskFailedRequest
  RespondWorkflowTaskFailedRequest
  WorkflowTaskFailedCause
  WorkflowTaskFailedCause
-> RespondWorkflowTaskFailedRequest -> WorkflowTaskFailedCause
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cause") RespondWorkflowTaskFailedRequest
_x
                 in
                   if WorkflowTaskFailedCause -> WorkflowTaskFailedCause -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) WorkflowTaskFailedCause
_v WorkflowTaskFailedCause
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
16)
                         ((Int -> Builder)
-> (WorkflowTaskFailedCause -> Int)
-> WorkflowTaskFailedCause
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            ((Word64 -> Builder) -> (Int -> Word64) -> Int -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
                            WorkflowTaskFailedCause -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum WorkflowTaskFailedCause
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe Failure)
  RespondWorkflowTaskFailedRequest
  RespondWorkflowTaskFailedRequest
  (Maybe Failure)
  (Maybe Failure)
-> RespondWorkflowTaskFailedRequest -> 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") RespondWorkflowTaskFailedRequest
_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
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))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Text
_v = FoldLike
  Text
  RespondWorkflowTaskFailedRequest
  RespondWorkflowTaskFailedRequest
  Text
  Text
-> RespondWorkflowTaskFailedRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") RespondWorkflowTaskFailedRequest
_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
  RespondWorkflowTaskFailedRequest
  RespondWorkflowTaskFailedRequest
  Text
  Text
-> RespondWorkflowTaskFailedRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                  (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"binaryChecksum") RespondWorkflowTaskFailedRequest
_x
                          in
                            if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                  ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     (\ ByteString
bs
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                     Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v = FoldLike
  Text
  RespondWorkflowTaskFailedRequest
  RespondWorkflowTaskFailedRequest
  Text
  Text
-> RespondWorkflowTaskFailedRequest -> 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") RespondWorkflowTaskFailedRequest
_x
                             in
                               if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                     ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        (\ ByteString
bs
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               ((Message -> Builder) -> Vector Message -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                  (\ Message
_v
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                          ((ByteString -> Builder)
-> (Message -> ByteString) -> Message -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                             (\ ByteString
bs
                                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                           (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                             Message -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Message
_v))
                                  (FoldLike
  (Vector Message)
  RespondWorkflowTaskFailedRequest
  RespondWorkflowTaskFailedRequest
  (Vector Message)
  (Vector Message)
-> RespondWorkflowTaskFailedRequest -> Vector Message
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'messages") RespondWorkflowTaskFailedRequest
_x))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (case
                                       FoldLike
  (Maybe WorkerVersionStamp)
  RespondWorkflowTaskFailedRequest
  RespondWorkflowTaskFailedRequest
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> RespondWorkflowTaskFailedRequest -> Maybe WorkerVersionStamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workerVersion") RespondWorkflowTaskFailedRequest
_x
                                   of
                                     Maybe WorkerVersionStamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                     (Prelude.Just WorkerVersionStamp
_v)
                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                                            ((ByteString -> Builder)
-> (WorkerVersionStamp -> ByteString)
-> WorkerVersionStamp
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                               (\ ByteString
bs
                                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                             (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                               WorkerVersionStamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkerVersionStamp
_v))
                                  (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                     (FoldLike
  FieldSet
  RespondWorkflowTaskFailedRequest
  RespondWorkflowTaskFailedRequest
  FieldSet
  FieldSet
-> RespondWorkflowTaskFailedRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondWorkflowTaskFailedRequest
  RespondWorkflowTaskFailedRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondWorkflowTaskFailedRequest FieldSet
Data.ProtoLens.unknownFields RespondWorkflowTaskFailedRequest
_x)))))))))
instance Control.DeepSeq.NFData RespondWorkflowTaskFailedRequest where
  rnf :: RespondWorkflowTaskFailedRequest -> ()
rnf
    = \ RespondWorkflowTaskFailedRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondWorkflowTaskFailedRequest -> FieldSet
_RespondWorkflowTaskFailedRequest'_unknownFields RespondWorkflowTaskFailedRequest
x__)
             (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RespondWorkflowTaskFailedRequest -> ByteString
_RespondWorkflowTaskFailedRequest'taskToken RespondWorkflowTaskFailedRequest
x__)
                (WorkflowTaskFailedCause -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RespondWorkflowTaskFailedRequest -> WorkflowTaskFailedCause
_RespondWorkflowTaskFailedRequest'cause RespondWorkflowTaskFailedRequest
x__)
                   (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RespondWorkflowTaskFailedRequest -> Maybe Failure
_RespondWorkflowTaskFailedRequest'failure RespondWorkflowTaskFailedRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RespondWorkflowTaskFailedRequest -> Text
_RespondWorkflowTaskFailedRequest'identity RespondWorkflowTaskFailedRequest
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RespondWorkflowTaskFailedRequest -> Text
_RespondWorkflowTaskFailedRequest'binaryChecksum RespondWorkflowTaskFailedRequest
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (RespondWorkflowTaskFailedRequest -> Text
_RespondWorkflowTaskFailedRequest'namespace RespondWorkflowTaskFailedRequest
x__)
                               (Vector Message -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (RespondWorkflowTaskFailedRequest -> Vector Message
_RespondWorkflowTaskFailedRequest'messages RespondWorkflowTaskFailedRequest
x__)
                                  (Maybe WorkerVersionStamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (RespondWorkflowTaskFailedRequest -> Maybe WorkerVersionStamp
_RespondWorkflowTaskFailedRequest'workerVersion RespondWorkflowTaskFailedRequest
x__)
                                     ()))))))))
{- | Fields :
      -}
data RespondWorkflowTaskFailedResponse
  = RespondWorkflowTaskFailedResponse'_constructor {RespondWorkflowTaskFailedResponse -> FieldSet
_RespondWorkflowTaskFailedResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Bool
(RespondWorkflowTaskFailedResponse
 -> RespondWorkflowTaskFailedResponse -> Bool)
-> (RespondWorkflowTaskFailedResponse
    -> RespondWorkflowTaskFailedResponse -> Bool)
-> Eq RespondWorkflowTaskFailedResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Bool
== :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Bool
$c/= :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Bool
/= :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Bool
Prelude.Eq, Eq RespondWorkflowTaskFailedResponse
Eq RespondWorkflowTaskFailedResponse =>
(RespondWorkflowTaskFailedResponse
 -> RespondWorkflowTaskFailedResponse -> Ordering)
-> (RespondWorkflowTaskFailedResponse
    -> RespondWorkflowTaskFailedResponse -> Bool)
-> (RespondWorkflowTaskFailedResponse
    -> RespondWorkflowTaskFailedResponse -> Bool)
-> (RespondWorkflowTaskFailedResponse
    -> RespondWorkflowTaskFailedResponse -> Bool)
-> (RespondWorkflowTaskFailedResponse
    -> RespondWorkflowTaskFailedResponse -> Bool)
-> (RespondWorkflowTaskFailedResponse
    -> RespondWorkflowTaskFailedResponse
    -> RespondWorkflowTaskFailedResponse)
-> (RespondWorkflowTaskFailedResponse
    -> RespondWorkflowTaskFailedResponse
    -> RespondWorkflowTaskFailedResponse)
-> Ord RespondWorkflowTaskFailedResponse
RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Bool
RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Ordering
RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse
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 :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Ordering
compare :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Ordering
$c< :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Bool
< :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Bool
$c<= :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Bool
<= :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Bool
$c> :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Bool
> :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Bool
$c>= :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Bool
>= :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse -> Bool
$cmax :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse
max :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse
$cmin :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse
min :: RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse
-> RespondWorkflowTaskFailedResponse
Prelude.Ord)
instance Prelude.Show RespondWorkflowTaskFailedResponse where
  showsPrec :: Int -> RespondWorkflowTaskFailedResponse -> ShowS
showsPrec Int
_ RespondWorkflowTaskFailedResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RespondWorkflowTaskFailedResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RespondWorkflowTaskFailedResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message RespondWorkflowTaskFailedResponse where
  messageName :: Proxy RespondWorkflowTaskFailedResponse -> Text
messageName Proxy RespondWorkflowTaskFailedResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.RespondWorkflowTaskFailedResponse"
  packedMessageDescriptor :: Proxy RespondWorkflowTaskFailedResponse -> ByteString
packedMessageDescriptor Proxy RespondWorkflowTaskFailedResponse
_
    = ByteString
"\n\
      \!RespondWorkflowTaskFailedResponse"
  packedFileDescriptor :: Proxy RespondWorkflowTaskFailedResponse -> ByteString
packedFileDescriptor Proxy RespondWorkflowTaskFailedResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor RespondWorkflowTaskFailedResponse)
fieldsByTag = let in [(Tag, FieldDescriptor RespondWorkflowTaskFailedResponse)]
-> Map Tag (FieldDescriptor RespondWorkflowTaskFailedResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' RespondWorkflowTaskFailedResponse FieldSet
unknownFields
    = (RespondWorkflowTaskFailedResponse -> FieldSet)
-> (RespondWorkflowTaskFailedResponse
    -> FieldSet -> RespondWorkflowTaskFailedResponse)
-> Lens' RespondWorkflowTaskFailedResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RespondWorkflowTaskFailedResponse -> FieldSet
_RespondWorkflowTaskFailedResponse'_unknownFields
        (\ RespondWorkflowTaskFailedResponse
x__ FieldSet
y__
           -> RespondWorkflowTaskFailedResponse
x__ {_RespondWorkflowTaskFailedResponse'_unknownFields = y__})
  defMessage :: RespondWorkflowTaskFailedResponse
defMessage
    = RespondWorkflowTaskFailedResponse'_constructor
        {_RespondWorkflowTaskFailedResponse'_unknownFields :: FieldSet
_RespondWorkflowTaskFailedResponse'_unknownFields = []}
  parseMessage :: Parser RespondWorkflowTaskFailedResponse
parseMessage
    = let
        loop ::
          RespondWorkflowTaskFailedResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser RespondWorkflowTaskFailedResponse
        loop :: RespondWorkflowTaskFailedResponse
-> Parser RespondWorkflowTaskFailedResponse
loop RespondWorkflowTaskFailedResponse
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 RespondWorkflowTaskFailedResponse
-> String -> Parser RespondWorkflowTaskFailedResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RespondWorkflowTaskFailedResponse
-> Parser RespondWorkflowTaskFailedResponse
loop RespondWorkflowTaskFailedResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RespondWorkflowTaskFailedResponse"
  buildMessage :: RespondWorkflowTaskFailedResponse -> Builder
buildMessage
    = \ RespondWorkflowTaskFailedResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  RespondWorkflowTaskFailedResponse
  RespondWorkflowTaskFailedResponse
  FieldSet
  FieldSet
-> RespondWorkflowTaskFailedResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RespondWorkflowTaskFailedResponse
  RespondWorkflowTaskFailedResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' RespondWorkflowTaskFailedResponse FieldSet
Data.ProtoLens.unknownFields RespondWorkflowTaskFailedResponse
_x)
instance Control.DeepSeq.NFData RespondWorkflowTaskFailedResponse where
  rnf :: RespondWorkflowTaskFailedResponse -> ()
rnf
    = \ RespondWorkflowTaskFailedResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RespondWorkflowTaskFailedResponse -> FieldSet
_RespondWorkflowTaskFailedResponse'_unknownFields RespondWorkflowTaskFailedResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' ScanWorkflowExecutionsRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.pageSize' @:: Lens' ScanWorkflowExecutionsRequest Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ScanWorkflowExecutionsRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.query' @:: Lens' ScanWorkflowExecutionsRequest Data.Text.Text@ -}
data ScanWorkflowExecutionsRequest
  = ScanWorkflowExecutionsRequest'_constructor {ScanWorkflowExecutionsRequest -> Text
_ScanWorkflowExecutionsRequest'namespace :: !Data.Text.Text,
                                                ScanWorkflowExecutionsRequest -> Int32
_ScanWorkflowExecutionsRequest'pageSize :: !Data.Int.Int32,
                                                ScanWorkflowExecutionsRequest -> ByteString
_ScanWorkflowExecutionsRequest'nextPageToken :: !Data.ByteString.ByteString,
                                                ScanWorkflowExecutionsRequest -> Text
_ScanWorkflowExecutionsRequest'query :: !Data.Text.Text,
                                                ScanWorkflowExecutionsRequest -> FieldSet
_ScanWorkflowExecutionsRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Bool
(ScanWorkflowExecutionsRequest
 -> ScanWorkflowExecutionsRequest -> Bool)
-> (ScanWorkflowExecutionsRequest
    -> ScanWorkflowExecutionsRequest -> Bool)
-> Eq ScanWorkflowExecutionsRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Bool
== :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Bool
$c/= :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Bool
/= :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Bool
Prelude.Eq, Eq ScanWorkflowExecutionsRequest
Eq ScanWorkflowExecutionsRequest =>
(ScanWorkflowExecutionsRequest
 -> ScanWorkflowExecutionsRequest -> Ordering)
-> (ScanWorkflowExecutionsRequest
    -> ScanWorkflowExecutionsRequest -> Bool)
-> (ScanWorkflowExecutionsRequest
    -> ScanWorkflowExecutionsRequest -> Bool)
-> (ScanWorkflowExecutionsRequest
    -> ScanWorkflowExecutionsRequest -> Bool)
-> (ScanWorkflowExecutionsRequest
    -> ScanWorkflowExecutionsRequest -> Bool)
-> (ScanWorkflowExecutionsRequest
    -> ScanWorkflowExecutionsRequest -> ScanWorkflowExecutionsRequest)
-> (ScanWorkflowExecutionsRequest
    -> ScanWorkflowExecutionsRequest -> ScanWorkflowExecutionsRequest)
-> Ord ScanWorkflowExecutionsRequest
ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Bool
ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Ordering
ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> ScanWorkflowExecutionsRequest
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 :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Ordering
compare :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Ordering
$c< :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Bool
< :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Bool
$c<= :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Bool
<= :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Bool
$c> :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Bool
> :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Bool
$c>= :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Bool
>= :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> Bool
$cmax :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> ScanWorkflowExecutionsRequest
max :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> ScanWorkflowExecutionsRequest
$cmin :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> ScanWorkflowExecutionsRequest
min :: ScanWorkflowExecutionsRequest
-> ScanWorkflowExecutionsRequest -> ScanWorkflowExecutionsRequest
Prelude.Ord)
instance Prelude.Show ScanWorkflowExecutionsRequest where
  showsPrec :: Int -> ScanWorkflowExecutionsRequest -> ShowS
showsPrec Int
_ ScanWorkflowExecutionsRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ScanWorkflowExecutionsRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ScanWorkflowExecutionsRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ScanWorkflowExecutionsRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ScanWorkflowExecutionsRequest
-> f ScanWorkflowExecutionsRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ScanWorkflowExecutionsRequest
 -> f ScanWorkflowExecutionsRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ScanWorkflowExecutionsRequest
-> f ScanWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScanWorkflowExecutionsRequest -> Text)
-> (ScanWorkflowExecutionsRequest
    -> Text -> ScanWorkflowExecutionsRequest)
-> Lens
     ScanWorkflowExecutionsRequest
     ScanWorkflowExecutionsRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScanWorkflowExecutionsRequest -> Text
_ScanWorkflowExecutionsRequest'namespace
           (\ ScanWorkflowExecutionsRequest
x__ Text
y__
              -> ScanWorkflowExecutionsRequest
x__ {_ScanWorkflowExecutionsRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScanWorkflowExecutionsRequest "pageSize" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "pageSize"
-> (Int32 -> f Int32)
-> ScanWorkflowExecutionsRequest
-> f ScanWorkflowExecutionsRequest
fieldOf Proxy# "pageSize"
_
    = ((Int32 -> f Int32)
 -> ScanWorkflowExecutionsRequest
 -> f ScanWorkflowExecutionsRequest)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ScanWorkflowExecutionsRequest
-> f ScanWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScanWorkflowExecutionsRequest -> Int32)
-> (ScanWorkflowExecutionsRequest
    -> Int32 -> ScanWorkflowExecutionsRequest)
-> Lens
     ScanWorkflowExecutionsRequest
     ScanWorkflowExecutionsRequest
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScanWorkflowExecutionsRequest -> Int32
_ScanWorkflowExecutionsRequest'pageSize
           (\ ScanWorkflowExecutionsRequest
x__ Int32
y__ -> ScanWorkflowExecutionsRequest
x__ {_ScanWorkflowExecutionsRequest'pageSize = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScanWorkflowExecutionsRequest "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ScanWorkflowExecutionsRequest
-> f ScanWorkflowExecutionsRequest
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ScanWorkflowExecutionsRequest
 -> f ScanWorkflowExecutionsRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ScanWorkflowExecutionsRequest
-> f ScanWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScanWorkflowExecutionsRequest -> ByteString)
-> (ScanWorkflowExecutionsRequest
    -> ByteString -> ScanWorkflowExecutionsRequest)
-> Lens
     ScanWorkflowExecutionsRequest
     ScanWorkflowExecutionsRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScanWorkflowExecutionsRequest -> ByteString
_ScanWorkflowExecutionsRequest'nextPageToken
           (\ ScanWorkflowExecutionsRequest
x__ ByteString
y__
              -> ScanWorkflowExecutionsRequest
x__ {_ScanWorkflowExecutionsRequest'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScanWorkflowExecutionsRequest "query" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "query"
-> (Text -> f Text)
-> ScanWorkflowExecutionsRequest
-> f ScanWorkflowExecutionsRequest
fieldOf Proxy# "query"
_
    = ((Text -> f Text)
 -> ScanWorkflowExecutionsRequest
 -> f ScanWorkflowExecutionsRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ScanWorkflowExecutionsRequest
-> f ScanWorkflowExecutionsRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScanWorkflowExecutionsRequest -> Text)
-> (ScanWorkflowExecutionsRequest
    -> Text -> ScanWorkflowExecutionsRequest)
-> Lens
     ScanWorkflowExecutionsRequest
     ScanWorkflowExecutionsRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScanWorkflowExecutionsRequest -> Text
_ScanWorkflowExecutionsRequest'query
           (\ ScanWorkflowExecutionsRequest
x__ Text
y__ -> ScanWorkflowExecutionsRequest
x__ {_ScanWorkflowExecutionsRequest'query = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ScanWorkflowExecutionsRequest where
  messageName :: Proxy ScanWorkflowExecutionsRequest -> Text
messageName Proxy ScanWorkflowExecutionsRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ScanWorkflowExecutionsRequest"
  packedMessageDescriptor :: Proxy ScanWorkflowExecutionsRequest -> ByteString
packedMessageDescriptor Proxy ScanWorkflowExecutionsRequest
_
    = ByteString
"\n\
      \\GSScanWorkflowExecutionsRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\ESC\n\
      \\tpage_size\CAN\STX \SOH(\ENQR\bpageSize\DC2&\n\
      \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\DC2\DC4\n\
      \\ENQquery\CAN\EOT \SOH(\tR\ENQquery"
  packedFileDescriptor :: Proxy ScanWorkflowExecutionsRequest -> ByteString
packedFileDescriptor Proxy ScanWorkflowExecutionsRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ScanWorkflowExecutionsRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor ScanWorkflowExecutionsRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ScanWorkflowExecutionsRequest Text
-> FieldDescriptor ScanWorkflowExecutionsRequest
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
     ScanWorkflowExecutionsRequest
     ScanWorkflowExecutionsRequest
     Text
     Text
-> FieldAccessor ScanWorkflowExecutionsRequest 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 ScanWorkflowExecutionsRequest
        pageSize__field_descriptor :: FieldDescriptor ScanWorkflowExecutionsRequest
pageSize__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ScanWorkflowExecutionsRequest Int32
-> FieldDescriptor ScanWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"page_size"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     ScanWorkflowExecutionsRequest
     ScanWorkflowExecutionsRequest
     Int32
     Int32
-> FieldAccessor ScanWorkflowExecutionsRequest Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pageSize")) ::
              Data.ProtoLens.FieldDescriptor ScanWorkflowExecutionsRequest
        nextPageToken__field_descriptor :: FieldDescriptor ScanWorkflowExecutionsRequest
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ScanWorkflowExecutionsRequest ByteString
-> FieldDescriptor ScanWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ScanWorkflowExecutionsRequest
     ScanWorkflowExecutionsRequest
     ByteString
     ByteString
-> FieldAccessor ScanWorkflowExecutionsRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ScanWorkflowExecutionsRequest
        query__field_descriptor :: FieldDescriptor ScanWorkflowExecutionsRequest
query__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ScanWorkflowExecutionsRequest Text
-> FieldDescriptor ScanWorkflowExecutionsRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"query"
              (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
     ScanWorkflowExecutionsRequest
     ScanWorkflowExecutionsRequest
     Text
     Text
-> FieldAccessor ScanWorkflowExecutionsRequest 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 @"query")) ::
              Data.ProtoLens.FieldDescriptor ScanWorkflowExecutionsRequest
      in
        [(Tag, FieldDescriptor ScanWorkflowExecutionsRequest)]
-> Map Tag (FieldDescriptor ScanWorkflowExecutionsRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ScanWorkflowExecutionsRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ScanWorkflowExecutionsRequest
pageSize__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ScanWorkflowExecutionsRequest
nextPageToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ScanWorkflowExecutionsRequest
query__field_descriptor)]
  unknownFields :: Lens' ScanWorkflowExecutionsRequest FieldSet
unknownFields
    = (ScanWorkflowExecutionsRequest -> FieldSet)
-> (ScanWorkflowExecutionsRequest
    -> FieldSet -> ScanWorkflowExecutionsRequest)
-> Lens' ScanWorkflowExecutionsRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ScanWorkflowExecutionsRequest -> FieldSet
_ScanWorkflowExecutionsRequest'_unknownFields
        (\ ScanWorkflowExecutionsRequest
x__ FieldSet
y__
           -> ScanWorkflowExecutionsRequest
x__ {_ScanWorkflowExecutionsRequest'_unknownFields = y__})
  defMessage :: ScanWorkflowExecutionsRequest
defMessage
    = ScanWorkflowExecutionsRequest'_constructor
        {_ScanWorkflowExecutionsRequest'namespace :: Text
_ScanWorkflowExecutionsRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScanWorkflowExecutionsRequest'pageSize :: Int32
_ScanWorkflowExecutionsRequest'pageSize = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScanWorkflowExecutionsRequest'nextPageToken :: ByteString
_ScanWorkflowExecutionsRequest'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScanWorkflowExecutionsRequest'query :: Text
_ScanWorkflowExecutionsRequest'query = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScanWorkflowExecutionsRequest'_unknownFields :: FieldSet
_ScanWorkflowExecutionsRequest'_unknownFields = []}
  parseMessage :: Parser ScanWorkflowExecutionsRequest
parseMessage
    = let
        loop ::
          ScanWorkflowExecutionsRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser ScanWorkflowExecutionsRequest
        loop :: ScanWorkflowExecutionsRequest
-> Parser ScanWorkflowExecutionsRequest
loop ScanWorkflowExecutionsRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
16
                          -> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"page_size"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"pageSize") y x)
                        Word64
26
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"query"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"query") 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 ScanWorkflowExecutionsRequest
-> String -> Parser ScanWorkflowExecutionsRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ScanWorkflowExecutionsRequest
-> Parser ScanWorkflowExecutionsRequest
loop ScanWorkflowExecutionsRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ScanWorkflowExecutionsRequest"
  buildMessage :: ScanWorkflowExecutionsRequest -> Builder
buildMessage
    = \ ScanWorkflowExecutionsRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ScanWorkflowExecutionsRequest
  ScanWorkflowExecutionsRequest
  Text
  Text
-> ScanWorkflowExecutionsRequest -> 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") ScanWorkflowExecutionsRequest
_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 :: Int32
_v = FoldLike
  Int32
  ScanWorkflowExecutionsRequest
  ScanWorkflowExecutionsRequest
  Int32
  Int32
-> ScanWorkflowExecutionsRequest -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"pageSize") ScanWorkflowExecutionsRequest
_x
                 in
                   if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
16)
                         ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: ByteString
_v
                        = FoldLike
  ByteString
  ScanWorkflowExecutionsRequest
  ScanWorkflowExecutionsRequest
  ByteString
  ByteString
-> ScanWorkflowExecutionsRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ScanWorkflowExecutionsRequest
_x
                    in
                      if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
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
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               ByteString
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Text
_v = FoldLike
  Text
  ScanWorkflowExecutionsRequest
  ScanWorkflowExecutionsRequest
  Text
  Text
-> ScanWorkflowExecutionsRequest -> 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 @"query") ScanWorkflowExecutionsRequest
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  ScanWorkflowExecutionsRequest
  ScanWorkflowExecutionsRequest
  FieldSet
  FieldSet
-> ScanWorkflowExecutionsRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ScanWorkflowExecutionsRequest
  ScanWorkflowExecutionsRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ScanWorkflowExecutionsRequest FieldSet
Data.ProtoLens.unknownFields ScanWorkflowExecutionsRequest
_x)))))
instance Control.DeepSeq.NFData ScanWorkflowExecutionsRequest where
  rnf :: ScanWorkflowExecutionsRequest -> ()
rnf
    = \ ScanWorkflowExecutionsRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ScanWorkflowExecutionsRequest -> FieldSet
_ScanWorkflowExecutionsRequest'_unknownFields ScanWorkflowExecutionsRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ScanWorkflowExecutionsRequest -> Text
_ScanWorkflowExecutionsRequest'namespace ScanWorkflowExecutionsRequest
x__)
                (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ScanWorkflowExecutionsRequest -> Int32
_ScanWorkflowExecutionsRequest'pageSize ScanWorkflowExecutionsRequest
x__)
                   (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ScanWorkflowExecutionsRequest -> ByteString
_ScanWorkflowExecutionsRequest'nextPageToken ScanWorkflowExecutionsRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ScanWorkflowExecutionsRequest -> Text
_ScanWorkflowExecutionsRequest'query ScanWorkflowExecutionsRequest
x__) ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.executions' @:: Lens' ScanWorkflowExecutionsResponse [Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'executions' @:: Lens' ScanWorkflowExecutionsResponse (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.nextPageToken' @:: Lens' ScanWorkflowExecutionsResponse Data.ByteString.ByteString@ -}
data ScanWorkflowExecutionsResponse
  = ScanWorkflowExecutionsResponse'_constructor {ScanWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo
_ScanWorkflowExecutionsResponse'executions :: !(Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo),
                                                 ScanWorkflowExecutionsResponse -> ByteString
_ScanWorkflowExecutionsResponse'nextPageToken :: !Data.ByteString.ByteString,
                                                 ScanWorkflowExecutionsResponse -> FieldSet
_ScanWorkflowExecutionsResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Bool
(ScanWorkflowExecutionsResponse
 -> ScanWorkflowExecutionsResponse -> Bool)
-> (ScanWorkflowExecutionsResponse
    -> ScanWorkflowExecutionsResponse -> Bool)
-> Eq ScanWorkflowExecutionsResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Bool
== :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Bool
$c/= :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Bool
/= :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Bool
Prelude.Eq, Eq ScanWorkflowExecutionsResponse
Eq ScanWorkflowExecutionsResponse =>
(ScanWorkflowExecutionsResponse
 -> ScanWorkflowExecutionsResponse -> Ordering)
-> (ScanWorkflowExecutionsResponse
    -> ScanWorkflowExecutionsResponse -> Bool)
-> (ScanWorkflowExecutionsResponse
    -> ScanWorkflowExecutionsResponse -> Bool)
-> (ScanWorkflowExecutionsResponse
    -> ScanWorkflowExecutionsResponse -> Bool)
-> (ScanWorkflowExecutionsResponse
    -> ScanWorkflowExecutionsResponse -> Bool)
-> (ScanWorkflowExecutionsResponse
    -> ScanWorkflowExecutionsResponse
    -> ScanWorkflowExecutionsResponse)
-> (ScanWorkflowExecutionsResponse
    -> ScanWorkflowExecutionsResponse
    -> ScanWorkflowExecutionsResponse)
-> Ord ScanWorkflowExecutionsResponse
ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Bool
ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Ordering
ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> ScanWorkflowExecutionsResponse
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 :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Ordering
compare :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Ordering
$c< :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Bool
< :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Bool
$c<= :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Bool
<= :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Bool
$c> :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Bool
> :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Bool
$c>= :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Bool
>= :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> Bool
$cmax :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> ScanWorkflowExecutionsResponse
max :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> ScanWorkflowExecutionsResponse
$cmin :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> ScanWorkflowExecutionsResponse
min :: ScanWorkflowExecutionsResponse
-> ScanWorkflowExecutionsResponse -> ScanWorkflowExecutionsResponse
Prelude.Ord)
instance Prelude.Show ScanWorkflowExecutionsResponse where
  showsPrec :: Int -> ScanWorkflowExecutionsResponse -> ShowS
showsPrec Int
_ ScanWorkflowExecutionsResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ScanWorkflowExecutionsResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ScanWorkflowExecutionsResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ScanWorkflowExecutionsResponse "executions" [Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "executions"
-> ([WorkflowExecutionInfo] -> f [WorkflowExecutionInfo])
-> ScanWorkflowExecutionsResponse
-> f ScanWorkflowExecutionsResponse
fieldOf Proxy# "executions"
_
    = ((Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo))
 -> ScanWorkflowExecutionsResponse
 -> f ScanWorkflowExecutionsResponse)
-> (([WorkflowExecutionInfo] -> f [WorkflowExecutionInfo])
    -> Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> ([WorkflowExecutionInfo] -> f [WorkflowExecutionInfo])
-> ScanWorkflowExecutionsResponse
-> f ScanWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScanWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo)
-> (ScanWorkflowExecutionsResponse
    -> Vector WorkflowExecutionInfo -> ScanWorkflowExecutionsResponse)
-> Lens
     ScanWorkflowExecutionsResponse
     ScanWorkflowExecutionsResponse
     (Vector WorkflowExecutionInfo)
     (Vector WorkflowExecutionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScanWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo
_ScanWorkflowExecutionsResponse'executions
           (\ ScanWorkflowExecutionsResponse
x__ Vector WorkflowExecutionInfo
y__
              -> ScanWorkflowExecutionsResponse
x__ {_ScanWorkflowExecutionsResponse'executions = y__}))
        ((Vector WorkflowExecutionInfo -> [WorkflowExecutionInfo])
-> (Vector WorkflowExecutionInfo
    -> [WorkflowExecutionInfo] -> Vector WorkflowExecutionInfo)
-> Lens
     (Vector WorkflowExecutionInfo)
     (Vector WorkflowExecutionInfo)
     [WorkflowExecutionInfo]
     [WorkflowExecutionInfo]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector WorkflowExecutionInfo -> [WorkflowExecutionInfo]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector WorkflowExecutionInfo
_ [WorkflowExecutionInfo]
y__ -> [WorkflowExecutionInfo] -> Vector WorkflowExecutionInfo
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [WorkflowExecutionInfo]
y__))
instance Data.ProtoLens.Field.HasField ScanWorkflowExecutionsResponse "vec'executions" (Data.Vector.Vector Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'executions"
-> (Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> ScanWorkflowExecutionsResponse
-> f ScanWorkflowExecutionsResponse
fieldOf Proxy# "vec'executions"
_
    = ((Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo))
 -> ScanWorkflowExecutionsResponse
 -> f ScanWorkflowExecutionsResponse)
-> ((Vector WorkflowExecutionInfo
     -> f (Vector WorkflowExecutionInfo))
    -> Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> (Vector WorkflowExecutionInfo
    -> f (Vector WorkflowExecutionInfo))
-> ScanWorkflowExecutionsResponse
-> f ScanWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScanWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo)
-> (ScanWorkflowExecutionsResponse
    -> Vector WorkflowExecutionInfo -> ScanWorkflowExecutionsResponse)
-> Lens
     ScanWorkflowExecutionsResponse
     ScanWorkflowExecutionsResponse
     (Vector WorkflowExecutionInfo)
     (Vector WorkflowExecutionInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScanWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo
_ScanWorkflowExecutionsResponse'executions
           (\ ScanWorkflowExecutionsResponse
x__ Vector WorkflowExecutionInfo
y__
              -> ScanWorkflowExecutionsResponse
x__ {_ScanWorkflowExecutionsResponse'executions = y__}))
        (Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo))
-> Vector WorkflowExecutionInfo -> f (Vector WorkflowExecutionInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ScanWorkflowExecutionsResponse "nextPageToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextPageToken"
-> (ByteString -> f ByteString)
-> ScanWorkflowExecutionsResponse
-> f ScanWorkflowExecutionsResponse
fieldOf Proxy# "nextPageToken"
_
    = ((ByteString -> f ByteString)
 -> ScanWorkflowExecutionsResponse
 -> f ScanWorkflowExecutionsResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> ScanWorkflowExecutionsResponse
-> f ScanWorkflowExecutionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ScanWorkflowExecutionsResponse -> ByteString)
-> (ScanWorkflowExecutionsResponse
    -> ByteString -> ScanWorkflowExecutionsResponse)
-> Lens
     ScanWorkflowExecutionsResponse
     ScanWorkflowExecutionsResponse
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ScanWorkflowExecutionsResponse -> ByteString
_ScanWorkflowExecutionsResponse'nextPageToken
           (\ ScanWorkflowExecutionsResponse
x__ ByteString
y__
              -> ScanWorkflowExecutionsResponse
x__ {_ScanWorkflowExecutionsResponse'nextPageToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ScanWorkflowExecutionsResponse where
  messageName :: Proxy ScanWorkflowExecutionsResponse -> Text
messageName Proxy ScanWorkflowExecutionsResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.ScanWorkflowExecutionsResponse"
  packedMessageDescriptor :: Proxy ScanWorkflowExecutionsResponse -> ByteString
packedMessageDescriptor Proxy ScanWorkflowExecutionsResponse
_
    = ByteString
"\n\
      \\RSScanWorkflowExecutionsResponse\DC2O\n\
      \\n\
      \executions\CAN\SOH \ETX(\v2/.temporal.api.workflow.v1.WorkflowExecutionInfoR\n\
      \executions\DC2&\n\
      \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken"
  packedFileDescriptor :: Proxy ScanWorkflowExecutionsResponse -> ByteString
packedFileDescriptor Proxy ScanWorkflowExecutionsResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ScanWorkflowExecutionsResponse)
fieldsByTag
    = let
        executions__field_descriptor :: FieldDescriptor ScanWorkflowExecutionsResponse
executions__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionInfo
-> FieldAccessor
     ScanWorkflowExecutionsResponse WorkflowExecutionInfo
-> FieldDescriptor ScanWorkflowExecutionsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"executions"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecutionInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo)
              (Packing
-> Lens' ScanWorkflowExecutionsResponse [WorkflowExecutionInfo]
-> FieldAccessor
     ScanWorkflowExecutionsResponse WorkflowExecutionInfo
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 @"executions")) ::
              Data.ProtoLens.FieldDescriptor ScanWorkflowExecutionsResponse
        nextPageToken__field_descriptor :: FieldDescriptor ScanWorkflowExecutionsResponse
nextPageToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor ScanWorkflowExecutionsResponse ByteString
-> FieldDescriptor ScanWorkflowExecutionsResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"next_page_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     ScanWorkflowExecutionsResponse
     ScanWorkflowExecutionsResponse
     ByteString
     ByteString
-> FieldAccessor ScanWorkflowExecutionsResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken")) ::
              Data.ProtoLens.FieldDescriptor ScanWorkflowExecutionsResponse
      in
        [(Tag, FieldDescriptor ScanWorkflowExecutionsResponse)]
-> Map Tag (FieldDescriptor ScanWorkflowExecutionsResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ScanWorkflowExecutionsResponse
executions__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ScanWorkflowExecutionsResponse
nextPageToken__field_descriptor)]
  unknownFields :: Lens' ScanWorkflowExecutionsResponse FieldSet
unknownFields
    = (ScanWorkflowExecutionsResponse -> FieldSet)
-> (ScanWorkflowExecutionsResponse
    -> FieldSet -> ScanWorkflowExecutionsResponse)
-> Lens' ScanWorkflowExecutionsResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ScanWorkflowExecutionsResponse -> FieldSet
_ScanWorkflowExecutionsResponse'_unknownFields
        (\ ScanWorkflowExecutionsResponse
x__ FieldSet
y__
           -> ScanWorkflowExecutionsResponse
x__ {_ScanWorkflowExecutionsResponse'_unknownFields = y__})
  defMessage :: ScanWorkflowExecutionsResponse
defMessage
    = ScanWorkflowExecutionsResponse'_constructor
        {_ScanWorkflowExecutionsResponse'executions :: Vector WorkflowExecutionInfo
_ScanWorkflowExecutionsResponse'executions = Vector WorkflowExecutionInfo
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _ScanWorkflowExecutionsResponse'nextPageToken :: ByteString
_ScanWorkflowExecutionsResponse'nextPageToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ScanWorkflowExecutionsResponse'_unknownFields :: FieldSet
_ScanWorkflowExecutionsResponse'_unknownFields = []}
  parseMessage :: Parser ScanWorkflowExecutionsResponse
parseMessage
    = let
        loop ::
          ScanWorkflowExecutionsResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Workflow.V1.Message.WorkflowExecutionInfo
             -> Data.ProtoLens.Encoding.Bytes.Parser ScanWorkflowExecutionsResponse
        loop :: ScanWorkflowExecutionsResponse
-> Growing Vector RealWorld WorkflowExecutionInfo
-> Parser ScanWorkflowExecutionsResponse
loop ScanWorkflowExecutionsResponse
x Growing Vector RealWorld WorkflowExecutionInfo
mutable'executions
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'executions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                mutable'executions)
                      (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'executions") frozen'executions
                              x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser WorkflowExecutionInfo
-> String -> Parser WorkflowExecutionInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"executions"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'executions y)
                                loop x v
                        Word64
18
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"next_page_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"nextPageToken") y x)
                                  mutable'executions
                        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'executions
      in
        Parser ScanWorkflowExecutionsResponse
-> String -> Parser ScanWorkflowExecutionsResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'executions <- IO (Growing Vector RealWorld WorkflowExecutionInfo)
-> Parser (Growing Vector RealWorld WorkflowExecutionInfo)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld WorkflowExecutionInfo)
IO (Growing Vector (PrimState IO) WorkflowExecutionInfo)
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'executions)
          String
"ScanWorkflowExecutionsResponse"
  buildMessage :: ScanWorkflowExecutionsResponse -> Builder
buildMessage
    = \ ScanWorkflowExecutionsResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((WorkflowExecutionInfo -> Builder)
-> Vector WorkflowExecutionInfo -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ WorkflowExecutionInfo
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (WorkflowExecutionInfo -> ByteString)
-> WorkflowExecutionInfo
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           WorkflowExecutionInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionInfo
_v))
                (FoldLike
  (Vector WorkflowExecutionInfo)
  ScanWorkflowExecutionsResponse
  ScanWorkflowExecutionsResponse
  (Vector WorkflowExecutionInfo)
  (Vector WorkflowExecutionInfo)
-> ScanWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'executions") ScanWorkflowExecutionsResponse
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: ByteString
_v
                     = FoldLike
  ByteString
  ScanWorkflowExecutionsResponse
  ScanWorkflowExecutionsResponse
  ByteString
  ByteString
-> ScanWorkflowExecutionsResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nextPageToken") ScanWorkflowExecutionsResponse
_x
                 in
                   if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
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
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            ByteString
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ScanWorkflowExecutionsResponse
  ScanWorkflowExecutionsResponse
  FieldSet
  FieldSet
-> ScanWorkflowExecutionsResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ScanWorkflowExecutionsResponse
  ScanWorkflowExecutionsResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ScanWorkflowExecutionsResponse FieldSet
Data.ProtoLens.unknownFields ScanWorkflowExecutionsResponse
_x)))
instance Control.DeepSeq.NFData ScanWorkflowExecutionsResponse where
  rnf :: ScanWorkflowExecutionsResponse -> ()
rnf
    = \ ScanWorkflowExecutionsResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ScanWorkflowExecutionsResponse -> FieldSet
_ScanWorkflowExecutionsResponse'_unknownFields ScanWorkflowExecutionsResponse
x__)
             (Vector WorkflowExecutionInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ScanWorkflowExecutionsResponse -> Vector WorkflowExecutionInfo
_ScanWorkflowExecutionsResponse'executions ScanWorkflowExecutionsResponse
x__)
                (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ScanWorkflowExecutionsResponse -> ByteString
_ScanWorkflowExecutionsResponse'nextPageToken ScanWorkflowExecutionsResponse
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' SignalWithStartWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowId' @:: Lens' SignalWithStartWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowType' @:: Lens' SignalWithStartWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.WorkflowType@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowType' @:: Lens' SignalWithStartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueue' @:: Lens' SignalWithStartWorkflowExecutionRequest Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'taskQueue' @:: Lens' SignalWithStartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.input' @:: Lens' SignalWithStartWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'input' @:: Lens' SignalWithStartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowExecutionTimeout' @:: Lens' SignalWithStartWorkflowExecutionRequest Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowExecutionTimeout' @:: Lens' SignalWithStartWorkflowExecutionRequest (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowRunTimeout' @:: Lens' SignalWithStartWorkflowExecutionRequest Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowRunTimeout' @:: Lens' SignalWithStartWorkflowExecutionRequest (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowTaskTimeout' @:: Lens' SignalWithStartWorkflowExecutionRequest Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowTaskTimeout' @:: Lens' SignalWithStartWorkflowExecutionRequest (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' SignalWithStartWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.requestId' @:: Lens' SignalWithStartWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowIdReusePolicy' @:: Lens' SignalWithStartWorkflowExecutionRequest Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowIdConflictPolicy' @:: Lens' SignalWithStartWorkflowExecutionRequest Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdConflictPolicy@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.signalName' @:: Lens' SignalWithStartWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.signalInput' @:: Lens' SignalWithStartWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'signalInput' @:: Lens' SignalWithStartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.control' @:: Lens' SignalWithStartWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.retryPolicy' @:: Lens' SignalWithStartWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.RetryPolicy@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'retryPolicy' @:: Lens' SignalWithStartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.cronSchedule' @:: Lens' SignalWithStartWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.memo' @:: Lens' SignalWithStartWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.Memo@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'memo' @:: Lens' SignalWithStartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.searchAttributes' @:: Lens' SignalWithStartWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.SearchAttributes@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'searchAttributes' @:: Lens' SignalWithStartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.header' @:: Lens' SignalWithStartWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.Header@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'header' @:: Lens' SignalWithStartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowStartDelay' @:: Lens' SignalWithStartWorkflowExecutionRequest Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowStartDelay' @:: Lens' SignalWithStartWorkflowExecutionRequest (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.skipGenerateWorkflowTask' @:: Lens' SignalWithStartWorkflowExecutionRequest Prelude.Bool@ -}
data SignalWithStartWorkflowExecutionRequest
  = SignalWithStartWorkflowExecutionRequest'_constructor {SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'namespace :: !Data.Text.Text,
                                                          SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'workflowId :: !Data.Text.Text,
                                                          SignalWithStartWorkflowExecutionRequest -> Maybe WorkflowType
_SignalWithStartWorkflowExecutionRequest'workflowType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
                                                          SignalWithStartWorkflowExecutionRequest -> Maybe TaskQueue
_SignalWithStartWorkflowExecutionRequest'taskQueue :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue),
                                                          SignalWithStartWorkflowExecutionRequest -> Maybe Payloads
_SignalWithStartWorkflowExecutionRequest'input :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                          SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowExecutionTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                          SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowRunTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                          SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowTaskTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                          SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'identity :: !Data.Text.Text,
                                                          SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'requestId :: !Data.Text.Text,
                                                          SignalWithStartWorkflowExecutionRequest -> WorkflowIdReusePolicy
_SignalWithStartWorkflowExecutionRequest'workflowIdReusePolicy :: !Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy,
                                                          SignalWithStartWorkflowExecutionRequest -> WorkflowIdConflictPolicy
_SignalWithStartWorkflowExecutionRequest'workflowIdConflictPolicy :: !Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdConflictPolicy,
                                                          SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'signalName :: !Data.Text.Text,
                                                          SignalWithStartWorkflowExecutionRequest -> Maybe Payloads
_SignalWithStartWorkflowExecutionRequest'signalInput :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                          SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'control :: !Data.Text.Text,
                                                          SignalWithStartWorkflowExecutionRequest -> Maybe RetryPolicy
_SignalWithStartWorkflowExecutionRequest'retryPolicy :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy),
                                                          SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'cronSchedule :: !Data.Text.Text,
                                                          SignalWithStartWorkflowExecutionRequest -> Maybe Memo
_SignalWithStartWorkflowExecutionRequest'memo :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo),
                                                          SignalWithStartWorkflowExecutionRequest -> Maybe SearchAttributes
_SignalWithStartWorkflowExecutionRequest'searchAttributes :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes),
                                                          SignalWithStartWorkflowExecutionRequest -> Maybe Header
_SignalWithStartWorkflowExecutionRequest'header :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header),
                                                          SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowStartDelay :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                          SignalWithStartWorkflowExecutionRequest -> Bool
_SignalWithStartWorkflowExecutionRequest'skipGenerateWorkflowTask :: !Prelude.Bool,
                                                          SignalWithStartWorkflowExecutionRequest -> FieldSet
_SignalWithStartWorkflowExecutionRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Bool
(SignalWithStartWorkflowExecutionRequest
 -> SignalWithStartWorkflowExecutionRequest -> Bool)
-> (SignalWithStartWorkflowExecutionRequest
    -> SignalWithStartWorkflowExecutionRequest -> Bool)
-> Eq SignalWithStartWorkflowExecutionRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Bool
== :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Bool
$c/= :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Bool
/= :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Bool
Prelude.Eq, Eq SignalWithStartWorkflowExecutionRequest
Eq SignalWithStartWorkflowExecutionRequest =>
(SignalWithStartWorkflowExecutionRequest
 -> SignalWithStartWorkflowExecutionRequest -> Ordering)
-> (SignalWithStartWorkflowExecutionRequest
    -> SignalWithStartWorkflowExecutionRequest -> Bool)
-> (SignalWithStartWorkflowExecutionRequest
    -> SignalWithStartWorkflowExecutionRequest -> Bool)
-> (SignalWithStartWorkflowExecutionRequest
    -> SignalWithStartWorkflowExecutionRequest -> Bool)
-> (SignalWithStartWorkflowExecutionRequest
    -> SignalWithStartWorkflowExecutionRequest -> Bool)
-> (SignalWithStartWorkflowExecutionRequest
    -> SignalWithStartWorkflowExecutionRequest
    -> SignalWithStartWorkflowExecutionRequest)
-> (SignalWithStartWorkflowExecutionRequest
    -> SignalWithStartWorkflowExecutionRequest
    -> SignalWithStartWorkflowExecutionRequest)
-> Ord SignalWithStartWorkflowExecutionRequest
SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Bool
SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Ordering
SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest
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 :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Ordering
compare :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Ordering
$c< :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Bool
< :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Bool
$c<= :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Bool
<= :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Bool
$c> :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Bool
> :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Bool
$c>= :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Bool
>= :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest -> Bool
$cmax :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest
max :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest
$cmin :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest
min :: SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest
-> SignalWithStartWorkflowExecutionRequest
Prelude.Ord)
instance Prelude.Show SignalWithStartWorkflowExecutionRequest where
  showsPrec :: Int -> SignalWithStartWorkflowExecutionRequest -> ShowS
showsPrec Int
_ SignalWithStartWorkflowExecutionRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (SignalWithStartWorkflowExecutionRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SignalWithStartWorkflowExecutionRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Text)
-> (SignalWithStartWorkflowExecutionRequest
    -> Text -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'namespace
           (\ SignalWithStartWorkflowExecutionRequest
x__ Text
y__
              -> SignalWithStartWorkflowExecutionRequest
x__ {_SignalWithStartWorkflowExecutionRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "workflowId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowId"
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "workflowId"
_
    = ((Text -> f Text)
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Text)
-> (SignalWithStartWorkflowExecutionRequest
    -> Text -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'workflowId
           (\ SignalWithStartWorkflowExecutionRequest
x__ Text
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'workflowId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "workflowType" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (WorkflowType -> f WorkflowType)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((WorkflowType -> f WorkflowType)
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe WorkflowType)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe WorkflowType -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe WorkflowType
_SignalWithStartWorkflowExecutionRequest'workflowType
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe WorkflowType
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'workflowType = y__}))
        (WorkflowType -> Lens' (Maybe WorkflowType) WorkflowType
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowType
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "maybe'workflowType" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowType"
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe WorkflowType)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe WorkflowType -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe WorkflowType
_SignalWithStartWorkflowExecutionRequest'workflowType
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe WorkflowType
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'workflowType = y__}))
        (Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "taskQueue" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (TaskQueue -> f TaskQueue)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((TaskQueue -> f TaskQueue)
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (TaskQueue -> f TaskQueue)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe TaskQueue)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe TaskQueue -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe TaskQueue
_SignalWithStartWorkflowExecutionRequest'taskQueue
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe TaskQueue
y__
              -> SignalWithStartWorkflowExecutionRequest
x__ {_SignalWithStartWorkflowExecutionRequest'taskQueue = y__}))
        (TaskQueue -> Lens' (Maybe TaskQueue) TaskQueue
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TaskQueue
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "maybe'taskQueue" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'taskQueue"
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "maybe'taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Maybe TaskQueue -> f (Maybe TaskQueue))
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe TaskQueue)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe TaskQueue -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe TaskQueue
_SignalWithStartWorkflowExecutionRequest'taskQueue
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe TaskQueue
y__
              -> SignalWithStartWorkflowExecutionRequest
x__ {_SignalWithStartWorkflowExecutionRequest'taskQueue = y__}))
        (Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "input" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "input"
-> (Payloads -> f Payloads)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Payloads)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Payloads -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Payloads
_SignalWithStartWorkflowExecutionRequest'input
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Payloads
y__
              -> SignalWithStartWorkflowExecutionRequest
x__ {_SignalWithStartWorkflowExecutionRequest'input = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "maybe'input" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'input"
-> (Maybe Payloads -> f (Maybe Payloads))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "maybe'input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Payloads)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Payloads -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Payloads
_SignalWithStartWorkflowExecutionRequest'input
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Payloads
y__
              -> SignalWithStartWorkflowExecutionRequest
x__ {_SignalWithStartWorkflowExecutionRequest'input = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "workflowExecutionTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionTimeout"
-> (Duration -> f Duration)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "workflowExecutionTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Duration)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Duration -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowExecutionTimeout
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'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 SignalWithStartWorkflowExecutionRequest "maybe'workflowExecutionTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowExecutionTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Duration)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Duration -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowExecutionTimeout
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'workflowExecutionTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "workflowRunTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowRunTimeout"
-> (Duration -> f Duration)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Duration)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Duration -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowRunTimeout
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'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 SignalWithStartWorkflowExecutionRequest "maybe'workflowRunTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowRunTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Duration)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Duration -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowRunTimeout
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'workflowRunTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "workflowTaskTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskTimeout"
-> (Duration -> f Duration)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Duration)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Duration -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowTaskTimeout
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'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 SignalWithStartWorkflowExecutionRequest "maybe'workflowTaskTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowTaskTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Duration)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Duration -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowTaskTimeout
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'workflowTaskTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Text)
-> (SignalWithStartWorkflowExecutionRequest
    -> Text -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'identity
           (\ SignalWithStartWorkflowExecutionRequest
x__ Text
y__
              -> SignalWithStartWorkflowExecutionRequest
x__ {_SignalWithStartWorkflowExecutionRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "requestId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestId"
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "requestId"
_
    = ((Text -> f Text)
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Text)
-> (SignalWithStartWorkflowExecutionRequest
    -> Text -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'requestId
           (\ SignalWithStartWorkflowExecutionRequest
x__ Text
y__
              -> SignalWithStartWorkflowExecutionRequest
x__ {_SignalWithStartWorkflowExecutionRequest'requestId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "workflowIdReusePolicy" Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowIdReusePolicy"
-> (WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "workflowIdReusePolicy"
_
    = ((WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
    -> WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> (WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> WorkflowIdReusePolicy)
-> (SignalWithStartWorkflowExecutionRequest
    -> WorkflowIdReusePolicy
    -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     WorkflowIdReusePolicy
     WorkflowIdReusePolicy
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> WorkflowIdReusePolicy
_SignalWithStartWorkflowExecutionRequest'workflowIdReusePolicy
           (\ SignalWithStartWorkflowExecutionRequest
x__ WorkflowIdReusePolicy
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'workflowIdReusePolicy = y__}))
        (WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> WorkflowIdReusePolicy -> f WorkflowIdReusePolicy
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "workflowIdConflictPolicy" Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdConflictPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowIdConflictPolicy"
-> (WorkflowIdConflictPolicy -> f WorkflowIdConflictPolicy)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "workflowIdConflictPolicy"
_
    = ((WorkflowIdConflictPolicy -> f WorkflowIdConflictPolicy)
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((WorkflowIdConflictPolicy -> f WorkflowIdConflictPolicy)
    -> WorkflowIdConflictPolicy -> f WorkflowIdConflictPolicy)
-> (WorkflowIdConflictPolicy -> f WorkflowIdConflictPolicy)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest
 -> WorkflowIdConflictPolicy)
-> (SignalWithStartWorkflowExecutionRequest
    -> WorkflowIdConflictPolicy
    -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     WorkflowIdConflictPolicy
     WorkflowIdConflictPolicy
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> WorkflowIdConflictPolicy
_SignalWithStartWorkflowExecutionRequest'workflowIdConflictPolicy
           (\ SignalWithStartWorkflowExecutionRequest
x__ WorkflowIdConflictPolicy
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'workflowIdConflictPolicy = y__}))
        (WorkflowIdConflictPolicy -> f WorkflowIdConflictPolicy)
-> WorkflowIdConflictPolicy -> f WorkflowIdConflictPolicy
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "signalName" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "signalName"
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "signalName"
_
    = ((Text -> f Text)
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Text)
-> (SignalWithStartWorkflowExecutionRequest
    -> Text -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'signalName
           (\ SignalWithStartWorkflowExecutionRequest
x__ Text
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'signalName = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "signalInput" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "signalInput"
-> (Payloads -> f Payloads)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "signalInput"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Payloads)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Payloads -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Payloads
_SignalWithStartWorkflowExecutionRequest'signalInput
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Payloads
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'signalInput = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "maybe'signalInput" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'signalInput"
-> (Maybe Payloads -> f (Maybe Payloads))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "maybe'signalInput"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Payloads)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Payloads -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Payloads
_SignalWithStartWorkflowExecutionRequest'signalInput
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Payloads
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'signalInput = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "control" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "control"
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "control"
_
    = ((Text -> f Text)
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Text)
-> (SignalWithStartWorkflowExecutionRequest
    -> Text -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'control
           (\ SignalWithStartWorkflowExecutionRequest
x__ Text
y__
              -> SignalWithStartWorkflowExecutionRequest
x__ {_SignalWithStartWorkflowExecutionRequest'control = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "retryPolicy" Proto.Temporal.Api.Common.V1.Message.RetryPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryPolicy"
-> (RetryPolicy -> f RetryPolicy)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((RetryPolicy -> f RetryPolicy)
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (RetryPolicy -> f RetryPolicy)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe RetryPolicy)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe RetryPolicy -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe RetryPolicy
_SignalWithStartWorkflowExecutionRequest'retryPolicy
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe RetryPolicy
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'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 SignalWithStartWorkflowExecutionRequest "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))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "maybe'retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe RetryPolicy)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe RetryPolicy -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe RetryPolicy
_SignalWithStartWorkflowExecutionRequest'retryPolicy
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe RetryPolicy
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'retryPolicy = y__}))
        (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> Maybe RetryPolicy -> f (Maybe RetryPolicy)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "cronSchedule" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cronSchedule"
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "cronSchedule"
_
    = ((Text -> f Text)
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Text)
-> (SignalWithStartWorkflowExecutionRequest
    -> Text -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'cronSchedule
           (\ SignalWithStartWorkflowExecutionRequest
x__ Text
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'cronSchedule = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "memo" Proto.Temporal.Api.Common.V1.Message.Memo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "memo"
-> (Memo -> f Memo)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Memo -> f Memo) -> Maybe Memo -> f (Maybe Memo))
-> (Memo -> f Memo)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Memo)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Memo -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Memo
_SignalWithStartWorkflowExecutionRequest'memo
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Memo
y__
              -> SignalWithStartWorkflowExecutionRequest
x__ {_SignalWithStartWorkflowExecutionRequest'memo = y__}))
        (Memo -> Lens' (Maybe Memo) Memo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Memo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "maybe'memo" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'memo"
-> (Maybe Memo -> f (Maybe Memo))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "maybe'memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo))
-> (Maybe Memo -> f (Maybe Memo))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Memo)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Memo -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Memo
_SignalWithStartWorkflowExecutionRequest'memo
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Memo
y__
              -> SignalWithStartWorkflowExecutionRequest
x__ {_SignalWithStartWorkflowExecutionRequest'memo = y__}))
        (Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "searchAttributes" Proto.Temporal.Api.Common.V1.Message.SearchAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "searchAttributes"
-> (SearchAttributes -> f SearchAttributes)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((SearchAttributes -> f SearchAttributes)
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (SearchAttributes -> f SearchAttributes)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe SearchAttributes)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe SearchAttributes
    -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe SearchAttributes
_SignalWithStartWorkflowExecutionRequest'searchAttributes
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe SearchAttributes
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'searchAttributes = y__}))
        (SearchAttributes -> Lens' (Maybe SearchAttributes) SearchAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SearchAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "maybe'searchAttributes" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'searchAttributes"
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "maybe'searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe SearchAttributes)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe SearchAttributes
    -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe SearchAttributes
_SignalWithStartWorkflowExecutionRequest'searchAttributes
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe SearchAttributes
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'searchAttributes = y__}))
        (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> Maybe SearchAttributes -> f (Maybe SearchAttributes)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "header" Proto.Temporal.Api.Common.V1.Message.Header where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "header"
-> (Header -> f Header)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Header -> f Header) -> Maybe Header -> f (Maybe Header))
-> (Header -> f Header)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Header)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Header -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Header
_SignalWithStartWorkflowExecutionRequest'header
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Header
y__
              -> SignalWithStartWorkflowExecutionRequest
x__ {_SignalWithStartWorkflowExecutionRequest'header = y__}))
        (Header -> Lens' (Maybe Header) Header
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Header
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "maybe'header" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'header"
-> (Maybe Header -> f (Maybe Header))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "maybe'header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Maybe Header -> f (Maybe Header))
    -> Maybe Header -> f (Maybe Header))
-> (Maybe Header -> f (Maybe Header))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Header)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Header -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Header
_SignalWithStartWorkflowExecutionRequest'header
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Header
y__
              -> SignalWithStartWorkflowExecutionRequest
x__ {_SignalWithStartWorkflowExecutionRequest'header = y__}))
        (Maybe Header -> f (Maybe Header))
-> Maybe Header -> f (Maybe Header)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "workflowStartDelay" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowStartDelay"
-> (Duration -> f Duration)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "workflowStartDelay"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Duration)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Duration -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowStartDelay
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'workflowStartDelay = 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 SignalWithStartWorkflowExecutionRequest "maybe'workflowStartDelay" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowStartDelay"
-> (Maybe Duration -> f (Maybe Duration))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowStartDelay"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Maybe Duration)
-> (SignalWithStartWorkflowExecutionRequest
    -> Maybe Duration -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowStartDelay
           (\ SignalWithStartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'workflowStartDelay = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionRequest "skipGenerateWorkflowTask" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "skipGenerateWorkflowTask"
-> (Bool -> f Bool)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
fieldOf Proxy# "skipGenerateWorkflowTask"
_
    = ((Bool -> f Bool)
 -> SignalWithStartWorkflowExecutionRequest
 -> f SignalWithStartWorkflowExecutionRequest)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> SignalWithStartWorkflowExecutionRequest
-> f SignalWithStartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionRequest -> Bool)
-> (SignalWithStartWorkflowExecutionRequest
    -> Bool -> SignalWithStartWorkflowExecutionRequest)
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionRequest -> Bool
_SignalWithStartWorkflowExecutionRequest'skipGenerateWorkflowTask
           (\ SignalWithStartWorkflowExecutionRequest
x__ Bool
y__
              -> SignalWithStartWorkflowExecutionRequest
x__
                   {_SignalWithStartWorkflowExecutionRequest'skipGenerateWorkflowTask = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SignalWithStartWorkflowExecutionRequest where
  messageName :: Proxy SignalWithStartWorkflowExecutionRequest -> Text
messageName Proxy SignalWithStartWorkflowExecutionRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.SignalWithStartWorkflowExecutionRequest"
  packedMessageDescriptor :: Proxy SignalWithStartWorkflowExecutionRequest -> ByteString
packedMessageDescriptor Proxy SignalWithStartWorkflowExecutionRequest
_
    = ByteString
"\n\
      \'SignalWithStartWorkflowExecutionRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
      \\vworkflow_id\CAN\STX \SOH(\tR\n\
      \workflowId\DC2I\n\
      \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2C\n\
      \\n\
      \task_queue\CAN\EOT \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC26\n\
      \\ENQinput\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2W\n\
      \\SUBworkflow_execution_timeout\CAN\ACK \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
      \\DC4workflow_run_timeout\CAN\a \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
      \\NAKworkflow_task_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2\SUB\n\
      \\bidentity\CAN\t \SOH(\tR\bidentity\DC2\GS\n\
      \\n\
      \request_id\CAN\n\
      \ \SOH(\tR\trequestId\DC2e\n\
      \\CANworkflow_id_reuse_policy\CAN\v \SOH(\SO2,.temporal.api.enums.v1.WorkflowIdReusePolicyR\NAKworkflowIdReusePolicy\DC2n\n\
      \\ESCworkflow_id_conflict_policy\CAN\SYN \SOH(\SO2/.temporal.api.enums.v1.WorkflowIdConflictPolicyR\CANworkflowIdConflictPolicy\DC2\US\n\
      \\vsignal_name\CAN\f \SOH(\tR\n\
      \signalName\DC2C\n\
      \\fsignal_input\CAN\r \SOH(\v2 .temporal.api.common.v1.PayloadsR\vsignalInput\DC2\CAN\n\
      \\acontrol\CAN\SO \SOH(\tR\acontrol\DC2F\n\
      \\fretry_policy\CAN\SI \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2#\n\
      \\rcron_schedule\CAN\DLE \SOH(\tR\fcronSchedule\DC20\n\
      \\EOTmemo\CAN\DC1 \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
      \\DC1search_attributes\CAN\DC2 \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC26\n\
      \\ACKheader\CAN\DC3 \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC2K\n\
      \\DC4workflow_start_delay\CAN\DC4 \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowStartDelay\DC2=\n\
      \\ESCskip_generate_workflow_task\CAN\NAK \SOH(\bR\CANskipGenerateWorkflowTask"
  packedFileDescriptor :: Proxy SignalWithStartWorkflowExecutionRequest -> ByteString
packedFileDescriptor Proxy SignalWithStartWorkflowExecutionRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor SignalWithStartWorkflowExecutionRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Text
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
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
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor SignalWithStartWorkflowExecutionRequest 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 SignalWithStartWorkflowExecutionRequest
        workflowId__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Text
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
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
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor SignalWithStartWorkflowExecutionRequest 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 SignalWithStartWorkflowExecutionRequest
        workflowType__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor
     SignalWithStartWorkflowExecutionRequest WorkflowType
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_type"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowType
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowType)
              (Lens
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> FieldAccessor
     SignalWithStartWorkflowExecutionRequest WorkflowType
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowType")) ::
              Data.ProtoLens.FieldDescriptor SignalWithStartWorkflowExecutionRequest
        taskQueue__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueue
-> FieldAccessor SignalWithStartWorkflowExecutionRequest TaskQueue
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_queue"
              (MessageOrGroup -> FieldTypeDescriptor TaskQueue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)
              (Lens
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> FieldAccessor SignalWithStartWorkflowExecutionRequest TaskQueue
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue")) ::
              Data.ProtoLens.FieldDescriptor SignalWithStartWorkflowExecutionRequest
        input__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
input__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Payloads
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"input"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'input")) ::
              Data.ProtoLens.FieldDescriptor SignalWithStartWorkflowExecutionRequest
        workflowExecutionTimeout__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowExecutionTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Duration
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
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
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor SignalWithStartWorkflowExecutionRequest 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 SignalWithStartWorkflowExecutionRequest
        workflowRunTimeout__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowRunTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Duration
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
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
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor SignalWithStartWorkflowExecutionRequest 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 SignalWithStartWorkflowExecutionRequest
        workflowTaskTimeout__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowTaskTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Duration
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
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
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor SignalWithStartWorkflowExecutionRequest 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 SignalWithStartWorkflowExecutionRequest
        identity__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Text
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor SignalWithStartWorkflowExecutionRequest
        requestId__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
requestId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Text
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId")) ::
              Data.ProtoLens.FieldDescriptor SignalWithStartWorkflowExecutionRequest
        workflowIdReusePolicy__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowIdReusePolicy__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowIdReusePolicy
-> FieldAccessor
     SignalWithStartWorkflowExecutionRequest WorkflowIdReusePolicy
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
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
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     WorkflowIdReusePolicy
     WorkflowIdReusePolicy
-> FieldAccessor
     SignalWithStartWorkflowExecutionRequest 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 SignalWithStartWorkflowExecutionRequest
        workflowIdConflictPolicy__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowIdConflictPolicy__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowIdConflictPolicy
-> FieldAccessor
     SignalWithStartWorkflowExecutionRequest WorkflowIdConflictPolicy
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_id_conflict_policy"
              (ScalarField WorkflowIdConflictPolicy
-> FieldTypeDescriptor WorkflowIdConflictPolicy
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField WorkflowIdConflictPolicy
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdConflictPolicy)
              (WireDefault WorkflowIdConflictPolicy
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     WorkflowIdConflictPolicy
     WorkflowIdConflictPolicy
-> FieldAccessor
     SignalWithStartWorkflowExecutionRequest WorkflowIdConflictPolicy
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault WorkflowIdConflictPolicy
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"workflowIdConflictPolicy")) ::
              Data.ProtoLens.FieldDescriptor SignalWithStartWorkflowExecutionRequest
        signalName__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
signalName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Text
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
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
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor SignalWithStartWorkflowExecutionRequest 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 SignalWithStartWorkflowExecutionRequest
        signalInput__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
signalInput__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Payloads
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"signal_input"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'signalInput")) ::
              Data.ProtoLens.FieldDescriptor SignalWithStartWorkflowExecutionRequest
        control__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
control__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Text
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"control"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"control")) ::
              Data.ProtoLens.FieldDescriptor SignalWithStartWorkflowExecutionRequest
        retryPolicy__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
retryPolicy__field_descriptor
          = String
-> FieldTypeDescriptor RetryPolicy
-> FieldAccessor
     SignalWithStartWorkflowExecutionRequest RetryPolicy
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
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
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> FieldAccessor
     SignalWithStartWorkflowExecutionRequest 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 SignalWithStartWorkflowExecutionRequest
        cronSchedule__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
cronSchedule__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Text
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
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
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor SignalWithStartWorkflowExecutionRequest 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 SignalWithStartWorkflowExecutionRequest
        memo__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
memo__field_descriptor
          = String
-> FieldTypeDescriptor Memo
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Memo
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"memo"
              (MessageOrGroup -> FieldTypeDescriptor Memo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Memo)
              (Lens
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Memo)
  (Maybe Memo)
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Memo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'memo")) ::
              Data.ProtoLens.FieldDescriptor SignalWithStartWorkflowExecutionRequest
        searchAttributes__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
searchAttributes__field_descriptor
          = String
-> FieldTypeDescriptor SearchAttributes
-> FieldAccessor
     SignalWithStartWorkflowExecutionRequest SearchAttributes
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"search_attributes"
              (MessageOrGroup -> FieldTypeDescriptor SearchAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.SearchAttributes)
              (Lens
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> FieldAccessor
     SignalWithStartWorkflowExecutionRequest SearchAttributes
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'searchAttributes")) ::
              Data.ProtoLens.FieldDescriptor SignalWithStartWorkflowExecutionRequest
        header__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
header__field_descriptor
          = String
-> FieldTypeDescriptor Header
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Header
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"header"
              (MessageOrGroup -> FieldTypeDescriptor Header
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Header)
              (Lens
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Header)
  (Maybe Header)
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Header
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'header")) ::
              Data.ProtoLens.FieldDescriptor SignalWithStartWorkflowExecutionRequest
        workflowStartDelay__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowStartDelay__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Duration
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_start_delay"
              (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
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor SignalWithStartWorkflowExecutionRequest 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'workflowStartDelay")) ::
              Data.ProtoLens.FieldDescriptor SignalWithStartWorkflowExecutionRequest
        skipGenerateWorkflowTask__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionRequest
skipGenerateWorkflowTask__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Bool
-> FieldDescriptor SignalWithStartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"skip_generate_workflow_task"
              (ScalarField Bool -> FieldTypeDescriptor Bool
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Bool
Data.ProtoLens.BoolField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
              (WireDefault Bool
-> Lens
     SignalWithStartWorkflowExecutionRequest
     SignalWithStartWorkflowExecutionRequest
     Bool
     Bool
-> FieldAccessor SignalWithStartWorkflowExecutionRequest Bool
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Bool
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"skipGenerateWorkflowTask")) ::
              Data.ProtoLens.FieldDescriptor SignalWithStartWorkflowExecutionRequest
      in
        [(Tag, FieldDescriptor SignalWithStartWorkflowExecutionRequest)]
-> Map
     Tag (FieldDescriptor SignalWithStartWorkflowExecutionRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor SignalWithStartWorkflowExecutionRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor SignalWithStartWorkflowExecutionRequest
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor SignalWithStartWorkflowExecutionRequest
input__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowExecutionTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowRunTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowTaskTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor SignalWithStartWorkflowExecutionRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor SignalWithStartWorkflowExecutionRequest
requestId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowIdReusePolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
22, 
            FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowIdConflictPolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor SignalWithStartWorkflowExecutionRequest
signalName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor SignalWithStartWorkflowExecutionRequest
signalInput__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
14, FieldDescriptor SignalWithStartWorkflowExecutionRequest
control__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
15, FieldDescriptor SignalWithStartWorkflowExecutionRequest
retryPolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
16, FieldDescriptor SignalWithStartWorkflowExecutionRequest
cronSchedule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
17, FieldDescriptor SignalWithStartWorkflowExecutionRequest
memo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
18, FieldDescriptor SignalWithStartWorkflowExecutionRequest
searchAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
19, FieldDescriptor SignalWithStartWorkflowExecutionRequest
header__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
20, FieldDescriptor SignalWithStartWorkflowExecutionRequest
workflowStartDelay__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
21, 
            FieldDescriptor SignalWithStartWorkflowExecutionRequest
skipGenerateWorkflowTask__field_descriptor)]
  unknownFields :: Lens' SignalWithStartWorkflowExecutionRequest FieldSet
unknownFields
    = (SignalWithStartWorkflowExecutionRequest -> FieldSet)
-> (SignalWithStartWorkflowExecutionRequest
    -> FieldSet -> SignalWithStartWorkflowExecutionRequest)
-> Lens' SignalWithStartWorkflowExecutionRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SignalWithStartWorkflowExecutionRequest -> FieldSet
_SignalWithStartWorkflowExecutionRequest'_unknownFields
        (\ SignalWithStartWorkflowExecutionRequest
x__ FieldSet
y__
           -> SignalWithStartWorkflowExecutionRequest
x__
                {_SignalWithStartWorkflowExecutionRequest'_unknownFields = y__})
  defMessage :: SignalWithStartWorkflowExecutionRequest
defMessage
    = SignalWithStartWorkflowExecutionRequest'_constructor
        {_SignalWithStartWorkflowExecutionRequest'namespace :: Text
_SignalWithStartWorkflowExecutionRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWithStartWorkflowExecutionRequest'workflowId :: Text
_SignalWithStartWorkflowExecutionRequest'workflowId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWithStartWorkflowExecutionRequest'workflowType :: Maybe WorkflowType
_SignalWithStartWorkflowExecutionRequest'workflowType = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
         _SignalWithStartWorkflowExecutionRequest'taskQueue :: Maybe TaskQueue
_SignalWithStartWorkflowExecutionRequest'taskQueue = Maybe TaskQueue
forall a. Maybe a
Prelude.Nothing,
         _SignalWithStartWorkflowExecutionRequest'input :: Maybe Payloads
_SignalWithStartWorkflowExecutionRequest'input = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _SignalWithStartWorkflowExecutionRequest'workflowExecutionTimeout :: Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowExecutionTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _SignalWithStartWorkflowExecutionRequest'workflowRunTimeout :: Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowRunTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _SignalWithStartWorkflowExecutionRequest'workflowTaskTimeout :: Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowTaskTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _SignalWithStartWorkflowExecutionRequest'identity :: Text
_SignalWithStartWorkflowExecutionRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWithStartWorkflowExecutionRequest'requestId :: Text
_SignalWithStartWorkflowExecutionRequest'requestId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWithStartWorkflowExecutionRequest'workflowIdReusePolicy :: WorkflowIdReusePolicy
_SignalWithStartWorkflowExecutionRequest'workflowIdReusePolicy = WorkflowIdReusePolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWithStartWorkflowExecutionRequest'workflowIdConflictPolicy :: WorkflowIdConflictPolicy
_SignalWithStartWorkflowExecutionRequest'workflowIdConflictPolicy = WorkflowIdConflictPolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWithStartWorkflowExecutionRequest'signalName :: Text
_SignalWithStartWorkflowExecutionRequest'signalName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWithStartWorkflowExecutionRequest'signalInput :: Maybe Payloads
_SignalWithStartWorkflowExecutionRequest'signalInput = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _SignalWithStartWorkflowExecutionRequest'control :: Text
_SignalWithStartWorkflowExecutionRequest'control = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWithStartWorkflowExecutionRequest'retryPolicy :: Maybe RetryPolicy
_SignalWithStartWorkflowExecutionRequest'retryPolicy = Maybe RetryPolicy
forall a. Maybe a
Prelude.Nothing,
         _SignalWithStartWorkflowExecutionRequest'cronSchedule :: Text
_SignalWithStartWorkflowExecutionRequest'cronSchedule = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWithStartWorkflowExecutionRequest'memo :: Maybe Memo
_SignalWithStartWorkflowExecutionRequest'memo = Maybe Memo
forall a. Maybe a
Prelude.Nothing,
         _SignalWithStartWorkflowExecutionRequest'searchAttributes :: Maybe SearchAttributes
_SignalWithStartWorkflowExecutionRequest'searchAttributes = Maybe SearchAttributes
forall a. Maybe a
Prelude.Nothing,
         _SignalWithStartWorkflowExecutionRequest'header :: Maybe Header
_SignalWithStartWorkflowExecutionRequest'header = Maybe Header
forall a. Maybe a
Prelude.Nothing,
         _SignalWithStartWorkflowExecutionRequest'workflowStartDelay :: Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowStartDelay = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _SignalWithStartWorkflowExecutionRequest'skipGenerateWorkflowTask :: Bool
_SignalWithStartWorkflowExecutionRequest'skipGenerateWorkflowTask = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWithStartWorkflowExecutionRequest'_unknownFields :: FieldSet
_SignalWithStartWorkflowExecutionRequest'_unknownFields = []}
  parseMessage :: Parser SignalWithStartWorkflowExecutionRequest
parseMessage
    = let
        loop ::
          SignalWithStartWorkflowExecutionRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser SignalWithStartWorkflowExecutionRequest
        loop :: SignalWithStartWorkflowExecutionRequest
-> Parser SignalWithStartWorkflowExecutionRequest
loop SignalWithStartWorkflowExecutionRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"workflow_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"workflowId") y x)
                        Word64
26
                          -> do y <- Parser WorkflowType -> String -> Parser WorkflowType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowType") y x)
                        Word64
34
                          -> do y <- Parser TaskQueue -> String -> Parser TaskQueue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"task_queue"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskQueue") y x)
                        Word64
42
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"input"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"input") y x)
                        Word64
50
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_execution_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecutionTimeout") y x)
                        Word64
58
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_run_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowRunTimeout") y x)
                        Word64
66
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_task_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskTimeout") y x)
                        Word64
74
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
82
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"request_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x)
                        Word64
88
                          -> do y <- Parser WorkflowIdReusePolicy
-> String -> Parser WorkflowIdReusePolicy
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> WorkflowIdReusePolicy)
-> Parser Int -> Parser WorkflowIdReusePolicy
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> WorkflowIdReusePolicy
forall a. Enum a => Int -> a
Prelude.toEnum
                                          ((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                             Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                             Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
                                       String
"workflow_id_reuse_policy"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowIdReusePolicy") y x)
                        Word64
176
                          -> do y <- Parser WorkflowIdConflictPolicy
-> String -> Parser WorkflowIdConflictPolicy
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> WorkflowIdConflictPolicy)
-> Parser Int -> Parser WorkflowIdConflictPolicy
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> WorkflowIdConflictPolicy
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_conflict_policy"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowIdConflictPolicy") y x)
                        Word64
98
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"signal_name"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"signalName") y x)
                        Word64
106
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"signal_input"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"signalInput") y x)
                        Word64
114
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"control"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"control") y x)
                        Word64
122
                          -> do y <- Parser RetryPolicy -> String -> Parser RetryPolicy
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"retry_policy"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"retryPolicy") y x)
                        Word64
130
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"cron_schedule"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cronSchedule") y x)
                        Word64
138
                          -> do y <- Parser Memo -> String -> Parser Memo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"memo"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"memo") y x)
                        Word64
146
                          -> do y <- Parser SearchAttributes -> String -> Parser SearchAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"search_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"searchAttributes") y x)
                        Word64
154
                          -> do y <- Parser Header -> String -> Parser Header
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"header"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"header") y x)
                        Word64
162
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_start_delay"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowStartDelay") y x)
                        Word64
168
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"skip_generate_workflow_task"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"skipGenerateWorkflowTask") y x)
                        Word64
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 SignalWithStartWorkflowExecutionRequest
-> String -> Parser SignalWithStartWorkflowExecutionRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do SignalWithStartWorkflowExecutionRequest
-> Parser SignalWithStartWorkflowExecutionRequest
loop SignalWithStartWorkflowExecutionRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"SignalWithStartWorkflowExecutionRequest"
  buildMessage :: SignalWithStartWorkflowExecutionRequest -> Builder
buildMessage
    = \ SignalWithStartWorkflowExecutionRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  Text
  Text
-> SignalWithStartWorkflowExecutionRequest -> 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") SignalWithStartWorkflowExecutionRequest
_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
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  Text
  Text
-> SignalWithStartWorkflowExecutionRequest -> 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") SignalWithStartWorkflowExecutionRequest
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe WorkflowType)
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> SignalWithStartWorkflowExecutionRequest -> Maybe WorkflowType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                          (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowType") SignalWithStartWorkflowExecutionRequest
_x
                    of
                      Maybe WorkflowType
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just WorkflowType
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (WorkflowType -> ByteString) -> WorkflowType -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                WorkflowType -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowType
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe TaskQueue)
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> SignalWithStartWorkflowExecutionRequest -> Maybe TaskQueue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                             (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue") SignalWithStartWorkflowExecutionRequest
_x
                       of
                         Maybe TaskQueue
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just TaskQueue
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (TaskQueue -> ByteString) -> TaskQueue -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   TaskQueue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueue
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Payloads)
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> SignalWithStartWorkflowExecutionRequest -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'input") SignalWithStartWorkflowExecutionRequest
_x
                          of
                            Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just Payloads
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (case
                                 FoldLike
  (Maybe Duration)
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> SignalWithStartWorkflowExecutionRequest -> 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") SignalWithStartWorkflowExecutionRequest
_x
                             of
                               Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               (Prelude.Just Duration
_v)
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                      ((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                         (\ ByteString
bs
                                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                       (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                         Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (case
                                    FoldLike
  (Maybe Duration)
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> SignalWithStartWorkflowExecutionRequest -> 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") SignalWithStartWorkflowExecutionRequest
_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)
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> SignalWithStartWorkflowExecutionRequest -> 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")
                                         SignalWithStartWorkflowExecutionRequest
_x
                                   of
                                     Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                     (Prelude.Just Duration
_v)
                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                                            ((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                               (\ ByteString
bs
                                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                             (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                               Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
                                  (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (let
                                        _v :: Text
_v
                                          = FoldLike
  Text
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  Text
  Text
-> SignalWithStartWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") SignalWithStartWorkflowExecutionRequest
_x
                                      in
                                        if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                            Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                        else
                                            Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
                                              ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                 (\ ByteString
bs
                                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                            (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                               (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                         (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                            ByteString
bs))
                                                 Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                                     (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (let
                                           _v :: Text
_v
                                             = FoldLike
  Text
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  Text
  Text
-> SignalWithStartWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId") SignalWithStartWorkflowExecutionRequest
_x
                                         in
                                           if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                               Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                           else
                                               Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
                                                 ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                    (\ ByteString
bs
                                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                               (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                  (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                            (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                               ByteString
bs))
                                                    Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                                        (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (let
                                              _v :: WorkflowIdReusePolicy
_v
                                                = FoldLike
  WorkflowIdReusePolicy
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  WorkflowIdReusePolicy
  WorkflowIdReusePolicy
-> SignalWithStartWorkflowExecutionRequest -> 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")
                                                    SignalWithStartWorkflowExecutionRequest
_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
88)
                                                    ((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.<>)
                                              (let
                                                 _v :: WorkflowIdConflictPolicy
_v
                                                   = FoldLike
  WorkflowIdConflictPolicy
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  WorkflowIdConflictPolicy
  WorkflowIdConflictPolicy
-> SignalWithStartWorkflowExecutionRequest
-> WorkflowIdConflictPolicy
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                          @"workflowIdConflictPolicy")
                                                       SignalWithStartWorkflowExecutionRequest
_x
                                               in
                                                 if WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) WorkflowIdConflictPolicy
_v WorkflowIdConflictPolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                     Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                 else
                                                     Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
176)
                                                       ((Int -> Builder)
-> (WorkflowIdConflictPolicy -> Int)
-> WorkflowIdConflictPolicy
-> 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)
                                                          WorkflowIdConflictPolicy -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum WorkflowIdConflictPolicy
_v))
                                              (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (let
                                                    _v :: Text
_v
                                                      = FoldLike
  Text
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  Text
  Text
-> SignalWithStartWorkflowExecutionRequest -> 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")
                                                          SignalWithStartWorkflowExecutionRequest
_x
                                                  in
                                                    if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
                                                         Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                        Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                    else
                                                        Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                             Word64
98)
                                                          ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                             (\ ByteString
bs
                                                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                           (ByteString -> Int
Data.ByteString.length
                                                                              ByteString
bs)))
                                                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                        ByteString
bs))
                                                             Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                                                 (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (case
                                                         FoldLike
  (Maybe Payloads)
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> SignalWithStartWorkflowExecutionRequest -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                           (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                              @"maybe'signalInput")
                                                           SignalWithStartWorkflowExecutionRequest
_x
                                                     of
                                                       Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                       (Prelude.Just Payloads
_v)
                                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                 Word64
106)
                                                              ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                 (\ ByteString
bs
                                                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                            (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                               (ByteString -> Int
Data.ByteString.length
                                                                                  ByteString
bs)))
                                                                         (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                            ByteString
bs))
                                                                 Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                                                    (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       (let
                                                          _v :: Text
_v
                                                            = FoldLike
  Text
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  Text
  Text
-> SignalWithStartWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                   @"control")
                                                                SignalWithStartWorkflowExecutionRequest
_x
                                                        in
                                                          if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
                                                               Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                              Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                          else
                                                              Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                   Word64
114)
                                                                ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                   (\ ByteString
bs
                                                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                 (ByteString -> Int
Data.ByteString.length
                                                                                    ByteString
bs)))
                                                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                              ByteString
bs))
                                                                   Text -> ByteString
Data.Text.Encoding.encodeUtf8
                                                                   Text
_v))
                                                       (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                          (case
                                                               FoldLike
  (Maybe RetryPolicy)
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> SignalWithStartWorkflowExecutionRequest -> 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")
                                                                 SignalWithStartWorkflowExecutionRequest
_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
122)
                                                                    ((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
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  Text
  Text
-> SignalWithStartWorkflowExecutionRequest -> 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")
                                                                      SignalWithStartWorkflowExecutionRequest
_x
                                                              in
                                                                if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
                                                                     Text
_v
                                                                     Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                                else
                                                                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                         Word64
130)
                                                                      ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                         (\ ByteString
bs
                                                                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                       (ByteString -> Int
Data.ByteString.length
                                                                                          ByteString
bs)))
                                                                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                    ByteString
bs))
                                                                         Text -> ByteString
Data.Text.Encoding.encodeUtf8
                                                                         Text
_v))
                                                             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                (case
                                                                     FoldLike
  (Maybe Memo)
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Memo)
  (Maybe Memo)
-> SignalWithStartWorkflowExecutionRequest -> Maybe Memo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                          @"maybe'memo")
                                                                       SignalWithStartWorkflowExecutionRequest
_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
138)
                                                                          ((ByteString -> Builder) -> (Memo -> ByteString) -> Memo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                             (\ ByteString
bs
                                                                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                           (ByteString -> Int
Data.ByteString.length
                                                                                              ByteString
bs)))
                                                                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                        ByteString
bs))
                                                                             Memo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                             Memo
_v))
                                                                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                   (case
                                                                        FoldLike
  (Maybe SearchAttributes)
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> SignalWithStartWorkflowExecutionRequest
-> Maybe SearchAttributes
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                          (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                             @"maybe'searchAttributes")
                                                                          SignalWithStartWorkflowExecutionRequest
_x
                                                                    of
                                                                      Maybe SearchAttributes
Prelude.Nothing
                                                                        -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                                      (Prelude.Just SearchAttributes
_v)
                                                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                Word64
146)
                                                                             ((ByteString -> Builder)
-> (SearchAttributes -> ByteString) -> SearchAttributes -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                                (\ ByteString
bs
                                                                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                              (ByteString -> Int
Data.ByteString.length
                                                                                                 ByteString
bs)))
                                                                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                           ByteString
bs))
                                                                                SearchAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                                SearchAttributes
_v))
                                                                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                      (case
                                                                           FoldLike
  (Maybe Header)
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Header)
  (Maybe Header)
-> SignalWithStartWorkflowExecutionRequest -> Maybe Header
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                             (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                                @"maybe'header")
                                                                             SignalWithStartWorkflowExecutionRequest
_x
                                                                       of
                                                                         Maybe Header
Prelude.Nothing
                                                                           -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                                         (Prelude.Just Header
_v)
                                                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                   Word64
154)
                                                                                ((ByteString -> Builder)
-> (Header -> ByteString) -> Header -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                                   (\ ByteString
bs
                                                                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                                 (ByteString -> Int
Data.ByteString.length
                                                                                                    ByteString
bs)))
                                                                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                              ByteString
bs))
                                                                                   Header -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                                   Header
_v))
                                                                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                         (case
                                                                              FoldLike
  (Maybe Duration)
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> SignalWithStartWorkflowExecutionRequest -> 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'workflowStartDelay")
                                                                                SignalWithStartWorkflowExecutionRequest
_x
                                                                          of
                                                                            Maybe Duration
Prelude.Nothing
                                                                              -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                                            (Prelude.Just Duration
_v)
                                                                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                      Word64
162)
                                                                                   ((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                                      (\ ByteString
bs
                                                                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                                    (ByteString -> Int
Data.ByteString.length
                                                                                                       ByteString
bs)))
                                                                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                                 ByteString
bs))
                                                                                      Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                                      Duration
_v))
                                                                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                            (let
                                                                               _v :: Bool
_v
                                                                                 = FoldLike
  Bool
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  Bool
  Bool
-> SignalWithStartWorkflowExecutionRequest -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                                        @"skipGenerateWorkflowTask")
                                                                                     SignalWithStartWorkflowExecutionRequest
_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
168)
                                                                                     ((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
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  FieldSet
  FieldSet
-> SignalWithStartWorkflowExecutionRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                                  FoldLike
  FieldSet
  SignalWithStartWorkflowExecutionRequest
  SignalWithStartWorkflowExecutionRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SignalWithStartWorkflowExecutionRequest FieldSet
Data.ProtoLens.unknownFields
                                                                                  SignalWithStartWorkflowExecutionRequest
_x)))))))))))))))))))))))
instance Control.DeepSeq.NFData SignalWithStartWorkflowExecutionRequest where
  rnf :: SignalWithStartWorkflowExecutionRequest -> ()
rnf
    = \ SignalWithStartWorkflowExecutionRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SignalWithStartWorkflowExecutionRequest -> FieldSet
_SignalWithStartWorkflowExecutionRequest'_unknownFields SignalWithStartWorkflowExecutionRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'namespace SignalWithStartWorkflowExecutionRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'workflowId SignalWithStartWorkflowExecutionRequest
x__)
                   (Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (SignalWithStartWorkflowExecutionRequest -> Maybe WorkflowType
_SignalWithStartWorkflowExecutionRequest'workflowType SignalWithStartWorkflowExecutionRequest
x__)
                      (Maybe TaskQueue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (SignalWithStartWorkflowExecutionRequest -> Maybe TaskQueue
_SignalWithStartWorkflowExecutionRequest'taskQueue SignalWithStartWorkflowExecutionRequest
x__)
                         (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (SignalWithStartWorkflowExecutionRequest -> Maybe Payloads
_SignalWithStartWorkflowExecutionRequest'input SignalWithStartWorkflowExecutionRequest
x__)
                            (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowExecutionTimeout
                                  SignalWithStartWorkflowExecutionRequest
x__)
                               (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowRunTimeout SignalWithStartWorkflowExecutionRequest
x__)
                                  (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowTaskTimeout
                                        SignalWithStartWorkflowExecutionRequest
x__)
                                     (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'identity SignalWithStartWorkflowExecutionRequest
x__)
                                        (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'requestId SignalWithStartWorkflowExecutionRequest
x__)
                                           (WorkflowIdReusePolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (SignalWithStartWorkflowExecutionRequest -> WorkflowIdReusePolicy
_SignalWithStartWorkflowExecutionRequest'workflowIdReusePolicy
                                                 SignalWithStartWorkflowExecutionRequest
x__)
                                              (WorkflowIdConflictPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (SignalWithStartWorkflowExecutionRequest -> WorkflowIdConflictPolicy
_SignalWithStartWorkflowExecutionRequest'workflowIdConflictPolicy
                                                    SignalWithStartWorkflowExecutionRequest
x__)
                                                 (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'signalName
                                                       SignalWithStartWorkflowExecutionRequest
x__)
                                                    (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                       (SignalWithStartWorkflowExecutionRequest -> Maybe Payloads
_SignalWithStartWorkflowExecutionRequest'signalInput
                                                          SignalWithStartWorkflowExecutionRequest
x__)
                                                       (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                          (SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'control
                                                             SignalWithStartWorkflowExecutionRequest
x__)
                                                          (Maybe RetryPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                             (SignalWithStartWorkflowExecutionRequest -> Maybe RetryPolicy
_SignalWithStartWorkflowExecutionRequest'retryPolicy
                                                                SignalWithStartWorkflowExecutionRequest
x__)
                                                             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                (SignalWithStartWorkflowExecutionRequest -> Text
_SignalWithStartWorkflowExecutionRequest'cronSchedule
                                                                   SignalWithStartWorkflowExecutionRequest
x__)
                                                                (Maybe Memo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                   (SignalWithStartWorkflowExecutionRequest -> Maybe Memo
_SignalWithStartWorkflowExecutionRequest'memo
                                                                      SignalWithStartWorkflowExecutionRequest
x__)
                                                                   (Maybe SearchAttributes -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                      (SignalWithStartWorkflowExecutionRequest -> Maybe SearchAttributes
_SignalWithStartWorkflowExecutionRequest'searchAttributes
                                                                         SignalWithStartWorkflowExecutionRequest
x__)
                                                                      (Maybe Header -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                         (SignalWithStartWorkflowExecutionRequest -> Maybe Header
_SignalWithStartWorkflowExecutionRequest'header
                                                                            SignalWithStartWorkflowExecutionRequest
x__)
                                                                         (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                            (SignalWithStartWorkflowExecutionRequest -> Maybe Duration
_SignalWithStartWorkflowExecutionRequest'workflowStartDelay
                                                                               SignalWithStartWorkflowExecutionRequest
x__)
                                                                            (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                               (SignalWithStartWorkflowExecutionRequest -> Bool
_SignalWithStartWorkflowExecutionRequest'skipGenerateWorkflowTask
                                                                                  SignalWithStartWorkflowExecutionRequest
x__)
                                                                               ()))))))))))))))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.runId' @:: Lens' SignalWithStartWorkflowExecutionResponse Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.started' @:: Lens' SignalWithStartWorkflowExecutionResponse Prelude.Bool@ -}
data SignalWithStartWorkflowExecutionResponse
  = SignalWithStartWorkflowExecutionResponse'_constructor {SignalWithStartWorkflowExecutionResponse -> Text
_SignalWithStartWorkflowExecutionResponse'runId :: !Data.Text.Text,
                                                           SignalWithStartWorkflowExecutionResponse -> Bool
_SignalWithStartWorkflowExecutionResponse'started :: !Prelude.Bool,
                                                           SignalWithStartWorkflowExecutionResponse -> FieldSet
_SignalWithStartWorkflowExecutionResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Bool
(SignalWithStartWorkflowExecutionResponse
 -> SignalWithStartWorkflowExecutionResponse -> Bool)
-> (SignalWithStartWorkflowExecutionResponse
    -> SignalWithStartWorkflowExecutionResponse -> Bool)
-> Eq SignalWithStartWorkflowExecutionResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Bool
== :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Bool
$c/= :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Bool
/= :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Bool
Prelude.Eq, Eq SignalWithStartWorkflowExecutionResponse
Eq SignalWithStartWorkflowExecutionResponse =>
(SignalWithStartWorkflowExecutionResponse
 -> SignalWithStartWorkflowExecutionResponse -> Ordering)
-> (SignalWithStartWorkflowExecutionResponse
    -> SignalWithStartWorkflowExecutionResponse -> Bool)
-> (SignalWithStartWorkflowExecutionResponse
    -> SignalWithStartWorkflowExecutionResponse -> Bool)
-> (SignalWithStartWorkflowExecutionResponse
    -> SignalWithStartWorkflowExecutionResponse -> Bool)
-> (SignalWithStartWorkflowExecutionResponse
    -> SignalWithStartWorkflowExecutionResponse -> Bool)
-> (SignalWithStartWorkflowExecutionResponse
    -> SignalWithStartWorkflowExecutionResponse
    -> SignalWithStartWorkflowExecutionResponse)
-> (SignalWithStartWorkflowExecutionResponse
    -> SignalWithStartWorkflowExecutionResponse
    -> SignalWithStartWorkflowExecutionResponse)
-> Ord SignalWithStartWorkflowExecutionResponse
SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Bool
SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Ordering
SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse
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 :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Ordering
compare :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Ordering
$c< :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Bool
< :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Bool
$c<= :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Bool
<= :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Bool
$c> :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Bool
> :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Bool
$c>= :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Bool
>= :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse -> Bool
$cmax :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse
max :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse
$cmin :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse
min :: SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse
-> SignalWithStartWorkflowExecutionResponse
Prelude.Ord)
instance Prelude.Show SignalWithStartWorkflowExecutionResponse where
  showsPrec :: Int -> SignalWithStartWorkflowExecutionResponse -> ShowS
showsPrec Int
_ SignalWithStartWorkflowExecutionResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (SignalWithStartWorkflowExecutionResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SignalWithStartWorkflowExecutionResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionResponse "runId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "runId"
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionResponse
-> f SignalWithStartWorkflowExecutionResponse
fieldOf Proxy# "runId"
_
    = ((Text -> f Text)
 -> SignalWithStartWorkflowExecutionResponse
 -> f SignalWithStartWorkflowExecutionResponse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWithStartWorkflowExecutionResponse
-> f SignalWithStartWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionResponse -> Text)
-> (SignalWithStartWorkflowExecutionResponse
    -> Text -> SignalWithStartWorkflowExecutionResponse)
-> Lens
     SignalWithStartWorkflowExecutionResponse
     SignalWithStartWorkflowExecutionResponse
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionResponse -> Text
_SignalWithStartWorkflowExecutionResponse'runId
           (\ SignalWithStartWorkflowExecutionResponse
x__ Text
y__
              -> SignalWithStartWorkflowExecutionResponse
x__ {_SignalWithStartWorkflowExecutionResponse'runId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWithStartWorkflowExecutionResponse "started" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "started"
-> (Bool -> f Bool)
-> SignalWithStartWorkflowExecutionResponse
-> f SignalWithStartWorkflowExecutionResponse
fieldOf Proxy# "started"
_
    = ((Bool -> f Bool)
 -> SignalWithStartWorkflowExecutionResponse
 -> f SignalWithStartWorkflowExecutionResponse)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> SignalWithStartWorkflowExecutionResponse
-> f SignalWithStartWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWithStartWorkflowExecutionResponse -> Bool)
-> (SignalWithStartWorkflowExecutionResponse
    -> Bool -> SignalWithStartWorkflowExecutionResponse)
-> Lens
     SignalWithStartWorkflowExecutionResponse
     SignalWithStartWorkflowExecutionResponse
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWithStartWorkflowExecutionResponse -> Bool
_SignalWithStartWorkflowExecutionResponse'started
           (\ SignalWithStartWorkflowExecutionResponse
x__ Bool
y__
              -> SignalWithStartWorkflowExecutionResponse
x__ {_SignalWithStartWorkflowExecutionResponse'started = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SignalWithStartWorkflowExecutionResponse where
  messageName :: Proxy SignalWithStartWorkflowExecutionResponse -> Text
messageName Proxy SignalWithStartWorkflowExecutionResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.SignalWithStartWorkflowExecutionResponse"
  packedMessageDescriptor :: Proxy SignalWithStartWorkflowExecutionResponse -> ByteString
packedMessageDescriptor Proxy SignalWithStartWorkflowExecutionResponse
_
    = ByteString
"\n\
      \(SignalWithStartWorkflowExecutionResponse\DC2\NAK\n\
      \\ACKrun_id\CAN\SOH \SOH(\tR\ENQrunId\DC2\CAN\n\
      \\astarted\CAN\STX \SOH(\bR\astarted"
  packedFileDescriptor :: Proxy SignalWithStartWorkflowExecutionResponse -> ByteString
packedFileDescriptor Proxy SignalWithStartWorkflowExecutionResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor SignalWithStartWorkflowExecutionResponse)
fieldsByTag
    = let
        runId__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionResponse
runId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWithStartWorkflowExecutionResponse Text
-> FieldDescriptor SignalWithStartWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"run_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     SignalWithStartWorkflowExecutionResponse
     SignalWithStartWorkflowExecutionResponse
     Text
     Text
-> FieldAccessor SignalWithStartWorkflowExecutionResponse Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId")) ::
              Data.ProtoLens.FieldDescriptor SignalWithStartWorkflowExecutionResponse
        started__field_descriptor :: FieldDescriptor SignalWithStartWorkflowExecutionResponse
started__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor SignalWithStartWorkflowExecutionResponse Bool
-> FieldDescriptor SignalWithStartWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started"
              (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
     SignalWithStartWorkflowExecutionResponse
     SignalWithStartWorkflowExecutionResponse
     Bool
     Bool
-> FieldAccessor SignalWithStartWorkflowExecutionResponse 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 @"started")) ::
              Data.ProtoLens.FieldDescriptor SignalWithStartWorkflowExecutionResponse
      in
        [(Tag, FieldDescriptor SignalWithStartWorkflowExecutionResponse)]
-> Map
     Tag (FieldDescriptor SignalWithStartWorkflowExecutionResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor SignalWithStartWorkflowExecutionResponse
runId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor SignalWithStartWorkflowExecutionResponse
started__field_descriptor)]
  unknownFields :: Lens' SignalWithStartWorkflowExecutionResponse FieldSet
unknownFields
    = (SignalWithStartWorkflowExecutionResponse -> FieldSet)
-> (SignalWithStartWorkflowExecutionResponse
    -> FieldSet -> SignalWithStartWorkflowExecutionResponse)
-> Lens' SignalWithStartWorkflowExecutionResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SignalWithStartWorkflowExecutionResponse -> FieldSet
_SignalWithStartWorkflowExecutionResponse'_unknownFields
        (\ SignalWithStartWorkflowExecutionResponse
x__ FieldSet
y__
           -> SignalWithStartWorkflowExecutionResponse
x__
                {_SignalWithStartWorkflowExecutionResponse'_unknownFields = y__})
  defMessage :: SignalWithStartWorkflowExecutionResponse
defMessage
    = SignalWithStartWorkflowExecutionResponse'_constructor
        {_SignalWithStartWorkflowExecutionResponse'runId :: Text
_SignalWithStartWorkflowExecutionResponse'runId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWithStartWorkflowExecutionResponse'started :: Bool
_SignalWithStartWorkflowExecutionResponse'started = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWithStartWorkflowExecutionResponse'_unknownFields :: FieldSet
_SignalWithStartWorkflowExecutionResponse'_unknownFields = []}
  parseMessage :: Parser SignalWithStartWorkflowExecutionResponse
parseMessage
    = let
        loop ::
          SignalWithStartWorkflowExecutionResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser SignalWithStartWorkflowExecutionResponse
        loop :: SignalWithStartWorkflowExecutionResponse
-> Parser SignalWithStartWorkflowExecutionResponse
loop SignalWithStartWorkflowExecutionResponse
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"run_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"runId") y x)
                        Word64
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
"started"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"started") 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 SignalWithStartWorkflowExecutionResponse
-> String -> Parser SignalWithStartWorkflowExecutionResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do SignalWithStartWorkflowExecutionResponse
-> Parser SignalWithStartWorkflowExecutionResponse
loop SignalWithStartWorkflowExecutionResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"SignalWithStartWorkflowExecutionResponse"
  buildMessage :: SignalWithStartWorkflowExecutionResponse -> Builder
buildMessage
    = \ SignalWithStartWorkflowExecutionResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  SignalWithStartWorkflowExecutionResponse
  SignalWithStartWorkflowExecutionResponse
  Text
  Text
-> SignalWithStartWorkflowExecutionResponse -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId") SignalWithStartWorkflowExecutionResponse
_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
  SignalWithStartWorkflowExecutionResponse
  SignalWithStartWorkflowExecutionResponse
  Bool
  Bool
-> SignalWithStartWorkflowExecutionResponse -> 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 @"started") SignalWithStartWorkflowExecutionResponse
_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
  SignalWithStartWorkflowExecutionResponse
  SignalWithStartWorkflowExecutionResponse
  FieldSet
  FieldSet
-> SignalWithStartWorkflowExecutionResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  SignalWithStartWorkflowExecutionResponse
  SignalWithStartWorkflowExecutionResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SignalWithStartWorkflowExecutionResponse FieldSet
Data.ProtoLens.unknownFields SignalWithStartWorkflowExecutionResponse
_x)))
instance Control.DeepSeq.NFData SignalWithStartWorkflowExecutionResponse where
  rnf :: SignalWithStartWorkflowExecutionResponse -> ()
rnf
    = \ SignalWithStartWorkflowExecutionResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SignalWithStartWorkflowExecutionResponse -> FieldSet
_SignalWithStartWorkflowExecutionResponse'_unknownFields SignalWithStartWorkflowExecutionResponse
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SignalWithStartWorkflowExecutionResponse -> Text
_SignalWithStartWorkflowExecutionResponse'runId SignalWithStartWorkflowExecutionResponse
x__)
                (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (SignalWithStartWorkflowExecutionResponse -> Bool
_SignalWithStartWorkflowExecutionResponse'started SignalWithStartWorkflowExecutionResponse
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' SignalWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowExecution' @:: Lens' SignalWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowExecution' @:: Lens' SignalWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.signalName' @:: Lens' SignalWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.input' @:: Lens' SignalWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'input' @:: Lens' SignalWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' SignalWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.requestId' @:: Lens' SignalWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.control' @:: Lens' SignalWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.header' @:: Lens' SignalWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.Header@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'header' @:: Lens' SignalWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.skipGenerateWorkflowTask' @:: Lens' SignalWorkflowExecutionRequest Prelude.Bool@ -}
data SignalWorkflowExecutionRequest
  = SignalWorkflowExecutionRequest'_constructor {SignalWorkflowExecutionRequest -> Text
_SignalWorkflowExecutionRequest'namespace :: !Data.Text.Text,
                                                 SignalWorkflowExecutionRequest -> Maybe WorkflowExecution
_SignalWorkflowExecutionRequest'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                 SignalWorkflowExecutionRequest -> Text
_SignalWorkflowExecutionRequest'signalName :: !Data.Text.Text,
                                                 SignalWorkflowExecutionRequest -> Maybe Payloads
_SignalWorkflowExecutionRequest'input :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                 SignalWorkflowExecutionRequest -> Text
_SignalWorkflowExecutionRequest'identity :: !Data.Text.Text,
                                                 SignalWorkflowExecutionRequest -> Text
_SignalWorkflowExecutionRequest'requestId :: !Data.Text.Text,
                                                 SignalWorkflowExecutionRequest -> Text
_SignalWorkflowExecutionRequest'control :: !Data.Text.Text,
                                                 SignalWorkflowExecutionRequest -> Maybe Header
_SignalWorkflowExecutionRequest'header :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header),
                                                 SignalWorkflowExecutionRequest -> Bool
_SignalWorkflowExecutionRequest'skipGenerateWorkflowTask :: !Prelude.Bool,
                                                 SignalWorkflowExecutionRequest -> FieldSet
_SignalWorkflowExecutionRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Bool
(SignalWorkflowExecutionRequest
 -> SignalWorkflowExecutionRequest -> Bool)
-> (SignalWorkflowExecutionRequest
    -> SignalWorkflowExecutionRequest -> Bool)
-> Eq SignalWorkflowExecutionRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Bool
== :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Bool
$c/= :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Bool
/= :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Bool
Prelude.Eq, Eq SignalWorkflowExecutionRequest
Eq SignalWorkflowExecutionRequest =>
(SignalWorkflowExecutionRequest
 -> SignalWorkflowExecutionRequest -> Ordering)
-> (SignalWorkflowExecutionRequest
    -> SignalWorkflowExecutionRequest -> Bool)
-> (SignalWorkflowExecutionRequest
    -> SignalWorkflowExecutionRequest -> Bool)
-> (SignalWorkflowExecutionRequest
    -> SignalWorkflowExecutionRequest -> Bool)
-> (SignalWorkflowExecutionRequest
    -> SignalWorkflowExecutionRequest -> Bool)
-> (SignalWorkflowExecutionRequest
    -> SignalWorkflowExecutionRequest
    -> SignalWorkflowExecutionRequest)
-> (SignalWorkflowExecutionRequest
    -> SignalWorkflowExecutionRequest
    -> SignalWorkflowExecutionRequest)
-> Ord SignalWorkflowExecutionRequest
SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Bool
SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Ordering
SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> SignalWorkflowExecutionRequest
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 :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Ordering
compare :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Ordering
$c< :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Bool
< :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Bool
$c<= :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Bool
<= :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Bool
$c> :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Bool
> :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Bool
$c>= :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Bool
>= :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> Bool
$cmax :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> SignalWorkflowExecutionRequest
max :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> SignalWorkflowExecutionRequest
$cmin :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> SignalWorkflowExecutionRequest
min :: SignalWorkflowExecutionRequest
-> SignalWorkflowExecutionRequest -> SignalWorkflowExecutionRequest
Prelude.Ord)
instance Prelude.Show SignalWorkflowExecutionRequest where
  showsPrec :: Int -> SignalWorkflowExecutionRequest -> ShowS
showsPrec Int
_ SignalWorkflowExecutionRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (SignalWorkflowExecutionRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SignalWorkflowExecutionRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField SignalWorkflowExecutionRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> SignalWorkflowExecutionRequest
 -> f SignalWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflowExecutionRequest -> Text)
-> (SignalWorkflowExecutionRequest
    -> Text -> SignalWorkflowExecutionRequest)
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflowExecutionRequest -> Text
_SignalWorkflowExecutionRequest'namespace
           (\ SignalWorkflowExecutionRequest
x__ Text
y__
              -> SignalWorkflowExecutionRequest
x__ {_SignalWorkflowExecutionRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWorkflowExecutionRequest "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> SignalWorkflowExecutionRequest
 -> f SignalWorkflowExecutionRequest)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflowExecutionRequest -> Maybe WorkflowExecution)
-> (SignalWorkflowExecutionRequest
    -> Maybe WorkflowExecution -> SignalWorkflowExecutionRequest)
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflowExecutionRequest -> Maybe WorkflowExecution
_SignalWorkflowExecutionRequest'workflowExecution
           (\ SignalWorkflowExecutionRequest
x__ Maybe WorkflowExecution
y__
              -> SignalWorkflowExecutionRequest
x__ {_SignalWorkflowExecutionRequest'workflowExecution = y__}))
        (WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField SignalWorkflowExecutionRequest "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> SignalWorkflowExecutionRequest
 -> f SignalWorkflowExecutionRequest)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflowExecutionRequest -> Maybe WorkflowExecution)
-> (SignalWorkflowExecutionRequest
    -> Maybe WorkflowExecution -> SignalWorkflowExecutionRequest)
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflowExecutionRequest -> Maybe WorkflowExecution
_SignalWorkflowExecutionRequest'workflowExecution
           (\ SignalWorkflowExecutionRequest
x__ Maybe WorkflowExecution
y__
              -> SignalWorkflowExecutionRequest
x__ {_SignalWorkflowExecutionRequest'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWorkflowExecutionRequest "signalName" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "signalName"
-> (Text -> f Text)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
fieldOf Proxy# "signalName"
_
    = ((Text -> f Text)
 -> SignalWorkflowExecutionRequest
 -> f SignalWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflowExecutionRequest -> Text)
-> (SignalWorkflowExecutionRequest
    -> Text -> SignalWorkflowExecutionRequest)
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflowExecutionRequest -> Text
_SignalWorkflowExecutionRequest'signalName
           (\ SignalWorkflowExecutionRequest
x__ Text
y__
              -> SignalWorkflowExecutionRequest
x__ {_SignalWorkflowExecutionRequest'signalName = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWorkflowExecutionRequest "input" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "input"
-> (Payloads -> f Payloads)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
fieldOf Proxy# "input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> SignalWorkflowExecutionRequest
 -> f SignalWorkflowExecutionRequest)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflowExecutionRequest -> Maybe Payloads)
-> (SignalWorkflowExecutionRequest
    -> Maybe Payloads -> SignalWorkflowExecutionRequest)
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflowExecutionRequest -> Maybe Payloads
_SignalWorkflowExecutionRequest'input
           (\ SignalWorkflowExecutionRequest
x__ Maybe Payloads
y__ -> SignalWorkflowExecutionRequest
x__ {_SignalWorkflowExecutionRequest'input = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField SignalWorkflowExecutionRequest "maybe'input" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'input"
-> (Maybe Payloads -> f (Maybe Payloads))
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
fieldOf Proxy# "maybe'input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> SignalWorkflowExecutionRequest
 -> f SignalWorkflowExecutionRequest)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflowExecutionRequest -> Maybe Payloads)
-> (SignalWorkflowExecutionRequest
    -> Maybe Payloads -> SignalWorkflowExecutionRequest)
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflowExecutionRequest -> Maybe Payloads
_SignalWorkflowExecutionRequest'input
           (\ SignalWorkflowExecutionRequest
x__ Maybe Payloads
y__ -> SignalWorkflowExecutionRequest
x__ {_SignalWorkflowExecutionRequest'input = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWorkflowExecutionRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> SignalWorkflowExecutionRequest
 -> f SignalWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflowExecutionRequest -> Text)
-> (SignalWorkflowExecutionRequest
    -> Text -> SignalWorkflowExecutionRequest)
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflowExecutionRequest -> Text
_SignalWorkflowExecutionRequest'identity
           (\ SignalWorkflowExecutionRequest
x__ Text
y__
              -> SignalWorkflowExecutionRequest
x__ {_SignalWorkflowExecutionRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWorkflowExecutionRequest "requestId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestId"
-> (Text -> f Text)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
fieldOf Proxy# "requestId"
_
    = ((Text -> f Text)
 -> SignalWorkflowExecutionRequest
 -> f SignalWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflowExecutionRequest -> Text)
-> (SignalWorkflowExecutionRequest
    -> Text -> SignalWorkflowExecutionRequest)
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflowExecutionRequest -> Text
_SignalWorkflowExecutionRequest'requestId
           (\ SignalWorkflowExecutionRequest
x__ Text
y__
              -> SignalWorkflowExecutionRequest
x__ {_SignalWorkflowExecutionRequest'requestId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWorkflowExecutionRequest "control" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "control"
-> (Text -> f Text)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
fieldOf Proxy# "control"
_
    = ((Text -> f Text)
 -> SignalWorkflowExecutionRequest
 -> f SignalWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflowExecutionRequest -> Text)
-> (SignalWorkflowExecutionRequest
    -> Text -> SignalWorkflowExecutionRequest)
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflowExecutionRequest -> Text
_SignalWorkflowExecutionRequest'control
           (\ SignalWorkflowExecutionRequest
x__ Text
y__ -> SignalWorkflowExecutionRequest
x__ {_SignalWorkflowExecutionRequest'control = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWorkflowExecutionRequest "header" Proto.Temporal.Api.Common.V1.Message.Header where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "header"
-> (Header -> f Header)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
fieldOf Proxy# "header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> SignalWorkflowExecutionRequest
 -> f SignalWorkflowExecutionRequest)
-> ((Header -> f Header) -> Maybe Header -> f (Maybe Header))
-> (Header -> f Header)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflowExecutionRequest -> Maybe Header)
-> (SignalWorkflowExecutionRequest
    -> Maybe Header -> SignalWorkflowExecutionRequest)
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflowExecutionRequest -> Maybe Header
_SignalWorkflowExecutionRequest'header
           (\ SignalWorkflowExecutionRequest
x__ Maybe Header
y__ -> SignalWorkflowExecutionRequest
x__ {_SignalWorkflowExecutionRequest'header = y__}))
        (Header -> Lens' (Maybe Header) Header
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Header
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField SignalWorkflowExecutionRequest "maybe'header" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'header"
-> (Maybe Header -> f (Maybe Header))
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
fieldOf Proxy# "maybe'header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> SignalWorkflowExecutionRequest
 -> f SignalWorkflowExecutionRequest)
-> ((Maybe Header -> f (Maybe Header))
    -> Maybe Header -> f (Maybe Header))
-> (Maybe Header -> f (Maybe Header))
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflowExecutionRequest -> Maybe Header)
-> (SignalWorkflowExecutionRequest
    -> Maybe Header -> SignalWorkflowExecutionRequest)
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflowExecutionRequest -> Maybe Header
_SignalWorkflowExecutionRequest'header
           (\ SignalWorkflowExecutionRequest
x__ Maybe Header
y__ -> SignalWorkflowExecutionRequest
x__ {_SignalWorkflowExecutionRequest'header = y__}))
        (Maybe Header -> f (Maybe Header))
-> Maybe Header -> f (Maybe Header)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalWorkflowExecutionRequest "skipGenerateWorkflowTask" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "skipGenerateWorkflowTask"
-> (Bool -> f Bool)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
fieldOf Proxy# "skipGenerateWorkflowTask"
_
    = ((Bool -> f Bool)
 -> SignalWorkflowExecutionRequest
 -> f SignalWorkflowExecutionRequest)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> SignalWorkflowExecutionRequest
-> f SignalWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalWorkflowExecutionRequest -> Bool)
-> (SignalWorkflowExecutionRequest
    -> Bool -> SignalWorkflowExecutionRequest)
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalWorkflowExecutionRequest -> Bool
_SignalWorkflowExecutionRequest'skipGenerateWorkflowTask
           (\ SignalWorkflowExecutionRequest
x__ Bool
y__
              -> SignalWorkflowExecutionRequest
x__
                   {_SignalWorkflowExecutionRequest'skipGenerateWorkflowTask = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SignalWorkflowExecutionRequest where
  messageName :: Proxy SignalWorkflowExecutionRequest -> Text
messageName Proxy SignalWorkflowExecutionRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.SignalWorkflowExecutionRequest"
  packedMessageDescriptor :: Proxy SignalWorkflowExecutionRequest -> ByteString
packedMessageDescriptor Proxy SignalWorkflowExecutionRequest
_
    = ByteString
"\n\
      \\RSSignalWorkflowExecutionRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2X\n\
      \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2\US\n\
      \\vsignal_name\CAN\ETX \SOH(\tR\n\
      \signalName\DC26\n\
      \\ENQinput\CAN\EOT \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2\SUB\n\
      \\bidentity\CAN\ENQ \SOH(\tR\bidentity\DC2\GS\n\
      \\n\
      \request_id\CAN\ACK \SOH(\tR\trequestId\DC2\CAN\n\
      \\acontrol\CAN\a \SOH(\tR\acontrol\DC26\n\
      \\ACKheader\CAN\b \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC2=\n\
      \\ESCskip_generate_workflow_task\CAN\t \SOH(\bR\CANskipGenerateWorkflowTask"
  packedFileDescriptor :: Proxy SignalWorkflowExecutionRequest -> ByteString
packedFileDescriptor Proxy SignalWorkflowExecutionRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor SignalWorkflowExecutionRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor SignalWorkflowExecutionRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWorkflowExecutionRequest Text
-> FieldDescriptor SignalWorkflowExecutionRequest
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
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor SignalWorkflowExecutionRequest 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 SignalWorkflowExecutionRequest
        workflowExecution__field_descriptor :: FieldDescriptor SignalWorkflowExecutionRequest
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor SignalWorkflowExecutionRequest WorkflowExecution
-> FieldDescriptor SignalWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
              (Lens
  SignalWorkflowExecutionRequest
  SignalWorkflowExecutionRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor SignalWorkflowExecutionRequest WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor SignalWorkflowExecutionRequest
        signalName__field_descriptor :: FieldDescriptor SignalWorkflowExecutionRequest
signalName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWorkflowExecutionRequest Text
-> FieldDescriptor SignalWorkflowExecutionRequest
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
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor SignalWorkflowExecutionRequest 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 SignalWorkflowExecutionRequest
        input__field_descriptor :: FieldDescriptor SignalWorkflowExecutionRequest
input__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor SignalWorkflowExecutionRequest Payloads
-> FieldDescriptor SignalWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"input"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  SignalWorkflowExecutionRequest
  SignalWorkflowExecutionRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor SignalWorkflowExecutionRequest Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'input")) ::
              Data.ProtoLens.FieldDescriptor SignalWorkflowExecutionRequest
        identity__field_descriptor :: FieldDescriptor SignalWorkflowExecutionRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWorkflowExecutionRequest Text
-> FieldDescriptor SignalWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor SignalWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor SignalWorkflowExecutionRequest
        requestId__field_descriptor :: FieldDescriptor SignalWorkflowExecutionRequest
requestId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWorkflowExecutionRequest Text
-> FieldDescriptor SignalWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor SignalWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId")) ::
              Data.ProtoLens.FieldDescriptor SignalWorkflowExecutionRequest
        control__field_descriptor :: FieldDescriptor SignalWorkflowExecutionRequest
control__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor SignalWorkflowExecutionRequest Text
-> FieldDescriptor SignalWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"control"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor SignalWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"control")) ::
              Data.ProtoLens.FieldDescriptor SignalWorkflowExecutionRequest
        header__field_descriptor :: FieldDescriptor SignalWorkflowExecutionRequest
header__field_descriptor
          = String
-> FieldTypeDescriptor Header
-> FieldAccessor SignalWorkflowExecutionRequest Header
-> FieldDescriptor SignalWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"header"
              (MessageOrGroup -> FieldTypeDescriptor Header
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Header)
              (Lens
  SignalWorkflowExecutionRequest
  SignalWorkflowExecutionRequest
  (Maybe Header)
  (Maybe Header)
-> FieldAccessor SignalWorkflowExecutionRequest Header
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'header")) ::
              Data.ProtoLens.FieldDescriptor SignalWorkflowExecutionRequest
        skipGenerateWorkflowTask__field_descriptor :: FieldDescriptor SignalWorkflowExecutionRequest
skipGenerateWorkflowTask__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor SignalWorkflowExecutionRequest Bool
-> FieldDescriptor SignalWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"skip_generate_workflow_task"
              (ScalarField Bool -> FieldTypeDescriptor Bool
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Bool
Data.ProtoLens.BoolField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
              (WireDefault Bool
-> Lens
     SignalWorkflowExecutionRequest
     SignalWorkflowExecutionRequest
     Bool
     Bool
-> FieldAccessor SignalWorkflowExecutionRequest Bool
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Bool
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"skipGenerateWorkflowTask")) ::
              Data.ProtoLens.FieldDescriptor SignalWorkflowExecutionRequest
      in
        [(Tag, FieldDescriptor SignalWorkflowExecutionRequest)]
-> Map Tag (FieldDescriptor SignalWorkflowExecutionRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor SignalWorkflowExecutionRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor SignalWorkflowExecutionRequest
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor SignalWorkflowExecutionRequest
signalName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor SignalWorkflowExecutionRequest
input__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor SignalWorkflowExecutionRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor SignalWorkflowExecutionRequest
requestId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor SignalWorkflowExecutionRequest
control__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor SignalWorkflowExecutionRequest
header__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor SignalWorkflowExecutionRequest
skipGenerateWorkflowTask__field_descriptor)]
  unknownFields :: Lens' SignalWorkflowExecutionRequest FieldSet
unknownFields
    = (SignalWorkflowExecutionRequest -> FieldSet)
-> (SignalWorkflowExecutionRequest
    -> FieldSet -> SignalWorkflowExecutionRequest)
-> Lens' SignalWorkflowExecutionRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SignalWorkflowExecutionRequest -> FieldSet
_SignalWorkflowExecutionRequest'_unknownFields
        (\ SignalWorkflowExecutionRequest
x__ FieldSet
y__
           -> SignalWorkflowExecutionRequest
x__ {_SignalWorkflowExecutionRequest'_unknownFields = y__})
  defMessage :: SignalWorkflowExecutionRequest
defMessage
    = SignalWorkflowExecutionRequest'_constructor
        {_SignalWorkflowExecutionRequest'namespace :: Text
_SignalWorkflowExecutionRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWorkflowExecutionRequest'workflowExecution :: Maybe WorkflowExecution
_SignalWorkflowExecutionRequest'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _SignalWorkflowExecutionRequest'signalName :: Text
_SignalWorkflowExecutionRequest'signalName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWorkflowExecutionRequest'input :: Maybe Payloads
_SignalWorkflowExecutionRequest'input = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _SignalWorkflowExecutionRequest'identity :: Text
_SignalWorkflowExecutionRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWorkflowExecutionRequest'requestId :: Text
_SignalWorkflowExecutionRequest'requestId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWorkflowExecutionRequest'control :: Text
_SignalWorkflowExecutionRequest'control = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWorkflowExecutionRequest'header :: Maybe Header
_SignalWorkflowExecutionRequest'header = Maybe Header
forall a. Maybe a
Prelude.Nothing,
         _SignalWorkflowExecutionRequest'skipGenerateWorkflowTask :: Bool
_SignalWorkflowExecutionRequest'skipGenerateWorkflowTask = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalWorkflowExecutionRequest'_unknownFields :: FieldSet
_SignalWorkflowExecutionRequest'_unknownFields = []}
  parseMessage :: Parser SignalWorkflowExecutionRequest
parseMessage
    = let
        loop ::
          SignalWorkflowExecutionRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser SignalWorkflowExecutionRequest
        loop :: SignalWorkflowExecutionRequest
-> Parser SignalWorkflowExecutionRequest
loop SignalWorkflowExecutionRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"signal_name"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"signalName") y x)
                        Word64
34
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"input"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"input") y x)
                        Word64
42
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
50
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"request_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x)
                        Word64
58
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"control"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"control") y x)
                        Word64
66
                          -> do y <- Parser Header -> String -> Parser Header
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"header"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"header") y x)
                        Word64
72
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"skip_generate_workflow_task"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"skipGenerateWorkflowTask") y x)
                        Word64
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 SignalWorkflowExecutionRequest
-> String -> Parser SignalWorkflowExecutionRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do SignalWorkflowExecutionRequest
-> Parser SignalWorkflowExecutionRequest
loop SignalWorkflowExecutionRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"SignalWorkflowExecutionRequest"
  buildMessage :: SignalWorkflowExecutionRequest -> Builder
buildMessage
    = \ SignalWorkflowExecutionRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  SignalWorkflowExecutionRequest
  SignalWorkflowExecutionRequest
  Text
  Text
-> SignalWorkflowExecutionRequest -> 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") SignalWorkflowExecutionRequest
_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 WorkflowExecution)
  SignalWorkflowExecutionRequest
  SignalWorkflowExecutionRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> SignalWorkflowExecutionRequest -> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution") SignalWorkflowExecutionRequest
_x
                 of
                   Maybe WorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just WorkflowExecution
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v
                        = FoldLike
  Text
  SignalWorkflowExecutionRequest
  SignalWorkflowExecutionRequest
  Text
  Text
-> SignalWorkflowExecutionRequest -> 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") SignalWorkflowExecutionRequest
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe Payloads)
  SignalWorkflowExecutionRequest
  SignalWorkflowExecutionRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> SignalWorkflowExecutionRequest -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'input") SignalWorkflowExecutionRequest
_x
                       of
                         Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just Payloads
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Text
_v = FoldLike
  Text
  SignalWorkflowExecutionRequest
  SignalWorkflowExecutionRequest
  Text
  Text
-> SignalWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") SignalWorkflowExecutionRequest
_x
                          in
                            if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                  ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     (\ ByteString
bs
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                     Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v = FoldLike
  Text
  SignalWorkflowExecutionRequest
  SignalWorkflowExecutionRequest
  Text
  Text
-> SignalWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId") SignalWorkflowExecutionRequest
_x
                             in
                               if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                     ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        (\ ByteString
bs
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Text
_v = FoldLike
  Text
  SignalWorkflowExecutionRequest
  SignalWorkflowExecutionRequest
  Text
  Text
-> SignalWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"control") SignalWorkflowExecutionRequest
_x
                                in
                                  if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                      Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  else
                                      Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                        ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                           (\ ByteString
bs
                                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                         (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                           Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                               (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (case
                                       FoldLike
  (Maybe Header)
  SignalWorkflowExecutionRequest
  SignalWorkflowExecutionRequest
  (Maybe Header)
  (Maybe Header)
-> SignalWorkflowExecutionRequest -> Maybe Header
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                         (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'header") SignalWorkflowExecutionRequest
_x
                                   of
                                     Maybe Header
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                     (Prelude.Just Header
_v)
                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                                            ((ByteString -> Builder)
-> (Header -> ByteString) -> Header -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                               (\ ByteString
bs
                                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                             (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                               Header -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Header
_v))
                                  (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (let
                                        _v :: Bool
_v
                                          = FoldLike
  Bool
  SignalWorkflowExecutionRequest
  SignalWorkflowExecutionRequest
  Bool
  Bool
-> SignalWorkflowExecutionRequest -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                 @"skipGenerateWorkflowTask")
                                              SignalWorkflowExecutionRequest
_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
72)
                                              ((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
  SignalWorkflowExecutionRequest
  SignalWorkflowExecutionRequest
  FieldSet
  FieldSet
-> SignalWorkflowExecutionRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  SignalWorkflowExecutionRequest
  SignalWorkflowExecutionRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SignalWorkflowExecutionRequest FieldSet
Data.ProtoLens.unknownFields SignalWorkflowExecutionRequest
_x))))))))))
instance Control.DeepSeq.NFData SignalWorkflowExecutionRequest where
  rnf :: SignalWorkflowExecutionRequest -> ()
rnf
    = \ SignalWorkflowExecutionRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SignalWorkflowExecutionRequest -> FieldSet
_SignalWorkflowExecutionRequest'_unknownFields SignalWorkflowExecutionRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SignalWorkflowExecutionRequest -> Text
_SignalWorkflowExecutionRequest'namespace SignalWorkflowExecutionRequest
x__)
                (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (SignalWorkflowExecutionRequest -> Maybe WorkflowExecution
_SignalWorkflowExecutionRequest'workflowExecution SignalWorkflowExecutionRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (SignalWorkflowExecutionRequest -> Text
_SignalWorkflowExecutionRequest'signalName SignalWorkflowExecutionRequest
x__)
                      (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (SignalWorkflowExecutionRequest -> Maybe Payloads
_SignalWorkflowExecutionRequest'input SignalWorkflowExecutionRequest
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (SignalWorkflowExecutionRequest -> Text
_SignalWorkflowExecutionRequest'identity SignalWorkflowExecutionRequest
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (SignalWorkflowExecutionRequest -> Text
_SignalWorkflowExecutionRequest'requestId SignalWorkflowExecutionRequest
x__)
                               (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (SignalWorkflowExecutionRequest -> Text
_SignalWorkflowExecutionRequest'control SignalWorkflowExecutionRequest
x__)
                                  (Maybe Header -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (SignalWorkflowExecutionRequest -> Maybe Header
_SignalWorkflowExecutionRequest'header SignalWorkflowExecutionRequest
x__)
                                     (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (SignalWorkflowExecutionRequest -> Bool
_SignalWorkflowExecutionRequest'skipGenerateWorkflowTask
                                           SignalWorkflowExecutionRequest
x__)
                                        ())))))))))
{- | Fields :
      -}
data SignalWorkflowExecutionResponse
  = SignalWorkflowExecutionResponse'_constructor {SignalWorkflowExecutionResponse -> FieldSet
_SignalWorkflowExecutionResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Bool
(SignalWorkflowExecutionResponse
 -> SignalWorkflowExecutionResponse -> Bool)
-> (SignalWorkflowExecutionResponse
    -> SignalWorkflowExecutionResponse -> Bool)
-> Eq SignalWorkflowExecutionResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Bool
== :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Bool
$c/= :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Bool
/= :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Bool
Prelude.Eq, Eq SignalWorkflowExecutionResponse
Eq SignalWorkflowExecutionResponse =>
(SignalWorkflowExecutionResponse
 -> SignalWorkflowExecutionResponse -> Ordering)
-> (SignalWorkflowExecutionResponse
    -> SignalWorkflowExecutionResponse -> Bool)
-> (SignalWorkflowExecutionResponse
    -> SignalWorkflowExecutionResponse -> Bool)
-> (SignalWorkflowExecutionResponse
    -> SignalWorkflowExecutionResponse -> Bool)
-> (SignalWorkflowExecutionResponse
    -> SignalWorkflowExecutionResponse -> Bool)
-> (SignalWorkflowExecutionResponse
    -> SignalWorkflowExecutionResponse
    -> SignalWorkflowExecutionResponse)
-> (SignalWorkflowExecutionResponse
    -> SignalWorkflowExecutionResponse
    -> SignalWorkflowExecutionResponse)
-> Ord SignalWorkflowExecutionResponse
SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Bool
SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Ordering
SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse
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 :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Ordering
compare :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Ordering
$c< :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Bool
< :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Bool
$c<= :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Bool
<= :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Bool
$c> :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Bool
> :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Bool
$c>= :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Bool
>= :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse -> Bool
$cmax :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse
max :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse
$cmin :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse
min :: SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse
-> SignalWorkflowExecutionResponse
Prelude.Ord)
instance Prelude.Show SignalWorkflowExecutionResponse where
  showsPrec :: Int -> SignalWorkflowExecutionResponse -> ShowS
showsPrec Int
_ SignalWorkflowExecutionResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (SignalWorkflowExecutionResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SignalWorkflowExecutionResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message SignalWorkflowExecutionResponse where
  messageName :: Proxy SignalWorkflowExecutionResponse -> Text
messageName Proxy SignalWorkflowExecutionResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.SignalWorkflowExecutionResponse"
  packedMessageDescriptor :: Proxy SignalWorkflowExecutionResponse -> ByteString
packedMessageDescriptor Proxy SignalWorkflowExecutionResponse
_
    = ByteString
"\n\
      \\USSignalWorkflowExecutionResponse"
  packedFileDescriptor :: Proxy SignalWorkflowExecutionResponse -> ByteString
packedFileDescriptor Proxy SignalWorkflowExecutionResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor SignalWorkflowExecutionResponse)
fieldsByTag = let in [(Tag, FieldDescriptor SignalWorkflowExecutionResponse)]
-> Map Tag (FieldDescriptor SignalWorkflowExecutionResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' SignalWorkflowExecutionResponse FieldSet
unknownFields
    = (SignalWorkflowExecutionResponse -> FieldSet)
-> (SignalWorkflowExecutionResponse
    -> FieldSet -> SignalWorkflowExecutionResponse)
-> Lens' SignalWorkflowExecutionResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SignalWorkflowExecutionResponse -> FieldSet
_SignalWorkflowExecutionResponse'_unknownFields
        (\ SignalWorkflowExecutionResponse
x__ FieldSet
y__
           -> SignalWorkflowExecutionResponse
x__ {_SignalWorkflowExecutionResponse'_unknownFields = y__})
  defMessage :: SignalWorkflowExecutionResponse
defMessage
    = SignalWorkflowExecutionResponse'_constructor
        {_SignalWorkflowExecutionResponse'_unknownFields :: FieldSet
_SignalWorkflowExecutionResponse'_unknownFields = []}
  parseMessage :: Parser SignalWorkflowExecutionResponse
parseMessage
    = let
        loop ::
          SignalWorkflowExecutionResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser SignalWorkflowExecutionResponse
        loop :: SignalWorkflowExecutionResponse
-> Parser SignalWorkflowExecutionResponse
loop SignalWorkflowExecutionResponse
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 SignalWorkflowExecutionResponse
-> String -> Parser SignalWorkflowExecutionResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do SignalWorkflowExecutionResponse
-> Parser SignalWorkflowExecutionResponse
loop SignalWorkflowExecutionResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"SignalWorkflowExecutionResponse"
  buildMessage :: SignalWorkflowExecutionResponse -> Builder
buildMessage
    = \ SignalWorkflowExecutionResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  SignalWorkflowExecutionResponse
  SignalWorkflowExecutionResponse
  FieldSet
  FieldSet
-> SignalWorkflowExecutionResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  SignalWorkflowExecutionResponse
  SignalWorkflowExecutionResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SignalWorkflowExecutionResponse FieldSet
Data.ProtoLens.unknownFields SignalWorkflowExecutionResponse
_x)
instance Control.DeepSeq.NFData SignalWorkflowExecutionResponse where
  rnf :: SignalWorkflowExecutionResponse -> ()
rnf
    = \ SignalWorkflowExecutionResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SignalWorkflowExecutionResponse -> FieldSet
_SignalWorkflowExecutionResponse'_unknownFields SignalWorkflowExecutionResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' StartBatchOperationRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.visibilityQuery' @:: Lens' StartBatchOperationRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.jobId' @:: Lens' StartBatchOperationRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.reason' @:: Lens' StartBatchOperationRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.executions' @:: Lens' StartBatchOperationRequest [Proto.Temporal.Api.Common.V1.Message.WorkflowExecution]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'executions' @:: Lens' StartBatchOperationRequest (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maxOperationsPerSecond' @:: Lens' StartBatchOperationRequest Prelude.Float@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'operation' @:: Lens' StartBatchOperationRequest (Prelude.Maybe StartBatchOperationRequest'Operation)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'terminationOperation' @:: Lens' StartBatchOperationRequest (Prelude.Maybe Proto.Temporal.Api.Batch.V1.Message.BatchOperationTermination)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.terminationOperation' @:: Lens' StartBatchOperationRequest Proto.Temporal.Api.Batch.V1.Message.BatchOperationTermination@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'signalOperation' @:: Lens' StartBatchOperationRequest (Prelude.Maybe Proto.Temporal.Api.Batch.V1.Message.BatchOperationSignal)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.signalOperation' @:: Lens' StartBatchOperationRequest Proto.Temporal.Api.Batch.V1.Message.BatchOperationSignal@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'cancellationOperation' @:: Lens' StartBatchOperationRequest (Prelude.Maybe Proto.Temporal.Api.Batch.V1.Message.BatchOperationCancellation)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.cancellationOperation' @:: Lens' StartBatchOperationRequest Proto.Temporal.Api.Batch.V1.Message.BatchOperationCancellation@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'deletionOperation' @:: Lens' StartBatchOperationRequest (Prelude.Maybe Proto.Temporal.Api.Batch.V1.Message.BatchOperationDeletion)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.deletionOperation' @:: Lens' StartBatchOperationRequest Proto.Temporal.Api.Batch.V1.Message.BatchOperationDeletion@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'resetOperation' @:: Lens' StartBatchOperationRequest (Prelude.Maybe Proto.Temporal.Api.Batch.V1.Message.BatchOperationReset)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.resetOperation' @:: Lens' StartBatchOperationRequest Proto.Temporal.Api.Batch.V1.Message.BatchOperationReset@ -}
data StartBatchOperationRequest
  = StartBatchOperationRequest'_constructor {StartBatchOperationRequest -> Text
_StartBatchOperationRequest'namespace :: !Data.Text.Text,
                                             StartBatchOperationRequest -> Text
_StartBatchOperationRequest'visibilityQuery :: !Data.Text.Text,
                                             StartBatchOperationRequest -> Text
_StartBatchOperationRequest'jobId :: !Data.Text.Text,
                                             StartBatchOperationRequest -> Text
_StartBatchOperationRequest'reason :: !Data.Text.Text,
                                             StartBatchOperationRequest -> Vector WorkflowExecution
_StartBatchOperationRequest'executions :: !(Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                             StartBatchOperationRequest -> Float
_StartBatchOperationRequest'maxOperationsPerSecond :: !Prelude.Float,
                                             StartBatchOperationRequest
-> Maybe StartBatchOperationRequest'Operation
_StartBatchOperationRequest'operation :: !(Prelude.Maybe StartBatchOperationRequest'Operation),
                                             StartBatchOperationRequest -> FieldSet
_StartBatchOperationRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (StartBatchOperationRequest -> StartBatchOperationRequest -> Bool
(StartBatchOperationRequest -> StartBatchOperationRequest -> Bool)
-> (StartBatchOperationRequest
    -> StartBatchOperationRequest -> Bool)
-> Eq StartBatchOperationRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StartBatchOperationRequest -> StartBatchOperationRequest -> Bool
== :: StartBatchOperationRequest -> StartBatchOperationRequest -> Bool
$c/= :: StartBatchOperationRequest -> StartBatchOperationRequest -> Bool
/= :: StartBatchOperationRequest -> StartBatchOperationRequest -> Bool
Prelude.Eq, Eq StartBatchOperationRequest
Eq StartBatchOperationRequest =>
(StartBatchOperationRequest
 -> StartBatchOperationRequest -> Ordering)
-> (StartBatchOperationRequest
    -> StartBatchOperationRequest -> Bool)
-> (StartBatchOperationRequest
    -> StartBatchOperationRequest -> Bool)
-> (StartBatchOperationRequest
    -> StartBatchOperationRequest -> Bool)
-> (StartBatchOperationRequest
    -> StartBatchOperationRequest -> Bool)
-> (StartBatchOperationRequest
    -> StartBatchOperationRequest -> StartBatchOperationRequest)
-> (StartBatchOperationRequest
    -> StartBatchOperationRequest -> StartBatchOperationRequest)
-> Ord StartBatchOperationRequest
StartBatchOperationRequest -> StartBatchOperationRequest -> Bool
StartBatchOperationRequest
-> StartBatchOperationRequest -> Ordering
StartBatchOperationRequest
-> StartBatchOperationRequest -> StartBatchOperationRequest
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 :: StartBatchOperationRequest
-> StartBatchOperationRequest -> Ordering
compare :: StartBatchOperationRequest
-> StartBatchOperationRequest -> Ordering
$c< :: StartBatchOperationRequest -> StartBatchOperationRequest -> Bool
< :: StartBatchOperationRequest -> StartBatchOperationRequest -> Bool
$c<= :: StartBatchOperationRequest -> StartBatchOperationRequest -> Bool
<= :: StartBatchOperationRequest -> StartBatchOperationRequest -> Bool
$c> :: StartBatchOperationRequest -> StartBatchOperationRequest -> Bool
> :: StartBatchOperationRequest -> StartBatchOperationRequest -> Bool
$c>= :: StartBatchOperationRequest -> StartBatchOperationRequest -> Bool
>= :: StartBatchOperationRequest -> StartBatchOperationRequest -> Bool
$cmax :: StartBatchOperationRequest
-> StartBatchOperationRequest -> StartBatchOperationRequest
max :: StartBatchOperationRequest
-> StartBatchOperationRequest -> StartBatchOperationRequest
$cmin :: StartBatchOperationRequest
-> StartBatchOperationRequest -> StartBatchOperationRequest
min :: StartBatchOperationRequest
-> StartBatchOperationRequest -> StartBatchOperationRequest
Prelude.Ord)
instance Prelude.Show StartBatchOperationRequest where
  showsPrec :: Int -> StartBatchOperationRequest -> ShowS
showsPrec Int
_ StartBatchOperationRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (StartBatchOperationRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort StartBatchOperationRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data StartBatchOperationRequest'Operation
  = StartBatchOperationRequest'TerminationOperation !Proto.Temporal.Api.Batch.V1.Message.BatchOperationTermination |
    StartBatchOperationRequest'SignalOperation !Proto.Temporal.Api.Batch.V1.Message.BatchOperationSignal |
    StartBatchOperationRequest'CancellationOperation !Proto.Temporal.Api.Batch.V1.Message.BatchOperationCancellation |
    StartBatchOperationRequest'DeletionOperation !Proto.Temporal.Api.Batch.V1.Message.BatchOperationDeletion |
    StartBatchOperationRequest'ResetOperation !Proto.Temporal.Api.Batch.V1.Message.BatchOperationReset
  deriving stock (Int -> StartBatchOperationRequest'Operation -> ShowS
[StartBatchOperationRequest'Operation] -> ShowS
StartBatchOperationRequest'Operation -> String
(Int -> StartBatchOperationRequest'Operation -> ShowS)
-> (StartBatchOperationRequest'Operation -> String)
-> ([StartBatchOperationRequest'Operation] -> ShowS)
-> Show StartBatchOperationRequest'Operation
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> StartBatchOperationRequest'Operation -> ShowS
showsPrec :: Int -> StartBatchOperationRequest'Operation -> ShowS
$cshow :: StartBatchOperationRequest'Operation -> String
show :: StartBatchOperationRequest'Operation -> String
$cshowList :: [StartBatchOperationRequest'Operation] -> ShowS
showList :: [StartBatchOperationRequest'Operation] -> ShowS
Prelude.Show, StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Bool
(StartBatchOperationRequest'Operation
 -> StartBatchOperationRequest'Operation -> Bool)
-> (StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest'Operation -> Bool)
-> Eq StartBatchOperationRequest'Operation
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Bool
== :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Bool
$c/= :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Bool
/= :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Bool
Prelude.Eq, Eq StartBatchOperationRequest'Operation
Eq StartBatchOperationRequest'Operation =>
(StartBatchOperationRequest'Operation
 -> StartBatchOperationRequest'Operation -> Ordering)
-> (StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest'Operation -> Bool)
-> (StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest'Operation -> Bool)
-> (StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest'Operation -> Bool)
-> (StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest'Operation -> Bool)
-> (StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest'Operation)
-> Ord StartBatchOperationRequest'Operation
StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Bool
StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Ordering
StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation
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 :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Ordering
compare :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Ordering
$c< :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Bool
< :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Bool
$c<= :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Bool
<= :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Bool
$c> :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Bool
> :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Bool
$c>= :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Bool
>= :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation -> Bool
$cmax :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation
max :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation
$cmin :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation
min :: StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation
-> StartBatchOperationRequest'Operation
Prelude.Ord)
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest -> Text)
-> (StartBatchOperationRequest
    -> Text -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest StartBatchOperationRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest -> Text
_StartBatchOperationRequest'namespace
           (\ StartBatchOperationRequest
x__ Text
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "visibilityQuery" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "visibilityQuery"
-> (Text -> f Text)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "visibilityQuery"
_
    = ((Text -> f Text)
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest -> Text)
-> (StartBatchOperationRequest
    -> Text -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest StartBatchOperationRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest -> Text
_StartBatchOperationRequest'visibilityQuery
           (\ StartBatchOperationRequest
x__ Text
y__
              -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'visibilityQuery = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "jobId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "jobId"
-> (Text -> f Text)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "jobId"
_
    = ((Text -> f Text)
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest -> Text)
-> (StartBatchOperationRequest
    -> Text -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest StartBatchOperationRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest -> Text
_StartBatchOperationRequest'jobId
           (\ StartBatchOperationRequest
x__ Text
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'jobId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "reason" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "reason"
-> (Text -> f Text)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "reason"
_
    = ((Text -> f Text)
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest -> Text)
-> (StartBatchOperationRequest
    -> Text -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest StartBatchOperationRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest -> Text
_StartBatchOperationRequest'reason
           (\ StartBatchOperationRequest
x__ Text
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'reason = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "executions" [Proto.Temporal.Api.Common.V1.Message.WorkflowExecution] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "executions"
-> ([WorkflowExecution] -> f [WorkflowExecution])
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "executions"
_
    = ((Vector WorkflowExecution -> f (Vector WorkflowExecution))
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> (([WorkflowExecution] -> f [WorkflowExecution])
    -> Vector WorkflowExecution -> f (Vector WorkflowExecution))
-> ([WorkflowExecution] -> f [WorkflowExecution])
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest -> Vector WorkflowExecution)
-> (StartBatchOperationRequest
    -> Vector WorkflowExecution -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest
     StartBatchOperationRequest
     (Vector WorkflowExecution)
     (Vector WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest -> Vector WorkflowExecution
_StartBatchOperationRequest'executions
           (\ StartBatchOperationRequest
x__ Vector WorkflowExecution
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'executions = y__}))
        ((Vector WorkflowExecution -> [WorkflowExecution])
-> (Vector WorkflowExecution
    -> [WorkflowExecution] -> Vector WorkflowExecution)
-> Lens
     (Vector WorkflowExecution)
     (Vector WorkflowExecution)
     [WorkflowExecution]
     [WorkflowExecution]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector WorkflowExecution -> [WorkflowExecution]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector WorkflowExecution
_ [WorkflowExecution]
y__ -> [WorkflowExecution] -> Vector WorkflowExecution
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [WorkflowExecution]
y__))
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "vec'executions" (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'executions"
-> (Vector WorkflowExecution -> f (Vector WorkflowExecution))
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "vec'executions"
_
    = ((Vector WorkflowExecution -> f (Vector WorkflowExecution))
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((Vector WorkflowExecution -> f (Vector WorkflowExecution))
    -> Vector WorkflowExecution -> f (Vector WorkflowExecution))
-> (Vector WorkflowExecution -> f (Vector WorkflowExecution))
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest -> Vector WorkflowExecution)
-> (StartBatchOperationRequest
    -> Vector WorkflowExecution -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest
     StartBatchOperationRequest
     (Vector WorkflowExecution)
     (Vector WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest -> Vector WorkflowExecution
_StartBatchOperationRequest'executions
           (\ StartBatchOperationRequest
x__ Vector WorkflowExecution
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'executions = y__}))
        (Vector WorkflowExecution -> f (Vector WorkflowExecution))
-> Vector WorkflowExecution -> f (Vector WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "maxOperationsPerSecond" Prelude.Float where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maxOperationsPerSecond"
-> (Float -> f Float)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "maxOperationsPerSecond"
_
    = ((Float -> f Float)
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((Float -> f Float) -> Float -> f Float)
-> (Float -> f Float)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest -> Float)
-> (StartBatchOperationRequest
    -> Float -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest StartBatchOperationRequest Float Float
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest -> Float
_StartBatchOperationRequest'maxOperationsPerSecond
           (\ StartBatchOperationRequest
x__ Float
y__
              -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'maxOperationsPerSecond = y__}))
        (Float -> f Float) -> Float -> f Float
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "maybe'operation" (Prelude.Maybe StartBatchOperationRequest'Operation) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'operation"
-> (Maybe StartBatchOperationRequest'Operation
    -> f (Maybe StartBatchOperationRequest'Operation))
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "maybe'operation"
_
    = ((Maybe StartBatchOperationRequest'Operation
  -> f (Maybe StartBatchOperationRequest'Operation))
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((Maybe StartBatchOperationRequest'Operation
     -> f (Maybe StartBatchOperationRequest'Operation))
    -> Maybe StartBatchOperationRequest'Operation
    -> f (Maybe StartBatchOperationRequest'Operation))
-> (Maybe StartBatchOperationRequest'Operation
    -> f (Maybe StartBatchOperationRequest'Operation))
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest
 -> Maybe StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest
    -> Maybe StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest
     StartBatchOperationRequest
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest
-> Maybe StartBatchOperationRequest'Operation
_StartBatchOperationRequest'operation
           (\ StartBatchOperationRequest
x__ Maybe StartBatchOperationRequest'Operation
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'operation = y__}))
        (Maybe StartBatchOperationRequest'Operation
 -> f (Maybe StartBatchOperationRequest'Operation))
-> Maybe StartBatchOperationRequest'Operation
-> f (Maybe StartBatchOperationRequest'Operation)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "maybe'terminationOperation" (Prelude.Maybe Proto.Temporal.Api.Batch.V1.Message.BatchOperationTermination) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'terminationOperation"
-> (Maybe BatchOperationTermination
    -> f (Maybe BatchOperationTermination))
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "maybe'terminationOperation"
_
    = ((Maybe StartBatchOperationRequest'Operation
  -> f (Maybe StartBatchOperationRequest'Operation))
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((Maybe BatchOperationTermination
     -> f (Maybe BatchOperationTermination))
    -> Maybe StartBatchOperationRequest'Operation
    -> f (Maybe StartBatchOperationRequest'Operation))
-> (Maybe BatchOperationTermination
    -> f (Maybe BatchOperationTermination))
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest
 -> Maybe StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest
    -> Maybe StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest
     StartBatchOperationRequest
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest
-> Maybe StartBatchOperationRequest'Operation
_StartBatchOperationRequest'operation
           (\ StartBatchOperationRequest
x__ Maybe StartBatchOperationRequest'Operation
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'operation = y__}))
        ((Maybe StartBatchOperationRequest'Operation
 -> Maybe BatchOperationTermination)
-> (Maybe StartBatchOperationRequest'Operation
    -> Maybe BatchOperationTermination
    -> Maybe StartBatchOperationRequest'Operation)
-> Lens
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe BatchOperationTermination)
     (Maybe BatchOperationTermination)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe StartBatchOperationRequest'Operation
x__
              -> case Maybe StartBatchOperationRequest'Operation
x__ of
                   (Prelude.Just (StartBatchOperationRequest'TerminationOperation BatchOperationTermination
x__val))
                     -> BatchOperationTermination -> Maybe BatchOperationTermination
forall a. a -> Maybe a
Prelude.Just BatchOperationTermination
x__val
                   Maybe StartBatchOperationRequest'Operation
_otherwise -> Maybe BatchOperationTermination
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe StartBatchOperationRequest'Operation
_ Maybe BatchOperationTermination
y__
              -> (BatchOperationTermination -> StartBatchOperationRequest'Operation)
-> Maybe BatchOperationTermination
-> Maybe StartBatchOperationRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   BatchOperationTermination -> StartBatchOperationRequest'Operation
StartBatchOperationRequest'TerminationOperation Maybe BatchOperationTermination
y__))
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "terminationOperation" Proto.Temporal.Api.Batch.V1.Message.BatchOperationTermination where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "terminationOperation"
-> (BatchOperationTermination -> f BatchOperationTermination)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "terminationOperation"
_
    = ((Maybe StartBatchOperationRequest'Operation
  -> f (Maybe StartBatchOperationRequest'Operation))
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((BatchOperationTermination -> f BatchOperationTermination)
    -> Maybe StartBatchOperationRequest'Operation
    -> f (Maybe StartBatchOperationRequest'Operation))
-> (BatchOperationTermination -> f BatchOperationTermination)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest
 -> Maybe StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest
    -> Maybe StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest
     StartBatchOperationRequest
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest
-> Maybe StartBatchOperationRequest'Operation
_StartBatchOperationRequest'operation
           (\ StartBatchOperationRequest
x__ Maybe StartBatchOperationRequest'Operation
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'operation = y__}))
        (((Maybe BatchOperationTermination
  -> f (Maybe BatchOperationTermination))
 -> Maybe StartBatchOperationRequest'Operation
 -> f (Maybe StartBatchOperationRequest'Operation))
-> ((BatchOperationTermination -> f BatchOperationTermination)
    -> Maybe BatchOperationTermination
    -> f (Maybe BatchOperationTermination))
-> (BatchOperationTermination -> f BatchOperationTermination)
-> Maybe StartBatchOperationRequest'Operation
-> f (Maybe StartBatchOperationRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe StartBatchOperationRequest'Operation
 -> Maybe BatchOperationTermination)
-> (Maybe StartBatchOperationRequest'Operation
    -> Maybe BatchOperationTermination
    -> Maybe StartBatchOperationRequest'Operation)
-> Lens
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe BatchOperationTermination)
     (Maybe BatchOperationTermination)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe StartBatchOperationRequest'Operation
x__
                 -> case Maybe StartBatchOperationRequest'Operation
x__ of
                      (Prelude.Just (StartBatchOperationRequest'TerminationOperation BatchOperationTermination
x__val))
                        -> BatchOperationTermination -> Maybe BatchOperationTermination
forall a. a -> Maybe a
Prelude.Just BatchOperationTermination
x__val
                      Maybe StartBatchOperationRequest'Operation
_otherwise -> Maybe BatchOperationTermination
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe StartBatchOperationRequest'Operation
_ Maybe BatchOperationTermination
y__
                 -> (BatchOperationTermination -> StartBatchOperationRequest'Operation)
-> Maybe BatchOperationTermination
-> Maybe StartBatchOperationRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      BatchOperationTermination -> StartBatchOperationRequest'Operation
StartBatchOperationRequest'TerminationOperation Maybe BatchOperationTermination
y__))
           (BatchOperationTermination
-> Lens'
     (Maybe BatchOperationTermination) BatchOperationTermination
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens BatchOperationTermination
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "maybe'signalOperation" (Prelude.Maybe Proto.Temporal.Api.Batch.V1.Message.BatchOperationSignal) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'signalOperation"
-> (Maybe BatchOperationSignal -> f (Maybe BatchOperationSignal))
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "maybe'signalOperation"
_
    = ((Maybe StartBatchOperationRequest'Operation
  -> f (Maybe StartBatchOperationRequest'Operation))
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((Maybe BatchOperationSignal -> f (Maybe BatchOperationSignal))
    -> Maybe StartBatchOperationRequest'Operation
    -> f (Maybe StartBatchOperationRequest'Operation))
-> (Maybe BatchOperationSignal -> f (Maybe BatchOperationSignal))
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest
 -> Maybe StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest
    -> Maybe StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest
     StartBatchOperationRequest
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest
-> Maybe StartBatchOperationRequest'Operation
_StartBatchOperationRequest'operation
           (\ StartBatchOperationRequest
x__ Maybe StartBatchOperationRequest'Operation
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'operation = y__}))
        ((Maybe StartBatchOperationRequest'Operation
 -> Maybe BatchOperationSignal)
-> (Maybe StartBatchOperationRequest'Operation
    -> Maybe BatchOperationSignal
    -> Maybe StartBatchOperationRequest'Operation)
-> Lens
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe BatchOperationSignal)
     (Maybe BatchOperationSignal)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe StartBatchOperationRequest'Operation
x__
              -> case Maybe StartBatchOperationRequest'Operation
x__ of
                   (Prelude.Just (StartBatchOperationRequest'SignalOperation BatchOperationSignal
x__val))
                     -> BatchOperationSignal -> Maybe BatchOperationSignal
forall a. a -> Maybe a
Prelude.Just BatchOperationSignal
x__val
                   Maybe StartBatchOperationRequest'Operation
_otherwise -> Maybe BatchOperationSignal
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe StartBatchOperationRequest'Operation
_ Maybe BatchOperationSignal
y__
              -> (BatchOperationSignal -> StartBatchOperationRequest'Operation)
-> Maybe BatchOperationSignal
-> Maybe StartBatchOperationRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap BatchOperationSignal -> StartBatchOperationRequest'Operation
StartBatchOperationRequest'SignalOperation Maybe BatchOperationSignal
y__))
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "signalOperation" Proto.Temporal.Api.Batch.V1.Message.BatchOperationSignal where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "signalOperation"
-> (BatchOperationSignal -> f BatchOperationSignal)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "signalOperation"
_
    = ((Maybe StartBatchOperationRequest'Operation
  -> f (Maybe StartBatchOperationRequest'Operation))
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((BatchOperationSignal -> f BatchOperationSignal)
    -> Maybe StartBatchOperationRequest'Operation
    -> f (Maybe StartBatchOperationRequest'Operation))
-> (BatchOperationSignal -> f BatchOperationSignal)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest
 -> Maybe StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest
    -> Maybe StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest
     StartBatchOperationRequest
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest
-> Maybe StartBatchOperationRequest'Operation
_StartBatchOperationRequest'operation
           (\ StartBatchOperationRequest
x__ Maybe StartBatchOperationRequest'Operation
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'operation = y__}))
        (((Maybe BatchOperationSignal -> f (Maybe BatchOperationSignal))
 -> Maybe StartBatchOperationRequest'Operation
 -> f (Maybe StartBatchOperationRequest'Operation))
-> ((BatchOperationSignal -> f BatchOperationSignal)
    -> Maybe BatchOperationSignal -> f (Maybe BatchOperationSignal))
-> (BatchOperationSignal -> f BatchOperationSignal)
-> Maybe StartBatchOperationRequest'Operation
-> f (Maybe StartBatchOperationRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe StartBatchOperationRequest'Operation
 -> Maybe BatchOperationSignal)
-> (Maybe StartBatchOperationRequest'Operation
    -> Maybe BatchOperationSignal
    -> Maybe StartBatchOperationRequest'Operation)
-> Lens
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe BatchOperationSignal)
     (Maybe BatchOperationSignal)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe StartBatchOperationRequest'Operation
x__
                 -> case Maybe StartBatchOperationRequest'Operation
x__ of
                      (Prelude.Just (StartBatchOperationRequest'SignalOperation BatchOperationSignal
x__val))
                        -> BatchOperationSignal -> Maybe BatchOperationSignal
forall a. a -> Maybe a
Prelude.Just BatchOperationSignal
x__val
                      Maybe StartBatchOperationRequest'Operation
_otherwise -> Maybe BatchOperationSignal
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe StartBatchOperationRequest'Operation
_ Maybe BatchOperationSignal
y__
                 -> (BatchOperationSignal -> StartBatchOperationRequest'Operation)
-> Maybe BatchOperationSignal
-> Maybe StartBatchOperationRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap BatchOperationSignal -> StartBatchOperationRequest'Operation
StartBatchOperationRequest'SignalOperation Maybe BatchOperationSignal
y__))
           (BatchOperationSignal
-> Lens' (Maybe BatchOperationSignal) BatchOperationSignal
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens BatchOperationSignal
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "maybe'cancellationOperation" (Prelude.Maybe Proto.Temporal.Api.Batch.V1.Message.BatchOperationCancellation) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'cancellationOperation"
-> (Maybe BatchOperationCancellation
    -> f (Maybe BatchOperationCancellation))
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "maybe'cancellationOperation"
_
    = ((Maybe StartBatchOperationRequest'Operation
  -> f (Maybe StartBatchOperationRequest'Operation))
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((Maybe BatchOperationCancellation
     -> f (Maybe BatchOperationCancellation))
    -> Maybe StartBatchOperationRequest'Operation
    -> f (Maybe StartBatchOperationRequest'Operation))
-> (Maybe BatchOperationCancellation
    -> f (Maybe BatchOperationCancellation))
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest
 -> Maybe StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest
    -> Maybe StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest
     StartBatchOperationRequest
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest
-> Maybe StartBatchOperationRequest'Operation
_StartBatchOperationRequest'operation
           (\ StartBatchOperationRequest
x__ Maybe StartBatchOperationRequest'Operation
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'operation = y__}))
        ((Maybe StartBatchOperationRequest'Operation
 -> Maybe BatchOperationCancellation)
-> (Maybe StartBatchOperationRequest'Operation
    -> Maybe BatchOperationCancellation
    -> Maybe StartBatchOperationRequest'Operation)
-> Lens
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe BatchOperationCancellation)
     (Maybe BatchOperationCancellation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe StartBatchOperationRequest'Operation
x__
              -> case Maybe StartBatchOperationRequest'Operation
x__ of
                   (Prelude.Just (StartBatchOperationRequest'CancellationOperation BatchOperationCancellation
x__val))
                     -> BatchOperationCancellation -> Maybe BatchOperationCancellation
forall a. a -> Maybe a
Prelude.Just BatchOperationCancellation
x__val
                   Maybe StartBatchOperationRequest'Operation
_otherwise -> Maybe BatchOperationCancellation
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe StartBatchOperationRequest'Operation
_ Maybe BatchOperationCancellation
y__
              -> (BatchOperationCancellation
 -> StartBatchOperationRequest'Operation)
-> Maybe BatchOperationCancellation
-> Maybe StartBatchOperationRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   BatchOperationCancellation -> StartBatchOperationRequest'Operation
StartBatchOperationRequest'CancellationOperation Maybe BatchOperationCancellation
y__))
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "cancellationOperation" Proto.Temporal.Api.Batch.V1.Message.BatchOperationCancellation where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cancellationOperation"
-> (BatchOperationCancellation -> f BatchOperationCancellation)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "cancellationOperation"
_
    = ((Maybe StartBatchOperationRequest'Operation
  -> f (Maybe StartBatchOperationRequest'Operation))
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((BatchOperationCancellation -> f BatchOperationCancellation)
    -> Maybe StartBatchOperationRequest'Operation
    -> f (Maybe StartBatchOperationRequest'Operation))
-> (BatchOperationCancellation -> f BatchOperationCancellation)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest
 -> Maybe StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest
    -> Maybe StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest
     StartBatchOperationRequest
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest
-> Maybe StartBatchOperationRequest'Operation
_StartBatchOperationRequest'operation
           (\ StartBatchOperationRequest
x__ Maybe StartBatchOperationRequest'Operation
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'operation = y__}))
        (((Maybe BatchOperationCancellation
  -> f (Maybe BatchOperationCancellation))
 -> Maybe StartBatchOperationRequest'Operation
 -> f (Maybe StartBatchOperationRequest'Operation))
-> ((BatchOperationCancellation -> f BatchOperationCancellation)
    -> Maybe BatchOperationCancellation
    -> f (Maybe BatchOperationCancellation))
-> (BatchOperationCancellation -> f BatchOperationCancellation)
-> Maybe StartBatchOperationRequest'Operation
-> f (Maybe StartBatchOperationRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe StartBatchOperationRequest'Operation
 -> Maybe BatchOperationCancellation)
-> (Maybe StartBatchOperationRequest'Operation
    -> Maybe BatchOperationCancellation
    -> Maybe StartBatchOperationRequest'Operation)
-> Lens
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe BatchOperationCancellation)
     (Maybe BatchOperationCancellation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe StartBatchOperationRequest'Operation
x__
                 -> case Maybe StartBatchOperationRequest'Operation
x__ of
                      (Prelude.Just (StartBatchOperationRequest'CancellationOperation BatchOperationCancellation
x__val))
                        -> BatchOperationCancellation -> Maybe BatchOperationCancellation
forall a. a -> Maybe a
Prelude.Just BatchOperationCancellation
x__val
                      Maybe StartBatchOperationRequest'Operation
_otherwise -> Maybe BatchOperationCancellation
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe StartBatchOperationRequest'Operation
_ Maybe BatchOperationCancellation
y__
                 -> (BatchOperationCancellation
 -> StartBatchOperationRequest'Operation)
-> Maybe BatchOperationCancellation
-> Maybe StartBatchOperationRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      BatchOperationCancellation -> StartBatchOperationRequest'Operation
StartBatchOperationRequest'CancellationOperation Maybe BatchOperationCancellation
y__))
           (BatchOperationCancellation
-> Lens'
     (Maybe BatchOperationCancellation) BatchOperationCancellation
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens BatchOperationCancellation
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "maybe'deletionOperation" (Prelude.Maybe Proto.Temporal.Api.Batch.V1.Message.BatchOperationDeletion) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'deletionOperation"
-> (Maybe BatchOperationDeletion
    -> f (Maybe BatchOperationDeletion))
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "maybe'deletionOperation"
_
    = ((Maybe StartBatchOperationRequest'Operation
  -> f (Maybe StartBatchOperationRequest'Operation))
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((Maybe BatchOperationDeletion
     -> f (Maybe BatchOperationDeletion))
    -> Maybe StartBatchOperationRequest'Operation
    -> f (Maybe StartBatchOperationRequest'Operation))
-> (Maybe BatchOperationDeletion
    -> f (Maybe BatchOperationDeletion))
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest
 -> Maybe StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest
    -> Maybe StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest
     StartBatchOperationRequest
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest
-> Maybe StartBatchOperationRequest'Operation
_StartBatchOperationRequest'operation
           (\ StartBatchOperationRequest
x__ Maybe StartBatchOperationRequest'Operation
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'operation = y__}))
        ((Maybe StartBatchOperationRequest'Operation
 -> Maybe BatchOperationDeletion)
-> (Maybe StartBatchOperationRequest'Operation
    -> Maybe BatchOperationDeletion
    -> Maybe StartBatchOperationRequest'Operation)
-> Lens
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe BatchOperationDeletion)
     (Maybe BatchOperationDeletion)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe StartBatchOperationRequest'Operation
x__
              -> case Maybe StartBatchOperationRequest'Operation
x__ of
                   (Prelude.Just (StartBatchOperationRequest'DeletionOperation BatchOperationDeletion
x__val))
                     -> BatchOperationDeletion -> Maybe BatchOperationDeletion
forall a. a -> Maybe a
Prelude.Just BatchOperationDeletion
x__val
                   Maybe StartBatchOperationRequest'Operation
_otherwise -> Maybe BatchOperationDeletion
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe StartBatchOperationRequest'Operation
_ Maybe BatchOperationDeletion
y__
              -> (BatchOperationDeletion -> StartBatchOperationRequest'Operation)
-> Maybe BatchOperationDeletion
-> Maybe StartBatchOperationRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap BatchOperationDeletion -> StartBatchOperationRequest'Operation
StartBatchOperationRequest'DeletionOperation Maybe BatchOperationDeletion
y__))
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "deletionOperation" Proto.Temporal.Api.Batch.V1.Message.BatchOperationDeletion where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "deletionOperation"
-> (BatchOperationDeletion -> f BatchOperationDeletion)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "deletionOperation"
_
    = ((Maybe StartBatchOperationRequest'Operation
  -> f (Maybe StartBatchOperationRequest'Operation))
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((BatchOperationDeletion -> f BatchOperationDeletion)
    -> Maybe StartBatchOperationRequest'Operation
    -> f (Maybe StartBatchOperationRequest'Operation))
-> (BatchOperationDeletion -> f BatchOperationDeletion)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest
 -> Maybe StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest
    -> Maybe StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest
     StartBatchOperationRequest
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest
-> Maybe StartBatchOperationRequest'Operation
_StartBatchOperationRequest'operation
           (\ StartBatchOperationRequest
x__ Maybe StartBatchOperationRequest'Operation
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'operation = y__}))
        (((Maybe BatchOperationDeletion -> f (Maybe BatchOperationDeletion))
 -> Maybe StartBatchOperationRequest'Operation
 -> f (Maybe StartBatchOperationRequest'Operation))
-> ((BatchOperationDeletion -> f BatchOperationDeletion)
    -> Maybe BatchOperationDeletion
    -> f (Maybe BatchOperationDeletion))
-> (BatchOperationDeletion -> f BatchOperationDeletion)
-> Maybe StartBatchOperationRequest'Operation
-> f (Maybe StartBatchOperationRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe StartBatchOperationRequest'Operation
 -> Maybe BatchOperationDeletion)
-> (Maybe StartBatchOperationRequest'Operation
    -> Maybe BatchOperationDeletion
    -> Maybe StartBatchOperationRequest'Operation)
-> Lens
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe BatchOperationDeletion)
     (Maybe BatchOperationDeletion)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe StartBatchOperationRequest'Operation
x__
                 -> case Maybe StartBatchOperationRequest'Operation
x__ of
                      (Prelude.Just (StartBatchOperationRequest'DeletionOperation BatchOperationDeletion
x__val))
                        -> BatchOperationDeletion -> Maybe BatchOperationDeletion
forall a. a -> Maybe a
Prelude.Just BatchOperationDeletion
x__val
                      Maybe StartBatchOperationRequest'Operation
_otherwise -> Maybe BatchOperationDeletion
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe StartBatchOperationRequest'Operation
_ Maybe BatchOperationDeletion
y__
                 -> (BatchOperationDeletion -> StartBatchOperationRequest'Operation)
-> Maybe BatchOperationDeletion
-> Maybe StartBatchOperationRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap BatchOperationDeletion -> StartBatchOperationRequest'Operation
StartBatchOperationRequest'DeletionOperation Maybe BatchOperationDeletion
y__))
           (BatchOperationDeletion
-> Lens' (Maybe BatchOperationDeletion) BatchOperationDeletion
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens BatchOperationDeletion
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "maybe'resetOperation" (Prelude.Maybe Proto.Temporal.Api.Batch.V1.Message.BatchOperationReset) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'resetOperation"
-> (Maybe BatchOperationReset -> f (Maybe BatchOperationReset))
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "maybe'resetOperation"
_
    = ((Maybe StartBatchOperationRequest'Operation
  -> f (Maybe StartBatchOperationRequest'Operation))
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((Maybe BatchOperationReset -> f (Maybe BatchOperationReset))
    -> Maybe StartBatchOperationRequest'Operation
    -> f (Maybe StartBatchOperationRequest'Operation))
-> (Maybe BatchOperationReset -> f (Maybe BatchOperationReset))
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest
 -> Maybe StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest
    -> Maybe StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest
     StartBatchOperationRequest
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest
-> Maybe StartBatchOperationRequest'Operation
_StartBatchOperationRequest'operation
           (\ StartBatchOperationRequest
x__ Maybe StartBatchOperationRequest'Operation
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'operation = y__}))
        ((Maybe StartBatchOperationRequest'Operation
 -> Maybe BatchOperationReset)
-> (Maybe StartBatchOperationRequest'Operation
    -> Maybe BatchOperationReset
    -> Maybe StartBatchOperationRequest'Operation)
-> Lens
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe BatchOperationReset)
     (Maybe BatchOperationReset)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe StartBatchOperationRequest'Operation
x__
              -> case Maybe StartBatchOperationRequest'Operation
x__ of
                   (Prelude.Just (StartBatchOperationRequest'ResetOperation BatchOperationReset
x__val))
                     -> BatchOperationReset -> Maybe BatchOperationReset
forall a. a -> Maybe a
Prelude.Just BatchOperationReset
x__val
                   Maybe StartBatchOperationRequest'Operation
_otherwise -> Maybe BatchOperationReset
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe StartBatchOperationRequest'Operation
_ Maybe BatchOperationReset
y__
              -> (BatchOperationReset -> StartBatchOperationRequest'Operation)
-> Maybe BatchOperationReset
-> Maybe StartBatchOperationRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap BatchOperationReset -> StartBatchOperationRequest'Operation
StartBatchOperationRequest'ResetOperation Maybe BatchOperationReset
y__))
instance Data.ProtoLens.Field.HasField StartBatchOperationRequest "resetOperation" Proto.Temporal.Api.Batch.V1.Message.BatchOperationReset where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "resetOperation"
-> (BatchOperationReset -> f BatchOperationReset)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
fieldOf Proxy# "resetOperation"
_
    = ((Maybe StartBatchOperationRequest'Operation
  -> f (Maybe StartBatchOperationRequest'Operation))
 -> StartBatchOperationRequest -> f StartBatchOperationRequest)
-> ((BatchOperationReset -> f BatchOperationReset)
    -> Maybe StartBatchOperationRequest'Operation
    -> f (Maybe StartBatchOperationRequest'Operation))
-> (BatchOperationReset -> f BatchOperationReset)
-> StartBatchOperationRequest
-> f StartBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartBatchOperationRequest
 -> Maybe StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest
    -> Maybe StartBatchOperationRequest'Operation
    -> StartBatchOperationRequest)
-> Lens
     StartBatchOperationRequest
     StartBatchOperationRequest
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartBatchOperationRequest
-> Maybe StartBatchOperationRequest'Operation
_StartBatchOperationRequest'operation
           (\ StartBatchOperationRequest
x__ Maybe StartBatchOperationRequest'Operation
y__ -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'operation = y__}))
        (((Maybe BatchOperationReset -> f (Maybe BatchOperationReset))
 -> Maybe StartBatchOperationRequest'Operation
 -> f (Maybe StartBatchOperationRequest'Operation))
-> ((BatchOperationReset -> f BatchOperationReset)
    -> Maybe BatchOperationReset -> f (Maybe BatchOperationReset))
-> (BatchOperationReset -> f BatchOperationReset)
-> Maybe StartBatchOperationRequest'Operation
-> f (Maybe StartBatchOperationRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe StartBatchOperationRequest'Operation
 -> Maybe BatchOperationReset)
-> (Maybe StartBatchOperationRequest'Operation
    -> Maybe BatchOperationReset
    -> Maybe StartBatchOperationRequest'Operation)
-> Lens
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe StartBatchOperationRequest'Operation)
     (Maybe BatchOperationReset)
     (Maybe BatchOperationReset)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe StartBatchOperationRequest'Operation
x__
                 -> case Maybe StartBatchOperationRequest'Operation
x__ of
                      (Prelude.Just (StartBatchOperationRequest'ResetOperation BatchOperationReset
x__val))
                        -> BatchOperationReset -> Maybe BatchOperationReset
forall a. a -> Maybe a
Prelude.Just BatchOperationReset
x__val
                      Maybe StartBatchOperationRequest'Operation
_otherwise -> Maybe BatchOperationReset
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe StartBatchOperationRequest'Operation
_ Maybe BatchOperationReset
y__
                 -> (BatchOperationReset -> StartBatchOperationRequest'Operation)
-> Maybe BatchOperationReset
-> Maybe StartBatchOperationRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap BatchOperationReset -> StartBatchOperationRequest'Operation
StartBatchOperationRequest'ResetOperation Maybe BatchOperationReset
y__))
           (BatchOperationReset
-> Lens' (Maybe BatchOperationReset) BatchOperationReset
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens BatchOperationReset
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message StartBatchOperationRequest where
  messageName :: Proxy StartBatchOperationRequest -> Text
messageName Proxy StartBatchOperationRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.StartBatchOperationRequest"
  packedMessageDescriptor :: Proxy StartBatchOperationRequest -> ByteString
packedMessageDescriptor Proxy StartBatchOperationRequest
_
    = ByteString
"\n\
      \\SUBStartBatchOperationRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2)\n\
      \\DLEvisibility_query\CAN\STX \SOH(\tR\SIvisibilityQuery\DC2\NAK\n\
      \\ACKjob_id\CAN\ETX \SOH(\tR\ENQjobId\DC2\SYN\n\
      \\ACKreason\CAN\EOT \SOH(\tR\ACKreason\DC2I\n\
      \\n\
      \executions\CAN\ENQ \ETX(\v2).temporal.api.common.v1.WorkflowExecutionR\n\
      \executions\DC29\n\
      \\EMmax_operations_per_second\CAN\ACK \SOH(\STXR\SYNmaxOperationsPerSecond\DC2g\n\
      \\NAKtermination_operation\CAN\n\
      \ \SOH(\v20.temporal.api.batch.v1.BatchOperationTerminationH\NULR\DC4terminationOperation\DC2X\n\
      \\DLEsignal_operation\CAN\v \SOH(\v2+.temporal.api.batch.v1.BatchOperationSignalH\NULR\SIsignalOperation\DC2j\n\
      \\SYNcancellation_operation\CAN\f \SOH(\v21.temporal.api.batch.v1.BatchOperationCancellationH\NULR\NAKcancellationOperation\DC2^\n\
      \\DC2deletion_operation\CAN\r \SOH(\v2-.temporal.api.batch.v1.BatchOperationDeletionH\NULR\DC1deletionOperation\DC2U\n\
      \\SIreset_operation\CAN\SO \SOH(\v2*.temporal.api.batch.v1.BatchOperationResetH\NULR\SOresetOperationB\v\n\
      \\toperation"
  packedFileDescriptor :: Proxy StartBatchOperationRequest -> ByteString
packedFileDescriptor Proxy StartBatchOperationRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor StartBatchOperationRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor StartBatchOperationRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartBatchOperationRequest Text
-> FieldDescriptor StartBatchOperationRequest
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
     StartBatchOperationRequest StartBatchOperationRequest Text Text
-> FieldAccessor StartBatchOperationRequest 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 StartBatchOperationRequest
        visibilityQuery__field_descriptor :: FieldDescriptor StartBatchOperationRequest
visibilityQuery__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartBatchOperationRequest Text
-> FieldDescriptor StartBatchOperationRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"visibility_query"
              (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
     StartBatchOperationRequest StartBatchOperationRequest Text Text
-> FieldAccessor StartBatchOperationRequest 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 @"visibilityQuery")) ::
              Data.ProtoLens.FieldDescriptor StartBatchOperationRequest
        jobId__field_descriptor :: FieldDescriptor StartBatchOperationRequest
jobId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartBatchOperationRequest Text
-> FieldDescriptor StartBatchOperationRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"job_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
     StartBatchOperationRequest StartBatchOperationRequest Text Text
-> FieldAccessor StartBatchOperationRequest 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 @"jobId")) ::
              Data.ProtoLens.FieldDescriptor StartBatchOperationRequest
        reason__field_descriptor :: FieldDescriptor StartBatchOperationRequest
reason__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartBatchOperationRequest Text
-> FieldDescriptor StartBatchOperationRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"reason"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     StartBatchOperationRequest StartBatchOperationRequest Text Text
-> FieldAccessor StartBatchOperationRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reason")) ::
              Data.ProtoLens.FieldDescriptor StartBatchOperationRequest
        executions__field_descriptor :: FieldDescriptor StartBatchOperationRequest
executions__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor StartBatchOperationRequest WorkflowExecution
-> FieldDescriptor StartBatchOperationRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"executions"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
              (Packing
-> Lens' StartBatchOperationRequest [WorkflowExecution]
-> FieldAccessor StartBatchOperationRequest WorkflowExecution
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 @"executions")) ::
              Data.ProtoLens.FieldDescriptor StartBatchOperationRequest
        maxOperationsPerSecond__field_descriptor :: FieldDescriptor StartBatchOperationRequest
maxOperationsPerSecond__field_descriptor
          = String
-> FieldTypeDescriptor Float
-> FieldAccessor StartBatchOperationRequest Float
-> FieldDescriptor StartBatchOperationRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"max_operations_per_second"
              (ScalarField Float -> FieldTypeDescriptor Float
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Float
Data.ProtoLens.FloatField ::
                 Data.ProtoLens.FieldTypeDescriptor Prelude.Float)
              (WireDefault Float
-> Lens
     StartBatchOperationRequest StartBatchOperationRequest Float Float
-> FieldAccessor StartBatchOperationRequest Float
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Float
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxOperationsPerSecond")) ::
              Data.ProtoLens.FieldDescriptor StartBatchOperationRequest
        terminationOperation__field_descriptor :: FieldDescriptor StartBatchOperationRequest
terminationOperation__field_descriptor
          = String
-> FieldTypeDescriptor BatchOperationTermination
-> FieldAccessor
     StartBatchOperationRequest BatchOperationTermination
-> FieldDescriptor StartBatchOperationRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"termination_operation"
              (MessageOrGroup -> FieldTypeDescriptor BatchOperationTermination
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Batch.V1.Message.BatchOperationTermination)
              (Lens' StartBatchOperationRequest (Maybe BatchOperationTermination)
-> FieldAccessor
     StartBatchOperationRequest BatchOperationTermination
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'terminationOperation")) ::
              Data.ProtoLens.FieldDescriptor StartBatchOperationRequest
        signalOperation__field_descriptor :: FieldDescriptor StartBatchOperationRequest
signalOperation__field_descriptor
          = String
-> FieldTypeDescriptor BatchOperationSignal
-> FieldAccessor StartBatchOperationRequest BatchOperationSignal
-> FieldDescriptor StartBatchOperationRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"signal_operation"
              (MessageOrGroup -> FieldTypeDescriptor BatchOperationSignal
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Batch.V1.Message.BatchOperationSignal)
              (Lens' StartBatchOperationRequest (Maybe BatchOperationSignal)
-> FieldAccessor StartBatchOperationRequest BatchOperationSignal
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'signalOperation")) ::
              Data.ProtoLens.FieldDescriptor StartBatchOperationRequest
        cancellationOperation__field_descriptor :: FieldDescriptor StartBatchOperationRequest
cancellationOperation__field_descriptor
          = String
-> FieldTypeDescriptor BatchOperationCancellation
-> FieldAccessor
     StartBatchOperationRequest BatchOperationCancellation
-> FieldDescriptor StartBatchOperationRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cancellation_operation"
              (MessageOrGroup -> FieldTypeDescriptor BatchOperationCancellation
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Batch.V1.Message.BatchOperationCancellation)
              (Lens' StartBatchOperationRequest (Maybe BatchOperationCancellation)
-> FieldAccessor
     StartBatchOperationRequest BatchOperationCancellation
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'cancellationOperation")) ::
              Data.ProtoLens.FieldDescriptor StartBatchOperationRequest
        deletionOperation__field_descriptor :: FieldDescriptor StartBatchOperationRequest
deletionOperation__field_descriptor
          = String
-> FieldTypeDescriptor BatchOperationDeletion
-> FieldAccessor StartBatchOperationRequest BatchOperationDeletion
-> FieldDescriptor StartBatchOperationRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"deletion_operation"
              (MessageOrGroup -> FieldTypeDescriptor BatchOperationDeletion
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Batch.V1.Message.BatchOperationDeletion)
              (Lens' StartBatchOperationRequest (Maybe BatchOperationDeletion)
-> FieldAccessor StartBatchOperationRequest BatchOperationDeletion
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'deletionOperation")) ::
              Data.ProtoLens.FieldDescriptor StartBatchOperationRequest
        resetOperation__field_descriptor :: FieldDescriptor StartBatchOperationRequest
resetOperation__field_descriptor
          = String
-> FieldTypeDescriptor BatchOperationReset
-> FieldAccessor StartBatchOperationRequest BatchOperationReset
-> FieldDescriptor StartBatchOperationRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"reset_operation"
              (MessageOrGroup -> FieldTypeDescriptor BatchOperationReset
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Batch.V1.Message.BatchOperationReset)
              (Lens' StartBatchOperationRequest (Maybe BatchOperationReset)
-> FieldAccessor StartBatchOperationRequest BatchOperationReset
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'resetOperation")) ::
              Data.ProtoLens.FieldDescriptor StartBatchOperationRequest
      in
        [(Tag, FieldDescriptor StartBatchOperationRequest)]
-> Map Tag (FieldDescriptor StartBatchOperationRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor StartBatchOperationRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor StartBatchOperationRequest
visibilityQuery__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor StartBatchOperationRequest
jobId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor StartBatchOperationRequest
reason__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor StartBatchOperationRequest
executions__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor StartBatchOperationRequest
maxOperationsPerSecond__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor StartBatchOperationRequest
terminationOperation__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor StartBatchOperationRequest
signalOperation__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor StartBatchOperationRequest
cancellationOperation__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor StartBatchOperationRequest
deletionOperation__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
14, FieldDescriptor StartBatchOperationRequest
resetOperation__field_descriptor)]
  unknownFields :: Lens' StartBatchOperationRequest FieldSet
unknownFields
    = (StartBatchOperationRequest -> FieldSet)
-> (StartBatchOperationRequest
    -> FieldSet -> StartBatchOperationRequest)
-> Lens' StartBatchOperationRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        StartBatchOperationRequest -> FieldSet
_StartBatchOperationRequest'_unknownFields
        (\ StartBatchOperationRequest
x__ FieldSet
y__
           -> StartBatchOperationRequest
x__ {_StartBatchOperationRequest'_unknownFields = y__})
  defMessage :: StartBatchOperationRequest
defMessage
    = StartBatchOperationRequest'_constructor
        {_StartBatchOperationRequest'namespace :: Text
_StartBatchOperationRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartBatchOperationRequest'visibilityQuery :: Text
_StartBatchOperationRequest'visibilityQuery = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartBatchOperationRequest'jobId :: Text
_StartBatchOperationRequest'jobId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartBatchOperationRequest'reason :: Text
_StartBatchOperationRequest'reason = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartBatchOperationRequest'executions :: Vector WorkflowExecution
_StartBatchOperationRequest'executions = Vector WorkflowExecution
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _StartBatchOperationRequest'maxOperationsPerSecond :: Float
_StartBatchOperationRequest'maxOperationsPerSecond = Float
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartBatchOperationRequest'operation :: Maybe StartBatchOperationRequest'Operation
_StartBatchOperationRequest'operation = Maybe StartBatchOperationRequest'Operation
forall a. Maybe a
Prelude.Nothing,
         _StartBatchOperationRequest'_unknownFields :: FieldSet
_StartBatchOperationRequest'_unknownFields = []}
  parseMessage :: Parser StartBatchOperationRequest
parseMessage
    = let
        loop ::
          StartBatchOperationRequest
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Common.V1.Message.WorkflowExecution
             -> Data.ProtoLens.Encoding.Bytes.Parser StartBatchOperationRequest
        loop :: StartBatchOperationRequest
-> Growing Vector RealWorld WorkflowExecution
-> Parser StartBatchOperationRequest
loop StartBatchOperationRequest
x Growing Vector RealWorld WorkflowExecution
mutable'executions
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'executions <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                             (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                mutable'executions)
                      (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'executions") frozen'executions
                              x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                                  mutable'executions
                        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
"visibility_query"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"visibilityQuery") y x)
                                  mutable'executions
                        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
"job_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"jobId") y x)
                                  mutable'executions
                        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
"reason"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"reason") y x)
                                  mutable'executions
                        Word64
42
                          -> do !y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"executions"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'executions y)
                                loop x v
                        Word64
53
                          -> do y <- Parser Float -> String -> Parser Float
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word32 -> Float) -> Parser Word32 -> Parser Float
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word32 -> Float
Data.ProtoLens.Encoding.Bytes.wordToFloat
                                          Parser Word32
Data.ProtoLens.Encoding.Bytes.getFixed32)
                                       String
"max_operations_per_second"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"maxOperationsPerSecond") y x)
                                  mutable'executions
                        Word64
82
                          -> do y <- Parser BatchOperationTermination
-> String -> Parser BatchOperationTermination
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"termination_operation"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"terminationOperation") y x)
                                  mutable'executions
                        Word64
90
                          -> do y <- Parser BatchOperationSignal
-> String -> Parser BatchOperationSignal
forall a. Parser a -> String -> Parser a
(Data.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_operation"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"signalOperation") y x)
                                  mutable'executions
                        Word64
98
                          -> do y <- Parser BatchOperationCancellation
-> String -> Parser BatchOperationCancellation
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"cancellation_operation"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cancellationOperation") y x)
                                  mutable'executions
                        Word64
106
                          -> do y <- Parser BatchOperationDeletion
-> String -> Parser BatchOperationDeletion
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"deletion_operation"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"deletionOperation") y x)
                                  mutable'executions
                        Word64
114
                          -> do y <- Parser BatchOperationReset -> String -> Parser BatchOperationReset
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"reset_operation"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"resetOperation") y x)
                                  mutable'executions
                        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'executions
      in
        Parser StartBatchOperationRequest
-> String -> Parser StartBatchOperationRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'executions <- IO (Growing Vector RealWorld WorkflowExecution)
-> Parser (Growing Vector RealWorld WorkflowExecution)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                      IO (Growing Vector RealWorld WorkflowExecution)
IO (Growing Vector (PrimState IO) WorkflowExecution)
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'executions)
          String
"StartBatchOperationRequest"
  buildMessage :: StartBatchOperationRequest -> Builder
buildMessage
    = \ StartBatchOperationRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  StartBatchOperationRequest
  StartBatchOperationRequest
  Text
  Text
-> StartBatchOperationRequest -> 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") StartBatchOperationRequest
_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
  StartBatchOperationRequest
  StartBatchOperationRequest
  Text
  Text
-> StartBatchOperationRequest -> 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 @"visibilityQuery") StartBatchOperationRequest
_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
  StartBatchOperationRequest
  StartBatchOperationRequest
  Text
  Text
-> StartBatchOperationRequest -> 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 @"jobId") StartBatchOperationRequest
_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
  StartBatchOperationRequest
  StartBatchOperationRequest
  Text
  Text
-> StartBatchOperationRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reason") StartBatchOperationRequest
_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.<>)
                         ((WorkflowExecution -> Builder)
-> Vector WorkflowExecution -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                            (\ WorkflowExecution
_v
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                    ((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                       (\ ByteString
bs
                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                     (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                       WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
                            (FoldLike
  (Vector WorkflowExecution)
  StartBatchOperationRequest
  StartBatchOperationRequest
  (Vector WorkflowExecution)
  (Vector WorkflowExecution)
-> StartBatchOperationRequest -> Vector WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'executions") StartBatchOperationRequest
_x))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Float
_v
                                 = FoldLike
  Float
  StartBatchOperationRequest
  StartBatchOperationRequest
  Float
  Float
-> StartBatchOperationRequest -> Float
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maxOperationsPerSecond") StartBatchOperationRequest
_x
                             in
                               if Float -> Float -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Float
_v Float
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
53)
                                     ((Word32 -> Builder) -> (Float -> Word32) -> Float -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        Word32 -> Builder
Data.ProtoLens.Encoding.Bytes.putFixed32
                                        Float -> Word32
Data.ProtoLens.Encoding.Bytes.floatToWord Float
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (case
                                    FoldLike
  (Maybe StartBatchOperationRequest'Operation)
  StartBatchOperationRequest
  StartBatchOperationRequest
  (Maybe StartBatchOperationRequest'Operation)
  (Maybe StartBatchOperationRequest'Operation)
-> StartBatchOperationRequest
-> Maybe StartBatchOperationRequest'Operation
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'operation") StartBatchOperationRequest
_x
                                of
                                  Maybe StartBatchOperationRequest'Operation
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  (Prelude.Just (StartBatchOperationRequest'TerminationOperation BatchOperationTermination
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
                                         ((ByteString -> Builder)
-> (BatchOperationTermination -> ByteString)
-> BatchOperationTermination
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                            (\ ByteString
bs
                                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                          (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                            BatchOperationTermination -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage BatchOperationTermination
v)
                                  (Prelude.Just (StartBatchOperationRequest'SignalOperation BatchOperationSignal
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
90)
                                         ((ByteString -> Builder)
-> (BatchOperationSignal -> ByteString)
-> BatchOperationSignal
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                            (\ ByteString
bs
                                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                          (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                            BatchOperationSignal -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage BatchOperationSignal
v)
                                  (Prelude.Just (StartBatchOperationRequest'CancellationOperation BatchOperationCancellation
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
98)
                                         ((ByteString -> Builder)
-> (BatchOperationCancellation -> ByteString)
-> BatchOperationCancellation
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                            (\ ByteString
bs
                                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                          (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                            BatchOperationCancellation -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage BatchOperationCancellation
v)
                                  (Prelude.Just (StartBatchOperationRequest'DeletionOperation BatchOperationDeletion
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
106)
                                         ((ByteString -> Builder)
-> (BatchOperationDeletion -> ByteString)
-> BatchOperationDeletion
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                            (\ ByteString
bs
                                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                          (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                            BatchOperationDeletion -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage BatchOperationDeletion
v)
                                  (Prelude.Just (StartBatchOperationRequest'ResetOperation BatchOperationReset
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
114)
                                         ((ByteString -> Builder)
-> (BatchOperationReset -> ByteString)
-> BatchOperationReset
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                            (\ ByteString
bs
                                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                          (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                            BatchOperationReset -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage BatchOperationReset
v))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike
  FieldSet
  StartBatchOperationRequest
  StartBatchOperationRequest
  FieldSet
  FieldSet
-> StartBatchOperationRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  StartBatchOperationRequest
  StartBatchOperationRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' StartBatchOperationRequest FieldSet
Data.ProtoLens.unknownFields StartBatchOperationRequest
_x))))))))
instance Control.DeepSeq.NFData StartBatchOperationRequest where
  rnf :: StartBatchOperationRequest -> ()
rnf
    = \ StartBatchOperationRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (StartBatchOperationRequest -> FieldSet
_StartBatchOperationRequest'_unknownFields StartBatchOperationRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (StartBatchOperationRequest -> Text
_StartBatchOperationRequest'namespace StartBatchOperationRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (StartBatchOperationRequest -> Text
_StartBatchOperationRequest'visibilityQuery StartBatchOperationRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (StartBatchOperationRequest -> Text
_StartBatchOperationRequest'jobId StartBatchOperationRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (StartBatchOperationRequest -> Text
_StartBatchOperationRequest'reason StartBatchOperationRequest
x__)
                         (Vector WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (StartBatchOperationRequest -> Vector WorkflowExecution
_StartBatchOperationRequest'executions StartBatchOperationRequest
x__)
                            (Float -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (StartBatchOperationRequest -> Float
_StartBatchOperationRequest'maxOperationsPerSecond StartBatchOperationRequest
x__)
                               (Maybe StartBatchOperationRequest'Operation -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (StartBatchOperationRequest
-> Maybe StartBatchOperationRequest'Operation
_StartBatchOperationRequest'operation StartBatchOperationRequest
x__) ())))))))
instance Control.DeepSeq.NFData StartBatchOperationRequest'Operation where
  rnf :: StartBatchOperationRequest'Operation -> ()
rnf (StartBatchOperationRequest'TerminationOperation BatchOperationTermination
x__)
    = BatchOperationTermination -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf BatchOperationTermination
x__
  rnf (StartBatchOperationRequest'SignalOperation BatchOperationSignal
x__)
    = BatchOperationSignal -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf BatchOperationSignal
x__
  rnf (StartBatchOperationRequest'CancellationOperation BatchOperationCancellation
x__)
    = BatchOperationCancellation -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf BatchOperationCancellation
x__
  rnf (StartBatchOperationRequest'DeletionOperation BatchOperationDeletion
x__)
    = BatchOperationDeletion -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf BatchOperationDeletion
x__
  rnf (StartBatchOperationRequest'ResetOperation BatchOperationReset
x__)
    = BatchOperationReset -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf BatchOperationReset
x__
_StartBatchOperationRequest'TerminationOperation ::
  Data.ProtoLens.Prism.Prism' StartBatchOperationRequest'Operation Proto.Temporal.Api.Batch.V1.Message.BatchOperationTermination
_StartBatchOperationRequest'TerminationOperation :: Prism'
  StartBatchOperationRequest'Operation BatchOperationTermination
_StartBatchOperationRequest'TerminationOperation
  = (BatchOperationTermination -> StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest'Operation
    -> Maybe BatchOperationTermination)
-> Prism'
     StartBatchOperationRequest'Operation BatchOperationTermination
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      BatchOperationTermination -> StartBatchOperationRequest'Operation
StartBatchOperationRequest'TerminationOperation
      (\ StartBatchOperationRequest'Operation
p__
         -> case StartBatchOperationRequest'Operation
p__ of
              (StartBatchOperationRequest'TerminationOperation BatchOperationTermination
p__val)
                -> BatchOperationTermination -> Maybe BatchOperationTermination
forall a. a -> Maybe a
Prelude.Just BatchOperationTermination
p__val
              StartBatchOperationRequest'Operation
_otherwise -> Maybe BatchOperationTermination
forall a. Maybe a
Prelude.Nothing)
_StartBatchOperationRequest'SignalOperation ::
  Data.ProtoLens.Prism.Prism' StartBatchOperationRequest'Operation Proto.Temporal.Api.Batch.V1.Message.BatchOperationSignal
_StartBatchOperationRequest'SignalOperation :: Prism' StartBatchOperationRequest'Operation BatchOperationSignal
_StartBatchOperationRequest'SignalOperation
  = (BatchOperationSignal -> StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest'Operation
    -> Maybe BatchOperationSignal)
-> Prism' StartBatchOperationRequest'Operation BatchOperationSignal
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      BatchOperationSignal -> StartBatchOperationRequest'Operation
StartBatchOperationRequest'SignalOperation
      (\ StartBatchOperationRequest'Operation
p__
         -> case StartBatchOperationRequest'Operation
p__ of
              (StartBatchOperationRequest'SignalOperation BatchOperationSignal
p__val)
                -> BatchOperationSignal -> Maybe BatchOperationSignal
forall a. a -> Maybe a
Prelude.Just BatchOperationSignal
p__val
              StartBatchOperationRequest'Operation
_otherwise -> Maybe BatchOperationSignal
forall a. Maybe a
Prelude.Nothing)
_StartBatchOperationRequest'CancellationOperation ::
  Data.ProtoLens.Prism.Prism' StartBatchOperationRequest'Operation Proto.Temporal.Api.Batch.V1.Message.BatchOperationCancellation
_StartBatchOperationRequest'CancellationOperation :: Prism'
  StartBatchOperationRequest'Operation BatchOperationCancellation
_StartBatchOperationRequest'CancellationOperation
  = (BatchOperationCancellation
 -> StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest'Operation
    -> Maybe BatchOperationCancellation)
-> Prism'
     StartBatchOperationRequest'Operation BatchOperationCancellation
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      BatchOperationCancellation -> StartBatchOperationRequest'Operation
StartBatchOperationRequest'CancellationOperation
      (\ StartBatchOperationRequest'Operation
p__
         -> case StartBatchOperationRequest'Operation
p__ of
              (StartBatchOperationRequest'CancellationOperation BatchOperationCancellation
p__val)
                -> BatchOperationCancellation -> Maybe BatchOperationCancellation
forall a. a -> Maybe a
Prelude.Just BatchOperationCancellation
p__val
              StartBatchOperationRequest'Operation
_otherwise -> Maybe BatchOperationCancellation
forall a. Maybe a
Prelude.Nothing)
_StartBatchOperationRequest'DeletionOperation ::
  Data.ProtoLens.Prism.Prism' StartBatchOperationRequest'Operation Proto.Temporal.Api.Batch.V1.Message.BatchOperationDeletion
_StartBatchOperationRequest'DeletionOperation :: Prism' StartBatchOperationRequest'Operation BatchOperationDeletion
_StartBatchOperationRequest'DeletionOperation
  = (BatchOperationDeletion -> StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest'Operation
    -> Maybe BatchOperationDeletion)
-> Prism'
     StartBatchOperationRequest'Operation BatchOperationDeletion
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      BatchOperationDeletion -> StartBatchOperationRequest'Operation
StartBatchOperationRequest'DeletionOperation
      (\ StartBatchOperationRequest'Operation
p__
         -> case StartBatchOperationRequest'Operation
p__ of
              (StartBatchOperationRequest'DeletionOperation BatchOperationDeletion
p__val)
                -> BatchOperationDeletion -> Maybe BatchOperationDeletion
forall a. a -> Maybe a
Prelude.Just BatchOperationDeletion
p__val
              StartBatchOperationRequest'Operation
_otherwise -> Maybe BatchOperationDeletion
forall a. Maybe a
Prelude.Nothing)
_StartBatchOperationRequest'ResetOperation ::
  Data.ProtoLens.Prism.Prism' StartBatchOperationRequest'Operation Proto.Temporal.Api.Batch.V1.Message.BatchOperationReset
_StartBatchOperationRequest'ResetOperation :: Prism' StartBatchOperationRequest'Operation BatchOperationReset
_StartBatchOperationRequest'ResetOperation
  = (BatchOperationReset -> StartBatchOperationRequest'Operation)
-> (StartBatchOperationRequest'Operation
    -> Maybe BatchOperationReset)
-> Prism' StartBatchOperationRequest'Operation BatchOperationReset
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      BatchOperationReset -> StartBatchOperationRequest'Operation
StartBatchOperationRequest'ResetOperation
      (\ StartBatchOperationRequest'Operation
p__
         -> case StartBatchOperationRequest'Operation
p__ of
              (StartBatchOperationRequest'ResetOperation BatchOperationReset
p__val)
                -> BatchOperationReset -> Maybe BatchOperationReset
forall a. a -> Maybe a
Prelude.Just BatchOperationReset
p__val
              StartBatchOperationRequest'Operation
_otherwise -> Maybe BatchOperationReset
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
      -}
data StartBatchOperationResponse
  = StartBatchOperationResponse'_constructor {StartBatchOperationResponse -> FieldSet
_StartBatchOperationResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (StartBatchOperationResponse -> StartBatchOperationResponse -> Bool
(StartBatchOperationResponse
 -> StartBatchOperationResponse -> Bool)
-> (StartBatchOperationResponse
    -> StartBatchOperationResponse -> Bool)
-> Eq StartBatchOperationResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StartBatchOperationResponse -> StartBatchOperationResponse -> Bool
== :: StartBatchOperationResponse -> StartBatchOperationResponse -> Bool
$c/= :: StartBatchOperationResponse -> StartBatchOperationResponse -> Bool
/= :: StartBatchOperationResponse -> StartBatchOperationResponse -> Bool
Prelude.Eq, Eq StartBatchOperationResponse
Eq StartBatchOperationResponse =>
(StartBatchOperationResponse
 -> StartBatchOperationResponse -> Ordering)
-> (StartBatchOperationResponse
    -> StartBatchOperationResponse -> Bool)
-> (StartBatchOperationResponse
    -> StartBatchOperationResponse -> Bool)
-> (StartBatchOperationResponse
    -> StartBatchOperationResponse -> Bool)
-> (StartBatchOperationResponse
    -> StartBatchOperationResponse -> Bool)
-> (StartBatchOperationResponse
    -> StartBatchOperationResponse -> StartBatchOperationResponse)
-> (StartBatchOperationResponse
    -> StartBatchOperationResponse -> StartBatchOperationResponse)
-> Ord StartBatchOperationResponse
StartBatchOperationResponse -> StartBatchOperationResponse -> Bool
StartBatchOperationResponse
-> StartBatchOperationResponse -> Ordering
StartBatchOperationResponse
-> StartBatchOperationResponse -> StartBatchOperationResponse
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 :: StartBatchOperationResponse
-> StartBatchOperationResponse -> Ordering
compare :: StartBatchOperationResponse
-> StartBatchOperationResponse -> Ordering
$c< :: StartBatchOperationResponse -> StartBatchOperationResponse -> Bool
< :: StartBatchOperationResponse -> StartBatchOperationResponse -> Bool
$c<= :: StartBatchOperationResponse -> StartBatchOperationResponse -> Bool
<= :: StartBatchOperationResponse -> StartBatchOperationResponse -> Bool
$c> :: StartBatchOperationResponse -> StartBatchOperationResponse -> Bool
> :: StartBatchOperationResponse -> StartBatchOperationResponse -> Bool
$c>= :: StartBatchOperationResponse -> StartBatchOperationResponse -> Bool
>= :: StartBatchOperationResponse -> StartBatchOperationResponse -> Bool
$cmax :: StartBatchOperationResponse
-> StartBatchOperationResponse -> StartBatchOperationResponse
max :: StartBatchOperationResponse
-> StartBatchOperationResponse -> StartBatchOperationResponse
$cmin :: StartBatchOperationResponse
-> StartBatchOperationResponse -> StartBatchOperationResponse
min :: StartBatchOperationResponse
-> StartBatchOperationResponse -> StartBatchOperationResponse
Prelude.Ord)
instance Prelude.Show StartBatchOperationResponse where
  showsPrec :: Int -> StartBatchOperationResponse -> ShowS
showsPrec Int
_ StartBatchOperationResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (StartBatchOperationResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort StartBatchOperationResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message StartBatchOperationResponse where
  messageName :: Proxy StartBatchOperationResponse -> Text
messageName Proxy StartBatchOperationResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.StartBatchOperationResponse"
  packedMessageDescriptor :: Proxy StartBatchOperationResponse -> ByteString
packedMessageDescriptor Proxy StartBatchOperationResponse
_
    = ByteString
"\n\
      \\ESCStartBatchOperationResponse"
  packedFileDescriptor :: Proxy StartBatchOperationResponse -> ByteString
packedFileDescriptor Proxy StartBatchOperationResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor StartBatchOperationResponse)
fieldsByTag = let in [(Tag, FieldDescriptor StartBatchOperationResponse)]
-> Map Tag (FieldDescriptor StartBatchOperationResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' StartBatchOperationResponse FieldSet
unknownFields
    = (StartBatchOperationResponse -> FieldSet)
-> (StartBatchOperationResponse
    -> FieldSet -> StartBatchOperationResponse)
-> Lens' StartBatchOperationResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        StartBatchOperationResponse -> FieldSet
_StartBatchOperationResponse'_unknownFields
        (\ StartBatchOperationResponse
x__ FieldSet
y__
           -> StartBatchOperationResponse
x__ {_StartBatchOperationResponse'_unknownFields = y__})
  defMessage :: StartBatchOperationResponse
defMessage
    = StartBatchOperationResponse'_constructor
        {_StartBatchOperationResponse'_unknownFields :: FieldSet
_StartBatchOperationResponse'_unknownFields = []}
  parseMessage :: Parser StartBatchOperationResponse
parseMessage
    = let
        loop ::
          StartBatchOperationResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser StartBatchOperationResponse
        loop :: StartBatchOperationResponse -> Parser StartBatchOperationResponse
loop StartBatchOperationResponse
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 StartBatchOperationResponse
-> String -> Parser StartBatchOperationResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do StartBatchOperationResponse -> Parser StartBatchOperationResponse
loop StartBatchOperationResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"StartBatchOperationResponse"
  buildMessage :: StartBatchOperationResponse -> Builder
buildMessage
    = \ StartBatchOperationResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  StartBatchOperationResponse
  StartBatchOperationResponse
  FieldSet
  FieldSet
-> StartBatchOperationResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  StartBatchOperationResponse
  StartBatchOperationResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' StartBatchOperationResponse FieldSet
Data.ProtoLens.unknownFields StartBatchOperationResponse
_x)
instance Control.DeepSeq.NFData StartBatchOperationResponse where
  rnf :: StartBatchOperationResponse -> ()
rnf
    = \ StartBatchOperationResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (StartBatchOperationResponse -> FieldSet
_StartBatchOperationResponse'_unknownFields StartBatchOperationResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' StartWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowId' @:: Lens' StartWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowType' @:: Lens' StartWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.WorkflowType@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowType' @:: Lens' StartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueue' @:: Lens' StartWorkflowExecutionRequest Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'taskQueue' @:: Lens' StartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.input' @:: Lens' StartWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'input' @:: Lens' StartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowExecutionTimeout' @:: Lens' StartWorkflowExecutionRequest Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowExecutionTimeout' @:: Lens' StartWorkflowExecutionRequest (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowRunTimeout' @:: Lens' StartWorkflowExecutionRequest Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowRunTimeout' @:: Lens' StartWorkflowExecutionRequest (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowTaskTimeout' @:: Lens' StartWorkflowExecutionRequest Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowTaskTimeout' @:: Lens' StartWorkflowExecutionRequest (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' StartWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.requestId' @:: Lens' StartWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowIdReusePolicy' @:: Lens' StartWorkflowExecutionRequest Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowIdConflictPolicy' @:: Lens' StartWorkflowExecutionRequest Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdConflictPolicy@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.retryPolicy' @:: Lens' StartWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.RetryPolicy@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'retryPolicy' @:: Lens' StartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.cronSchedule' @:: Lens' StartWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.memo' @:: Lens' StartWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.Memo@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'memo' @:: Lens' StartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.searchAttributes' @:: Lens' StartWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.SearchAttributes@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'searchAttributes' @:: Lens' StartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.header' @:: Lens' StartWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.Header@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'header' @:: Lens' StartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.requestEagerExecution' @:: Lens' StartWorkflowExecutionRequest Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.continuedFailure' @:: Lens' StartWorkflowExecutionRequest Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'continuedFailure' @:: Lens' StartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.lastCompletionResult' @:: Lens' StartWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'lastCompletionResult' @:: Lens' StartWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowStartDelay' @:: Lens' StartWorkflowExecutionRequest Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowStartDelay' @:: Lens' StartWorkflowExecutionRequest (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.completionCallbacks' @:: Lens' StartWorkflowExecutionRequest [Proto.Temporal.Api.Common.V1.Message.Callback]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'completionCallbacks' @:: Lens' StartWorkflowExecutionRequest (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Callback)@ -}
data StartWorkflowExecutionRequest
  = StartWorkflowExecutionRequest'_constructor {StartWorkflowExecutionRequest -> Text
_StartWorkflowExecutionRequest'namespace :: !Data.Text.Text,
                                                StartWorkflowExecutionRequest -> Text
_StartWorkflowExecutionRequest'workflowId :: !Data.Text.Text,
                                                StartWorkflowExecutionRequest -> Maybe WorkflowType
_StartWorkflowExecutionRequest'workflowType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
                                                StartWorkflowExecutionRequest -> Maybe TaskQueue
_StartWorkflowExecutionRequest'taskQueue :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue),
                                                StartWorkflowExecutionRequest -> Maybe Payloads
_StartWorkflowExecutionRequest'input :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowExecutionTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowRunTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowTaskTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                StartWorkflowExecutionRequest -> Text
_StartWorkflowExecutionRequest'identity :: !Data.Text.Text,
                                                StartWorkflowExecutionRequest -> Text
_StartWorkflowExecutionRequest'requestId :: !Data.Text.Text,
                                                StartWorkflowExecutionRequest -> WorkflowIdReusePolicy
_StartWorkflowExecutionRequest'workflowIdReusePolicy :: !Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy,
                                                StartWorkflowExecutionRequest -> WorkflowIdConflictPolicy
_StartWorkflowExecutionRequest'workflowIdConflictPolicy :: !Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdConflictPolicy,
                                                StartWorkflowExecutionRequest -> Maybe RetryPolicy
_StartWorkflowExecutionRequest'retryPolicy :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy),
                                                StartWorkflowExecutionRequest -> Text
_StartWorkflowExecutionRequest'cronSchedule :: !Data.Text.Text,
                                                StartWorkflowExecutionRequest -> Maybe Memo
_StartWorkflowExecutionRequest'memo :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo),
                                                StartWorkflowExecutionRequest -> Maybe SearchAttributes
_StartWorkflowExecutionRequest'searchAttributes :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes),
                                                StartWorkflowExecutionRequest -> Maybe Header
_StartWorkflowExecutionRequest'header :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header),
                                                StartWorkflowExecutionRequest -> Bool
_StartWorkflowExecutionRequest'requestEagerExecution :: !Prelude.Bool,
                                                StartWorkflowExecutionRequest -> Maybe Failure
_StartWorkflowExecutionRequest'continuedFailure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                StartWorkflowExecutionRequest -> Maybe Payloads
_StartWorkflowExecutionRequest'lastCompletionResult :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowStartDelay :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                StartWorkflowExecutionRequest -> Vector Callback
_StartWorkflowExecutionRequest'completionCallbacks :: !(Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Callback),
                                                StartWorkflowExecutionRequest -> FieldSet
_StartWorkflowExecutionRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Bool
(StartWorkflowExecutionRequest
 -> StartWorkflowExecutionRequest -> Bool)
-> (StartWorkflowExecutionRequest
    -> StartWorkflowExecutionRequest -> Bool)
-> Eq StartWorkflowExecutionRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Bool
== :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Bool
$c/= :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Bool
/= :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Bool
Prelude.Eq, Eq StartWorkflowExecutionRequest
Eq StartWorkflowExecutionRequest =>
(StartWorkflowExecutionRequest
 -> StartWorkflowExecutionRequest -> Ordering)
-> (StartWorkflowExecutionRequest
    -> StartWorkflowExecutionRequest -> Bool)
-> (StartWorkflowExecutionRequest
    -> StartWorkflowExecutionRequest -> Bool)
-> (StartWorkflowExecutionRequest
    -> StartWorkflowExecutionRequest -> Bool)
-> (StartWorkflowExecutionRequest
    -> StartWorkflowExecutionRequest -> Bool)
-> (StartWorkflowExecutionRequest
    -> StartWorkflowExecutionRequest -> StartWorkflowExecutionRequest)
-> (StartWorkflowExecutionRequest
    -> StartWorkflowExecutionRequest -> StartWorkflowExecutionRequest)
-> Ord StartWorkflowExecutionRequest
StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Bool
StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Ordering
StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> StartWorkflowExecutionRequest
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 :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Ordering
compare :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Ordering
$c< :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Bool
< :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Bool
$c<= :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Bool
<= :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Bool
$c> :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Bool
> :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Bool
$c>= :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Bool
>= :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> Bool
$cmax :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> StartWorkflowExecutionRequest
max :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> StartWorkflowExecutionRequest
$cmin :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> StartWorkflowExecutionRequest
min :: StartWorkflowExecutionRequest
-> StartWorkflowExecutionRequest -> StartWorkflowExecutionRequest
Prelude.Ord)
instance Prelude.Show StartWorkflowExecutionRequest where
  showsPrec :: Int -> StartWorkflowExecutionRequest -> ShowS
showsPrec Int
_ StartWorkflowExecutionRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (StartWorkflowExecutionRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort StartWorkflowExecutionRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Text)
-> (StartWorkflowExecutionRequest
    -> Text -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Text
_StartWorkflowExecutionRequest'namespace
           (\ StartWorkflowExecutionRequest
x__ Text
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "workflowId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowId"
-> (Text -> f Text)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "workflowId"
_
    = ((Text -> f Text)
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Text)
-> (StartWorkflowExecutionRequest
    -> Text -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Text
_StartWorkflowExecutionRequest'workflowId
           (\ StartWorkflowExecutionRequest
x__ Text
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'workflowId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "workflowType" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (WorkflowType -> f WorkflowType)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((WorkflowType -> f WorkflowType)
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe WorkflowType)
-> (StartWorkflowExecutionRequest
    -> Maybe WorkflowType -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe WorkflowType
_StartWorkflowExecutionRequest'workflowType
           (\ StartWorkflowExecutionRequest
x__ Maybe WorkflowType
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'workflowType = y__}))
        (WorkflowType -> Lens' (Maybe WorkflowType) WorkflowType
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowType
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "maybe'workflowType" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowType"
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe WorkflowType)
-> (StartWorkflowExecutionRequest
    -> Maybe WorkflowType -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe WorkflowType
_StartWorkflowExecutionRequest'workflowType
           (\ StartWorkflowExecutionRequest
x__ Maybe WorkflowType
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'workflowType = y__}))
        (Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "taskQueue" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (TaskQueue -> f TaskQueue)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((TaskQueue -> f TaskQueue)
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (TaskQueue -> f TaskQueue)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe TaskQueue)
-> (StartWorkflowExecutionRequest
    -> Maybe TaskQueue -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe TaskQueue
_StartWorkflowExecutionRequest'taskQueue
           (\ StartWorkflowExecutionRequest
x__ Maybe TaskQueue
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'taskQueue = y__}))
        (TaskQueue -> Lens' (Maybe TaskQueue) TaskQueue
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TaskQueue
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "maybe'taskQueue" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'taskQueue"
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "maybe'taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Maybe TaskQueue -> f (Maybe TaskQueue))
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe TaskQueue)
-> (StartWorkflowExecutionRequest
    -> Maybe TaskQueue -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe TaskQueue
_StartWorkflowExecutionRequest'taskQueue
           (\ StartWorkflowExecutionRequest
x__ Maybe TaskQueue
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'taskQueue = y__}))
        (Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "input" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "input"
-> (Payloads -> f Payloads)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Payloads)
-> (StartWorkflowExecutionRequest
    -> Maybe Payloads -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Payloads
_StartWorkflowExecutionRequest'input
           (\ StartWorkflowExecutionRequest
x__ Maybe Payloads
y__ -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'input = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "maybe'input" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'input"
-> (Maybe Payloads -> f (Maybe Payloads))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "maybe'input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Payloads)
-> (StartWorkflowExecutionRequest
    -> Maybe Payloads -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Payloads
_StartWorkflowExecutionRequest'input
           (\ StartWorkflowExecutionRequest
x__ Maybe Payloads
y__ -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'input = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "workflowExecutionTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionTimeout"
-> (Duration -> f Duration)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "workflowExecutionTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Duration)
-> (StartWorkflowExecutionRequest
    -> Maybe Duration -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowExecutionTimeout
           (\ StartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> StartWorkflowExecutionRequest
x__
                   {_StartWorkflowExecutionRequest'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 StartWorkflowExecutionRequest "maybe'workflowExecutionTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowExecutionTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Duration)
-> (StartWorkflowExecutionRequest
    -> Maybe Duration -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowExecutionTimeout
           (\ StartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> StartWorkflowExecutionRequest
x__
                   {_StartWorkflowExecutionRequest'workflowExecutionTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "workflowRunTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowRunTimeout"
-> (Duration -> f Duration)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Duration)
-> (StartWorkflowExecutionRequest
    -> Maybe Duration -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowRunTimeout
           (\ StartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'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 StartWorkflowExecutionRequest "maybe'workflowRunTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowRunTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Duration)
-> (StartWorkflowExecutionRequest
    -> Maybe Duration -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowRunTimeout
           (\ StartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'workflowRunTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "workflowTaskTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskTimeout"
-> (Duration -> f Duration)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Duration)
-> (StartWorkflowExecutionRequest
    -> Maybe Duration -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowTaskTimeout
           (\ StartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'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 StartWorkflowExecutionRequest "maybe'workflowTaskTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowTaskTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Duration)
-> (StartWorkflowExecutionRequest
    -> Maybe Duration -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowTaskTimeout
           (\ StartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'workflowTaskTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Text)
-> (StartWorkflowExecutionRequest
    -> Text -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Text
_StartWorkflowExecutionRequest'identity
           (\ StartWorkflowExecutionRequest
x__ Text
y__ -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "requestId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestId"
-> (Text -> f Text)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "requestId"
_
    = ((Text -> f Text)
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Text)
-> (StartWorkflowExecutionRequest
    -> Text -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Text
_StartWorkflowExecutionRequest'requestId
           (\ StartWorkflowExecutionRequest
x__ Text
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'requestId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "workflowIdReusePolicy" Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowIdReusePolicy"
-> (WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "workflowIdReusePolicy"
_
    = ((WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
    -> WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> (WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> WorkflowIdReusePolicy)
-> (StartWorkflowExecutionRequest
    -> WorkflowIdReusePolicy -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     WorkflowIdReusePolicy
     WorkflowIdReusePolicy
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> WorkflowIdReusePolicy
_StartWorkflowExecutionRequest'workflowIdReusePolicy
           (\ StartWorkflowExecutionRequest
x__ WorkflowIdReusePolicy
y__
              -> StartWorkflowExecutionRequest
x__
                   {_StartWorkflowExecutionRequest'workflowIdReusePolicy = y__}))
        (WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> WorkflowIdReusePolicy -> f WorkflowIdReusePolicy
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "workflowIdConflictPolicy" Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdConflictPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowIdConflictPolicy"
-> (WorkflowIdConflictPolicy -> f WorkflowIdConflictPolicy)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "workflowIdConflictPolicy"
_
    = ((WorkflowIdConflictPolicy -> f WorkflowIdConflictPolicy)
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((WorkflowIdConflictPolicy -> f WorkflowIdConflictPolicy)
    -> WorkflowIdConflictPolicy -> f WorkflowIdConflictPolicy)
-> (WorkflowIdConflictPolicy -> f WorkflowIdConflictPolicy)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> WorkflowIdConflictPolicy)
-> (StartWorkflowExecutionRequest
    -> WorkflowIdConflictPolicy -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     WorkflowIdConflictPolicy
     WorkflowIdConflictPolicy
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> WorkflowIdConflictPolicy
_StartWorkflowExecutionRequest'workflowIdConflictPolicy
           (\ StartWorkflowExecutionRequest
x__ WorkflowIdConflictPolicy
y__
              -> StartWorkflowExecutionRequest
x__
                   {_StartWorkflowExecutionRequest'workflowIdConflictPolicy = y__}))
        (WorkflowIdConflictPolicy -> f WorkflowIdConflictPolicy)
-> WorkflowIdConflictPolicy -> f WorkflowIdConflictPolicy
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "retryPolicy" Proto.Temporal.Api.Common.V1.Message.RetryPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryPolicy"
-> (RetryPolicy -> f RetryPolicy)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((RetryPolicy -> f RetryPolicy)
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (RetryPolicy -> f RetryPolicy)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe RetryPolicy)
-> (StartWorkflowExecutionRequest
    -> Maybe RetryPolicy -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe RetryPolicy
_StartWorkflowExecutionRequest'retryPolicy
           (\ StartWorkflowExecutionRequest
x__ Maybe RetryPolicy
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'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 StartWorkflowExecutionRequest "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))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "maybe'retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe RetryPolicy)
-> (StartWorkflowExecutionRequest
    -> Maybe RetryPolicy -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe RetryPolicy
_StartWorkflowExecutionRequest'retryPolicy
           (\ StartWorkflowExecutionRequest
x__ Maybe RetryPolicy
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'retryPolicy = y__}))
        (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> Maybe RetryPolicy -> f (Maybe RetryPolicy)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "cronSchedule" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cronSchedule"
-> (Text -> f Text)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "cronSchedule"
_
    = ((Text -> f Text)
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Text)
-> (StartWorkflowExecutionRequest
    -> Text -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Text
_StartWorkflowExecutionRequest'cronSchedule
           (\ StartWorkflowExecutionRequest
x__ Text
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'cronSchedule = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "memo" Proto.Temporal.Api.Common.V1.Message.Memo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "memo"
-> (Memo -> f Memo)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Memo -> f Memo) -> Maybe Memo -> f (Maybe Memo))
-> (Memo -> f Memo)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Memo)
-> (StartWorkflowExecutionRequest
    -> Maybe Memo -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Memo
_StartWorkflowExecutionRequest'memo
           (\ StartWorkflowExecutionRequest
x__ Maybe Memo
y__ -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'memo = y__}))
        (Memo -> Lens' (Maybe Memo) Memo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Memo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "maybe'memo" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'memo"
-> (Maybe Memo -> f (Maybe Memo))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "maybe'memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo))
-> (Maybe Memo -> f (Maybe Memo))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Memo)
-> (StartWorkflowExecutionRequest
    -> Maybe Memo -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Memo
_StartWorkflowExecutionRequest'memo
           (\ StartWorkflowExecutionRequest
x__ Maybe Memo
y__ -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'memo = y__}))
        (Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "searchAttributes" Proto.Temporal.Api.Common.V1.Message.SearchAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "searchAttributes"
-> (SearchAttributes -> f SearchAttributes)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((SearchAttributes -> f SearchAttributes)
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (SearchAttributes -> f SearchAttributes)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe SearchAttributes)
-> (StartWorkflowExecutionRequest
    -> Maybe SearchAttributes -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe SearchAttributes
_StartWorkflowExecutionRequest'searchAttributes
           (\ StartWorkflowExecutionRequest
x__ Maybe SearchAttributes
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'searchAttributes = y__}))
        (SearchAttributes -> Lens' (Maybe SearchAttributes) SearchAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SearchAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "maybe'searchAttributes" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'searchAttributes"
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "maybe'searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe SearchAttributes)
-> (StartWorkflowExecutionRequest
    -> Maybe SearchAttributes -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe SearchAttributes
_StartWorkflowExecutionRequest'searchAttributes
           (\ StartWorkflowExecutionRequest
x__ Maybe SearchAttributes
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'searchAttributes = y__}))
        (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> Maybe SearchAttributes -> f (Maybe SearchAttributes)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "header" Proto.Temporal.Api.Common.V1.Message.Header where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "header"
-> (Header -> f Header)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Header -> f Header) -> Maybe Header -> f (Maybe Header))
-> (Header -> f Header)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Header)
-> (StartWorkflowExecutionRequest
    -> Maybe Header -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Header
_StartWorkflowExecutionRequest'header
           (\ StartWorkflowExecutionRequest
x__ Maybe Header
y__ -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'header = y__}))
        (Header -> Lens' (Maybe Header) Header
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Header
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "maybe'header" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'header"
-> (Maybe Header -> f (Maybe Header))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "maybe'header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Maybe Header -> f (Maybe Header))
    -> Maybe Header -> f (Maybe Header))
-> (Maybe Header -> f (Maybe Header))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Header)
-> (StartWorkflowExecutionRequest
    -> Maybe Header -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Header
_StartWorkflowExecutionRequest'header
           (\ StartWorkflowExecutionRequest
x__ Maybe Header
y__ -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'header = y__}))
        (Maybe Header -> f (Maybe Header))
-> Maybe Header -> f (Maybe Header)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "requestEagerExecution" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestEagerExecution"
-> (Bool -> f Bool)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "requestEagerExecution"
_
    = ((Bool -> f Bool)
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Bool)
-> (StartWorkflowExecutionRequest
    -> Bool -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Bool
_StartWorkflowExecutionRequest'requestEagerExecution
           (\ StartWorkflowExecutionRequest
x__ Bool
y__
              -> StartWorkflowExecutionRequest
x__
                   {_StartWorkflowExecutionRequest'requestEagerExecution = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "continuedFailure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "continuedFailure"
-> (Failure -> f Failure)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "continuedFailure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Failure)
-> (StartWorkflowExecutionRequest
    -> Maybe Failure -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Failure
_StartWorkflowExecutionRequest'continuedFailure
           (\ StartWorkflowExecutionRequest
x__ Maybe Failure
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'continuedFailure = y__}))
        (Failure -> Lens' (Maybe Failure) Failure
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Failure
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "maybe'continuedFailure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'continuedFailure"
-> (Maybe Failure -> f (Maybe Failure))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "maybe'continuedFailure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Failure)
-> (StartWorkflowExecutionRequest
    -> Maybe Failure -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Failure
_StartWorkflowExecutionRequest'continuedFailure
           (\ StartWorkflowExecutionRequest
x__ Maybe Failure
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'continuedFailure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "lastCompletionResult" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastCompletionResult"
-> (Payloads -> f Payloads)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "lastCompletionResult"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Payloads)
-> (StartWorkflowExecutionRequest
    -> Maybe Payloads -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Payloads
_StartWorkflowExecutionRequest'lastCompletionResult
           (\ StartWorkflowExecutionRequest
x__ Maybe Payloads
y__
              -> StartWorkflowExecutionRequest
x__
                   {_StartWorkflowExecutionRequest'lastCompletionResult = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "maybe'lastCompletionResult" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastCompletionResult"
-> (Maybe Payloads -> f (Maybe Payloads))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "maybe'lastCompletionResult"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Payloads)
-> (StartWorkflowExecutionRequest
    -> Maybe Payloads -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Payloads
_StartWorkflowExecutionRequest'lastCompletionResult
           (\ StartWorkflowExecutionRequest
x__ Maybe Payloads
y__
              -> StartWorkflowExecutionRequest
x__
                   {_StartWorkflowExecutionRequest'lastCompletionResult = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "workflowStartDelay" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowStartDelay"
-> (Duration -> f Duration)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "workflowStartDelay"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Duration)
-> (StartWorkflowExecutionRequest
    -> Maybe Duration -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowStartDelay
           (\ StartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'workflowStartDelay = 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 StartWorkflowExecutionRequest "maybe'workflowStartDelay" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowStartDelay"
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowStartDelay"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Maybe Duration)
-> (StartWorkflowExecutionRequest
    -> Maybe Duration -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowStartDelay
           (\ StartWorkflowExecutionRequest
x__ Maybe Duration
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'workflowStartDelay = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "completionCallbacks" [Proto.Temporal.Api.Common.V1.Message.Callback] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "completionCallbacks"
-> ([Callback] -> f [Callback])
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "completionCallbacks"
_
    = ((Vector Callback -> f (Vector Callback))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> (([Callback] -> f [Callback])
    -> Vector Callback -> f (Vector Callback))
-> ([Callback] -> f [Callback])
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Vector Callback)
-> (StartWorkflowExecutionRequest
    -> Vector Callback -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Vector Callback)
     (Vector Callback)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Vector Callback
_StartWorkflowExecutionRequest'completionCallbacks
           (\ StartWorkflowExecutionRequest
x__ Vector Callback
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'completionCallbacks = y__}))
        ((Vector Callback -> [Callback])
-> (Vector Callback -> [Callback] -> Vector Callback)
-> Lens (Vector Callback) (Vector Callback) [Callback] [Callback]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Callback -> [Callback]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Callback
_ [Callback]
y__ -> [Callback] -> Vector Callback
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Callback]
y__))
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionRequest "vec'completionCallbacks" (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Callback) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'completionCallbacks"
-> (Vector Callback -> f (Vector Callback))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
fieldOf Proxy# "vec'completionCallbacks"
_
    = ((Vector Callback -> f (Vector Callback))
 -> StartWorkflowExecutionRequest
 -> f StartWorkflowExecutionRequest)
-> ((Vector Callback -> f (Vector Callback))
    -> Vector Callback -> f (Vector Callback))
-> (Vector Callback -> f (Vector Callback))
-> StartWorkflowExecutionRequest
-> f StartWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionRequest -> Vector Callback)
-> (StartWorkflowExecutionRequest
    -> Vector Callback -> StartWorkflowExecutionRequest)
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     (Vector Callback)
     (Vector Callback)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionRequest -> Vector Callback
_StartWorkflowExecutionRequest'completionCallbacks
           (\ StartWorkflowExecutionRequest
x__ Vector Callback
y__
              -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'completionCallbacks = y__}))
        (Vector Callback -> f (Vector Callback))
-> Vector Callback -> f (Vector Callback)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message StartWorkflowExecutionRequest where
  messageName :: Proxy StartWorkflowExecutionRequest -> Text
messageName Proxy StartWorkflowExecutionRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.StartWorkflowExecutionRequest"
  packedMessageDescriptor :: Proxy StartWorkflowExecutionRequest -> ByteString
packedMessageDescriptor Proxy StartWorkflowExecutionRequest
_
    = ByteString
"\n\
      \\GSStartWorkflowExecutionRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
      \\vworkflow_id\CAN\STX \SOH(\tR\n\
      \workflowId\DC2I\n\
      \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2C\n\
      \\n\
      \task_queue\CAN\EOT \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC26\n\
      \\ENQinput\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2W\n\
      \\SUBworkflow_execution_timeout\CAN\ACK \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
      \\DC4workflow_run_timeout\CAN\a \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
      \\NAKworkflow_task_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2\SUB\n\
      \\bidentity\CAN\t \SOH(\tR\bidentity\DC2\GS\n\
      \\n\
      \request_id\CAN\n\
      \ \SOH(\tR\trequestId\DC2e\n\
      \\CANworkflow_id_reuse_policy\CAN\v \SOH(\SO2,.temporal.api.enums.v1.WorkflowIdReusePolicyR\NAKworkflowIdReusePolicy\DC2n\n\
      \\ESCworkflow_id_conflict_policy\CAN\SYN \SOH(\SO2/.temporal.api.enums.v1.WorkflowIdConflictPolicyR\CANworkflowIdConflictPolicy\DC2F\n\
      \\fretry_policy\CAN\f \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2#\n\
      \\rcron_schedule\CAN\r \SOH(\tR\fcronSchedule\DC20\n\
      \\EOTmemo\CAN\SO \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
      \\DC1search_attributes\CAN\SI \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC26\n\
      \\ACKheader\CAN\DLE \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC26\n\
      \\ETBrequest_eager_execution\CAN\DC1 \SOH(\bR\NAKrequestEagerExecution\DC2M\n\
      \\DC1continued_failure\CAN\DC2 \SOH(\v2 .temporal.api.failure.v1.FailureR\DLEcontinuedFailure\DC2V\n\
      \\SYNlast_completion_result\CAN\DC3 \SOH(\v2 .temporal.api.common.v1.PayloadsR\DC4lastCompletionResult\DC2K\n\
      \\DC4workflow_start_delay\CAN\DC4 \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowStartDelay\DC2S\n\
      \\DC4completion_callbacks\CAN\NAK \ETX(\v2 .temporal.api.common.v1.CallbackR\DC3completionCallbacks"
  packedFileDescriptor :: Proxy StartWorkflowExecutionRequest -> ByteString
packedFileDescriptor Proxy StartWorkflowExecutionRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor StartWorkflowExecutionRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartWorkflowExecutionRequest Text
-> FieldDescriptor StartWorkflowExecutionRequest
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
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor StartWorkflowExecutionRequest 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 StartWorkflowExecutionRequest
        workflowId__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
workflowId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartWorkflowExecutionRequest Text
-> FieldDescriptor StartWorkflowExecutionRequest
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
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor StartWorkflowExecutionRequest 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 StartWorkflowExecutionRequest
        workflowType__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor StartWorkflowExecutionRequest WorkflowType
-> FieldDescriptor StartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_type"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowType
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowType)
              (Lens
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> FieldAccessor StartWorkflowExecutionRequest WorkflowType
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowType")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionRequest
        taskQueue__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueue
-> FieldAccessor StartWorkflowExecutionRequest TaskQueue
-> FieldDescriptor StartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_queue"
              (MessageOrGroup -> FieldTypeDescriptor TaskQueue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)
              (Lens
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> FieldAccessor StartWorkflowExecutionRequest TaskQueue
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionRequest
        input__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
input__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor StartWorkflowExecutionRequest Payloads
-> FieldDescriptor StartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"input"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor StartWorkflowExecutionRequest Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'input")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionRequest
        workflowExecutionTimeout__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
workflowExecutionTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor StartWorkflowExecutionRequest Duration
-> FieldDescriptor StartWorkflowExecutionRequest
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
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor StartWorkflowExecutionRequest 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 StartWorkflowExecutionRequest
        workflowRunTimeout__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
workflowRunTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor StartWorkflowExecutionRequest Duration
-> FieldDescriptor StartWorkflowExecutionRequest
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
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor StartWorkflowExecutionRequest 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 StartWorkflowExecutionRequest
        workflowTaskTimeout__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
workflowTaskTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor StartWorkflowExecutionRequest Duration
-> FieldDescriptor StartWorkflowExecutionRequest
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
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor StartWorkflowExecutionRequest 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 StartWorkflowExecutionRequest
        identity__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartWorkflowExecutionRequest Text
-> FieldDescriptor StartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor StartWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionRequest
        requestId__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
requestId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartWorkflowExecutionRequest Text
-> FieldDescriptor StartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor StartWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionRequest
        workflowIdReusePolicy__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
workflowIdReusePolicy__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowIdReusePolicy
-> FieldAccessor
     StartWorkflowExecutionRequest WorkflowIdReusePolicy
-> FieldDescriptor StartWorkflowExecutionRequest
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
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     WorkflowIdReusePolicy
     WorkflowIdReusePolicy
-> FieldAccessor
     StartWorkflowExecutionRequest 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 StartWorkflowExecutionRequest
        workflowIdConflictPolicy__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
workflowIdConflictPolicy__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowIdConflictPolicy
-> FieldAccessor
     StartWorkflowExecutionRequest WorkflowIdConflictPolicy
-> FieldDescriptor StartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_id_conflict_policy"
              (ScalarField WorkflowIdConflictPolicy
-> FieldTypeDescriptor WorkflowIdConflictPolicy
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField WorkflowIdConflictPolicy
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdConflictPolicy)
              (WireDefault WorkflowIdConflictPolicy
-> Lens
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     WorkflowIdConflictPolicy
     WorkflowIdConflictPolicy
-> FieldAccessor
     StartWorkflowExecutionRequest WorkflowIdConflictPolicy
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault WorkflowIdConflictPolicy
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"workflowIdConflictPolicy")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionRequest
        retryPolicy__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
retryPolicy__field_descriptor
          = String
-> FieldTypeDescriptor RetryPolicy
-> FieldAccessor StartWorkflowExecutionRequest RetryPolicy
-> FieldDescriptor StartWorkflowExecutionRequest
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
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> FieldAccessor StartWorkflowExecutionRequest 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 StartWorkflowExecutionRequest
        cronSchedule__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
cronSchedule__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartWorkflowExecutionRequest Text
-> FieldDescriptor StartWorkflowExecutionRequest
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
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor StartWorkflowExecutionRequest 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 StartWorkflowExecutionRequest
        memo__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
memo__field_descriptor
          = String
-> FieldTypeDescriptor Memo
-> FieldAccessor StartWorkflowExecutionRequest Memo
-> FieldDescriptor StartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"memo"
              (MessageOrGroup -> FieldTypeDescriptor Memo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Memo)
              (Lens
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Memo)
  (Maybe Memo)
-> FieldAccessor StartWorkflowExecutionRequest Memo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'memo")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionRequest
        searchAttributes__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
searchAttributes__field_descriptor
          = String
-> FieldTypeDescriptor SearchAttributes
-> FieldAccessor StartWorkflowExecutionRequest SearchAttributes
-> FieldDescriptor StartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"search_attributes"
              (MessageOrGroup -> FieldTypeDescriptor SearchAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.SearchAttributes)
              (Lens
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> FieldAccessor StartWorkflowExecutionRequest SearchAttributes
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'searchAttributes")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionRequest
        header__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
header__field_descriptor
          = String
-> FieldTypeDescriptor Header
-> FieldAccessor StartWorkflowExecutionRequest Header
-> FieldDescriptor StartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"header"
              (MessageOrGroup -> FieldTypeDescriptor Header
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Header)
              (Lens
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Header)
  (Maybe Header)
-> FieldAccessor StartWorkflowExecutionRequest Header
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'header")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionRequest
        requestEagerExecution__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
requestEagerExecution__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor StartWorkflowExecutionRequest Bool
-> FieldDescriptor StartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_eager_execution"
              (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
     StartWorkflowExecutionRequest
     StartWorkflowExecutionRequest
     Bool
     Bool
-> FieldAccessor StartWorkflowExecutionRequest 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 @"requestEagerExecution")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionRequest
        continuedFailure__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
continuedFailure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor StartWorkflowExecutionRequest Failure
-> FieldDescriptor StartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"continued_failure"
              (MessageOrGroup -> FieldTypeDescriptor Failure
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Failure.V1.Message.Failure)
              (Lens
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor StartWorkflowExecutionRequest Failure
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'continuedFailure")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionRequest
        lastCompletionResult__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
lastCompletionResult__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor StartWorkflowExecutionRequest Payloads
-> FieldDescriptor StartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"last_completion_result"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor StartWorkflowExecutionRequest Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastCompletionResult")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionRequest
        workflowStartDelay__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
workflowStartDelay__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor StartWorkflowExecutionRequest Duration
-> FieldDescriptor StartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_start_delay"
              (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
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor StartWorkflowExecutionRequest 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'workflowStartDelay")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionRequest
        completionCallbacks__field_descriptor :: FieldDescriptor StartWorkflowExecutionRequest
completionCallbacks__field_descriptor
          = String
-> FieldTypeDescriptor Callback
-> FieldAccessor StartWorkflowExecutionRequest Callback
-> FieldDescriptor StartWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"completion_callbacks"
              (MessageOrGroup -> FieldTypeDescriptor Callback
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Callback)
              (Packing
-> Lens' StartWorkflowExecutionRequest [Callback]
-> FieldAccessor StartWorkflowExecutionRequest Callback
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
                 Packing
Data.ProtoLens.Unpacked
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"completionCallbacks")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionRequest
      in
        [(Tag, FieldDescriptor StartWorkflowExecutionRequest)]
-> Map Tag (FieldDescriptor StartWorkflowExecutionRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor StartWorkflowExecutionRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor StartWorkflowExecutionRequest
workflowId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor StartWorkflowExecutionRequest
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor StartWorkflowExecutionRequest
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor StartWorkflowExecutionRequest
input__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor StartWorkflowExecutionRequest
workflowExecutionTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor StartWorkflowExecutionRequest
workflowRunTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor StartWorkflowExecutionRequest
workflowTaskTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor StartWorkflowExecutionRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor StartWorkflowExecutionRequest
requestId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor StartWorkflowExecutionRequest
workflowIdReusePolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
22, 
            FieldDescriptor StartWorkflowExecutionRequest
workflowIdConflictPolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor StartWorkflowExecutionRequest
retryPolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor StartWorkflowExecutionRequest
cronSchedule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
14, FieldDescriptor StartWorkflowExecutionRequest
memo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
15, FieldDescriptor StartWorkflowExecutionRequest
searchAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
16, FieldDescriptor StartWorkflowExecutionRequest
header__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
17, FieldDescriptor StartWorkflowExecutionRequest
requestEagerExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
18, FieldDescriptor StartWorkflowExecutionRequest
continuedFailure__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
19, FieldDescriptor StartWorkflowExecutionRequest
lastCompletionResult__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
20, FieldDescriptor StartWorkflowExecutionRequest
workflowStartDelay__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
21, FieldDescriptor StartWorkflowExecutionRequest
completionCallbacks__field_descriptor)]
  unknownFields :: Lens' StartWorkflowExecutionRequest FieldSet
unknownFields
    = (StartWorkflowExecutionRequest -> FieldSet)
-> (StartWorkflowExecutionRequest
    -> FieldSet -> StartWorkflowExecutionRequest)
-> Lens' StartWorkflowExecutionRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        StartWorkflowExecutionRequest -> FieldSet
_StartWorkflowExecutionRequest'_unknownFields
        (\ StartWorkflowExecutionRequest
x__ FieldSet
y__
           -> StartWorkflowExecutionRequest
x__ {_StartWorkflowExecutionRequest'_unknownFields = y__})
  defMessage :: StartWorkflowExecutionRequest
defMessage
    = StartWorkflowExecutionRequest'_constructor
        {_StartWorkflowExecutionRequest'namespace :: Text
_StartWorkflowExecutionRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflowExecutionRequest'workflowId :: Text
_StartWorkflowExecutionRequest'workflowId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflowExecutionRequest'workflowType :: Maybe WorkflowType
_StartWorkflowExecutionRequest'workflowType = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflowExecutionRequest'taskQueue :: Maybe TaskQueue
_StartWorkflowExecutionRequest'taskQueue = Maybe TaskQueue
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflowExecutionRequest'input :: Maybe Payloads
_StartWorkflowExecutionRequest'input = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflowExecutionRequest'workflowExecutionTimeout :: Maybe Duration
_StartWorkflowExecutionRequest'workflowExecutionTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflowExecutionRequest'workflowRunTimeout :: Maybe Duration
_StartWorkflowExecutionRequest'workflowRunTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflowExecutionRequest'workflowTaskTimeout :: Maybe Duration
_StartWorkflowExecutionRequest'workflowTaskTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflowExecutionRequest'identity :: Text
_StartWorkflowExecutionRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflowExecutionRequest'requestId :: Text
_StartWorkflowExecutionRequest'requestId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflowExecutionRequest'workflowIdReusePolicy :: WorkflowIdReusePolicy
_StartWorkflowExecutionRequest'workflowIdReusePolicy = WorkflowIdReusePolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflowExecutionRequest'workflowIdConflictPolicy :: WorkflowIdConflictPolicy
_StartWorkflowExecutionRequest'workflowIdConflictPolicy = WorkflowIdConflictPolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflowExecutionRequest'retryPolicy :: Maybe RetryPolicy
_StartWorkflowExecutionRequest'retryPolicy = Maybe RetryPolicy
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflowExecutionRequest'cronSchedule :: Text
_StartWorkflowExecutionRequest'cronSchedule = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflowExecutionRequest'memo :: Maybe Memo
_StartWorkflowExecutionRequest'memo = Maybe Memo
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflowExecutionRequest'searchAttributes :: Maybe SearchAttributes
_StartWorkflowExecutionRequest'searchAttributes = Maybe SearchAttributes
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflowExecutionRequest'header :: Maybe Header
_StartWorkflowExecutionRequest'header = Maybe Header
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflowExecutionRequest'requestEagerExecution :: Bool
_StartWorkflowExecutionRequest'requestEagerExecution = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflowExecutionRequest'continuedFailure :: Maybe Failure
_StartWorkflowExecutionRequest'continuedFailure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflowExecutionRequest'lastCompletionResult :: Maybe Payloads
_StartWorkflowExecutionRequest'lastCompletionResult = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflowExecutionRequest'workflowStartDelay :: Maybe Duration
_StartWorkflowExecutionRequest'workflowStartDelay = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflowExecutionRequest'completionCallbacks :: Vector Callback
_StartWorkflowExecutionRequest'completionCallbacks = Vector Callback
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _StartWorkflowExecutionRequest'_unknownFields :: FieldSet
_StartWorkflowExecutionRequest'_unknownFields = []}
  parseMessage :: Parser StartWorkflowExecutionRequest
parseMessage
    = let
        loop ::
          StartWorkflowExecutionRequest
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Common.V1.Message.Callback
             -> Data.ProtoLens.Encoding.Bytes.Parser StartWorkflowExecutionRequest
        loop :: StartWorkflowExecutionRequest
-> Growing Vector RealWorld Callback
-> Parser StartWorkflowExecutionRequest
loop StartWorkflowExecutionRequest
x Growing Vector RealWorld Callback
mutable'completionCallbacks
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'completionCallbacks <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                      (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                         mutable'completionCallbacks)
                      (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
                           (Lens.Family2.set
                              (Data.ProtoLens.Field.field @"vec'completionCallbacks")
                              frozen'completionCallbacks x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser 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'completionCallbacks
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"workflow_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"workflowId") y x)
                                  mutable'completionCallbacks
                        Word64
26
                          -> do y <- Parser WorkflowType -> String -> Parser WorkflowType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_type"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowType") y x)
                                  mutable'completionCallbacks
                        Word64
34
                          -> do y <- Parser TaskQueue -> String -> Parser TaskQueue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"task_queue"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"taskQueue") y x)
                                  mutable'completionCallbacks
                        Word64
42
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"input"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"input") y x)
                                  mutable'completionCallbacks
                        Word64
50
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_execution_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecutionTimeout") y x)
                                  mutable'completionCallbacks
                        Word64
58
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_run_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowRunTimeout") y x)
                                  mutable'completionCallbacks
                        Word64
66
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_task_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskTimeout") y x)
                                  mutable'completionCallbacks
                        Word64
74
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                                  mutable'completionCallbacks
                        Word64
82
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"request_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x)
                                  mutable'completionCallbacks
                        Word64
88
                          -> 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'completionCallbacks
                        Word64
176
                          -> do y <- Parser WorkflowIdConflictPolicy
-> String -> Parser WorkflowIdConflictPolicy
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> WorkflowIdConflictPolicy)
-> Parser Int -> Parser WorkflowIdConflictPolicy
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> WorkflowIdConflictPolicy
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_conflict_policy"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowIdConflictPolicy") y x)
                                  mutable'completionCallbacks
                        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'completionCallbacks
                        Word64
106
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"cron_schedule"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cronSchedule") y x)
                                  mutable'completionCallbacks
                        Word64
114
                          -> do y <- Parser Memo -> String -> Parser Memo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"memo"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"memo") y x)
                                  mutable'completionCallbacks
                        Word64
122
                          -> do y <- Parser SearchAttributes -> String -> Parser SearchAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"search_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"searchAttributes") y x)
                                  mutable'completionCallbacks
                        Word64
130
                          -> do y <- Parser Header -> String -> Parser Header
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"header"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"header") y x)
                                  mutable'completionCallbacks
                        Word64
136
                          -> 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
"request_eager_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"requestEagerExecution") y x)
                                  mutable'completionCallbacks
                        Word64
146
                          -> do y <- Parser Failure -> String -> Parser Failure
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"continued_failure"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"continuedFailure") y x)
                                  mutable'completionCallbacks
                        Word64
154
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"last_completion_result"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"lastCompletionResult") y x)
                                  mutable'completionCallbacks
                        Word64
162
                          -> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_start_delay"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowStartDelay") y x)
                                  mutable'completionCallbacks
                        Word64
170
                          -> do !y <- Parser Callback -> String -> Parser Callback
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"completion_callbacks"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'completionCallbacks y)
                                loop x v
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
                                  mutable'completionCallbacks
      in
        Parser StartWorkflowExecutionRequest
-> String -> Parser StartWorkflowExecutionRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'completionCallbacks <- IO (Growing Vector RealWorld Callback)
-> Parser (Growing Vector RealWorld Callback)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                               IO (Growing Vector RealWorld Callback)
IO (Growing Vector (PrimState IO) Callback)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              loop Data.ProtoLens.defMessage mutable'completionCallbacks)
          String
"StartWorkflowExecutionRequest"
  buildMessage :: StartWorkflowExecutionRequest -> Builder
buildMessage
    = \ StartWorkflowExecutionRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  Text
  Text
-> StartWorkflowExecutionRequest -> 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") StartWorkflowExecutionRequest
_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
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  Text
  Text
-> StartWorkflowExecutionRequest -> 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") StartWorkflowExecutionRequest
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe WorkflowType)
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> StartWorkflowExecutionRequest -> Maybe WorkflowType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                          (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowType") StartWorkflowExecutionRequest
_x
                    of
                      Maybe WorkflowType
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just WorkflowType
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (WorkflowType -> ByteString) -> WorkflowType -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                WorkflowType -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowType
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe TaskQueue)
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> StartWorkflowExecutionRequest -> Maybe TaskQueue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                             (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue") StartWorkflowExecutionRequest
_x
                       of
                         Maybe TaskQueue
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just TaskQueue
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (TaskQueue -> ByteString) -> TaskQueue -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   TaskQueue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueue
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Payloads)
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> StartWorkflowExecutionRequest -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'input") StartWorkflowExecutionRequest
_x
                          of
                            Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just Payloads
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (case
                                 FoldLike
  (Maybe Duration)
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> StartWorkflowExecutionRequest -> 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") StartWorkflowExecutionRequest
_x
                             of
                               Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               (Prelude.Just Duration
_v)
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                      ((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                         (\ ByteString
bs
                                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                       (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                         Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (case
                                    FoldLike
  (Maybe Duration)
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> StartWorkflowExecutionRequest -> 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") StartWorkflowExecutionRequest
_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)
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> StartWorkflowExecutionRequest -> 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")
                                         StartWorkflowExecutionRequest
_x
                                   of
                                     Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                     (Prelude.Just Duration
_v)
                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                                            ((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                               (\ ByteString
bs
                                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                             (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                               Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
                                  (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (let
                                        _v :: Text
_v
                                          = FoldLike
  Text
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  Text
  Text
-> StartWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") StartWorkflowExecutionRequest
_x
                                      in
                                        if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                            Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                        else
                                            Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
                                              ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                 (\ ByteString
bs
                                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                            (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                               (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                         (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                            ByteString
bs))
                                                 Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                                     (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (let
                                           _v :: Text
_v
                                             = FoldLike
  Text
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  Text
  Text
-> StartWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId") StartWorkflowExecutionRequest
_x
                                         in
                                           if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                               Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                           else
                                               Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
                                                 ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                    (\ ByteString
bs
                                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                               (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                  (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                            (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                               ByteString
bs))
                                                    Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                                        (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (let
                                              _v :: WorkflowIdReusePolicy
_v
                                                = FoldLike
  WorkflowIdReusePolicy
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  WorkflowIdReusePolicy
  WorkflowIdReusePolicy
-> StartWorkflowExecutionRequest -> 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")
                                                    StartWorkflowExecutionRequest
_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
88)
                                                    ((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.<>)
                                              (let
                                                 _v :: WorkflowIdConflictPolicy
_v
                                                   = FoldLike
  WorkflowIdConflictPolicy
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  WorkflowIdConflictPolicy
  WorkflowIdConflictPolicy
-> StartWorkflowExecutionRequest -> WorkflowIdConflictPolicy
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                          @"workflowIdConflictPolicy")
                                                       StartWorkflowExecutionRequest
_x
                                               in
                                                 if WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) WorkflowIdConflictPolicy
_v WorkflowIdConflictPolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                     Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                 else
                                                     Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
176)
                                                       ((Int -> Builder)
-> (WorkflowIdConflictPolicy -> Int)
-> WorkflowIdConflictPolicy
-> 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)
                                                          WorkflowIdConflictPolicy -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum WorkflowIdConflictPolicy
_v))
                                              (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (case
                                                      FoldLike
  (Maybe RetryPolicy)
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> StartWorkflowExecutionRequest -> 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")
                                                        StartWorkflowExecutionRequest
_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 :: Text
_v
                                                         = FoldLike
  Text
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  Text
  Text
-> StartWorkflowExecutionRequest -> 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")
                                                             StartWorkflowExecutionRequest
_x
                                                     in
                                                       if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
                                                            Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                                           Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                       else
                                                           Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                Word64
106)
                                                             ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                (\ ByteString
bs
                                                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                              (ByteString -> Int
Data.ByteString.length
                                                                                 ByteString
bs)))
                                                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                           ByteString
bs))
                                                                Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                                                    (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                       (case
                                                            FoldLike
  (Maybe Memo)
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Memo)
  (Maybe Memo)
-> StartWorkflowExecutionRequest -> Maybe Memo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                              (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                 @"maybe'memo")
                                                              StartWorkflowExecutionRequest
_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
114)
                                                                 ((ByteString -> Builder) -> (Memo -> ByteString) -> Memo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                    (\ ByteString
bs
                                                                       -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                               (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                  (ByteString -> Int
Data.ByteString.length
                                                                                     ByteString
bs)))
                                                                            (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                               ByteString
bs))
                                                                    Memo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                    Memo
_v))
                                                       (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                          (case
                                                               FoldLike
  (Maybe SearchAttributes)
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> StartWorkflowExecutionRequest -> Maybe SearchAttributes
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                    @"maybe'searchAttributes")
                                                                 StartWorkflowExecutionRequest
_x
                                                           of
                                                             Maybe SearchAttributes
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                             (Prelude.Just SearchAttributes
_v)
                                                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                       Word64
122)
                                                                    ((ByteString -> Builder)
-> (SearchAttributes -> ByteString) -> SearchAttributes -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                       (\ ByteString
bs
                                                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                  (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                     (ByteString -> Int
Data.ByteString.length
                                                                                        ByteString
bs)))
                                                                               (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                  ByteString
bs))
                                                                       SearchAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                       SearchAttributes
_v))
                                                          (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                             (case
                                                                  FoldLike
  (Maybe Header)
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Header)
  (Maybe Header)
-> StartWorkflowExecutionRequest -> Maybe Header
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                    (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                       @"maybe'header")
                                                                    StartWorkflowExecutionRequest
_x
                                                              of
                                                                Maybe Header
Prelude.Nothing
                                                                  -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                                (Prelude.Just Header
_v)
                                                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                          Word64
130)
                                                                       ((ByteString -> Builder)
-> (Header -> ByteString) -> Header -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                          (\ ByteString
bs
                                                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                        (ByteString -> Int
Data.ByteString.length
                                                                                           ByteString
bs)))
                                                                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                     ByteString
bs))
                                                                          Header -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                          Header
_v))
                                                             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                (let
                                                                   _v :: Bool
_v
                                                                     = FoldLike
  Bool
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  Bool
  Bool
-> StartWorkflowExecutionRequest -> 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
                                                                            @"requestEagerExecution")
                                                                         StartWorkflowExecutionRequest
_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
136)
                                                                         ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                            (\ Bool
b
                                                                               -> if Bool
b then
                                                                                      Word64
1
                                                                                  else
                                                                                      Word64
0)
                                                                            Bool
_v))
                                                                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                   (case
                                                                        FoldLike
  (Maybe Failure)
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Failure)
  (Maybe Failure)
-> StartWorkflowExecutionRequest -> Maybe Failure
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                          (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                             @"maybe'continuedFailure")
                                                                          StartWorkflowExecutionRequest
_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
146)
                                                                             ((ByteString -> Builder)
-> (Failure -> ByteString) -> Failure -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                                (\ ByteString
bs
                                                                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                              (ByteString -> Int
Data.ByteString.length
                                                                                                 ByteString
bs)))
                                                                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                           ByteString
bs))
                                                                                Failure -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                                Failure
_v))
                                                                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                      (case
                                                                           FoldLike
  (Maybe Payloads)
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> StartWorkflowExecutionRequest -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                             (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                                @"maybe'lastCompletionResult")
                                                                             StartWorkflowExecutionRequest
_x
                                                                       of
                                                                         Maybe Payloads
Prelude.Nothing
                                                                           -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                                         (Prelude.Just Payloads
_v)
                                                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                   Word64
154)
                                                                                ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                                   (\ ByteString
bs
                                                                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                                 (ByteString -> Int
Data.ByteString.length
                                                                                                    ByteString
bs)))
                                                                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                              ByteString
bs))
                                                                                   Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                                   Payloads
_v))
                                                                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                         (case
                                                                              FoldLike
  (Maybe Duration)
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Maybe Duration)
  (Maybe Duration)
-> StartWorkflowExecutionRequest -> 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'workflowStartDelay")
                                                                                StartWorkflowExecutionRequest
_x
                                                                          of
                                                                            Maybe Duration
Prelude.Nothing
                                                                              -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                                                            (Prelude.Just Duration
_v)
                                                                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                      Word64
162)
                                                                                   ((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                                      (\ ByteString
bs
                                                                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                                    (ByteString -> Int
Data.ByteString.length
                                                                                                       ByteString
bs)))
                                                                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                                 ByteString
bs))
                                                                                      Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                                      Duration
_v))
                                                                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                            ((Callback -> Builder) -> Vector Callback -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                                                               (\ Callback
_v
                                                                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                          Word64
170)
                                                                                       ((ByteString -> Builder)
-> (Callback -> ByteString) -> Callback -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                                                                          (\ ByteString
bs
                                                                                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                                                                        (ByteString -> Int
Data.ByteString.length
                                                                                                           ByteString
bs)))
                                                                                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
                                                                                                     ByteString
bs))
                                                                                          Callback -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                                                                          Callback
_v))
                                                                               (FoldLike
  (Vector Callback)
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  (Vector Callback)
  (Vector Callback)
-> StartWorkflowExecutionRequest -> Vector Callback
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                                  (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                                                                                     @"vec'completionCallbacks")
                                                                                  StartWorkflowExecutionRequest
_x))
                                                                            (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                                                               (FoldLike
  FieldSet
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  FieldSet
  FieldSet
-> StartWorkflowExecutionRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                                  FoldLike
  FieldSet
  StartWorkflowExecutionRequest
  StartWorkflowExecutionRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' StartWorkflowExecutionRequest FieldSet
Data.ProtoLens.unknownFields
                                                                                  StartWorkflowExecutionRequest
_x)))))))))))))))))))))))
instance Control.DeepSeq.NFData StartWorkflowExecutionRequest where
  rnf :: StartWorkflowExecutionRequest -> ()
rnf
    = \ StartWorkflowExecutionRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (StartWorkflowExecutionRequest -> FieldSet
_StartWorkflowExecutionRequest'_unknownFields StartWorkflowExecutionRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (StartWorkflowExecutionRequest -> Text
_StartWorkflowExecutionRequest'namespace StartWorkflowExecutionRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (StartWorkflowExecutionRequest -> Text
_StartWorkflowExecutionRequest'workflowId StartWorkflowExecutionRequest
x__)
                   (Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (StartWorkflowExecutionRequest -> Maybe WorkflowType
_StartWorkflowExecutionRequest'workflowType StartWorkflowExecutionRequest
x__)
                      (Maybe TaskQueue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (StartWorkflowExecutionRequest -> Maybe TaskQueue
_StartWorkflowExecutionRequest'taskQueue StartWorkflowExecutionRequest
x__)
                         (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (StartWorkflowExecutionRequest -> Maybe Payloads
_StartWorkflowExecutionRequest'input StartWorkflowExecutionRequest
x__)
                            (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowExecutionTimeout StartWorkflowExecutionRequest
x__)
                               (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowRunTimeout StartWorkflowExecutionRequest
x__)
                                  (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowTaskTimeout StartWorkflowExecutionRequest
x__)
                                     (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (StartWorkflowExecutionRequest -> Text
_StartWorkflowExecutionRequest'identity StartWorkflowExecutionRequest
x__)
                                        (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (StartWorkflowExecutionRequest -> Text
_StartWorkflowExecutionRequest'requestId StartWorkflowExecutionRequest
x__)
                                           (WorkflowIdReusePolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (StartWorkflowExecutionRequest -> WorkflowIdReusePolicy
_StartWorkflowExecutionRequest'workflowIdReusePolicy
                                                 StartWorkflowExecutionRequest
x__)
                                              (WorkflowIdConflictPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (StartWorkflowExecutionRequest -> WorkflowIdConflictPolicy
_StartWorkflowExecutionRequest'workflowIdConflictPolicy
                                                    StartWorkflowExecutionRequest
x__)
                                                 (Maybe RetryPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (StartWorkflowExecutionRequest -> Maybe RetryPolicy
_StartWorkflowExecutionRequest'retryPolicy StartWorkflowExecutionRequest
x__)
                                                    (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                       (StartWorkflowExecutionRequest -> Text
_StartWorkflowExecutionRequest'cronSchedule
                                                          StartWorkflowExecutionRequest
x__)
                                                       (Maybe Memo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                          (StartWorkflowExecutionRequest -> Maybe Memo
_StartWorkflowExecutionRequest'memo StartWorkflowExecutionRequest
x__)
                                                          (Maybe SearchAttributes -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                             (StartWorkflowExecutionRequest -> Maybe SearchAttributes
_StartWorkflowExecutionRequest'searchAttributes
                                                                StartWorkflowExecutionRequest
x__)
                                                             (Maybe Header -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                (StartWorkflowExecutionRequest -> Maybe Header
_StartWorkflowExecutionRequest'header
                                                                   StartWorkflowExecutionRequest
x__)
                                                                (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                   (StartWorkflowExecutionRequest -> Bool
_StartWorkflowExecutionRequest'requestEagerExecution
                                                                      StartWorkflowExecutionRequest
x__)
                                                                   (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                      (StartWorkflowExecutionRequest -> Maybe Failure
_StartWorkflowExecutionRequest'continuedFailure
                                                                         StartWorkflowExecutionRequest
x__)
                                                                      (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                         (StartWorkflowExecutionRequest -> Maybe Payloads
_StartWorkflowExecutionRequest'lastCompletionResult
                                                                            StartWorkflowExecutionRequest
x__)
                                                                         (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                            (StartWorkflowExecutionRequest -> Maybe Duration
_StartWorkflowExecutionRequest'workflowStartDelay
                                                                               StartWorkflowExecutionRequest
x__)
                                                                            (Vector Callback -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                               (StartWorkflowExecutionRequest -> Vector Callback
_StartWorkflowExecutionRequest'completionCallbacks
                                                                                  StartWorkflowExecutionRequest
x__)
                                                                               ()))))))))))))))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.runId' @:: Lens' StartWorkflowExecutionResponse Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.started' @:: Lens' StartWorkflowExecutionResponse Prelude.Bool@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.eagerWorkflowTask' @:: Lens' StartWorkflowExecutionResponse PollWorkflowTaskQueueResponse@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'eagerWorkflowTask' @:: Lens' StartWorkflowExecutionResponse (Prelude.Maybe PollWorkflowTaskQueueResponse)@ -}
data StartWorkflowExecutionResponse
  = StartWorkflowExecutionResponse'_constructor {StartWorkflowExecutionResponse -> Text
_StartWorkflowExecutionResponse'runId :: !Data.Text.Text,
                                                 StartWorkflowExecutionResponse -> Bool
_StartWorkflowExecutionResponse'started :: !Prelude.Bool,
                                                 StartWorkflowExecutionResponse
-> Maybe PollWorkflowTaskQueueResponse
_StartWorkflowExecutionResponse'eagerWorkflowTask :: !(Prelude.Maybe PollWorkflowTaskQueueResponse),
                                                 StartWorkflowExecutionResponse -> FieldSet
_StartWorkflowExecutionResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Bool
(StartWorkflowExecutionResponse
 -> StartWorkflowExecutionResponse -> Bool)
-> (StartWorkflowExecutionResponse
    -> StartWorkflowExecutionResponse -> Bool)
-> Eq StartWorkflowExecutionResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Bool
== :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Bool
$c/= :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Bool
/= :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Bool
Prelude.Eq, Eq StartWorkflowExecutionResponse
Eq StartWorkflowExecutionResponse =>
(StartWorkflowExecutionResponse
 -> StartWorkflowExecutionResponse -> Ordering)
-> (StartWorkflowExecutionResponse
    -> StartWorkflowExecutionResponse -> Bool)
-> (StartWorkflowExecutionResponse
    -> StartWorkflowExecutionResponse -> Bool)
-> (StartWorkflowExecutionResponse
    -> StartWorkflowExecutionResponse -> Bool)
-> (StartWorkflowExecutionResponse
    -> StartWorkflowExecutionResponse -> Bool)
-> (StartWorkflowExecutionResponse
    -> StartWorkflowExecutionResponse
    -> StartWorkflowExecutionResponse)
-> (StartWorkflowExecutionResponse
    -> StartWorkflowExecutionResponse
    -> StartWorkflowExecutionResponse)
-> Ord StartWorkflowExecutionResponse
StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Bool
StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Ordering
StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> StartWorkflowExecutionResponse
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 :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Ordering
compare :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Ordering
$c< :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Bool
< :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Bool
$c<= :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Bool
<= :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Bool
$c> :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Bool
> :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Bool
$c>= :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Bool
>= :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> Bool
$cmax :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> StartWorkflowExecutionResponse
max :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> StartWorkflowExecutionResponse
$cmin :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> StartWorkflowExecutionResponse
min :: StartWorkflowExecutionResponse
-> StartWorkflowExecutionResponse -> StartWorkflowExecutionResponse
Prelude.Ord)
instance Prelude.Show StartWorkflowExecutionResponse where
  showsPrec :: Int -> StartWorkflowExecutionResponse -> ShowS
showsPrec Int
_ StartWorkflowExecutionResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (StartWorkflowExecutionResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort StartWorkflowExecutionResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionResponse "runId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "runId"
-> (Text -> f Text)
-> StartWorkflowExecutionResponse
-> f StartWorkflowExecutionResponse
fieldOf Proxy# "runId"
_
    = ((Text -> f Text)
 -> StartWorkflowExecutionResponse
 -> f StartWorkflowExecutionResponse)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartWorkflowExecutionResponse
-> f StartWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionResponse -> Text)
-> (StartWorkflowExecutionResponse
    -> Text -> StartWorkflowExecutionResponse)
-> Lens
     StartWorkflowExecutionResponse
     StartWorkflowExecutionResponse
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionResponse -> Text
_StartWorkflowExecutionResponse'runId
           (\ StartWorkflowExecutionResponse
x__ Text
y__ -> StartWorkflowExecutionResponse
x__ {_StartWorkflowExecutionResponse'runId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionResponse "started" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "started"
-> (Bool -> f Bool)
-> StartWorkflowExecutionResponse
-> f StartWorkflowExecutionResponse
fieldOf Proxy# "started"
_
    = ((Bool -> f Bool)
 -> StartWorkflowExecutionResponse
 -> f StartWorkflowExecutionResponse)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> StartWorkflowExecutionResponse
-> f StartWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionResponse -> Bool)
-> (StartWorkflowExecutionResponse
    -> Bool -> StartWorkflowExecutionResponse)
-> Lens
     StartWorkflowExecutionResponse
     StartWorkflowExecutionResponse
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionResponse -> Bool
_StartWorkflowExecutionResponse'started
           (\ StartWorkflowExecutionResponse
x__ Bool
y__ -> StartWorkflowExecutionResponse
x__ {_StartWorkflowExecutionResponse'started = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionResponse "eagerWorkflowTask" PollWorkflowTaskQueueResponse where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "eagerWorkflowTask"
-> (PollWorkflowTaskQueueResponse
    -> f PollWorkflowTaskQueueResponse)
-> StartWorkflowExecutionResponse
-> f StartWorkflowExecutionResponse
fieldOf Proxy# "eagerWorkflowTask"
_
    = ((Maybe PollWorkflowTaskQueueResponse
  -> f (Maybe PollWorkflowTaskQueueResponse))
 -> StartWorkflowExecutionResponse
 -> f StartWorkflowExecutionResponse)
-> ((PollWorkflowTaskQueueResponse
     -> f PollWorkflowTaskQueueResponse)
    -> Maybe PollWorkflowTaskQueueResponse
    -> f (Maybe PollWorkflowTaskQueueResponse))
-> (PollWorkflowTaskQueueResponse
    -> f PollWorkflowTaskQueueResponse)
-> StartWorkflowExecutionResponse
-> f StartWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionResponse
 -> Maybe PollWorkflowTaskQueueResponse)
-> (StartWorkflowExecutionResponse
    -> Maybe PollWorkflowTaskQueueResponse
    -> StartWorkflowExecutionResponse)
-> Lens
     StartWorkflowExecutionResponse
     StartWorkflowExecutionResponse
     (Maybe PollWorkflowTaskQueueResponse)
     (Maybe PollWorkflowTaskQueueResponse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionResponse
-> Maybe PollWorkflowTaskQueueResponse
_StartWorkflowExecutionResponse'eagerWorkflowTask
           (\ StartWorkflowExecutionResponse
x__ Maybe PollWorkflowTaskQueueResponse
y__
              -> StartWorkflowExecutionResponse
x__ {_StartWorkflowExecutionResponse'eagerWorkflowTask = y__}))
        (PollWorkflowTaskQueueResponse
-> Lens'
     (Maybe PollWorkflowTaskQueueResponse) PollWorkflowTaskQueueResponse
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens PollWorkflowTaskQueueResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField StartWorkflowExecutionResponse "maybe'eagerWorkflowTask" (Prelude.Maybe PollWorkflowTaskQueueResponse) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'eagerWorkflowTask"
-> (Maybe PollWorkflowTaskQueueResponse
    -> f (Maybe PollWorkflowTaskQueueResponse))
-> StartWorkflowExecutionResponse
-> f StartWorkflowExecutionResponse
fieldOf Proxy# "maybe'eagerWorkflowTask"
_
    = ((Maybe PollWorkflowTaskQueueResponse
  -> f (Maybe PollWorkflowTaskQueueResponse))
 -> StartWorkflowExecutionResponse
 -> f StartWorkflowExecutionResponse)
-> ((Maybe PollWorkflowTaskQueueResponse
     -> f (Maybe PollWorkflowTaskQueueResponse))
    -> Maybe PollWorkflowTaskQueueResponse
    -> f (Maybe PollWorkflowTaskQueueResponse))
-> (Maybe PollWorkflowTaskQueueResponse
    -> f (Maybe PollWorkflowTaskQueueResponse))
-> StartWorkflowExecutionResponse
-> f StartWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartWorkflowExecutionResponse
 -> Maybe PollWorkflowTaskQueueResponse)
-> (StartWorkflowExecutionResponse
    -> Maybe PollWorkflowTaskQueueResponse
    -> StartWorkflowExecutionResponse)
-> Lens
     StartWorkflowExecutionResponse
     StartWorkflowExecutionResponse
     (Maybe PollWorkflowTaskQueueResponse)
     (Maybe PollWorkflowTaskQueueResponse)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartWorkflowExecutionResponse
-> Maybe PollWorkflowTaskQueueResponse
_StartWorkflowExecutionResponse'eagerWorkflowTask
           (\ StartWorkflowExecutionResponse
x__ Maybe PollWorkflowTaskQueueResponse
y__
              -> StartWorkflowExecutionResponse
x__ {_StartWorkflowExecutionResponse'eagerWorkflowTask = y__}))
        (Maybe PollWorkflowTaskQueueResponse
 -> f (Maybe PollWorkflowTaskQueueResponse))
-> Maybe PollWorkflowTaskQueueResponse
-> f (Maybe PollWorkflowTaskQueueResponse)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message StartWorkflowExecutionResponse where
  messageName :: Proxy StartWorkflowExecutionResponse -> Text
messageName Proxy StartWorkflowExecutionResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.StartWorkflowExecutionResponse"
  packedMessageDescriptor :: Proxy StartWorkflowExecutionResponse -> ByteString
packedMessageDescriptor Proxy StartWorkflowExecutionResponse
_
    = ByteString
"\n\
      \\RSStartWorkflowExecutionResponse\DC2\NAK\n\
      \\ACKrun_id\CAN\SOH \SOH(\tR\ENQrunId\DC2\CAN\n\
      \\astarted\CAN\ETX \SOH(\bR\astarted\DC2n\n\
      \\DC3eager_workflow_task\CAN\STX \SOH(\v2>.temporal.api.workflowservice.v1.PollWorkflowTaskQueueResponseR\DC1eagerWorkflowTask"
  packedFileDescriptor :: Proxy StartWorkflowExecutionResponse -> ByteString
packedFileDescriptor Proxy StartWorkflowExecutionResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor StartWorkflowExecutionResponse)
fieldsByTag
    = let
        runId__field_descriptor :: FieldDescriptor StartWorkflowExecutionResponse
runId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StartWorkflowExecutionResponse Text
-> FieldDescriptor StartWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"run_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     StartWorkflowExecutionResponse
     StartWorkflowExecutionResponse
     Text
     Text
-> FieldAccessor StartWorkflowExecutionResponse Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionResponse
        started__field_descriptor :: FieldDescriptor StartWorkflowExecutionResponse
started__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor StartWorkflowExecutionResponse Bool
-> FieldDescriptor StartWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started"
              (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
     StartWorkflowExecutionResponse
     StartWorkflowExecutionResponse
     Bool
     Bool
-> FieldAccessor StartWorkflowExecutionResponse 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 @"started")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionResponse
        eagerWorkflowTask__field_descriptor :: FieldDescriptor StartWorkflowExecutionResponse
eagerWorkflowTask__field_descriptor
          = String
-> FieldTypeDescriptor PollWorkflowTaskQueueResponse
-> FieldAccessor
     StartWorkflowExecutionResponse PollWorkflowTaskQueueResponse
-> FieldDescriptor StartWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"eager_workflow_task"
              (MessageOrGroup -> FieldTypeDescriptor PollWorkflowTaskQueueResponse
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor PollWorkflowTaskQueueResponse)
              (Lens
  StartWorkflowExecutionResponse
  StartWorkflowExecutionResponse
  (Maybe PollWorkflowTaskQueueResponse)
  (Maybe PollWorkflowTaskQueueResponse)
-> FieldAccessor
     StartWorkflowExecutionResponse PollWorkflowTaskQueueResponse
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'eagerWorkflowTask")) ::
              Data.ProtoLens.FieldDescriptor StartWorkflowExecutionResponse
      in
        [(Tag, FieldDescriptor StartWorkflowExecutionResponse)]
-> Map Tag (FieldDescriptor StartWorkflowExecutionResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor StartWorkflowExecutionResponse
runId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor StartWorkflowExecutionResponse
started__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor StartWorkflowExecutionResponse
eagerWorkflowTask__field_descriptor)]
  unknownFields :: Lens' StartWorkflowExecutionResponse FieldSet
unknownFields
    = (StartWorkflowExecutionResponse -> FieldSet)
-> (StartWorkflowExecutionResponse
    -> FieldSet -> StartWorkflowExecutionResponse)
-> Lens' StartWorkflowExecutionResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        StartWorkflowExecutionResponse -> FieldSet
_StartWorkflowExecutionResponse'_unknownFields
        (\ StartWorkflowExecutionResponse
x__ FieldSet
y__
           -> StartWorkflowExecutionResponse
x__ {_StartWorkflowExecutionResponse'_unknownFields = y__})
  defMessage :: StartWorkflowExecutionResponse
defMessage
    = StartWorkflowExecutionResponse'_constructor
        {_StartWorkflowExecutionResponse'runId :: Text
_StartWorkflowExecutionResponse'runId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflowExecutionResponse'started :: Bool
_StartWorkflowExecutionResponse'started = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartWorkflowExecutionResponse'eagerWorkflowTask :: Maybe PollWorkflowTaskQueueResponse
_StartWorkflowExecutionResponse'eagerWorkflowTask = Maybe PollWorkflowTaskQueueResponse
forall a. Maybe a
Prelude.Nothing,
         _StartWorkflowExecutionResponse'_unknownFields :: FieldSet
_StartWorkflowExecutionResponse'_unknownFields = []}
  parseMessage :: Parser StartWorkflowExecutionResponse
parseMessage
    = let
        loop ::
          StartWorkflowExecutionResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser StartWorkflowExecutionResponse
        loop :: StartWorkflowExecutionResponse
-> Parser StartWorkflowExecutionResponse
loop StartWorkflowExecutionResponse
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"run_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"runId") y x)
                        Word64
24
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"started"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"started") y x)
                        Word64
18
                          -> do y <- Parser PollWorkflowTaskQueueResponse
-> String -> Parser PollWorkflowTaskQueueResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"eager_workflow_task"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"eagerWorkflowTask") 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 StartWorkflowExecutionResponse
-> String -> Parser StartWorkflowExecutionResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do StartWorkflowExecutionResponse
-> Parser StartWorkflowExecutionResponse
loop StartWorkflowExecutionResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"StartWorkflowExecutionResponse"
  buildMessage :: StartWorkflowExecutionResponse -> Builder
buildMessage
    = \ StartWorkflowExecutionResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  StartWorkflowExecutionResponse
  StartWorkflowExecutionResponse
  Text
  Text
-> StartWorkflowExecutionResponse -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId") StartWorkflowExecutionResponse
_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
  StartWorkflowExecutionResponse
  StartWorkflowExecutionResponse
  Bool
  Bool
-> StartWorkflowExecutionResponse -> 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 @"started") StartWorkflowExecutionResponse
_x
                 in
                   if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
24)
                         ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt (\ Bool
b -> if Bool
b then Word64
1 else Word64
0)
                            Bool
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe PollWorkflowTaskQueueResponse)
  StartWorkflowExecutionResponse
  StartWorkflowExecutionResponse
  (Maybe PollWorkflowTaskQueueResponse)
  (Maybe PollWorkflowTaskQueueResponse)
-> StartWorkflowExecutionResponse
-> Maybe PollWorkflowTaskQueueResponse
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'eagerWorkflowTask") StartWorkflowExecutionResponse
_x
                    of
                      Maybe PollWorkflowTaskQueueResponse
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just PollWorkflowTaskQueueResponse
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                             ((ByteString -> Builder)
-> (PollWorkflowTaskQueueResponse -> ByteString)
-> PollWorkflowTaskQueueResponse
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                PollWorkflowTaskQueueResponse -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage PollWorkflowTaskQueueResponse
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  StartWorkflowExecutionResponse
  StartWorkflowExecutionResponse
  FieldSet
  FieldSet
-> StartWorkflowExecutionResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  StartWorkflowExecutionResponse
  StartWorkflowExecutionResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' StartWorkflowExecutionResponse FieldSet
Data.ProtoLens.unknownFields StartWorkflowExecutionResponse
_x))))
instance Control.DeepSeq.NFData StartWorkflowExecutionResponse where
  rnf :: StartWorkflowExecutionResponse -> ()
rnf
    = \ StartWorkflowExecutionResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (StartWorkflowExecutionResponse -> FieldSet
_StartWorkflowExecutionResponse'_unknownFields StartWorkflowExecutionResponse
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (StartWorkflowExecutionResponse -> Text
_StartWorkflowExecutionResponse'runId StartWorkflowExecutionResponse
x__)
                (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (StartWorkflowExecutionResponse -> Bool
_StartWorkflowExecutionResponse'started StartWorkflowExecutionResponse
x__)
                   (Maybe PollWorkflowTaskQueueResponse -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (StartWorkflowExecutionResponse
-> Maybe PollWorkflowTaskQueueResponse
_StartWorkflowExecutionResponse'eagerWorkflowTask StartWorkflowExecutionResponse
x__) ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' StopBatchOperationRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.jobId' @:: Lens' StopBatchOperationRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.reason' @:: Lens' StopBatchOperationRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' StopBatchOperationRequest Data.Text.Text@ -}
data StopBatchOperationRequest
  = StopBatchOperationRequest'_constructor {StopBatchOperationRequest -> Text
_StopBatchOperationRequest'namespace :: !Data.Text.Text,
                                            StopBatchOperationRequest -> Text
_StopBatchOperationRequest'jobId :: !Data.Text.Text,
                                            StopBatchOperationRequest -> Text
_StopBatchOperationRequest'reason :: !Data.Text.Text,
                                            StopBatchOperationRequest -> Text
_StopBatchOperationRequest'identity :: !Data.Text.Text,
                                            StopBatchOperationRequest -> FieldSet
_StopBatchOperationRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (StopBatchOperationRequest -> StopBatchOperationRequest -> Bool
(StopBatchOperationRequest -> StopBatchOperationRequest -> Bool)
-> (StopBatchOperationRequest -> StopBatchOperationRequest -> Bool)
-> Eq StopBatchOperationRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StopBatchOperationRequest -> StopBatchOperationRequest -> Bool
== :: StopBatchOperationRequest -> StopBatchOperationRequest -> Bool
$c/= :: StopBatchOperationRequest -> StopBatchOperationRequest -> Bool
/= :: StopBatchOperationRequest -> StopBatchOperationRequest -> Bool
Prelude.Eq, Eq StopBatchOperationRequest
Eq StopBatchOperationRequest =>
(StopBatchOperationRequest
 -> StopBatchOperationRequest -> Ordering)
-> (StopBatchOperationRequest -> StopBatchOperationRequest -> Bool)
-> (StopBatchOperationRequest -> StopBatchOperationRequest -> Bool)
-> (StopBatchOperationRequest -> StopBatchOperationRequest -> Bool)
-> (StopBatchOperationRequest -> StopBatchOperationRequest -> Bool)
-> (StopBatchOperationRequest
    -> StopBatchOperationRequest -> StopBatchOperationRequest)
-> (StopBatchOperationRequest
    -> StopBatchOperationRequest -> StopBatchOperationRequest)
-> Ord StopBatchOperationRequest
StopBatchOperationRequest -> StopBatchOperationRequest -> Bool
StopBatchOperationRequest -> StopBatchOperationRequest -> Ordering
StopBatchOperationRequest
-> StopBatchOperationRequest -> StopBatchOperationRequest
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 :: StopBatchOperationRequest -> StopBatchOperationRequest -> Ordering
compare :: StopBatchOperationRequest -> StopBatchOperationRequest -> Ordering
$c< :: StopBatchOperationRequest -> StopBatchOperationRequest -> Bool
< :: StopBatchOperationRequest -> StopBatchOperationRequest -> Bool
$c<= :: StopBatchOperationRequest -> StopBatchOperationRequest -> Bool
<= :: StopBatchOperationRequest -> StopBatchOperationRequest -> Bool
$c> :: StopBatchOperationRequest -> StopBatchOperationRequest -> Bool
> :: StopBatchOperationRequest -> StopBatchOperationRequest -> Bool
$c>= :: StopBatchOperationRequest -> StopBatchOperationRequest -> Bool
>= :: StopBatchOperationRequest -> StopBatchOperationRequest -> Bool
$cmax :: StopBatchOperationRequest
-> StopBatchOperationRequest -> StopBatchOperationRequest
max :: StopBatchOperationRequest
-> StopBatchOperationRequest -> StopBatchOperationRequest
$cmin :: StopBatchOperationRequest
-> StopBatchOperationRequest -> StopBatchOperationRequest
min :: StopBatchOperationRequest
-> StopBatchOperationRequest -> StopBatchOperationRequest
Prelude.Ord)
instance Prelude.Show StopBatchOperationRequest where
  showsPrec :: Int -> StopBatchOperationRequest -> ShowS
showsPrec Int
_ StopBatchOperationRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (StopBatchOperationRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort StopBatchOperationRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField StopBatchOperationRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> StopBatchOperationRequest
-> f StopBatchOperationRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> StopBatchOperationRequest -> f StopBatchOperationRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StopBatchOperationRequest
-> f StopBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StopBatchOperationRequest -> Text)
-> (StopBatchOperationRequest -> Text -> StopBatchOperationRequest)
-> Lens
     StopBatchOperationRequest StopBatchOperationRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StopBatchOperationRequest -> Text
_StopBatchOperationRequest'namespace
           (\ StopBatchOperationRequest
x__ Text
y__ -> StopBatchOperationRequest
x__ {_StopBatchOperationRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StopBatchOperationRequest "jobId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "jobId"
-> (Text -> f Text)
-> StopBatchOperationRequest
-> f StopBatchOperationRequest
fieldOf Proxy# "jobId"
_
    = ((Text -> f Text)
 -> StopBatchOperationRequest -> f StopBatchOperationRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StopBatchOperationRequest
-> f StopBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StopBatchOperationRequest -> Text)
-> (StopBatchOperationRequest -> Text -> StopBatchOperationRequest)
-> Lens
     StopBatchOperationRequest StopBatchOperationRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StopBatchOperationRequest -> Text
_StopBatchOperationRequest'jobId
           (\ StopBatchOperationRequest
x__ Text
y__ -> StopBatchOperationRequest
x__ {_StopBatchOperationRequest'jobId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StopBatchOperationRequest "reason" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "reason"
-> (Text -> f Text)
-> StopBatchOperationRequest
-> f StopBatchOperationRequest
fieldOf Proxy# "reason"
_
    = ((Text -> f Text)
 -> StopBatchOperationRequest -> f StopBatchOperationRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StopBatchOperationRequest
-> f StopBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StopBatchOperationRequest -> Text)
-> (StopBatchOperationRequest -> Text -> StopBatchOperationRequest)
-> Lens
     StopBatchOperationRequest StopBatchOperationRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StopBatchOperationRequest -> Text
_StopBatchOperationRequest'reason
           (\ StopBatchOperationRequest
x__ Text
y__ -> StopBatchOperationRequest
x__ {_StopBatchOperationRequest'reason = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StopBatchOperationRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> StopBatchOperationRequest
-> f StopBatchOperationRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> StopBatchOperationRequest -> f StopBatchOperationRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StopBatchOperationRequest
-> f StopBatchOperationRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StopBatchOperationRequest -> Text)
-> (StopBatchOperationRequest -> Text -> StopBatchOperationRequest)
-> Lens
     StopBatchOperationRequest StopBatchOperationRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StopBatchOperationRequest -> Text
_StopBatchOperationRequest'identity
           (\ StopBatchOperationRequest
x__ Text
y__ -> StopBatchOperationRequest
x__ {_StopBatchOperationRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message StopBatchOperationRequest where
  messageName :: Proxy StopBatchOperationRequest -> Text
messageName Proxy StopBatchOperationRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.StopBatchOperationRequest"
  packedMessageDescriptor :: Proxy StopBatchOperationRequest -> ByteString
packedMessageDescriptor Proxy StopBatchOperationRequest
_
    = ByteString
"\n\
      \\EMStopBatchOperationRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\NAK\n\
      \\ACKjob_id\CAN\STX \SOH(\tR\ENQjobId\DC2\SYN\n\
      \\ACKreason\CAN\ETX \SOH(\tR\ACKreason\DC2\SUB\n\
      \\bidentity\CAN\EOT \SOH(\tR\bidentity"
  packedFileDescriptor :: Proxy StopBatchOperationRequest -> ByteString
packedFileDescriptor Proxy StopBatchOperationRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor StopBatchOperationRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor StopBatchOperationRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StopBatchOperationRequest Text
-> FieldDescriptor StopBatchOperationRequest
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
     StopBatchOperationRequest StopBatchOperationRequest Text Text
-> FieldAccessor StopBatchOperationRequest 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 StopBatchOperationRequest
        jobId__field_descriptor :: FieldDescriptor StopBatchOperationRequest
jobId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StopBatchOperationRequest Text
-> FieldDescriptor StopBatchOperationRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"job_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
     StopBatchOperationRequest StopBatchOperationRequest Text Text
-> FieldAccessor StopBatchOperationRequest 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 @"jobId")) ::
              Data.ProtoLens.FieldDescriptor StopBatchOperationRequest
        reason__field_descriptor :: FieldDescriptor StopBatchOperationRequest
reason__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StopBatchOperationRequest Text
-> FieldDescriptor StopBatchOperationRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"reason"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     StopBatchOperationRequest StopBatchOperationRequest Text Text
-> FieldAccessor StopBatchOperationRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reason")) ::
              Data.ProtoLens.FieldDescriptor StopBatchOperationRequest
        identity__field_descriptor :: FieldDescriptor StopBatchOperationRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor StopBatchOperationRequest Text
-> FieldDescriptor StopBatchOperationRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     StopBatchOperationRequest StopBatchOperationRequest Text Text
-> FieldAccessor StopBatchOperationRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor StopBatchOperationRequest
      in
        [(Tag, FieldDescriptor StopBatchOperationRequest)]
-> Map Tag (FieldDescriptor StopBatchOperationRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor StopBatchOperationRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor StopBatchOperationRequest
jobId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor StopBatchOperationRequest
reason__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor StopBatchOperationRequest
identity__field_descriptor)]
  unknownFields :: Lens' StopBatchOperationRequest FieldSet
unknownFields
    = (StopBatchOperationRequest -> FieldSet)
-> (StopBatchOperationRequest
    -> FieldSet -> StopBatchOperationRequest)
-> Lens' StopBatchOperationRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        StopBatchOperationRequest -> FieldSet
_StopBatchOperationRequest'_unknownFields
        (\ StopBatchOperationRequest
x__ FieldSet
y__
           -> StopBatchOperationRequest
x__ {_StopBatchOperationRequest'_unknownFields = y__})
  defMessage :: StopBatchOperationRequest
defMessage
    = StopBatchOperationRequest'_constructor
        {_StopBatchOperationRequest'namespace :: Text
_StopBatchOperationRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StopBatchOperationRequest'jobId :: Text
_StopBatchOperationRequest'jobId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StopBatchOperationRequest'reason :: Text
_StopBatchOperationRequest'reason = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StopBatchOperationRequest'identity :: Text
_StopBatchOperationRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StopBatchOperationRequest'_unknownFields :: FieldSet
_StopBatchOperationRequest'_unknownFields = []}
  parseMessage :: Parser StopBatchOperationRequest
parseMessage
    = let
        loop ::
          StopBatchOperationRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser StopBatchOperationRequest
        loop :: StopBatchOperationRequest -> Parser StopBatchOperationRequest
loop StopBatchOperationRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
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
"job_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"jobId") 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
"reason"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"reason") y x)
                        Word64
34
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser StopBatchOperationRequest
-> String -> Parser StopBatchOperationRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do StopBatchOperationRequest -> Parser StopBatchOperationRequest
loop StopBatchOperationRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"StopBatchOperationRequest"
  buildMessage :: StopBatchOperationRequest -> Builder
buildMessage
    = \ StopBatchOperationRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text StopBatchOperationRequest StopBatchOperationRequest Text Text
-> StopBatchOperationRequest -> 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") StopBatchOperationRequest
_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 StopBatchOperationRequest StopBatchOperationRequest Text Text
-> StopBatchOperationRequest -> 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 @"jobId") StopBatchOperationRequest
_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 StopBatchOperationRequest StopBatchOperationRequest Text Text
-> StopBatchOperationRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reason") StopBatchOperationRequest
_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 StopBatchOperationRequest StopBatchOperationRequest Text Text
-> StopBatchOperationRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") StopBatchOperationRequest
_x
                       in
                         if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                               ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  (\ ByteString
bs
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                             (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                          (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  StopBatchOperationRequest
  StopBatchOperationRequest
  FieldSet
  FieldSet
-> StopBatchOperationRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  StopBatchOperationRequest
  StopBatchOperationRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' StopBatchOperationRequest FieldSet
Data.ProtoLens.unknownFields StopBatchOperationRequest
_x)))))
instance Control.DeepSeq.NFData StopBatchOperationRequest where
  rnf :: StopBatchOperationRequest -> ()
rnf
    = \ StopBatchOperationRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (StopBatchOperationRequest -> FieldSet
_StopBatchOperationRequest'_unknownFields StopBatchOperationRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (StopBatchOperationRequest -> Text
_StopBatchOperationRequest'namespace StopBatchOperationRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (StopBatchOperationRequest -> Text
_StopBatchOperationRequest'jobId StopBatchOperationRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (StopBatchOperationRequest -> Text
_StopBatchOperationRequest'reason StopBatchOperationRequest
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (StopBatchOperationRequest -> Text
_StopBatchOperationRequest'identity StopBatchOperationRequest
x__) ()))))
{- | Fields :
      -}
data StopBatchOperationResponse
  = StopBatchOperationResponse'_constructor {StopBatchOperationResponse -> FieldSet
_StopBatchOperationResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (StopBatchOperationResponse -> StopBatchOperationResponse -> Bool
(StopBatchOperationResponse -> StopBatchOperationResponse -> Bool)
-> (StopBatchOperationResponse
    -> StopBatchOperationResponse -> Bool)
-> Eq StopBatchOperationResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StopBatchOperationResponse -> StopBatchOperationResponse -> Bool
== :: StopBatchOperationResponse -> StopBatchOperationResponse -> Bool
$c/= :: StopBatchOperationResponse -> StopBatchOperationResponse -> Bool
/= :: StopBatchOperationResponse -> StopBatchOperationResponse -> Bool
Prelude.Eq, Eq StopBatchOperationResponse
Eq StopBatchOperationResponse =>
(StopBatchOperationResponse
 -> StopBatchOperationResponse -> Ordering)
-> (StopBatchOperationResponse
    -> StopBatchOperationResponse -> Bool)
-> (StopBatchOperationResponse
    -> StopBatchOperationResponse -> Bool)
-> (StopBatchOperationResponse
    -> StopBatchOperationResponse -> Bool)
-> (StopBatchOperationResponse
    -> StopBatchOperationResponse -> Bool)
-> (StopBatchOperationResponse
    -> StopBatchOperationResponse -> StopBatchOperationResponse)
-> (StopBatchOperationResponse
    -> StopBatchOperationResponse -> StopBatchOperationResponse)
-> Ord StopBatchOperationResponse
StopBatchOperationResponse -> StopBatchOperationResponse -> Bool
StopBatchOperationResponse
-> StopBatchOperationResponse -> Ordering
StopBatchOperationResponse
-> StopBatchOperationResponse -> StopBatchOperationResponse
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 :: StopBatchOperationResponse
-> StopBatchOperationResponse -> Ordering
compare :: StopBatchOperationResponse
-> StopBatchOperationResponse -> Ordering
$c< :: StopBatchOperationResponse -> StopBatchOperationResponse -> Bool
< :: StopBatchOperationResponse -> StopBatchOperationResponse -> Bool
$c<= :: StopBatchOperationResponse -> StopBatchOperationResponse -> Bool
<= :: StopBatchOperationResponse -> StopBatchOperationResponse -> Bool
$c> :: StopBatchOperationResponse -> StopBatchOperationResponse -> Bool
> :: StopBatchOperationResponse -> StopBatchOperationResponse -> Bool
$c>= :: StopBatchOperationResponse -> StopBatchOperationResponse -> Bool
>= :: StopBatchOperationResponse -> StopBatchOperationResponse -> Bool
$cmax :: StopBatchOperationResponse
-> StopBatchOperationResponse -> StopBatchOperationResponse
max :: StopBatchOperationResponse
-> StopBatchOperationResponse -> StopBatchOperationResponse
$cmin :: StopBatchOperationResponse
-> StopBatchOperationResponse -> StopBatchOperationResponse
min :: StopBatchOperationResponse
-> StopBatchOperationResponse -> StopBatchOperationResponse
Prelude.Ord)
instance Prelude.Show StopBatchOperationResponse where
  showsPrec :: Int -> StopBatchOperationResponse -> ShowS
showsPrec Int
_ StopBatchOperationResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (StopBatchOperationResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort StopBatchOperationResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message StopBatchOperationResponse where
  messageName :: Proxy StopBatchOperationResponse -> Text
messageName Proxy StopBatchOperationResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.StopBatchOperationResponse"
  packedMessageDescriptor :: Proxy StopBatchOperationResponse -> ByteString
packedMessageDescriptor Proxy StopBatchOperationResponse
_
    = ByteString
"\n\
      \\SUBStopBatchOperationResponse"
  packedFileDescriptor :: Proxy StopBatchOperationResponse -> ByteString
packedFileDescriptor Proxy StopBatchOperationResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor StopBatchOperationResponse)
fieldsByTag = let in [(Tag, FieldDescriptor StopBatchOperationResponse)]
-> Map Tag (FieldDescriptor StopBatchOperationResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' StopBatchOperationResponse FieldSet
unknownFields
    = (StopBatchOperationResponse -> FieldSet)
-> (StopBatchOperationResponse
    -> FieldSet -> StopBatchOperationResponse)
-> Lens' StopBatchOperationResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        StopBatchOperationResponse -> FieldSet
_StopBatchOperationResponse'_unknownFields
        (\ StopBatchOperationResponse
x__ FieldSet
y__
           -> StopBatchOperationResponse
x__ {_StopBatchOperationResponse'_unknownFields = y__})
  defMessage :: StopBatchOperationResponse
defMessage
    = StopBatchOperationResponse'_constructor
        {_StopBatchOperationResponse'_unknownFields :: FieldSet
_StopBatchOperationResponse'_unknownFields = []}
  parseMessage :: Parser StopBatchOperationResponse
parseMessage
    = let
        loop ::
          StopBatchOperationResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser StopBatchOperationResponse
        loop :: StopBatchOperationResponse -> Parser StopBatchOperationResponse
loop StopBatchOperationResponse
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 StopBatchOperationResponse
-> String -> Parser StopBatchOperationResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do StopBatchOperationResponse -> Parser StopBatchOperationResponse
loop StopBatchOperationResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"StopBatchOperationResponse"
  buildMessage :: StopBatchOperationResponse -> Builder
buildMessage
    = \ StopBatchOperationResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  StopBatchOperationResponse
  StopBatchOperationResponse
  FieldSet
  FieldSet
-> StopBatchOperationResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  StopBatchOperationResponse
  StopBatchOperationResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' StopBatchOperationResponse FieldSet
Data.ProtoLens.unknownFields StopBatchOperationResponse
_x)
instance Control.DeepSeq.NFData StopBatchOperationResponse where
  rnf :: StopBatchOperationResponse -> ()
rnf
    = \ StopBatchOperationResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (StopBatchOperationResponse -> FieldSet
_StopBatchOperationResponse'_unknownFields StopBatchOperationResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' TerminateWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowExecution' @:: Lens' TerminateWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowExecution' @:: Lens' TerminateWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.reason' @:: Lens' TerminateWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.details' @:: Lens' TerminateWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'details' @:: Lens' TerminateWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' TerminateWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.firstExecutionRunId' @:: Lens' TerminateWorkflowExecutionRequest Data.Text.Text@ -}
data TerminateWorkflowExecutionRequest
  = TerminateWorkflowExecutionRequest'_constructor {TerminateWorkflowExecutionRequest -> Text
_TerminateWorkflowExecutionRequest'namespace :: !Data.Text.Text,
                                                    TerminateWorkflowExecutionRequest -> Maybe WorkflowExecution
_TerminateWorkflowExecutionRequest'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                    TerminateWorkflowExecutionRequest -> Text
_TerminateWorkflowExecutionRequest'reason :: !Data.Text.Text,
                                                    TerminateWorkflowExecutionRequest -> Maybe Payloads
_TerminateWorkflowExecutionRequest'details :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                    TerminateWorkflowExecutionRequest -> Text
_TerminateWorkflowExecutionRequest'identity :: !Data.Text.Text,
                                                    TerminateWorkflowExecutionRequest -> Text
_TerminateWorkflowExecutionRequest'firstExecutionRunId :: !Data.Text.Text,
                                                    TerminateWorkflowExecutionRequest -> FieldSet
_TerminateWorkflowExecutionRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Bool
(TerminateWorkflowExecutionRequest
 -> TerminateWorkflowExecutionRequest -> Bool)
-> (TerminateWorkflowExecutionRequest
    -> TerminateWorkflowExecutionRequest -> Bool)
-> Eq TerminateWorkflowExecutionRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Bool
== :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Bool
$c/= :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Bool
/= :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Bool
Prelude.Eq, Eq TerminateWorkflowExecutionRequest
Eq TerminateWorkflowExecutionRequest =>
(TerminateWorkflowExecutionRequest
 -> TerminateWorkflowExecutionRequest -> Ordering)
-> (TerminateWorkflowExecutionRequest
    -> TerminateWorkflowExecutionRequest -> Bool)
-> (TerminateWorkflowExecutionRequest
    -> TerminateWorkflowExecutionRequest -> Bool)
-> (TerminateWorkflowExecutionRequest
    -> TerminateWorkflowExecutionRequest -> Bool)
-> (TerminateWorkflowExecutionRequest
    -> TerminateWorkflowExecutionRequest -> Bool)
-> (TerminateWorkflowExecutionRequest
    -> TerminateWorkflowExecutionRequest
    -> TerminateWorkflowExecutionRequest)
-> (TerminateWorkflowExecutionRequest
    -> TerminateWorkflowExecutionRequest
    -> TerminateWorkflowExecutionRequest)
-> Ord TerminateWorkflowExecutionRequest
TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Bool
TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Ordering
TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest
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 :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Ordering
compare :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Ordering
$c< :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Bool
< :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Bool
$c<= :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Bool
<= :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Bool
$c> :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Bool
> :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Bool
$c>= :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Bool
>= :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest -> Bool
$cmax :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest
max :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest
$cmin :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest
min :: TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest
-> TerminateWorkflowExecutionRequest
Prelude.Ord)
instance Prelude.Show TerminateWorkflowExecutionRequest where
  showsPrec :: Int -> TerminateWorkflowExecutionRequest -> ShowS
showsPrec Int
_ TerminateWorkflowExecutionRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (TerminateWorkflowExecutionRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort TerminateWorkflowExecutionRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField TerminateWorkflowExecutionRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> TerminateWorkflowExecutionRequest
 -> f TerminateWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TerminateWorkflowExecutionRequest -> Text)
-> (TerminateWorkflowExecutionRequest
    -> Text -> TerminateWorkflowExecutionRequest)
-> Lens
     TerminateWorkflowExecutionRequest
     TerminateWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TerminateWorkflowExecutionRequest -> Text
_TerminateWorkflowExecutionRequest'namespace
           (\ TerminateWorkflowExecutionRequest
x__ Text
y__
              -> TerminateWorkflowExecutionRequest
x__ {_TerminateWorkflowExecutionRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TerminateWorkflowExecutionRequest "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> TerminateWorkflowExecutionRequest
 -> f TerminateWorkflowExecutionRequest)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TerminateWorkflowExecutionRequest -> Maybe WorkflowExecution)
-> (TerminateWorkflowExecutionRequest
    -> Maybe WorkflowExecution -> TerminateWorkflowExecutionRequest)
-> Lens
     TerminateWorkflowExecutionRequest
     TerminateWorkflowExecutionRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TerminateWorkflowExecutionRequest -> Maybe WorkflowExecution
_TerminateWorkflowExecutionRequest'workflowExecution
           (\ TerminateWorkflowExecutionRequest
x__ Maybe WorkflowExecution
y__
              -> TerminateWorkflowExecutionRequest
x__
                   {_TerminateWorkflowExecutionRequest'workflowExecution = y__}))
        (WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField TerminateWorkflowExecutionRequest "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> TerminateWorkflowExecutionRequest
 -> f TerminateWorkflowExecutionRequest)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TerminateWorkflowExecutionRequest -> Maybe WorkflowExecution)
-> (TerminateWorkflowExecutionRequest
    -> Maybe WorkflowExecution -> TerminateWorkflowExecutionRequest)
-> Lens
     TerminateWorkflowExecutionRequest
     TerminateWorkflowExecutionRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TerminateWorkflowExecutionRequest -> Maybe WorkflowExecution
_TerminateWorkflowExecutionRequest'workflowExecution
           (\ TerminateWorkflowExecutionRequest
x__ Maybe WorkflowExecution
y__
              -> TerminateWorkflowExecutionRequest
x__
                   {_TerminateWorkflowExecutionRequest'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TerminateWorkflowExecutionRequest "reason" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "reason"
-> (Text -> f Text)
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
fieldOf Proxy# "reason"
_
    = ((Text -> f Text)
 -> TerminateWorkflowExecutionRequest
 -> f TerminateWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TerminateWorkflowExecutionRequest -> Text)
-> (TerminateWorkflowExecutionRequest
    -> Text -> TerminateWorkflowExecutionRequest)
-> Lens
     TerminateWorkflowExecutionRequest
     TerminateWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TerminateWorkflowExecutionRequest -> Text
_TerminateWorkflowExecutionRequest'reason
           (\ TerminateWorkflowExecutionRequest
x__ Text
y__
              -> TerminateWorkflowExecutionRequest
x__ {_TerminateWorkflowExecutionRequest'reason = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TerminateWorkflowExecutionRequest "details" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "details"
-> (Payloads -> f Payloads)
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
fieldOf Proxy# "details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> TerminateWorkflowExecutionRequest
 -> f TerminateWorkflowExecutionRequest)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TerminateWorkflowExecutionRequest -> Maybe Payloads)
-> (TerminateWorkflowExecutionRequest
    -> Maybe Payloads -> TerminateWorkflowExecutionRequest)
-> Lens
     TerminateWorkflowExecutionRequest
     TerminateWorkflowExecutionRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TerminateWorkflowExecutionRequest -> Maybe Payloads
_TerminateWorkflowExecutionRequest'details
           (\ TerminateWorkflowExecutionRequest
x__ Maybe Payloads
y__
              -> TerminateWorkflowExecutionRequest
x__ {_TerminateWorkflowExecutionRequest'details = y__}))
        (Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField TerminateWorkflowExecutionRequest "maybe'details" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'details"
-> (Maybe Payloads -> f (Maybe Payloads))
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
fieldOf Proxy# "maybe'details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> TerminateWorkflowExecutionRequest
 -> f TerminateWorkflowExecutionRequest)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TerminateWorkflowExecutionRequest -> Maybe Payloads)
-> (TerminateWorkflowExecutionRequest
    -> Maybe Payloads -> TerminateWorkflowExecutionRequest)
-> Lens
     TerminateWorkflowExecutionRequest
     TerminateWorkflowExecutionRequest
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TerminateWorkflowExecutionRequest -> Maybe Payloads
_TerminateWorkflowExecutionRequest'details
           (\ TerminateWorkflowExecutionRequest
x__ Maybe Payloads
y__
              -> TerminateWorkflowExecutionRequest
x__ {_TerminateWorkflowExecutionRequest'details = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TerminateWorkflowExecutionRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> TerminateWorkflowExecutionRequest
 -> f TerminateWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TerminateWorkflowExecutionRequest -> Text)
-> (TerminateWorkflowExecutionRequest
    -> Text -> TerminateWorkflowExecutionRequest)
-> Lens
     TerminateWorkflowExecutionRequest
     TerminateWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TerminateWorkflowExecutionRequest -> Text
_TerminateWorkflowExecutionRequest'identity
           (\ TerminateWorkflowExecutionRequest
x__ Text
y__
              -> TerminateWorkflowExecutionRequest
x__ {_TerminateWorkflowExecutionRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TerminateWorkflowExecutionRequest "firstExecutionRunId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "firstExecutionRunId"
-> (Text -> f Text)
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
fieldOf Proxy# "firstExecutionRunId"
_
    = ((Text -> f Text)
 -> TerminateWorkflowExecutionRequest
 -> f TerminateWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> TerminateWorkflowExecutionRequest
-> f TerminateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TerminateWorkflowExecutionRequest -> Text)
-> (TerminateWorkflowExecutionRequest
    -> Text -> TerminateWorkflowExecutionRequest)
-> Lens
     TerminateWorkflowExecutionRequest
     TerminateWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TerminateWorkflowExecutionRequest -> Text
_TerminateWorkflowExecutionRequest'firstExecutionRunId
           (\ TerminateWorkflowExecutionRequest
x__ Text
y__
              -> TerminateWorkflowExecutionRequest
x__
                   {_TerminateWorkflowExecutionRequest'firstExecutionRunId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message TerminateWorkflowExecutionRequest where
  messageName :: Proxy TerminateWorkflowExecutionRequest -> Text
messageName Proxy TerminateWorkflowExecutionRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.TerminateWorkflowExecutionRequest"
  packedMessageDescriptor :: Proxy TerminateWorkflowExecutionRequest -> ByteString
packedMessageDescriptor Proxy TerminateWorkflowExecutionRequest
_
    = ByteString
"\n\
      \!TerminateWorkflowExecutionRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2X\n\
      \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2\SYN\n\
      \\ACKreason\CAN\ETX \SOH(\tR\ACKreason\DC2:\n\
      \\adetails\CAN\EOT \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2\SUB\n\
      \\bidentity\CAN\ENQ \SOH(\tR\bidentity\DC23\n\
      \\SYNfirst_execution_run_id\CAN\ACK \SOH(\tR\DC3firstExecutionRunId"
  packedFileDescriptor :: Proxy TerminateWorkflowExecutionRequest -> ByteString
packedFileDescriptor Proxy TerminateWorkflowExecutionRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor TerminateWorkflowExecutionRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor TerminateWorkflowExecutionRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor TerminateWorkflowExecutionRequest Text
-> FieldDescriptor TerminateWorkflowExecutionRequest
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
     TerminateWorkflowExecutionRequest
     TerminateWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor TerminateWorkflowExecutionRequest 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 TerminateWorkflowExecutionRequest
        workflowExecution__field_descriptor :: FieldDescriptor TerminateWorkflowExecutionRequest
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     TerminateWorkflowExecutionRequest WorkflowExecution
-> FieldDescriptor TerminateWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
              (Lens
  TerminateWorkflowExecutionRequest
  TerminateWorkflowExecutionRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     TerminateWorkflowExecutionRequest WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor TerminateWorkflowExecutionRequest
        reason__field_descriptor :: FieldDescriptor TerminateWorkflowExecutionRequest
reason__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor TerminateWorkflowExecutionRequest Text
-> FieldDescriptor TerminateWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"reason"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     TerminateWorkflowExecutionRequest
     TerminateWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor TerminateWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reason")) ::
              Data.ProtoLens.FieldDescriptor TerminateWorkflowExecutionRequest
        details__field_descriptor :: FieldDescriptor TerminateWorkflowExecutionRequest
details__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor TerminateWorkflowExecutionRequest Payloads
-> FieldDescriptor TerminateWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"details"
              (MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
              (Lens
  TerminateWorkflowExecutionRequest
  TerminateWorkflowExecutionRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor TerminateWorkflowExecutionRequest Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'details")) ::
              Data.ProtoLens.FieldDescriptor TerminateWorkflowExecutionRequest
        identity__field_descriptor :: FieldDescriptor TerminateWorkflowExecutionRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor TerminateWorkflowExecutionRequest Text
-> FieldDescriptor TerminateWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     TerminateWorkflowExecutionRequest
     TerminateWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor TerminateWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor TerminateWorkflowExecutionRequest
        firstExecutionRunId__field_descriptor :: FieldDescriptor TerminateWorkflowExecutionRequest
firstExecutionRunId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor TerminateWorkflowExecutionRequest Text
-> FieldDescriptor TerminateWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"first_execution_run_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     TerminateWorkflowExecutionRequest
     TerminateWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor TerminateWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"firstExecutionRunId")) ::
              Data.ProtoLens.FieldDescriptor TerminateWorkflowExecutionRequest
      in
        [(Tag, FieldDescriptor TerminateWorkflowExecutionRequest)]
-> Map Tag (FieldDescriptor TerminateWorkflowExecutionRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor TerminateWorkflowExecutionRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor TerminateWorkflowExecutionRequest
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor TerminateWorkflowExecutionRequest
reason__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor TerminateWorkflowExecutionRequest
details__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor TerminateWorkflowExecutionRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor TerminateWorkflowExecutionRequest
firstExecutionRunId__field_descriptor)]
  unknownFields :: Lens' TerminateWorkflowExecutionRequest FieldSet
unknownFields
    = (TerminateWorkflowExecutionRequest -> FieldSet)
-> (TerminateWorkflowExecutionRequest
    -> FieldSet -> TerminateWorkflowExecutionRequest)
-> Lens' TerminateWorkflowExecutionRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        TerminateWorkflowExecutionRequest -> FieldSet
_TerminateWorkflowExecutionRequest'_unknownFields
        (\ TerminateWorkflowExecutionRequest
x__ FieldSet
y__
           -> TerminateWorkflowExecutionRequest
x__ {_TerminateWorkflowExecutionRequest'_unknownFields = y__})
  defMessage :: TerminateWorkflowExecutionRequest
defMessage
    = TerminateWorkflowExecutionRequest'_constructor
        {_TerminateWorkflowExecutionRequest'namespace :: Text
_TerminateWorkflowExecutionRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TerminateWorkflowExecutionRequest'workflowExecution :: Maybe WorkflowExecution
_TerminateWorkflowExecutionRequest'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _TerminateWorkflowExecutionRequest'reason :: Text
_TerminateWorkflowExecutionRequest'reason = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TerminateWorkflowExecutionRequest'details :: Maybe Payloads
_TerminateWorkflowExecutionRequest'details = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _TerminateWorkflowExecutionRequest'identity :: Text
_TerminateWorkflowExecutionRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TerminateWorkflowExecutionRequest'firstExecutionRunId :: Text
_TerminateWorkflowExecutionRequest'firstExecutionRunId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TerminateWorkflowExecutionRequest'_unknownFields :: FieldSet
_TerminateWorkflowExecutionRequest'_unknownFields = []}
  parseMessage :: Parser TerminateWorkflowExecutionRequest
parseMessage
    = let
        loop ::
          TerminateWorkflowExecutionRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser TerminateWorkflowExecutionRequest
        loop :: TerminateWorkflowExecutionRequest
-> Parser TerminateWorkflowExecutionRequest
loop TerminateWorkflowExecutionRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"reason"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"reason") y x)
                        Word64
34
                          -> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"details"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"details") y x)
                        Word64
42
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
50
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"first_execution_run_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"firstExecutionRunId") 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 TerminateWorkflowExecutionRequest
-> String -> Parser TerminateWorkflowExecutionRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do TerminateWorkflowExecutionRequest
-> Parser TerminateWorkflowExecutionRequest
loop TerminateWorkflowExecutionRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"TerminateWorkflowExecutionRequest"
  buildMessage :: TerminateWorkflowExecutionRequest -> Builder
buildMessage
    = \ TerminateWorkflowExecutionRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  TerminateWorkflowExecutionRequest
  TerminateWorkflowExecutionRequest
  Text
  Text
-> TerminateWorkflowExecutionRequest -> 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") TerminateWorkflowExecutionRequest
_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 WorkflowExecution)
  TerminateWorkflowExecutionRequest
  TerminateWorkflowExecutionRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> TerminateWorkflowExecutionRequest -> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution") TerminateWorkflowExecutionRequest
_x
                 of
                   Maybe WorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just WorkflowExecution
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v = FoldLike
  Text
  TerminateWorkflowExecutionRequest
  TerminateWorkflowExecutionRequest
  Text
  Text
-> TerminateWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"reason") TerminateWorkflowExecutionRequest
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe Payloads)
  TerminateWorkflowExecutionRequest
  TerminateWorkflowExecutionRequest
  (Maybe Payloads)
  (Maybe Payloads)
-> TerminateWorkflowExecutionRequest -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'details") TerminateWorkflowExecutionRequest
_x
                       of
                         Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just Payloads
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Text
_v = FoldLike
  Text
  TerminateWorkflowExecutionRequest
  TerminateWorkflowExecutionRequest
  Text
  Text
-> TerminateWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") TerminateWorkflowExecutionRequest
_x
                          in
                            if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                  ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     (\ ByteString
bs
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                     Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v
                                 = FoldLike
  Text
  TerminateWorkflowExecutionRequest
  TerminateWorkflowExecutionRequest
  Text
  Text
-> TerminateWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                     (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"firstExecutionRunId") TerminateWorkflowExecutionRequest
_x
                             in
                               if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                     ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        (\ ByteString
bs
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                            (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                               (FoldLike
  FieldSet
  TerminateWorkflowExecutionRequest
  TerminateWorkflowExecutionRequest
  FieldSet
  FieldSet
-> TerminateWorkflowExecutionRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  TerminateWorkflowExecutionRequest
  TerminateWorkflowExecutionRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' TerminateWorkflowExecutionRequest FieldSet
Data.ProtoLens.unknownFields TerminateWorkflowExecutionRequest
_x)))))))
instance Control.DeepSeq.NFData TerminateWorkflowExecutionRequest where
  rnf :: TerminateWorkflowExecutionRequest -> ()
rnf
    = \ TerminateWorkflowExecutionRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (TerminateWorkflowExecutionRequest -> FieldSet
_TerminateWorkflowExecutionRequest'_unknownFields TerminateWorkflowExecutionRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (TerminateWorkflowExecutionRequest -> Text
_TerminateWorkflowExecutionRequest'namespace TerminateWorkflowExecutionRequest
x__)
                (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (TerminateWorkflowExecutionRequest -> Maybe WorkflowExecution
_TerminateWorkflowExecutionRequest'workflowExecution TerminateWorkflowExecutionRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (TerminateWorkflowExecutionRequest -> Text
_TerminateWorkflowExecutionRequest'reason TerminateWorkflowExecutionRequest
x__)
                      (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (TerminateWorkflowExecutionRequest -> Maybe Payloads
_TerminateWorkflowExecutionRequest'details TerminateWorkflowExecutionRequest
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (TerminateWorkflowExecutionRequest -> Text
_TerminateWorkflowExecutionRequest'identity TerminateWorkflowExecutionRequest
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (TerminateWorkflowExecutionRequest -> Text
_TerminateWorkflowExecutionRequest'firstExecutionRunId TerminateWorkflowExecutionRequest
x__)
                               ()))))))
{- | Fields :
      -}
data TerminateWorkflowExecutionResponse
  = TerminateWorkflowExecutionResponse'_constructor {TerminateWorkflowExecutionResponse -> FieldSet
_TerminateWorkflowExecutionResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Bool
(TerminateWorkflowExecutionResponse
 -> TerminateWorkflowExecutionResponse -> Bool)
-> (TerminateWorkflowExecutionResponse
    -> TerminateWorkflowExecutionResponse -> Bool)
-> Eq TerminateWorkflowExecutionResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Bool
== :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Bool
$c/= :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Bool
/= :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Bool
Prelude.Eq, Eq TerminateWorkflowExecutionResponse
Eq TerminateWorkflowExecutionResponse =>
(TerminateWorkflowExecutionResponse
 -> TerminateWorkflowExecutionResponse -> Ordering)
-> (TerminateWorkflowExecutionResponse
    -> TerminateWorkflowExecutionResponse -> Bool)
-> (TerminateWorkflowExecutionResponse
    -> TerminateWorkflowExecutionResponse -> Bool)
-> (TerminateWorkflowExecutionResponse
    -> TerminateWorkflowExecutionResponse -> Bool)
-> (TerminateWorkflowExecutionResponse
    -> TerminateWorkflowExecutionResponse -> Bool)
-> (TerminateWorkflowExecutionResponse
    -> TerminateWorkflowExecutionResponse
    -> TerminateWorkflowExecutionResponse)
-> (TerminateWorkflowExecutionResponse
    -> TerminateWorkflowExecutionResponse
    -> TerminateWorkflowExecutionResponse)
-> Ord TerminateWorkflowExecutionResponse
TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Bool
TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Ordering
TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse
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 :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Ordering
compare :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Ordering
$c< :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Bool
< :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Bool
$c<= :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Bool
<= :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Bool
$c> :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Bool
> :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Bool
$c>= :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Bool
>= :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse -> Bool
$cmax :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse
max :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse
$cmin :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse
min :: TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse
-> TerminateWorkflowExecutionResponse
Prelude.Ord)
instance Prelude.Show TerminateWorkflowExecutionResponse where
  showsPrec :: Int -> TerminateWorkflowExecutionResponse -> ShowS
showsPrec Int
_ TerminateWorkflowExecutionResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (TerminateWorkflowExecutionResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort TerminateWorkflowExecutionResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message TerminateWorkflowExecutionResponse where
  messageName :: Proxy TerminateWorkflowExecutionResponse -> Text
messageName Proxy TerminateWorkflowExecutionResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.TerminateWorkflowExecutionResponse"
  packedMessageDescriptor :: Proxy TerminateWorkflowExecutionResponse -> ByteString
packedMessageDescriptor Proxy TerminateWorkflowExecutionResponse
_
    = ByteString
"\n\
      \\"TerminateWorkflowExecutionResponse"
  packedFileDescriptor :: Proxy TerminateWorkflowExecutionResponse -> ByteString
packedFileDescriptor Proxy TerminateWorkflowExecutionResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor TerminateWorkflowExecutionResponse)
fieldsByTag = let in [(Tag, FieldDescriptor TerminateWorkflowExecutionResponse)]
-> Map Tag (FieldDescriptor TerminateWorkflowExecutionResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' TerminateWorkflowExecutionResponse FieldSet
unknownFields
    = (TerminateWorkflowExecutionResponse -> FieldSet)
-> (TerminateWorkflowExecutionResponse
    -> FieldSet -> TerminateWorkflowExecutionResponse)
-> Lens' TerminateWorkflowExecutionResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        TerminateWorkflowExecutionResponse -> FieldSet
_TerminateWorkflowExecutionResponse'_unknownFields
        (\ TerminateWorkflowExecutionResponse
x__ FieldSet
y__
           -> TerminateWorkflowExecutionResponse
x__ {_TerminateWorkflowExecutionResponse'_unknownFields = y__})
  defMessage :: TerminateWorkflowExecutionResponse
defMessage
    = TerminateWorkflowExecutionResponse'_constructor
        {_TerminateWorkflowExecutionResponse'_unknownFields :: FieldSet
_TerminateWorkflowExecutionResponse'_unknownFields = []}
  parseMessage :: Parser TerminateWorkflowExecutionResponse
parseMessage
    = let
        loop ::
          TerminateWorkflowExecutionResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser TerminateWorkflowExecutionResponse
        loop :: TerminateWorkflowExecutionResponse
-> Parser TerminateWorkflowExecutionResponse
loop TerminateWorkflowExecutionResponse
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 TerminateWorkflowExecutionResponse
-> String -> Parser TerminateWorkflowExecutionResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do TerminateWorkflowExecutionResponse
-> Parser TerminateWorkflowExecutionResponse
loop TerminateWorkflowExecutionResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"TerminateWorkflowExecutionResponse"
  buildMessage :: TerminateWorkflowExecutionResponse -> Builder
buildMessage
    = \ TerminateWorkflowExecutionResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  TerminateWorkflowExecutionResponse
  TerminateWorkflowExecutionResponse
  FieldSet
  FieldSet
-> TerminateWorkflowExecutionResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  TerminateWorkflowExecutionResponse
  TerminateWorkflowExecutionResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' TerminateWorkflowExecutionResponse FieldSet
Data.ProtoLens.unknownFields TerminateWorkflowExecutionResponse
_x)
instance Control.DeepSeq.NFData TerminateWorkflowExecutionResponse where
  rnf :: TerminateWorkflowExecutionResponse -> ()
rnf
    = \ TerminateWorkflowExecutionResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (TerminateWorkflowExecutionResponse -> FieldSet
_TerminateWorkflowExecutionResponse'_unknownFields TerminateWorkflowExecutionResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' UpdateNamespaceRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.updateInfo' @:: Lens' UpdateNamespaceRequest Proto.Temporal.Api.Namespace.V1.Message.UpdateNamespaceInfo@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'updateInfo' @:: Lens' UpdateNamespaceRequest (Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.UpdateNamespaceInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.config' @:: Lens' UpdateNamespaceRequest Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'config' @:: Lens' UpdateNamespaceRequest (Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.replicationConfig' @:: Lens' UpdateNamespaceRequest Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'replicationConfig' @:: Lens' UpdateNamespaceRequest (Prelude.Maybe Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.securityToken' @:: Lens' UpdateNamespaceRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.deleteBadBinary' @:: Lens' UpdateNamespaceRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.promoteNamespace' @:: Lens' UpdateNamespaceRequest Prelude.Bool@ -}
data UpdateNamespaceRequest
  = UpdateNamespaceRequest'_constructor {UpdateNamespaceRequest -> Text
_UpdateNamespaceRequest'namespace :: !Data.Text.Text,
                                         UpdateNamespaceRequest -> Maybe UpdateNamespaceInfo
_UpdateNamespaceRequest'updateInfo :: !(Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.UpdateNamespaceInfo),
                                         UpdateNamespaceRequest -> Maybe NamespaceConfig
_UpdateNamespaceRequest'config :: !(Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig),
                                         UpdateNamespaceRequest -> Maybe NamespaceReplicationConfig
_UpdateNamespaceRequest'replicationConfig :: !(Prelude.Maybe Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig),
                                         UpdateNamespaceRequest -> Text
_UpdateNamespaceRequest'securityToken :: !Data.Text.Text,
                                         UpdateNamespaceRequest -> Text
_UpdateNamespaceRequest'deleteBadBinary :: !Data.Text.Text,
                                         UpdateNamespaceRequest -> Bool
_UpdateNamespaceRequest'promoteNamespace :: !Prelude.Bool,
                                         UpdateNamespaceRequest -> FieldSet
_UpdateNamespaceRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool
(UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool)
-> (UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool)
-> Eq UpdateNamespaceRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool
== :: UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool
$c/= :: UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool
/= :: UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool
Prelude.Eq, Eq UpdateNamespaceRequest
Eq UpdateNamespaceRequest =>
(UpdateNamespaceRequest -> UpdateNamespaceRequest -> Ordering)
-> (UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool)
-> (UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool)
-> (UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool)
-> (UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool)
-> (UpdateNamespaceRequest
    -> UpdateNamespaceRequest -> UpdateNamespaceRequest)
-> (UpdateNamespaceRequest
    -> UpdateNamespaceRequest -> UpdateNamespaceRequest)
-> Ord UpdateNamespaceRequest
UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool
UpdateNamespaceRequest -> UpdateNamespaceRequest -> Ordering
UpdateNamespaceRequest
-> UpdateNamespaceRequest -> UpdateNamespaceRequest
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 :: UpdateNamespaceRequest -> UpdateNamespaceRequest -> Ordering
compare :: UpdateNamespaceRequest -> UpdateNamespaceRequest -> Ordering
$c< :: UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool
< :: UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool
$c<= :: UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool
<= :: UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool
$c> :: UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool
> :: UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool
$c>= :: UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool
>= :: UpdateNamespaceRequest -> UpdateNamespaceRequest -> Bool
$cmax :: UpdateNamespaceRequest
-> UpdateNamespaceRequest -> UpdateNamespaceRequest
max :: UpdateNamespaceRequest
-> UpdateNamespaceRequest -> UpdateNamespaceRequest
$cmin :: UpdateNamespaceRequest
-> UpdateNamespaceRequest -> UpdateNamespaceRequest
min :: UpdateNamespaceRequest
-> UpdateNamespaceRequest -> UpdateNamespaceRequest
Prelude.Ord)
instance Prelude.Show UpdateNamespaceRequest where
  showsPrec :: Int -> UpdateNamespaceRequest -> ShowS
showsPrec Int
_ UpdateNamespaceRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateNamespaceRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateNamespaceRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateNamespaceRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> UpdateNamespaceRequest -> f UpdateNamespaceRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceRequest -> Text)
-> (UpdateNamespaceRequest -> Text -> UpdateNamespaceRequest)
-> Lens UpdateNamespaceRequest UpdateNamespaceRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceRequest -> Text
_UpdateNamespaceRequest'namespace
           (\ UpdateNamespaceRequest
x__ Text
y__ -> UpdateNamespaceRequest
x__ {_UpdateNamespaceRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateNamespaceRequest "updateInfo" Proto.Temporal.Api.Namespace.V1.Message.UpdateNamespaceInfo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "updateInfo"
-> (UpdateNamespaceInfo -> f UpdateNamespaceInfo)
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
fieldOf Proxy# "updateInfo"
_
    = ((Maybe UpdateNamespaceInfo -> f (Maybe UpdateNamespaceInfo))
 -> UpdateNamespaceRequest -> f UpdateNamespaceRequest)
-> ((UpdateNamespaceInfo -> f UpdateNamespaceInfo)
    -> Maybe UpdateNamespaceInfo -> f (Maybe UpdateNamespaceInfo))
-> (UpdateNamespaceInfo -> f UpdateNamespaceInfo)
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceRequest -> Maybe UpdateNamespaceInfo)
-> (UpdateNamespaceRequest
    -> Maybe UpdateNamespaceInfo -> UpdateNamespaceRequest)
-> Lens
     UpdateNamespaceRequest
     UpdateNamespaceRequest
     (Maybe UpdateNamespaceInfo)
     (Maybe UpdateNamespaceInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceRequest -> Maybe UpdateNamespaceInfo
_UpdateNamespaceRequest'updateInfo
           (\ UpdateNamespaceRequest
x__ Maybe UpdateNamespaceInfo
y__ -> UpdateNamespaceRequest
x__ {_UpdateNamespaceRequest'updateInfo = y__}))
        (UpdateNamespaceInfo
-> Lens' (Maybe UpdateNamespaceInfo) UpdateNamespaceInfo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateNamespaceInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateNamespaceRequest "maybe'updateInfo" (Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.UpdateNamespaceInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'updateInfo"
-> (Maybe UpdateNamespaceInfo -> f (Maybe UpdateNamespaceInfo))
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
fieldOf Proxy# "maybe'updateInfo"
_
    = ((Maybe UpdateNamespaceInfo -> f (Maybe UpdateNamespaceInfo))
 -> UpdateNamespaceRequest -> f UpdateNamespaceRequest)
-> ((Maybe UpdateNamespaceInfo -> f (Maybe UpdateNamespaceInfo))
    -> Maybe UpdateNamespaceInfo -> f (Maybe UpdateNamespaceInfo))
-> (Maybe UpdateNamespaceInfo -> f (Maybe UpdateNamespaceInfo))
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceRequest -> Maybe UpdateNamespaceInfo)
-> (UpdateNamespaceRequest
    -> Maybe UpdateNamespaceInfo -> UpdateNamespaceRequest)
-> Lens
     UpdateNamespaceRequest
     UpdateNamespaceRequest
     (Maybe UpdateNamespaceInfo)
     (Maybe UpdateNamespaceInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceRequest -> Maybe UpdateNamespaceInfo
_UpdateNamespaceRequest'updateInfo
           (\ UpdateNamespaceRequest
x__ Maybe UpdateNamespaceInfo
y__ -> UpdateNamespaceRequest
x__ {_UpdateNamespaceRequest'updateInfo = y__}))
        (Maybe UpdateNamespaceInfo -> f (Maybe UpdateNamespaceInfo))
-> Maybe UpdateNamespaceInfo -> f (Maybe UpdateNamespaceInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateNamespaceRequest "config" Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "config"
-> (NamespaceConfig -> f NamespaceConfig)
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
fieldOf Proxy# "config"
_
    = ((Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
 -> UpdateNamespaceRequest -> f UpdateNamespaceRequest)
-> ((NamespaceConfig -> f NamespaceConfig)
    -> Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
-> (NamespaceConfig -> f NamespaceConfig)
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceRequest -> Maybe NamespaceConfig)
-> (UpdateNamespaceRequest
    -> Maybe NamespaceConfig -> UpdateNamespaceRequest)
-> Lens
     UpdateNamespaceRequest
     UpdateNamespaceRequest
     (Maybe NamespaceConfig)
     (Maybe NamespaceConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceRequest -> Maybe NamespaceConfig
_UpdateNamespaceRequest'config
           (\ UpdateNamespaceRequest
x__ Maybe NamespaceConfig
y__ -> UpdateNamespaceRequest
x__ {_UpdateNamespaceRequest'config = y__}))
        (NamespaceConfig -> Lens' (Maybe NamespaceConfig) NamespaceConfig
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NamespaceConfig
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateNamespaceRequest "maybe'config" (Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'config"
-> (Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
fieldOf Proxy# "maybe'config"
_
    = ((Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
 -> UpdateNamespaceRequest -> f UpdateNamespaceRequest)
-> ((Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
    -> Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
-> (Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceRequest -> Maybe NamespaceConfig)
-> (UpdateNamespaceRequest
    -> Maybe NamespaceConfig -> UpdateNamespaceRequest)
-> Lens
     UpdateNamespaceRequest
     UpdateNamespaceRequest
     (Maybe NamespaceConfig)
     (Maybe NamespaceConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceRequest -> Maybe NamespaceConfig
_UpdateNamespaceRequest'config
           (\ UpdateNamespaceRequest
x__ Maybe NamespaceConfig
y__ -> UpdateNamespaceRequest
x__ {_UpdateNamespaceRequest'config = y__}))
        (Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
-> Maybe NamespaceConfig -> f (Maybe NamespaceConfig)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateNamespaceRequest "replicationConfig" Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "replicationConfig"
-> (NamespaceReplicationConfig -> f NamespaceReplicationConfig)
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
fieldOf Proxy# "replicationConfig"
_
    = ((Maybe NamespaceReplicationConfig
  -> f (Maybe NamespaceReplicationConfig))
 -> UpdateNamespaceRequest -> f UpdateNamespaceRequest)
-> ((NamespaceReplicationConfig -> f NamespaceReplicationConfig)
    -> Maybe NamespaceReplicationConfig
    -> f (Maybe NamespaceReplicationConfig))
-> (NamespaceReplicationConfig -> f NamespaceReplicationConfig)
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceRequest -> Maybe NamespaceReplicationConfig)
-> (UpdateNamespaceRequest
    -> Maybe NamespaceReplicationConfig -> UpdateNamespaceRequest)
-> Lens
     UpdateNamespaceRequest
     UpdateNamespaceRequest
     (Maybe NamespaceReplicationConfig)
     (Maybe NamespaceReplicationConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceRequest -> Maybe NamespaceReplicationConfig
_UpdateNamespaceRequest'replicationConfig
           (\ UpdateNamespaceRequest
x__ Maybe NamespaceReplicationConfig
y__
              -> UpdateNamespaceRequest
x__ {_UpdateNamespaceRequest'replicationConfig = y__}))
        (NamespaceReplicationConfig
-> Lens'
     (Maybe NamespaceReplicationConfig) NamespaceReplicationConfig
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NamespaceReplicationConfig
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateNamespaceRequest "maybe'replicationConfig" (Prelude.Maybe Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'replicationConfig"
-> (Maybe NamespaceReplicationConfig
    -> f (Maybe NamespaceReplicationConfig))
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
fieldOf Proxy# "maybe'replicationConfig"
_
    = ((Maybe NamespaceReplicationConfig
  -> f (Maybe NamespaceReplicationConfig))
 -> UpdateNamespaceRequest -> f UpdateNamespaceRequest)
-> ((Maybe NamespaceReplicationConfig
     -> f (Maybe NamespaceReplicationConfig))
    -> Maybe NamespaceReplicationConfig
    -> f (Maybe NamespaceReplicationConfig))
-> (Maybe NamespaceReplicationConfig
    -> f (Maybe NamespaceReplicationConfig))
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceRequest -> Maybe NamespaceReplicationConfig)
-> (UpdateNamespaceRequest
    -> Maybe NamespaceReplicationConfig -> UpdateNamespaceRequest)
-> Lens
     UpdateNamespaceRequest
     UpdateNamespaceRequest
     (Maybe NamespaceReplicationConfig)
     (Maybe NamespaceReplicationConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceRequest -> Maybe NamespaceReplicationConfig
_UpdateNamespaceRequest'replicationConfig
           (\ UpdateNamespaceRequest
x__ Maybe NamespaceReplicationConfig
y__
              -> UpdateNamespaceRequest
x__ {_UpdateNamespaceRequest'replicationConfig = y__}))
        (Maybe NamespaceReplicationConfig
 -> f (Maybe NamespaceReplicationConfig))
-> Maybe NamespaceReplicationConfig
-> f (Maybe NamespaceReplicationConfig)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateNamespaceRequest "securityToken" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "securityToken"
-> (Text -> f Text)
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
fieldOf Proxy# "securityToken"
_
    = ((Text -> f Text)
 -> UpdateNamespaceRequest -> f UpdateNamespaceRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceRequest -> Text)
-> (UpdateNamespaceRequest -> Text -> UpdateNamespaceRequest)
-> Lens UpdateNamespaceRequest UpdateNamespaceRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceRequest -> Text
_UpdateNamespaceRequest'securityToken
           (\ UpdateNamespaceRequest
x__ Text
y__ -> UpdateNamespaceRequest
x__ {_UpdateNamespaceRequest'securityToken = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateNamespaceRequest "deleteBadBinary" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "deleteBadBinary"
-> (Text -> f Text)
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
fieldOf Proxy# "deleteBadBinary"
_
    = ((Text -> f Text)
 -> UpdateNamespaceRequest -> f UpdateNamespaceRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceRequest -> Text)
-> (UpdateNamespaceRequest -> Text -> UpdateNamespaceRequest)
-> Lens UpdateNamespaceRequest UpdateNamespaceRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceRequest -> Text
_UpdateNamespaceRequest'deleteBadBinary
           (\ UpdateNamespaceRequest
x__ Text
y__ -> UpdateNamespaceRequest
x__ {_UpdateNamespaceRequest'deleteBadBinary = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateNamespaceRequest "promoteNamespace" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "promoteNamespace"
-> (Bool -> f Bool)
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
fieldOf Proxy# "promoteNamespace"
_
    = ((Bool -> f Bool)
 -> UpdateNamespaceRequest -> f UpdateNamespaceRequest)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> UpdateNamespaceRequest
-> f UpdateNamespaceRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceRequest -> Bool)
-> (UpdateNamespaceRequest -> Bool -> UpdateNamespaceRequest)
-> Lens UpdateNamespaceRequest UpdateNamespaceRequest Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceRequest -> Bool
_UpdateNamespaceRequest'promoteNamespace
           (\ UpdateNamespaceRequest
x__ Bool
y__
              -> UpdateNamespaceRequest
x__ {_UpdateNamespaceRequest'promoteNamespace = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateNamespaceRequest where
  messageName :: Proxy UpdateNamespaceRequest -> Text
messageName Proxy UpdateNamespaceRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateNamespaceRequest"
  packedMessageDescriptor :: Proxy UpdateNamespaceRequest -> ByteString
packedMessageDescriptor Proxy UpdateNamespaceRequest
_
    = ByteString
"\n\
      \\SYNUpdateNamespaceRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2O\n\
      \\vupdate_info\CAN\STX \SOH(\v2..temporal.api.namespace.v1.UpdateNamespaceInfoR\n\
      \updateInfo\DC2B\n\
      \\ACKconfig\CAN\ETX \SOH(\v2*.temporal.api.namespace.v1.NamespaceConfigR\ACKconfig\DC2f\n\
      \\DC2replication_config\CAN\EOT \SOH(\v27.temporal.api.replication.v1.NamespaceReplicationConfigR\DC1replicationConfig\DC2%\n\
      \\SOsecurity_token\CAN\ENQ \SOH(\tR\rsecurityToken\DC2*\n\
      \\DC1delete_bad_binary\CAN\ACK \SOH(\tR\SIdeleteBadBinary\DC2+\n\
      \\DC1promote_namespace\CAN\a \SOH(\bR\DLEpromoteNamespace"
  packedFileDescriptor :: Proxy UpdateNamespaceRequest -> ByteString
packedFileDescriptor Proxy UpdateNamespaceRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor UpdateNamespaceRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor UpdateNamespaceRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateNamespaceRequest Text
-> FieldDescriptor UpdateNamespaceRequest
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 UpdateNamespaceRequest UpdateNamespaceRequest Text Text
-> FieldAccessor UpdateNamespaceRequest 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 UpdateNamespaceRequest
        updateInfo__field_descriptor :: FieldDescriptor UpdateNamespaceRequest
updateInfo__field_descriptor
          = String
-> FieldTypeDescriptor UpdateNamespaceInfo
-> FieldAccessor UpdateNamespaceRequest UpdateNamespaceInfo
-> FieldDescriptor UpdateNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"update_info"
              (MessageOrGroup -> FieldTypeDescriptor UpdateNamespaceInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Namespace.V1.Message.UpdateNamespaceInfo)
              (Lens
  UpdateNamespaceRequest
  UpdateNamespaceRequest
  (Maybe UpdateNamespaceInfo)
  (Maybe UpdateNamespaceInfo)
-> FieldAccessor UpdateNamespaceRequest UpdateNamespaceInfo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'updateInfo")) ::
              Data.ProtoLens.FieldDescriptor UpdateNamespaceRequest
        config__field_descriptor :: FieldDescriptor UpdateNamespaceRequest
config__field_descriptor
          = String
-> FieldTypeDescriptor NamespaceConfig
-> FieldAccessor UpdateNamespaceRequest NamespaceConfig
-> FieldDescriptor UpdateNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"config"
              (MessageOrGroup -> FieldTypeDescriptor NamespaceConfig
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig)
              (Lens
  UpdateNamespaceRequest
  UpdateNamespaceRequest
  (Maybe NamespaceConfig)
  (Maybe NamespaceConfig)
-> FieldAccessor UpdateNamespaceRequest NamespaceConfig
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'config")) ::
              Data.ProtoLens.FieldDescriptor UpdateNamespaceRequest
        replicationConfig__field_descriptor :: FieldDescriptor UpdateNamespaceRequest
replicationConfig__field_descriptor
          = String
-> FieldTypeDescriptor NamespaceReplicationConfig
-> FieldAccessor UpdateNamespaceRequest NamespaceReplicationConfig
-> FieldDescriptor UpdateNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"replication_config"
              (MessageOrGroup -> FieldTypeDescriptor NamespaceReplicationConfig
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig)
              (Lens
  UpdateNamespaceRequest
  UpdateNamespaceRequest
  (Maybe NamespaceReplicationConfig)
  (Maybe NamespaceReplicationConfig)
-> FieldAccessor UpdateNamespaceRequest NamespaceReplicationConfig
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'replicationConfig")) ::
              Data.ProtoLens.FieldDescriptor UpdateNamespaceRequest
        securityToken__field_descriptor :: FieldDescriptor UpdateNamespaceRequest
securityToken__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateNamespaceRequest Text
-> FieldDescriptor UpdateNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"security_token"
              (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 UpdateNamespaceRequest UpdateNamespaceRequest Text Text
-> FieldAccessor UpdateNamespaceRequest 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 @"securityToken")) ::
              Data.ProtoLens.FieldDescriptor UpdateNamespaceRequest
        deleteBadBinary__field_descriptor :: FieldDescriptor UpdateNamespaceRequest
deleteBadBinary__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateNamespaceRequest Text
-> FieldDescriptor UpdateNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"delete_bad_binary"
              (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 UpdateNamespaceRequest UpdateNamespaceRequest Text Text
-> FieldAccessor UpdateNamespaceRequest 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 @"deleteBadBinary")) ::
              Data.ProtoLens.FieldDescriptor UpdateNamespaceRequest
        promoteNamespace__field_descriptor :: FieldDescriptor UpdateNamespaceRequest
promoteNamespace__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor UpdateNamespaceRequest Bool
-> FieldDescriptor UpdateNamespaceRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"promote_namespace"
              (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 UpdateNamespaceRequest UpdateNamespaceRequest Bool Bool
-> FieldAccessor UpdateNamespaceRequest 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 @"promoteNamespace")) ::
              Data.ProtoLens.FieldDescriptor UpdateNamespaceRequest
      in
        [(Tag, FieldDescriptor UpdateNamespaceRequest)]
-> Map Tag (FieldDescriptor UpdateNamespaceRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor UpdateNamespaceRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor UpdateNamespaceRequest
updateInfo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor UpdateNamespaceRequest
config__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor UpdateNamespaceRequest
replicationConfig__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor UpdateNamespaceRequest
securityToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor UpdateNamespaceRequest
deleteBadBinary__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor UpdateNamespaceRequest
promoteNamespace__field_descriptor)]
  unknownFields :: Lens' UpdateNamespaceRequest FieldSet
unknownFields
    = (UpdateNamespaceRequest -> FieldSet)
-> (UpdateNamespaceRequest -> FieldSet -> UpdateNamespaceRequest)
-> Lens' UpdateNamespaceRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateNamespaceRequest -> FieldSet
_UpdateNamespaceRequest'_unknownFields
        (\ UpdateNamespaceRequest
x__ FieldSet
y__ -> UpdateNamespaceRequest
x__ {_UpdateNamespaceRequest'_unknownFields = y__})
  defMessage :: UpdateNamespaceRequest
defMessage
    = UpdateNamespaceRequest'_constructor
        {_UpdateNamespaceRequest'namespace :: Text
_UpdateNamespaceRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateNamespaceRequest'updateInfo :: Maybe UpdateNamespaceInfo
_UpdateNamespaceRequest'updateInfo = Maybe UpdateNamespaceInfo
forall a. Maybe a
Prelude.Nothing,
         _UpdateNamespaceRequest'config :: Maybe NamespaceConfig
_UpdateNamespaceRequest'config = Maybe NamespaceConfig
forall a. Maybe a
Prelude.Nothing,
         _UpdateNamespaceRequest'replicationConfig :: Maybe NamespaceReplicationConfig
_UpdateNamespaceRequest'replicationConfig = Maybe NamespaceReplicationConfig
forall a. Maybe a
Prelude.Nothing,
         _UpdateNamespaceRequest'securityToken :: Text
_UpdateNamespaceRequest'securityToken = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateNamespaceRequest'deleteBadBinary :: Text
_UpdateNamespaceRequest'deleteBadBinary = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateNamespaceRequest'promoteNamespace :: Bool
_UpdateNamespaceRequest'promoteNamespace = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateNamespaceRequest'_unknownFields :: FieldSet
_UpdateNamespaceRequest'_unknownFields = []}
  parseMessage :: Parser UpdateNamespaceRequest
parseMessage
    = let
        loop ::
          UpdateNamespaceRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateNamespaceRequest
        loop :: UpdateNamespaceRequest -> Parser UpdateNamespaceRequest
loop UpdateNamespaceRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser UpdateNamespaceInfo -> String -> Parser UpdateNamespaceInfo
forall a. Parser a -> String -> Parser a
(Data.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_info"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"updateInfo") y x)
                        Word64
26
                          -> do y <- Parser NamespaceConfig -> String -> Parser NamespaceConfig
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"config"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"config") y x)
                        Word64
34
                          -> do y <- Parser NamespaceReplicationConfig
-> String -> Parser NamespaceReplicationConfig
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"replication_config"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"replicationConfig") y x)
                        Word64
42
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"security_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"securityToken") y x)
                        Word64
50
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"delete_bad_binary"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"deleteBadBinary") y x)
                        Word64
56
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"promote_namespace"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"promoteNamespace") 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 UpdateNamespaceRequest
-> String -> Parser UpdateNamespaceRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateNamespaceRequest -> Parser UpdateNamespaceRequest
loop UpdateNamespaceRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"UpdateNamespaceRequest"
  buildMessage :: UpdateNamespaceRequest -> Builder
buildMessage
    = \ UpdateNamespaceRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text UpdateNamespaceRequest UpdateNamespaceRequest Text Text
-> UpdateNamespaceRequest -> 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") UpdateNamespaceRequest
_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 UpdateNamespaceInfo)
  UpdateNamespaceRequest
  UpdateNamespaceRequest
  (Maybe UpdateNamespaceInfo)
  (Maybe UpdateNamespaceInfo)
-> UpdateNamespaceRequest -> Maybe UpdateNamespaceInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'updateInfo") UpdateNamespaceRequest
_x
                 of
                   Maybe UpdateNamespaceInfo
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just UpdateNamespaceInfo
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (UpdateNamespaceInfo -> ByteString)
-> UpdateNamespaceInfo
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             UpdateNamespaceInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateNamespaceInfo
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe NamespaceConfig)
  UpdateNamespaceRequest
  UpdateNamespaceRequest
  (Maybe NamespaceConfig)
  (Maybe NamespaceConfig)
-> UpdateNamespaceRequest -> Maybe NamespaceConfig
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'config") UpdateNamespaceRequest
_x
                    of
                      Maybe NamespaceConfig
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just NamespaceConfig
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (NamespaceConfig -> ByteString) -> NamespaceConfig -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                NamespaceConfig -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NamespaceConfig
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe NamespaceReplicationConfig)
  UpdateNamespaceRequest
  UpdateNamespaceRequest
  (Maybe NamespaceReplicationConfig)
  (Maybe NamespaceReplicationConfig)
-> UpdateNamespaceRequest -> Maybe NamespaceReplicationConfig
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'replicationConfig") UpdateNamespaceRequest
_x
                       of
                         Maybe NamespaceReplicationConfig
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just NamespaceReplicationConfig
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (NamespaceReplicationConfig -> ByteString)
-> NamespaceReplicationConfig
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   NamespaceReplicationConfig -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NamespaceReplicationConfig
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Text
_v
                              = FoldLike
  Text UpdateNamespaceRequest UpdateNamespaceRequest Text Text
-> UpdateNamespaceRequest -> 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 @"securityToken") UpdateNamespaceRequest
_x
                          in
                            if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                  ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     (\ ByteString
bs
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                     Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v
                                 = FoldLike
  Text UpdateNamespaceRequest UpdateNamespaceRequest Text Text
-> UpdateNamespaceRequest -> 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 @"deleteBadBinary") UpdateNamespaceRequest
_x
                             in
                               if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                     ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        (\ ByteString
bs
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Bool
_v
                                    = FoldLike
  Bool UpdateNamespaceRequest UpdateNamespaceRequest Bool Bool
-> UpdateNamespaceRequest -> 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 @"promoteNamespace") UpdateNamespaceRequest
_x
                                in
                                  if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                      Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  else
                                      Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
56)
                                        ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                           Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (\ Bool
b -> if Bool
b then Word64
1 else Word64
0) Bool
_v))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike
  FieldSet
  UpdateNamespaceRequest
  UpdateNamespaceRequest
  FieldSet
  FieldSet
-> UpdateNamespaceRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateNamespaceRequest
  UpdateNamespaceRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpdateNamespaceRequest FieldSet
Data.ProtoLens.unknownFields UpdateNamespaceRequest
_x))))))))
instance Control.DeepSeq.NFData UpdateNamespaceRequest where
  rnf :: UpdateNamespaceRequest -> ()
rnf
    = \ UpdateNamespaceRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateNamespaceRequest -> FieldSet
_UpdateNamespaceRequest'_unknownFields UpdateNamespaceRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateNamespaceRequest -> Text
_UpdateNamespaceRequest'namespace UpdateNamespaceRequest
x__)
                (Maybe UpdateNamespaceInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpdateNamespaceRequest -> Maybe UpdateNamespaceInfo
_UpdateNamespaceRequest'updateInfo UpdateNamespaceRequest
x__)
                   (Maybe NamespaceConfig -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (UpdateNamespaceRequest -> Maybe NamespaceConfig
_UpdateNamespaceRequest'config UpdateNamespaceRequest
x__)
                      (Maybe NamespaceReplicationConfig -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (UpdateNamespaceRequest -> Maybe NamespaceReplicationConfig
_UpdateNamespaceRequest'replicationConfig UpdateNamespaceRequest
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (UpdateNamespaceRequest -> Text
_UpdateNamespaceRequest'securityToken UpdateNamespaceRequest
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (UpdateNamespaceRequest -> Text
_UpdateNamespaceRequest'deleteBadBinary UpdateNamespaceRequest
x__)
                               (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (UpdateNamespaceRequest -> Bool
_UpdateNamespaceRequest'promoteNamespace UpdateNamespaceRequest
x__) ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespaceInfo' @:: Lens' UpdateNamespaceResponse Proto.Temporal.Api.Namespace.V1.Message.NamespaceInfo@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'namespaceInfo' @:: Lens' UpdateNamespaceResponse (Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceInfo)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.config' @:: Lens' UpdateNamespaceResponse Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'config' @:: Lens' UpdateNamespaceResponse (Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.replicationConfig' @:: Lens' UpdateNamespaceResponse Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'replicationConfig' @:: Lens' UpdateNamespaceResponse (Prelude.Maybe Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.failoverVersion' @:: Lens' UpdateNamespaceResponse Data.Int.Int64@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.isGlobalNamespace' @:: Lens' UpdateNamespaceResponse Prelude.Bool@ -}
data UpdateNamespaceResponse
  = UpdateNamespaceResponse'_constructor {UpdateNamespaceResponse -> Maybe NamespaceInfo
_UpdateNamespaceResponse'namespaceInfo :: !(Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceInfo),
                                          UpdateNamespaceResponse -> Maybe NamespaceConfig
_UpdateNamespaceResponse'config :: !(Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig),
                                          UpdateNamespaceResponse -> Maybe NamespaceReplicationConfig
_UpdateNamespaceResponse'replicationConfig :: !(Prelude.Maybe Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig),
                                          UpdateNamespaceResponse -> Int64
_UpdateNamespaceResponse'failoverVersion :: !Data.Int.Int64,
                                          UpdateNamespaceResponse -> Bool
_UpdateNamespaceResponse'isGlobalNamespace :: !Prelude.Bool,
                                          UpdateNamespaceResponse -> FieldSet
_UpdateNamespaceResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool
(UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool)
-> (UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool)
-> Eq UpdateNamespaceResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool
== :: UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool
$c/= :: UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool
/= :: UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool
Prelude.Eq, Eq UpdateNamespaceResponse
Eq UpdateNamespaceResponse =>
(UpdateNamespaceResponse -> UpdateNamespaceResponse -> Ordering)
-> (UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool)
-> (UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool)
-> (UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool)
-> (UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool)
-> (UpdateNamespaceResponse
    -> UpdateNamespaceResponse -> UpdateNamespaceResponse)
-> (UpdateNamespaceResponse
    -> UpdateNamespaceResponse -> UpdateNamespaceResponse)
-> Ord UpdateNamespaceResponse
UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool
UpdateNamespaceResponse -> UpdateNamespaceResponse -> Ordering
UpdateNamespaceResponse
-> UpdateNamespaceResponse -> UpdateNamespaceResponse
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 :: UpdateNamespaceResponse -> UpdateNamespaceResponse -> Ordering
compare :: UpdateNamespaceResponse -> UpdateNamespaceResponse -> Ordering
$c< :: UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool
< :: UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool
$c<= :: UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool
<= :: UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool
$c> :: UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool
> :: UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool
$c>= :: UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool
>= :: UpdateNamespaceResponse -> UpdateNamespaceResponse -> Bool
$cmax :: UpdateNamespaceResponse
-> UpdateNamespaceResponse -> UpdateNamespaceResponse
max :: UpdateNamespaceResponse
-> UpdateNamespaceResponse -> UpdateNamespaceResponse
$cmin :: UpdateNamespaceResponse
-> UpdateNamespaceResponse -> UpdateNamespaceResponse
min :: UpdateNamespaceResponse
-> UpdateNamespaceResponse -> UpdateNamespaceResponse
Prelude.Ord)
instance Prelude.Show UpdateNamespaceResponse where
  showsPrec :: Int -> UpdateNamespaceResponse -> ShowS
showsPrec Int
_ UpdateNamespaceResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateNamespaceResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateNamespaceResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateNamespaceResponse "namespaceInfo" Proto.Temporal.Api.Namespace.V1.Message.NamespaceInfo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceInfo"
-> (NamespaceInfo -> f NamespaceInfo)
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
fieldOf Proxy# "namespaceInfo"
_
    = ((Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
 -> UpdateNamespaceResponse -> f UpdateNamespaceResponse)
-> ((NamespaceInfo -> f NamespaceInfo)
    -> Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
-> (NamespaceInfo -> f NamespaceInfo)
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceResponse -> Maybe NamespaceInfo)
-> (UpdateNamespaceResponse
    -> Maybe NamespaceInfo -> UpdateNamespaceResponse)
-> Lens
     UpdateNamespaceResponse
     UpdateNamespaceResponse
     (Maybe NamespaceInfo)
     (Maybe NamespaceInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceResponse -> Maybe NamespaceInfo
_UpdateNamespaceResponse'namespaceInfo
           (\ UpdateNamespaceResponse
x__ Maybe NamespaceInfo
y__ -> UpdateNamespaceResponse
x__ {_UpdateNamespaceResponse'namespaceInfo = y__}))
        (NamespaceInfo -> Lens' (Maybe NamespaceInfo) NamespaceInfo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NamespaceInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateNamespaceResponse "maybe'namespaceInfo" (Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceInfo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'namespaceInfo"
-> (Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
fieldOf Proxy# "maybe'namespaceInfo"
_
    = ((Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
 -> UpdateNamespaceResponse -> f UpdateNamespaceResponse)
-> ((Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
    -> Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
-> (Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceResponse -> Maybe NamespaceInfo)
-> (UpdateNamespaceResponse
    -> Maybe NamespaceInfo -> UpdateNamespaceResponse)
-> Lens
     UpdateNamespaceResponse
     UpdateNamespaceResponse
     (Maybe NamespaceInfo)
     (Maybe NamespaceInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceResponse -> Maybe NamespaceInfo
_UpdateNamespaceResponse'namespaceInfo
           (\ UpdateNamespaceResponse
x__ Maybe NamespaceInfo
y__ -> UpdateNamespaceResponse
x__ {_UpdateNamespaceResponse'namespaceInfo = y__}))
        (Maybe NamespaceInfo -> f (Maybe NamespaceInfo))
-> Maybe NamespaceInfo -> f (Maybe NamespaceInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateNamespaceResponse "config" Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "config"
-> (NamespaceConfig -> f NamespaceConfig)
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
fieldOf Proxy# "config"
_
    = ((Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
 -> UpdateNamespaceResponse -> f UpdateNamespaceResponse)
-> ((NamespaceConfig -> f NamespaceConfig)
    -> Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
-> (NamespaceConfig -> f NamespaceConfig)
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceResponse -> Maybe NamespaceConfig)
-> (UpdateNamespaceResponse
    -> Maybe NamespaceConfig -> UpdateNamespaceResponse)
-> Lens
     UpdateNamespaceResponse
     UpdateNamespaceResponse
     (Maybe NamespaceConfig)
     (Maybe NamespaceConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceResponse -> Maybe NamespaceConfig
_UpdateNamespaceResponse'config
           (\ UpdateNamespaceResponse
x__ Maybe NamespaceConfig
y__ -> UpdateNamespaceResponse
x__ {_UpdateNamespaceResponse'config = y__}))
        (NamespaceConfig -> Lens' (Maybe NamespaceConfig) NamespaceConfig
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NamespaceConfig
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateNamespaceResponse "maybe'config" (Prelude.Maybe Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'config"
-> (Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
fieldOf Proxy# "maybe'config"
_
    = ((Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
 -> UpdateNamespaceResponse -> f UpdateNamespaceResponse)
-> ((Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
    -> Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
-> (Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceResponse -> Maybe NamespaceConfig)
-> (UpdateNamespaceResponse
    -> Maybe NamespaceConfig -> UpdateNamespaceResponse)
-> Lens
     UpdateNamespaceResponse
     UpdateNamespaceResponse
     (Maybe NamespaceConfig)
     (Maybe NamespaceConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceResponse -> Maybe NamespaceConfig
_UpdateNamespaceResponse'config
           (\ UpdateNamespaceResponse
x__ Maybe NamespaceConfig
y__ -> UpdateNamespaceResponse
x__ {_UpdateNamespaceResponse'config = y__}))
        (Maybe NamespaceConfig -> f (Maybe NamespaceConfig))
-> Maybe NamespaceConfig -> f (Maybe NamespaceConfig)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateNamespaceResponse "replicationConfig" Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "replicationConfig"
-> (NamespaceReplicationConfig -> f NamespaceReplicationConfig)
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
fieldOf Proxy# "replicationConfig"
_
    = ((Maybe NamespaceReplicationConfig
  -> f (Maybe NamespaceReplicationConfig))
 -> UpdateNamespaceResponse -> f UpdateNamespaceResponse)
-> ((NamespaceReplicationConfig -> f NamespaceReplicationConfig)
    -> Maybe NamespaceReplicationConfig
    -> f (Maybe NamespaceReplicationConfig))
-> (NamespaceReplicationConfig -> f NamespaceReplicationConfig)
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceResponse -> Maybe NamespaceReplicationConfig)
-> (UpdateNamespaceResponse
    -> Maybe NamespaceReplicationConfig -> UpdateNamespaceResponse)
-> Lens
     UpdateNamespaceResponse
     UpdateNamespaceResponse
     (Maybe NamespaceReplicationConfig)
     (Maybe NamespaceReplicationConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceResponse -> Maybe NamespaceReplicationConfig
_UpdateNamespaceResponse'replicationConfig
           (\ UpdateNamespaceResponse
x__ Maybe NamespaceReplicationConfig
y__
              -> UpdateNamespaceResponse
x__ {_UpdateNamespaceResponse'replicationConfig = y__}))
        (NamespaceReplicationConfig
-> Lens'
     (Maybe NamespaceReplicationConfig) NamespaceReplicationConfig
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NamespaceReplicationConfig
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateNamespaceResponse "maybe'replicationConfig" (Prelude.Maybe Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'replicationConfig"
-> (Maybe NamespaceReplicationConfig
    -> f (Maybe NamespaceReplicationConfig))
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
fieldOf Proxy# "maybe'replicationConfig"
_
    = ((Maybe NamespaceReplicationConfig
  -> f (Maybe NamespaceReplicationConfig))
 -> UpdateNamespaceResponse -> f UpdateNamespaceResponse)
-> ((Maybe NamespaceReplicationConfig
     -> f (Maybe NamespaceReplicationConfig))
    -> Maybe NamespaceReplicationConfig
    -> f (Maybe NamespaceReplicationConfig))
-> (Maybe NamespaceReplicationConfig
    -> f (Maybe NamespaceReplicationConfig))
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceResponse -> Maybe NamespaceReplicationConfig)
-> (UpdateNamespaceResponse
    -> Maybe NamespaceReplicationConfig -> UpdateNamespaceResponse)
-> Lens
     UpdateNamespaceResponse
     UpdateNamespaceResponse
     (Maybe NamespaceReplicationConfig)
     (Maybe NamespaceReplicationConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceResponse -> Maybe NamespaceReplicationConfig
_UpdateNamespaceResponse'replicationConfig
           (\ UpdateNamespaceResponse
x__ Maybe NamespaceReplicationConfig
y__
              -> UpdateNamespaceResponse
x__ {_UpdateNamespaceResponse'replicationConfig = y__}))
        (Maybe NamespaceReplicationConfig
 -> f (Maybe NamespaceReplicationConfig))
-> Maybe NamespaceReplicationConfig
-> f (Maybe NamespaceReplicationConfig)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateNamespaceResponse "failoverVersion" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failoverVersion"
-> (Int64 -> f Int64)
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
fieldOf Proxy# "failoverVersion"
_
    = ((Int64 -> f Int64)
 -> UpdateNamespaceResponse -> f UpdateNamespaceResponse)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceResponse -> Int64)
-> (UpdateNamespaceResponse -> Int64 -> UpdateNamespaceResponse)
-> Lens UpdateNamespaceResponse UpdateNamespaceResponse Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceResponse -> Int64
_UpdateNamespaceResponse'failoverVersion
           (\ UpdateNamespaceResponse
x__ Int64
y__
              -> UpdateNamespaceResponse
x__ {_UpdateNamespaceResponse'failoverVersion = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateNamespaceResponse "isGlobalNamespace" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "isGlobalNamespace"
-> (Bool -> f Bool)
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
fieldOf Proxy# "isGlobalNamespace"
_
    = ((Bool -> f Bool)
 -> UpdateNamespaceResponse -> f UpdateNamespaceResponse)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> UpdateNamespaceResponse
-> f UpdateNamespaceResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateNamespaceResponse -> Bool)
-> (UpdateNamespaceResponse -> Bool -> UpdateNamespaceResponse)
-> Lens UpdateNamespaceResponse UpdateNamespaceResponse Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateNamespaceResponse -> Bool
_UpdateNamespaceResponse'isGlobalNamespace
           (\ UpdateNamespaceResponse
x__ Bool
y__
              -> UpdateNamespaceResponse
x__ {_UpdateNamespaceResponse'isGlobalNamespace = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateNamespaceResponse where
  messageName :: Proxy UpdateNamespaceResponse -> Text
messageName Proxy UpdateNamespaceResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateNamespaceResponse"
  packedMessageDescriptor :: Proxy UpdateNamespaceResponse -> ByteString
packedMessageDescriptor Proxy UpdateNamespaceResponse
_
    = ByteString
"\n\
      \\ETBUpdateNamespaceResponse\DC2O\n\
      \\SOnamespace_info\CAN\SOH \SOH(\v2(.temporal.api.namespace.v1.NamespaceInfoR\rnamespaceInfo\DC2B\n\
      \\ACKconfig\CAN\STX \SOH(\v2*.temporal.api.namespace.v1.NamespaceConfigR\ACKconfig\DC2f\n\
      \\DC2replication_config\CAN\ETX \SOH(\v27.temporal.api.replication.v1.NamespaceReplicationConfigR\DC1replicationConfig\DC2)\n\
      \\DLEfailover_version\CAN\EOT \SOH(\ETXR\SIfailoverVersion\DC2.\n\
      \\DC3is_global_namespace\CAN\ENQ \SOH(\bR\DC1isGlobalNamespace"
  packedFileDescriptor :: Proxy UpdateNamespaceResponse -> ByteString
packedFileDescriptor Proxy UpdateNamespaceResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor UpdateNamespaceResponse)
fieldsByTag
    = let
        namespaceInfo__field_descriptor :: FieldDescriptor UpdateNamespaceResponse
namespaceInfo__field_descriptor
          = String
-> FieldTypeDescriptor NamespaceInfo
-> FieldAccessor UpdateNamespaceResponse NamespaceInfo
-> FieldDescriptor UpdateNamespaceResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace_info"
              (MessageOrGroup -> FieldTypeDescriptor NamespaceInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Namespace.V1.Message.NamespaceInfo)
              (Lens
  UpdateNamespaceResponse
  UpdateNamespaceResponse
  (Maybe NamespaceInfo)
  (Maybe NamespaceInfo)
-> FieldAccessor UpdateNamespaceResponse NamespaceInfo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'namespaceInfo")) ::
              Data.ProtoLens.FieldDescriptor UpdateNamespaceResponse
        config__field_descriptor :: FieldDescriptor UpdateNamespaceResponse
config__field_descriptor
          = String
-> FieldTypeDescriptor NamespaceConfig
-> FieldAccessor UpdateNamespaceResponse NamespaceConfig
-> FieldDescriptor UpdateNamespaceResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"config"
              (MessageOrGroup -> FieldTypeDescriptor NamespaceConfig
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Namespace.V1.Message.NamespaceConfig)
              (Lens
  UpdateNamespaceResponse
  UpdateNamespaceResponse
  (Maybe NamespaceConfig)
  (Maybe NamespaceConfig)
-> FieldAccessor UpdateNamespaceResponse NamespaceConfig
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'config")) ::
              Data.ProtoLens.FieldDescriptor UpdateNamespaceResponse
        replicationConfig__field_descriptor :: FieldDescriptor UpdateNamespaceResponse
replicationConfig__field_descriptor
          = String
-> FieldTypeDescriptor NamespaceReplicationConfig
-> FieldAccessor UpdateNamespaceResponse NamespaceReplicationConfig
-> FieldDescriptor UpdateNamespaceResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"replication_config"
              (MessageOrGroup -> FieldTypeDescriptor NamespaceReplicationConfig
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Replication.V1.Message.NamespaceReplicationConfig)
              (Lens
  UpdateNamespaceResponse
  UpdateNamespaceResponse
  (Maybe NamespaceReplicationConfig)
  (Maybe NamespaceReplicationConfig)
-> FieldAccessor UpdateNamespaceResponse NamespaceReplicationConfig
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'replicationConfig")) ::
              Data.ProtoLens.FieldDescriptor UpdateNamespaceResponse
        failoverVersion__field_descriptor :: FieldDescriptor UpdateNamespaceResponse
failoverVersion__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor UpdateNamespaceResponse Int64
-> FieldDescriptor UpdateNamespaceResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"failover_version"
              (ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
              (WireDefault Int64
-> Lens UpdateNamespaceResponse UpdateNamespaceResponse Int64 Int64
-> FieldAccessor UpdateNamespaceResponse Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"failoverVersion")) ::
              Data.ProtoLens.FieldDescriptor UpdateNamespaceResponse
        isGlobalNamespace__field_descriptor :: FieldDescriptor UpdateNamespaceResponse
isGlobalNamespace__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor UpdateNamespaceResponse Bool
-> FieldDescriptor UpdateNamespaceResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"is_global_namespace"
              (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 UpdateNamespaceResponse UpdateNamespaceResponse Bool Bool
-> FieldAccessor UpdateNamespaceResponse 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 @"isGlobalNamespace")) ::
              Data.ProtoLens.FieldDescriptor UpdateNamespaceResponse
      in
        [(Tag, FieldDescriptor UpdateNamespaceResponse)]
-> Map Tag (FieldDescriptor UpdateNamespaceResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor UpdateNamespaceResponse
namespaceInfo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor UpdateNamespaceResponse
config__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor UpdateNamespaceResponse
replicationConfig__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor UpdateNamespaceResponse
failoverVersion__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor UpdateNamespaceResponse
isGlobalNamespace__field_descriptor)]
  unknownFields :: Lens' UpdateNamespaceResponse FieldSet
unknownFields
    = (UpdateNamespaceResponse -> FieldSet)
-> (UpdateNamespaceResponse -> FieldSet -> UpdateNamespaceResponse)
-> Lens' UpdateNamespaceResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateNamespaceResponse -> FieldSet
_UpdateNamespaceResponse'_unknownFields
        (\ UpdateNamespaceResponse
x__ FieldSet
y__ -> UpdateNamespaceResponse
x__ {_UpdateNamespaceResponse'_unknownFields = y__})
  defMessage :: UpdateNamespaceResponse
defMessage
    = UpdateNamespaceResponse'_constructor
        {_UpdateNamespaceResponse'namespaceInfo :: Maybe NamespaceInfo
_UpdateNamespaceResponse'namespaceInfo = Maybe NamespaceInfo
forall a. Maybe a
Prelude.Nothing,
         _UpdateNamespaceResponse'config :: Maybe NamespaceConfig
_UpdateNamespaceResponse'config = Maybe NamespaceConfig
forall a. Maybe a
Prelude.Nothing,
         _UpdateNamespaceResponse'replicationConfig :: Maybe NamespaceReplicationConfig
_UpdateNamespaceResponse'replicationConfig = Maybe NamespaceReplicationConfig
forall a. Maybe a
Prelude.Nothing,
         _UpdateNamespaceResponse'failoverVersion :: Int64
_UpdateNamespaceResponse'failoverVersion = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateNamespaceResponse'isGlobalNamespace :: Bool
_UpdateNamespaceResponse'isGlobalNamespace = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateNamespaceResponse'_unknownFields :: FieldSet
_UpdateNamespaceResponse'_unknownFields = []}
  parseMessage :: Parser UpdateNamespaceResponse
parseMessage
    = let
        loop ::
          UpdateNamespaceResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateNamespaceResponse
        loop :: UpdateNamespaceResponse -> Parser UpdateNamespaceResponse
loop UpdateNamespaceResponse
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 NamespaceInfo -> String -> Parser NamespaceInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"namespace_info"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"namespaceInfo") y x)
                        Word64
18
                          -> do y <- Parser NamespaceConfig -> String -> Parser NamespaceConfig
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"config"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"config") y x)
                        Word64
26
                          -> do y <- Parser NamespaceReplicationConfig
-> String -> Parser NamespaceReplicationConfig
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"replication_config"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"replicationConfig") y x)
                        Word64
32
                          -> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"failover_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"failoverVersion") y x)
                        Word64
40
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"is_global_namespace"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"isGlobalNamespace") 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 UpdateNamespaceResponse
-> String -> Parser UpdateNamespaceResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateNamespaceResponse -> Parser UpdateNamespaceResponse
loop UpdateNamespaceResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"UpdateNamespaceResponse"
  buildMessage :: UpdateNamespaceResponse -> Builder
buildMessage
    = \ UpdateNamespaceResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe NamespaceInfo)
  UpdateNamespaceResponse
  UpdateNamespaceResponse
  (Maybe NamespaceInfo)
  (Maybe NamespaceInfo)
-> UpdateNamespaceResponse -> Maybe NamespaceInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'namespaceInfo") UpdateNamespaceResponse
_x
              of
                Maybe NamespaceInfo
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just NamespaceInfo
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (NamespaceInfo -> ByteString) -> NamespaceInfo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          NamespaceInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NamespaceInfo
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe NamespaceConfig)
  UpdateNamespaceResponse
  UpdateNamespaceResponse
  (Maybe NamespaceConfig)
  (Maybe NamespaceConfig)
-> UpdateNamespaceResponse -> Maybe NamespaceConfig
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'config") UpdateNamespaceResponse
_x
                 of
                   Maybe NamespaceConfig
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just NamespaceConfig
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (NamespaceConfig -> ByteString) -> NamespaceConfig -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             NamespaceConfig -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NamespaceConfig
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe NamespaceReplicationConfig)
  UpdateNamespaceResponse
  UpdateNamespaceResponse
  (Maybe NamespaceReplicationConfig)
  (Maybe NamespaceReplicationConfig)
-> UpdateNamespaceResponse -> Maybe NamespaceReplicationConfig
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'replicationConfig") UpdateNamespaceResponse
_x
                    of
                      Maybe NamespaceReplicationConfig
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just NamespaceReplicationConfig
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (NamespaceReplicationConfig -> ByteString)
-> NamespaceReplicationConfig
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                NamespaceReplicationConfig -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NamespaceReplicationConfig
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Int64
_v
                           = FoldLike
  Int64 UpdateNamespaceResponse UpdateNamespaceResponse Int64 Int64
-> UpdateNamespaceResponse -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"failoverVersion") UpdateNamespaceResponse
_x
                       in
                         if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         else
                             Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
32)
                               ((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                  Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Bool
_v
                              = FoldLike
  Bool UpdateNamespaceResponse UpdateNamespaceResponse Bool Bool
-> UpdateNamespaceResponse -> 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 @"isGlobalNamespace") UpdateNamespaceResponse
_x
                          in
                            if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
40)
                                  ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (\ Bool
b -> if Bool
b then Word64
1 else Word64
0) Bool
_v))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  UpdateNamespaceResponse
  UpdateNamespaceResponse
  FieldSet
  FieldSet
-> UpdateNamespaceResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateNamespaceResponse
  UpdateNamespaceResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpdateNamespaceResponse FieldSet
Data.ProtoLens.unknownFields UpdateNamespaceResponse
_x))))))
instance Control.DeepSeq.NFData UpdateNamespaceResponse where
  rnf :: UpdateNamespaceResponse -> ()
rnf
    = \ UpdateNamespaceResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateNamespaceResponse -> FieldSet
_UpdateNamespaceResponse'_unknownFields UpdateNamespaceResponse
x__)
             (Maybe NamespaceInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateNamespaceResponse -> Maybe NamespaceInfo
_UpdateNamespaceResponse'namespaceInfo UpdateNamespaceResponse
x__)
                (Maybe NamespaceConfig -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpdateNamespaceResponse -> Maybe NamespaceConfig
_UpdateNamespaceResponse'config UpdateNamespaceResponse
x__)
                   (Maybe NamespaceReplicationConfig -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (UpdateNamespaceResponse -> Maybe NamespaceReplicationConfig
_UpdateNamespaceResponse'replicationConfig UpdateNamespaceResponse
x__)
                      (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (UpdateNamespaceResponse -> Int64
_UpdateNamespaceResponse'failoverVersion UpdateNamespaceResponse
x__)
                         (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (UpdateNamespaceResponse -> Bool
_UpdateNamespaceResponse'isGlobalNamespace UpdateNamespaceResponse
x__) ())))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' UpdateScheduleRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.scheduleId' @:: Lens' UpdateScheduleRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.schedule' @:: Lens' UpdateScheduleRequest Proto.Temporal.Api.Schedule.V1.Message.Schedule@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'schedule' @:: Lens' UpdateScheduleRequest (Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.Schedule)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.conflictToken' @:: Lens' UpdateScheduleRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.identity' @:: Lens' UpdateScheduleRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.requestId' @:: Lens' UpdateScheduleRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.searchAttributes' @:: Lens' UpdateScheduleRequest Proto.Temporal.Api.Common.V1.Message.SearchAttributes@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'searchAttributes' @:: Lens' UpdateScheduleRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes)@ -}
data UpdateScheduleRequest
  = UpdateScheduleRequest'_constructor {UpdateScheduleRequest -> Text
_UpdateScheduleRequest'namespace :: !Data.Text.Text,
                                        UpdateScheduleRequest -> Text
_UpdateScheduleRequest'scheduleId :: !Data.Text.Text,
                                        UpdateScheduleRequest -> Maybe Schedule
_UpdateScheduleRequest'schedule :: !(Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.Schedule),
                                        UpdateScheduleRequest -> ByteString
_UpdateScheduleRequest'conflictToken :: !Data.ByteString.ByteString,
                                        UpdateScheduleRequest -> Text
_UpdateScheduleRequest'identity :: !Data.Text.Text,
                                        UpdateScheduleRequest -> Text
_UpdateScheduleRequest'requestId :: !Data.Text.Text,
                                        UpdateScheduleRequest -> Maybe SearchAttributes
_UpdateScheduleRequest'searchAttributes :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes),
                                        UpdateScheduleRequest -> FieldSet
_UpdateScheduleRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateScheduleRequest -> UpdateScheduleRequest -> Bool
(UpdateScheduleRequest -> UpdateScheduleRequest -> Bool)
-> (UpdateScheduleRequest -> UpdateScheduleRequest -> Bool)
-> Eq UpdateScheduleRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateScheduleRequest -> UpdateScheduleRequest -> Bool
== :: UpdateScheduleRequest -> UpdateScheduleRequest -> Bool
$c/= :: UpdateScheduleRequest -> UpdateScheduleRequest -> Bool
/= :: UpdateScheduleRequest -> UpdateScheduleRequest -> Bool
Prelude.Eq, Eq UpdateScheduleRequest
Eq UpdateScheduleRequest =>
(UpdateScheduleRequest -> UpdateScheduleRequest -> Ordering)
-> (UpdateScheduleRequest -> UpdateScheduleRequest -> Bool)
-> (UpdateScheduleRequest -> UpdateScheduleRequest -> Bool)
-> (UpdateScheduleRequest -> UpdateScheduleRequest -> Bool)
-> (UpdateScheduleRequest -> UpdateScheduleRequest -> Bool)
-> (UpdateScheduleRequest
    -> UpdateScheduleRequest -> UpdateScheduleRequest)
-> (UpdateScheduleRequest
    -> UpdateScheduleRequest -> UpdateScheduleRequest)
-> Ord UpdateScheduleRequest
UpdateScheduleRequest -> UpdateScheduleRequest -> Bool
UpdateScheduleRequest -> UpdateScheduleRequest -> Ordering
UpdateScheduleRequest
-> UpdateScheduleRequest -> UpdateScheduleRequest
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 :: UpdateScheduleRequest -> UpdateScheduleRequest -> Ordering
compare :: UpdateScheduleRequest -> UpdateScheduleRequest -> Ordering
$c< :: UpdateScheduleRequest -> UpdateScheduleRequest -> Bool
< :: UpdateScheduleRequest -> UpdateScheduleRequest -> Bool
$c<= :: UpdateScheduleRequest -> UpdateScheduleRequest -> Bool
<= :: UpdateScheduleRequest -> UpdateScheduleRequest -> Bool
$c> :: UpdateScheduleRequest -> UpdateScheduleRequest -> Bool
> :: UpdateScheduleRequest -> UpdateScheduleRequest -> Bool
$c>= :: UpdateScheduleRequest -> UpdateScheduleRequest -> Bool
>= :: UpdateScheduleRequest -> UpdateScheduleRequest -> Bool
$cmax :: UpdateScheduleRequest
-> UpdateScheduleRequest -> UpdateScheduleRequest
max :: UpdateScheduleRequest
-> UpdateScheduleRequest -> UpdateScheduleRequest
$cmin :: UpdateScheduleRequest
-> UpdateScheduleRequest -> UpdateScheduleRequest
min :: UpdateScheduleRequest
-> UpdateScheduleRequest -> UpdateScheduleRequest
Prelude.Ord)
instance Prelude.Show UpdateScheduleRequest where
  showsPrec :: Int -> UpdateScheduleRequest -> ShowS
showsPrec Int
_ UpdateScheduleRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateScheduleRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateScheduleRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateScheduleRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> UpdateScheduleRequest -> f UpdateScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateScheduleRequest -> Text)
-> (UpdateScheduleRequest -> Text -> UpdateScheduleRequest)
-> Lens UpdateScheduleRequest UpdateScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateScheduleRequest -> Text
_UpdateScheduleRequest'namespace
           (\ UpdateScheduleRequest
x__ Text
y__ -> UpdateScheduleRequest
x__ {_UpdateScheduleRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateScheduleRequest "scheduleId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleId"
-> (Text -> f Text)
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
fieldOf Proxy# "scheduleId"
_
    = ((Text -> f Text)
 -> UpdateScheduleRequest -> f UpdateScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateScheduleRequest -> Text)
-> (UpdateScheduleRequest -> Text -> UpdateScheduleRequest)
-> Lens UpdateScheduleRequest UpdateScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateScheduleRequest -> Text
_UpdateScheduleRequest'scheduleId
           (\ UpdateScheduleRequest
x__ Text
y__ -> UpdateScheduleRequest
x__ {_UpdateScheduleRequest'scheduleId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateScheduleRequest "schedule" Proto.Temporal.Api.Schedule.V1.Message.Schedule where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "schedule"
-> (Schedule -> f Schedule)
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
fieldOf Proxy# "schedule"
_
    = ((Maybe Schedule -> f (Maybe Schedule))
 -> UpdateScheduleRequest -> f UpdateScheduleRequest)
-> ((Schedule -> f Schedule)
    -> Maybe Schedule -> f (Maybe Schedule))
-> (Schedule -> f Schedule)
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateScheduleRequest -> Maybe Schedule)
-> (UpdateScheduleRequest
    -> Maybe Schedule -> UpdateScheduleRequest)
-> Lens
     UpdateScheduleRequest
     UpdateScheduleRequest
     (Maybe Schedule)
     (Maybe Schedule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateScheduleRequest -> Maybe Schedule
_UpdateScheduleRequest'schedule
           (\ UpdateScheduleRequest
x__ Maybe Schedule
y__ -> UpdateScheduleRequest
x__ {_UpdateScheduleRequest'schedule = y__}))
        (Schedule -> Lens' (Maybe Schedule) Schedule
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Schedule
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateScheduleRequest "maybe'schedule" (Prelude.Maybe Proto.Temporal.Api.Schedule.V1.Message.Schedule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'schedule"
-> (Maybe Schedule -> f (Maybe Schedule))
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
fieldOf Proxy# "maybe'schedule"
_
    = ((Maybe Schedule -> f (Maybe Schedule))
 -> UpdateScheduleRequest -> f UpdateScheduleRequest)
-> ((Maybe Schedule -> f (Maybe Schedule))
    -> Maybe Schedule -> f (Maybe Schedule))
-> (Maybe Schedule -> f (Maybe Schedule))
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateScheduleRequest -> Maybe Schedule)
-> (UpdateScheduleRequest
    -> Maybe Schedule -> UpdateScheduleRequest)
-> Lens
     UpdateScheduleRequest
     UpdateScheduleRequest
     (Maybe Schedule)
     (Maybe Schedule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateScheduleRequest -> Maybe Schedule
_UpdateScheduleRequest'schedule
           (\ UpdateScheduleRequest
x__ Maybe Schedule
y__ -> UpdateScheduleRequest
x__ {_UpdateScheduleRequest'schedule = y__}))
        (Maybe Schedule -> f (Maybe Schedule))
-> Maybe Schedule -> f (Maybe Schedule)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateScheduleRequest "conflictToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "conflictToken"
-> (ByteString -> f ByteString)
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
fieldOf Proxy# "conflictToken"
_
    = ((ByteString -> f ByteString)
 -> UpdateScheduleRequest -> f UpdateScheduleRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateScheduleRequest -> ByteString)
-> (UpdateScheduleRequest -> ByteString -> UpdateScheduleRequest)
-> Lens
     UpdateScheduleRequest UpdateScheduleRequest ByteString ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateScheduleRequest -> ByteString
_UpdateScheduleRequest'conflictToken
           (\ UpdateScheduleRequest
x__ ByteString
y__ -> UpdateScheduleRequest
x__ {_UpdateScheduleRequest'conflictToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateScheduleRequest "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> UpdateScheduleRequest -> f UpdateScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateScheduleRequest -> Text)
-> (UpdateScheduleRequest -> Text -> UpdateScheduleRequest)
-> Lens UpdateScheduleRequest UpdateScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateScheduleRequest -> Text
_UpdateScheduleRequest'identity
           (\ UpdateScheduleRequest
x__ Text
y__ -> UpdateScheduleRequest
x__ {_UpdateScheduleRequest'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateScheduleRequest "requestId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestId"
-> (Text -> f Text)
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
fieldOf Proxy# "requestId"
_
    = ((Text -> f Text)
 -> UpdateScheduleRequest -> f UpdateScheduleRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateScheduleRequest -> Text)
-> (UpdateScheduleRequest -> Text -> UpdateScheduleRequest)
-> Lens UpdateScheduleRequest UpdateScheduleRequest Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateScheduleRequest -> Text
_UpdateScheduleRequest'requestId
           (\ UpdateScheduleRequest
x__ Text
y__ -> UpdateScheduleRequest
x__ {_UpdateScheduleRequest'requestId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateScheduleRequest "searchAttributes" Proto.Temporal.Api.Common.V1.Message.SearchAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "searchAttributes"
-> (SearchAttributes -> f SearchAttributes)
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
fieldOf Proxy# "searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> UpdateScheduleRequest -> f UpdateScheduleRequest)
-> ((SearchAttributes -> f SearchAttributes)
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (SearchAttributes -> f SearchAttributes)
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateScheduleRequest -> Maybe SearchAttributes)
-> (UpdateScheduleRequest
    -> Maybe SearchAttributes -> UpdateScheduleRequest)
-> Lens
     UpdateScheduleRequest
     UpdateScheduleRequest
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateScheduleRequest -> Maybe SearchAttributes
_UpdateScheduleRequest'searchAttributes
           (\ UpdateScheduleRequest
x__ Maybe SearchAttributes
y__ -> UpdateScheduleRequest
x__ {_UpdateScheduleRequest'searchAttributes = y__}))
        (SearchAttributes -> Lens' (Maybe SearchAttributes) SearchAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SearchAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateScheduleRequest "maybe'searchAttributes" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'searchAttributes"
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
fieldOf Proxy# "maybe'searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> UpdateScheduleRequest -> f UpdateScheduleRequest)
-> ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> UpdateScheduleRequest
-> f UpdateScheduleRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateScheduleRequest -> Maybe SearchAttributes)
-> (UpdateScheduleRequest
    -> Maybe SearchAttributes -> UpdateScheduleRequest)
-> Lens
     UpdateScheduleRequest
     UpdateScheduleRequest
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateScheduleRequest -> Maybe SearchAttributes
_UpdateScheduleRequest'searchAttributes
           (\ UpdateScheduleRequest
x__ Maybe SearchAttributes
y__ -> UpdateScheduleRequest
x__ {_UpdateScheduleRequest'searchAttributes = y__}))
        (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> Maybe SearchAttributes -> f (Maybe SearchAttributes)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateScheduleRequest where
  messageName :: Proxy UpdateScheduleRequest -> Text
messageName Proxy UpdateScheduleRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateScheduleRequest"
  packedMessageDescriptor :: Proxy UpdateScheduleRequest -> ByteString
packedMessageDescriptor Proxy UpdateScheduleRequest
_
    = ByteString
"\n\
      \\NAKUpdateScheduleRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
      \\vschedule_id\CAN\STX \SOH(\tR\n\
      \scheduleId\DC2>\n\
      \\bschedule\CAN\ETX \SOH(\v2\".temporal.api.schedule.v1.ScheduleR\bschedule\DC2%\n\
      \\SOconflict_token\CAN\EOT \SOH(\fR\rconflictToken\DC2\SUB\n\
      \\bidentity\CAN\ENQ \SOH(\tR\bidentity\DC2\GS\n\
      \\n\
      \request_id\CAN\ACK \SOH(\tR\trequestId\DC2U\n\
      \\DC1search_attributes\CAN\a \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes"
  packedFileDescriptor :: Proxy UpdateScheduleRequest -> ByteString
packedFileDescriptor Proxy UpdateScheduleRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor UpdateScheduleRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor UpdateScheduleRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateScheduleRequest Text
-> FieldDescriptor UpdateScheduleRequest
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 UpdateScheduleRequest UpdateScheduleRequest Text Text
-> FieldAccessor UpdateScheduleRequest 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 UpdateScheduleRequest
        scheduleId__field_descriptor :: FieldDescriptor UpdateScheduleRequest
scheduleId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateScheduleRequest Text
-> FieldDescriptor UpdateScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule_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 UpdateScheduleRequest UpdateScheduleRequest Text Text
-> FieldAccessor UpdateScheduleRequest 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 @"scheduleId")) ::
              Data.ProtoLens.FieldDescriptor UpdateScheduleRequest
        schedule__field_descriptor :: FieldDescriptor UpdateScheduleRequest
schedule__field_descriptor
          = String
-> FieldTypeDescriptor Schedule
-> FieldAccessor UpdateScheduleRequest Schedule
-> FieldDescriptor UpdateScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule"
              (MessageOrGroup -> FieldTypeDescriptor Schedule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Schedule.V1.Message.Schedule)
              (Lens
  UpdateScheduleRequest
  UpdateScheduleRequest
  (Maybe Schedule)
  (Maybe Schedule)
-> FieldAccessor UpdateScheduleRequest Schedule
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'schedule")) ::
              Data.ProtoLens.FieldDescriptor UpdateScheduleRequest
        conflictToken__field_descriptor :: FieldDescriptor UpdateScheduleRequest
conflictToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor UpdateScheduleRequest ByteString
-> FieldDescriptor UpdateScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"conflict_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     UpdateScheduleRequest UpdateScheduleRequest ByteString ByteString
-> FieldAccessor UpdateScheduleRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"conflictToken")) ::
              Data.ProtoLens.FieldDescriptor UpdateScheduleRequest
        identity__field_descriptor :: FieldDescriptor UpdateScheduleRequest
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateScheduleRequest Text
-> FieldDescriptor UpdateScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"identity"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens UpdateScheduleRequest UpdateScheduleRequest Text Text
-> FieldAccessor UpdateScheduleRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity")) ::
              Data.ProtoLens.FieldDescriptor UpdateScheduleRequest
        requestId__field_descriptor :: FieldDescriptor UpdateScheduleRequest
requestId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateScheduleRequest Text
-> FieldDescriptor UpdateScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens UpdateScheduleRequest UpdateScheduleRequest Text Text
-> FieldAccessor UpdateScheduleRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId")) ::
              Data.ProtoLens.FieldDescriptor UpdateScheduleRequest
        searchAttributes__field_descriptor :: FieldDescriptor UpdateScheduleRequest
searchAttributes__field_descriptor
          = String
-> FieldTypeDescriptor SearchAttributes
-> FieldAccessor UpdateScheduleRequest SearchAttributes
-> FieldDescriptor UpdateScheduleRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"search_attributes"
              (MessageOrGroup -> FieldTypeDescriptor SearchAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.SearchAttributes)
              (Lens
  UpdateScheduleRequest
  UpdateScheduleRequest
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> FieldAccessor UpdateScheduleRequest SearchAttributes
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'searchAttributes")) ::
              Data.ProtoLens.FieldDescriptor UpdateScheduleRequest
      in
        [(Tag, FieldDescriptor UpdateScheduleRequest)]
-> Map Tag (FieldDescriptor UpdateScheduleRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor UpdateScheduleRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor UpdateScheduleRequest
scheduleId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor UpdateScheduleRequest
schedule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor UpdateScheduleRequest
conflictToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor UpdateScheduleRequest
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor UpdateScheduleRequest
requestId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor UpdateScheduleRequest
searchAttributes__field_descriptor)]
  unknownFields :: Lens' UpdateScheduleRequest FieldSet
unknownFields
    = (UpdateScheduleRequest -> FieldSet)
-> (UpdateScheduleRequest -> FieldSet -> UpdateScheduleRequest)
-> Lens' UpdateScheduleRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateScheduleRequest -> FieldSet
_UpdateScheduleRequest'_unknownFields
        (\ UpdateScheduleRequest
x__ FieldSet
y__ -> UpdateScheduleRequest
x__ {_UpdateScheduleRequest'_unknownFields = y__})
  defMessage :: UpdateScheduleRequest
defMessage
    = UpdateScheduleRequest'_constructor
        {_UpdateScheduleRequest'namespace :: Text
_UpdateScheduleRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateScheduleRequest'scheduleId :: Text
_UpdateScheduleRequest'scheduleId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateScheduleRequest'schedule :: Maybe Schedule
_UpdateScheduleRequest'schedule = Maybe Schedule
forall a. Maybe a
Prelude.Nothing,
         _UpdateScheduleRequest'conflictToken :: ByteString
_UpdateScheduleRequest'conflictToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateScheduleRequest'identity :: Text
_UpdateScheduleRequest'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateScheduleRequest'requestId :: Text
_UpdateScheduleRequest'requestId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateScheduleRequest'searchAttributes :: Maybe SearchAttributes
_UpdateScheduleRequest'searchAttributes = Maybe SearchAttributes
forall a. Maybe a
Prelude.Nothing,
         _UpdateScheduleRequest'_unknownFields :: FieldSet
_UpdateScheduleRequest'_unknownFields = []}
  parseMessage :: Parser UpdateScheduleRequest
parseMessage
    = let
        loop ::
          UpdateScheduleRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateScheduleRequest
        loop :: UpdateScheduleRequest -> Parser UpdateScheduleRequest
loop UpdateScheduleRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
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
"schedule_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"scheduleId") y x)
                        Word64
26
                          -> do y <- Parser Schedule -> String -> Parser Schedule
forall a. Parser a -> String -> Parser a
(Data.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"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"schedule") y x)
                        Word64
34
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"conflict_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"conflictToken") y x)
                        Word64
42
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
50
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"request_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x)
                        Word64
58
                          -> do y <- Parser SearchAttributes -> String -> Parser SearchAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"search_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"searchAttributes") y x)
                        Word64
wire
                          -> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
                                        Word64
wire
                                loop
                                  (Lens.Family2.over
                                     Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
      in
        Parser UpdateScheduleRequest
-> String -> Parser UpdateScheduleRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateScheduleRequest -> Parser UpdateScheduleRequest
loop UpdateScheduleRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"UpdateScheduleRequest"
  buildMessage :: UpdateScheduleRequest -> Builder
buildMessage
    = \ UpdateScheduleRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike Text UpdateScheduleRequest UpdateScheduleRequest Text Text
-> UpdateScheduleRequest -> 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") UpdateScheduleRequest
_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 UpdateScheduleRequest UpdateScheduleRequest Text Text
-> UpdateScheduleRequest -> 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 @"scheduleId") UpdateScheduleRequest
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe Schedule)
  UpdateScheduleRequest
  UpdateScheduleRequest
  (Maybe Schedule)
  (Maybe Schedule)
-> UpdateScheduleRequest -> Maybe Schedule
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'schedule") UpdateScheduleRequest
_x
                    of
                      Maybe Schedule
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just Schedule
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                             ((ByteString -> Builder)
-> (Schedule -> ByteString) -> Schedule -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                Schedule -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Schedule
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: ByteString
_v
                           = FoldLike
  ByteString
  UpdateScheduleRequest
  UpdateScheduleRequest
  ByteString
  ByteString
-> UpdateScheduleRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                               (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"conflictToken") UpdateScheduleRequest
_x
                       in
                         if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                             Builder
forall a. Monoid a => a
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
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                  ByteString
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Text
_v = FoldLike Text UpdateScheduleRequest UpdateScheduleRequest Text Text
-> UpdateScheduleRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"identity") UpdateScheduleRequest
_x
                          in
                            if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            else
                                Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                  ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                     (\ ByteString
bs
                                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                             (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                     Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v = FoldLike Text UpdateScheduleRequest UpdateScheduleRequest Text Text
-> UpdateScheduleRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"requestId") UpdateScheduleRequest
_x
                             in
                               if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                                   Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               else
                                   Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                     ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                        (\ ByteString
bs
                                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                   (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                      (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                        Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (case
                                    FoldLike
  (Maybe SearchAttributes)
  UpdateScheduleRequest
  UpdateScheduleRequest
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> UpdateScheduleRequest -> Maybe SearchAttributes
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                      (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'searchAttributes") UpdateScheduleRequest
_x
                                of
                                  Maybe SearchAttributes
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  (Prelude.Just SearchAttributes
_v)
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                         ((ByteString -> Builder)
-> (SearchAttributes -> ByteString) -> SearchAttributes -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                            (\ ByteString
bs
                                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                                          (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                            SearchAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage SearchAttributes
_v))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike
  FieldSet
  UpdateScheduleRequest
  UpdateScheduleRequest
  FieldSet
  FieldSet
-> UpdateScheduleRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateScheduleRequest
  UpdateScheduleRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpdateScheduleRequest FieldSet
Data.ProtoLens.unknownFields UpdateScheduleRequest
_x))))))))
instance Control.DeepSeq.NFData UpdateScheduleRequest where
  rnf :: UpdateScheduleRequest -> ()
rnf
    = \ UpdateScheduleRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateScheduleRequest -> FieldSet
_UpdateScheduleRequest'_unknownFields UpdateScheduleRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateScheduleRequest -> Text
_UpdateScheduleRequest'namespace UpdateScheduleRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpdateScheduleRequest -> Text
_UpdateScheduleRequest'scheduleId UpdateScheduleRequest
x__)
                   (Maybe Schedule -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (UpdateScheduleRequest -> Maybe Schedule
_UpdateScheduleRequest'schedule UpdateScheduleRequest
x__)
                      (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (UpdateScheduleRequest -> ByteString
_UpdateScheduleRequest'conflictToken UpdateScheduleRequest
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (UpdateScheduleRequest -> Text
_UpdateScheduleRequest'identity UpdateScheduleRequest
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (UpdateScheduleRequest -> Text
_UpdateScheduleRequest'requestId UpdateScheduleRequest
x__)
                               (Maybe SearchAttributes -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (UpdateScheduleRequest -> Maybe SearchAttributes
_UpdateScheduleRequest'searchAttributes UpdateScheduleRequest
x__) ())))))))
{- | Fields :
      -}
data UpdateScheduleResponse
  = UpdateScheduleResponse'_constructor {UpdateScheduleResponse -> FieldSet
_UpdateScheduleResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateScheduleResponse -> UpdateScheduleResponse -> Bool
(UpdateScheduleResponse -> UpdateScheduleResponse -> Bool)
-> (UpdateScheduleResponse -> UpdateScheduleResponse -> Bool)
-> Eq UpdateScheduleResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateScheduleResponse -> UpdateScheduleResponse -> Bool
== :: UpdateScheduleResponse -> UpdateScheduleResponse -> Bool
$c/= :: UpdateScheduleResponse -> UpdateScheduleResponse -> Bool
/= :: UpdateScheduleResponse -> UpdateScheduleResponse -> Bool
Prelude.Eq, Eq UpdateScheduleResponse
Eq UpdateScheduleResponse =>
(UpdateScheduleResponse -> UpdateScheduleResponse -> Ordering)
-> (UpdateScheduleResponse -> UpdateScheduleResponse -> Bool)
-> (UpdateScheduleResponse -> UpdateScheduleResponse -> Bool)
-> (UpdateScheduleResponse -> UpdateScheduleResponse -> Bool)
-> (UpdateScheduleResponse -> UpdateScheduleResponse -> Bool)
-> (UpdateScheduleResponse
    -> UpdateScheduleResponse -> UpdateScheduleResponse)
-> (UpdateScheduleResponse
    -> UpdateScheduleResponse -> UpdateScheduleResponse)
-> Ord UpdateScheduleResponse
UpdateScheduleResponse -> UpdateScheduleResponse -> Bool
UpdateScheduleResponse -> UpdateScheduleResponse -> Ordering
UpdateScheduleResponse
-> UpdateScheduleResponse -> UpdateScheduleResponse
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 :: UpdateScheduleResponse -> UpdateScheduleResponse -> Ordering
compare :: UpdateScheduleResponse -> UpdateScheduleResponse -> Ordering
$c< :: UpdateScheduleResponse -> UpdateScheduleResponse -> Bool
< :: UpdateScheduleResponse -> UpdateScheduleResponse -> Bool
$c<= :: UpdateScheduleResponse -> UpdateScheduleResponse -> Bool
<= :: UpdateScheduleResponse -> UpdateScheduleResponse -> Bool
$c> :: UpdateScheduleResponse -> UpdateScheduleResponse -> Bool
> :: UpdateScheduleResponse -> UpdateScheduleResponse -> Bool
$c>= :: UpdateScheduleResponse -> UpdateScheduleResponse -> Bool
>= :: UpdateScheduleResponse -> UpdateScheduleResponse -> Bool
$cmax :: UpdateScheduleResponse
-> UpdateScheduleResponse -> UpdateScheduleResponse
max :: UpdateScheduleResponse
-> UpdateScheduleResponse -> UpdateScheduleResponse
$cmin :: UpdateScheduleResponse
-> UpdateScheduleResponse -> UpdateScheduleResponse
min :: UpdateScheduleResponse
-> UpdateScheduleResponse -> UpdateScheduleResponse
Prelude.Ord)
instance Prelude.Show UpdateScheduleResponse where
  showsPrec :: Int -> UpdateScheduleResponse -> ShowS
showsPrec Int
_ UpdateScheduleResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateScheduleResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateScheduleResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message UpdateScheduleResponse where
  messageName :: Proxy UpdateScheduleResponse -> Text
messageName Proxy UpdateScheduleResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateScheduleResponse"
  packedMessageDescriptor :: Proxy UpdateScheduleResponse -> ByteString
packedMessageDescriptor Proxy UpdateScheduleResponse
_
    = ByteString
"\n\
      \\SYNUpdateScheduleResponse"
  packedFileDescriptor :: Proxy UpdateScheduleResponse -> ByteString
packedFileDescriptor Proxy UpdateScheduleResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor UpdateScheduleResponse)
fieldsByTag = let in [(Tag, FieldDescriptor UpdateScheduleResponse)]
-> Map Tag (FieldDescriptor UpdateScheduleResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' UpdateScheduleResponse FieldSet
unknownFields
    = (UpdateScheduleResponse -> FieldSet)
-> (UpdateScheduleResponse -> FieldSet -> UpdateScheduleResponse)
-> Lens' UpdateScheduleResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateScheduleResponse -> FieldSet
_UpdateScheduleResponse'_unknownFields
        (\ UpdateScheduleResponse
x__ FieldSet
y__ -> UpdateScheduleResponse
x__ {_UpdateScheduleResponse'_unknownFields = y__})
  defMessage :: UpdateScheduleResponse
defMessage
    = UpdateScheduleResponse'_constructor
        {_UpdateScheduleResponse'_unknownFields :: FieldSet
_UpdateScheduleResponse'_unknownFields = []}
  parseMessage :: Parser UpdateScheduleResponse
parseMessage
    = let
        loop ::
          UpdateScheduleResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateScheduleResponse
        loop :: UpdateScheduleResponse -> Parser UpdateScheduleResponse
loop UpdateScheduleResponse
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 UpdateScheduleResponse
-> String -> Parser UpdateScheduleResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateScheduleResponse -> Parser UpdateScheduleResponse
loop UpdateScheduleResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"UpdateScheduleResponse"
  buildMessage :: UpdateScheduleResponse -> Builder
buildMessage
    = \ UpdateScheduleResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  UpdateScheduleResponse
  UpdateScheduleResponse
  FieldSet
  FieldSet
-> UpdateScheduleResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateScheduleResponse
  UpdateScheduleResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpdateScheduleResponse FieldSet
Data.ProtoLens.unknownFields UpdateScheduleResponse
_x)
instance Control.DeepSeq.NFData UpdateScheduleResponse where
  rnf :: UpdateScheduleResponse -> ()
rnf
    = \ UpdateScheduleResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateScheduleResponse -> FieldSet
_UpdateScheduleResponse'_unknownFields UpdateScheduleResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueue' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'operation' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest (Prelude.Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'addNewBuildIdInNewDefaultSet' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest (Prelude.Maybe Data.Text.Text)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.addNewBuildIdInNewDefaultSet' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'addNewCompatibleBuildId' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest (Prelude.Maybe UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.addNewCompatibleBuildId' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'promoteSetByBuildId' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest (Prelude.Maybe Data.Text.Text)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.promoteSetByBuildId' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'promoteBuildIdWithinSet' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest (Prelude.Maybe Data.Text.Text)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.promoteBuildIdWithinSet' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'mergeSets' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest (Prelude.Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.mergeSets' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest UpdateWorkerBuildIdCompatibilityRequest'MergeSets@ -}
data UpdateWorkerBuildIdCompatibilityRequest
  = UpdateWorkerBuildIdCompatibilityRequest'_constructor {UpdateWorkerBuildIdCompatibilityRequest -> Text
_UpdateWorkerBuildIdCompatibilityRequest'namespace :: !Data.Text.Text,
                                                          UpdateWorkerBuildIdCompatibilityRequest -> Text
_UpdateWorkerBuildIdCompatibilityRequest'taskQueue :: !Data.Text.Text,
                                                          UpdateWorkerBuildIdCompatibilityRequest
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_UpdateWorkerBuildIdCompatibilityRequest'operation :: !(Prelude.Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation),
                                                          UpdateWorkerBuildIdCompatibilityRequest -> FieldSet
_UpdateWorkerBuildIdCompatibilityRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Bool
(UpdateWorkerBuildIdCompatibilityRequest
 -> UpdateWorkerBuildIdCompatibilityRequest -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> UpdateWorkerBuildIdCompatibilityRequest -> Bool)
-> Eq UpdateWorkerBuildIdCompatibilityRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Bool
== :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Bool
$c/= :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Bool
/= :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Bool
Prelude.Eq, Eq UpdateWorkerBuildIdCompatibilityRequest
Eq UpdateWorkerBuildIdCompatibilityRequest =>
(UpdateWorkerBuildIdCompatibilityRequest
 -> UpdateWorkerBuildIdCompatibilityRequest -> Ordering)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> UpdateWorkerBuildIdCompatibilityRequest -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> UpdateWorkerBuildIdCompatibilityRequest -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> UpdateWorkerBuildIdCompatibilityRequest -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> UpdateWorkerBuildIdCompatibilityRequest -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> UpdateWorkerBuildIdCompatibilityRequest
    -> UpdateWorkerBuildIdCompatibilityRequest)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> UpdateWorkerBuildIdCompatibilityRequest
    -> UpdateWorkerBuildIdCompatibilityRequest)
-> Ord UpdateWorkerBuildIdCompatibilityRequest
UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Bool
UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Ordering
UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest
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 :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Ordering
compare :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Ordering
$c< :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Bool
< :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Bool
$c<= :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Bool
<= :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Bool
$c> :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Bool
> :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Bool
$c>= :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Bool
>= :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest -> Bool
$cmax :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest
max :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest
$cmin :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest
min :: UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest
-> UpdateWorkerBuildIdCompatibilityRequest
Prelude.Ord)
instance Prelude.Show UpdateWorkerBuildIdCompatibilityRequest where
  showsPrec :: Int -> UpdateWorkerBuildIdCompatibilityRequest -> ShowS
showsPrec Int
_ UpdateWorkerBuildIdCompatibilityRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateWorkerBuildIdCompatibilityRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateWorkerBuildIdCompatibilityRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data UpdateWorkerBuildIdCompatibilityRequest'Operation
  = UpdateWorkerBuildIdCompatibilityRequest'AddNewBuildIdInNewDefaultSet !Data.Text.Text |
    UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleBuildId !UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion |
    UpdateWorkerBuildIdCompatibilityRequest'PromoteSetByBuildId !Data.Text.Text |
    UpdateWorkerBuildIdCompatibilityRequest'PromoteBuildIdWithinSet !Data.Text.Text |
    UpdateWorkerBuildIdCompatibilityRequest'MergeSets' !UpdateWorkerBuildIdCompatibilityRequest'MergeSets
  deriving stock (Int -> UpdateWorkerBuildIdCompatibilityRequest'Operation -> ShowS
[UpdateWorkerBuildIdCompatibilityRequest'Operation] -> ShowS
UpdateWorkerBuildIdCompatibilityRequest'Operation -> String
(Int -> UpdateWorkerBuildIdCompatibilityRequest'Operation -> ShowS)
-> (UpdateWorkerBuildIdCompatibilityRequest'Operation -> String)
-> ([UpdateWorkerBuildIdCompatibilityRequest'Operation] -> ShowS)
-> Show UpdateWorkerBuildIdCompatibilityRequest'Operation
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> UpdateWorkerBuildIdCompatibilityRequest'Operation -> ShowS
showsPrec :: Int -> UpdateWorkerBuildIdCompatibilityRequest'Operation -> ShowS
$cshow :: UpdateWorkerBuildIdCompatibilityRequest'Operation -> String
show :: UpdateWorkerBuildIdCompatibilityRequest'Operation -> String
$cshowList :: [UpdateWorkerBuildIdCompatibilityRequest'Operation] -> ShowS
showList :: [UpdateWorkerBuildIdCompatibilityRequest'Operation] -> ShowS
Prelude.Show, UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool
(UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool)
-> Eq UpdateWorkerBuildIdCompatibilityRequest'Operation
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool
== :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool
$c/= :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool
/= :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool
Prelude.Eq, Eq UpdateWorkerBuildIdCompatibilityRequest'Operation
Eq UpdateWorkerBuildIdCompatibilityRequest'Operation =>
(UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Ordering)
-> (UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Ord UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool
UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Ordering
UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
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 :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Ordering
compare :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Ordering
$c< :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool
< :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool
$c<= :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool
<= :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool
$c> :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool
> :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool
$c>= :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool
>= :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation -> Bool
$cmax :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
max :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
$cmin :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
min :: UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
Prelude.Ord)
instance Data.ProtoLens.Field.HasField UpdateWorkerBuildIdCompatibilityRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> UpdateWorkerBuildIdCompatibilityRequest
 -> f UpdateWorkerBuildIdCompatibilityRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest -> Text)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> Text -> UpdateWorkerBuildIdCompatibilityRequest)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest -> Text
_UpdateWorkerBuildIdCompatibilityRequest'namespace
           (\ UpdateWorkerBuildIdCompatibilityRequest
x__ Text
y__
              -> UpdateWorkerBuildIdCompatibilityRequest
x__ {_UpdateWorkerBuildIdCompatibilityRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerBuildIdCompatibilityRequest "taskQueue" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "taskQueue"
_
    = ((Text -> f Text)
 -> UpdateWorkerBuildIdCompatibilityRequest
 -> f UpdateWorkerBuildIdCompatibilityRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest -> Text)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> Text -> UpdateWorkerBuildIdCompatibilityRequest)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest -> Text
_UpdateWorkerBuildIdCompatibilityRequest'taskQueue
           (\ UpdateWorkerBuildIdCompatibilityRequest
x__ Text
y__
              -> UpdateWorkerBuildIdCompatibilityRequest
x__ {_UpdateWorkerBuildIdCompatibilityRequest'taskQueue = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerBuildIdCompatibilityRequest "maybe'operation" (Prelude.Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'operation"
-> (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "maybe'operation"
_
    = ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
  -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
 -> UpdateWorkerBuildIdCompatibilityRequest
 -> f UpdateWorkerBuildIdCompatibilityRequest)
-> ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
     -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_UpdateWorkerBuildIdCompatibilityRequest'operation
           (\ UpdateWorkerBuildIdCompatibilityRequest
x__ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
y__
              -> UpdateWorkerBuildIdCompatibilityRequest
x__ {_UpdateWorkerBuildIdCompatibilityRequest'operation = y__}))
        (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
-> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerBuildIdCompatibilityRequest "maybe'addNewBuildIdInNewDefaultSet" (Prelude.Maybe Data.Text.Text) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'addNewBuildIdInNewDefaultSet"
-> (Maybe Text -> f (Maybe Text))
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "maybe'addNewBuildIdInNewDefaultSet"
_
    = ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
  -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
 -> UpdateWorkerBuildIdCompatibilityRequest
 -> f UpdateWorkerBuildIdCompatibilityRequest)
-> ((Maybe Text -> f (Maybe Text))
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> (Maybe Text -> f (Maybe Text))
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_UpdateWorkerBuildIdCompatibilityRequest'operation
           (\ UpdateWorkerBuildIdCompatibilityRequest
x__ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
y__
              -> UpdateWorkerBuildIdCompatibilityRequest
x__ {_UpdateWorkerBuildIdCompatibilityRequest'operation = y__}))
        ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> Maybe Text)
-> (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> Maybe Text
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Lens
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__
              -> case Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__ of
                   (Prelude.Just (UpdateWorkerBuildIdCompatibilityRequest'AddNewBuildIdInNewDefaultSet Text
x__val))
                     -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
x__val
                   Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_ Maybe Text
y__
              -> (Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Maybe Text
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'AddNewBuildIdInNewDefaultSet
                   Maybe Text
y__))
instance Data.ProtoLens.Field.HasField UpdateWorkerBuildIdCompatibilityRequest "addNewBuildIdInNewDefaultSet" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "addNewBuildIdInNewDefaultSet"
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "addNewBuildIdInNewDefaultSet"
_
    = ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
  -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
 -> UpdateWorkerBuildIdCompatibilityRequest
 -> f UpdateWorkerBuildIdCompatibilityRequest)
-> ((Text -> f Text)
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_UpdateWorkerBuildIdCompatibilityRequest'operation
           (\ UpdateWorkerBuildIdCompatibilityRequest
x__ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
y__
              -> UpdateWorkerBuildIdCompatibilityRequest
x__ {_UpdateWorkerBuildIdCompatibilityRequest'operation = y__}))
        (((Maybe Text -> f (Maybe Text))
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> ((Text -> f Text) -> Maybe Text -> f (Maybe Text))
-> (Text -> f Text)
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
-> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> Maybe Text)
-> (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> Maybe Text
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Lens
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__
                 -> case Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__ of
                      (Prelude.Just (UpdateWorkerBuildIdCompatibilityRequest'AddNewBuildIdInNewDefaultSet Text
x__val))
                        -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
x__val
                      Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_ Maybe Text
y__
                 -> (Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Maybe Text
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'AddNewBuildIdInNewDefaultSet
                      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.Field.HasField UpdateWorkerBuildIdCompatibilityRequest "maybe'addNewCompatibleBuildId" (Prelude.Maybe UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'addNewCompatibleBuildId"
-> (Maybe
      UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> f (Maybe
            UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion))
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "maybe'addNewCompatibleBuildId"
_
    = ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
  -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
 -> UpdateWorkerBuildIdCompatibilityRequest
 -> f UpdateWorkerBuildIdCompatibilityRequest)
-> ((Maybe
       UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     -> f (Maybe
             UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion))
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> (Maybe
      UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> f (Maybe
            UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion))
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_UpdateWorkerBuildIdCompatibilityRequest'operation
           (\ UpdateWorkerBuildIdCompatibilityRequest
x__ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
y__
              -> UpdateWorkerBuildIdCompatibilityRequest
x__ {_UpdateWorkerBuildIdCompatibilityRequest'operation = y__}))
        ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> Maybe
      UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> Maybe
         UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Lens
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe
        UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
     (Maybe
        UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__
              -> case Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__ of
                   (Prelude.Just (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleBuildId UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__val))
                     -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Maybe
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall a. a -> Maybe a
Prelude.Just UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__val
                   Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_otherwise -> Maybe
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_ Maybe
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
y__
              -> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
 -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Maybe
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleBuildId
                   Maybe
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
y__))
instance Data.ProtoLens.Field.HasField UpdateWorkerBuildIdCompatibilityRequest "addNewCompatibleBuildId" UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "addNewCompatibleBuildId"
-> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> f UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "addNewCompatibleBuildId"
_
    = ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
  -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
 -> UpdateWorkerBuildIdCompatibilityRequest
 -> f UpdateWorkerBuildIdCompatibilityRequest)
-> ((UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     -> f UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> f UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_UpdateWorkerBuildIdCompatibilityRequest'operation
           (\ UpdateWorkerBuildIdCompatibilityRequest
x__ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
y__
              -> UpdateWorkerBuildIdCompatibilityRequest
x__ {_UpdateWorkerBuildIdCompatibilityRequest'operation = y__}))
        (((Maybe
    UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
  -> f (Maybe
          UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion))
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> ((UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     -> f UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
    -> Maybe
         UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> f (Maybe
            UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion))
-> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> f UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
-> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> Maybe
      UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> Maybe
         UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Lens
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe
        UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
     (Maybe
        UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__
                 -> case Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__ of
                      (Prelude.Just (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleBuildId UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__val))
                        -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Maybe
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall a. a -> Maybe a
Prelude.Just UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__val
                      Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_otherwise -> Maybe
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_ Maybe
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
y__
                 -> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
 -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Maybe
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleBuildId
                      Maybe
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
y__))
           (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Lens'
     (Maybe
        UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField UpdateWorkerBuildIdCompatibilityRequest "maybe'promoteSetByBuildId" (Prelude.Maybe Data.Text.Text) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'promoteSetByBuildId"
-> (Maybe Text -> f (Maybe Text))
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "maybe'promoteSetByBuildId"
_
    = ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
  -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
 -> UpdateWorkerBuildIdCompatibilityRequest
 -> f UpdateWorkerBuildIdCompatibilityRequest)
-> ((Maybe Text -> f (Maybe Text))
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> (Maybe Text -> f (Maybe Text))
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_UpdateWorkerBuildIdCompatibilityRequest'operation
           (\ UpdateWorkerBuildIdCompatibilityRequest
x__ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
y__
              -> UpdateWorkerBuildIdCompatibilityRequest
x__ {_UpdateWorkerBuildIdCompatibilityRequest'operation = y__}))
        ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> Maybe Text)
-> (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> Maybe Text
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Lens
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__
              -> case Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__ of
                   (Prelude.Just (UpdateWorkerBuildIdCompatibilityRequest'PromoteSetByBuildId Text
x__val))
                     -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
x__val
                   Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_ Maybe Text
y__
              -> (Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Maybe Text
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'PromoteSetByBuildId Maybe Text
y__))
instance Data.ProtoLens.Field.HasField UpdateWorkerBuildIdCompatibilityRequest "promoteSetByBuildId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "promoteSetByBuildId"
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "promoteSetByBuildId"
_
    = ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
  -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
 -> UpdateWorkerBuildIdCompatibilityRequest
 -> f UpdateWorkerBuildIdCompatibilityRequest)
-> ((Text -> f Text)
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_UpdateWorkerBuildIdCompatibilityRequest'operation
           (\ UpdateWorkerBuildIdCompatibilityRequest
x__ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
y__
              -> UpdateWorkerBuildIdCompatibilityRequest
x__ {_UpdateWorkerBuildIdCompatibilityRequest'operation = y__}))
        (((Maybe Text -> f (Maybe Text))
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> ((Text -> f Text) -> Maybe Text -> f (Maybe Text))
-> (Text -> f Text)
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
-> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> Maybe Text)
-> (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> Maybe Text
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Lens
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__
                 -> case Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__ of
                      (Prelude.Just (UpdateWorkerBuildIdCompatibilityRequest'PromoteSetByBuildId Text
x__val))
                        -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
x__val
                      Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_ Maybe Text
y__
                 -> (Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Maybe Text
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'PromoteSetByBuildId 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.Field.HasField UpdateWorkerBuildIdCompatibilityRequest "maybe'promoteBuildIdWithinSet" (Prelude.Maybe Data.Text.Text) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'promoteBuildIdWithinSet"
-> (Maybe Text -> f (Maybe Text))
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "maybe'promoteBuildIdWithinSet"
_
    = ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
  -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
 -> UpdateWorkerBuildIdCompatibilityRequest
 -> f UpdateWorkerBuildIdCompatibilityRequest)
-> ((Maybe Text -> f (Maybe Text))
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> (Maybe Text -> f (Maybe Text))
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_UpdateWorkerBuildIdCompatibilityRequest'operation
           (\ UpdateWorkerBuildIdCompatibilityRequest
x__ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
y__
              -> UpdateWorkerBuildIdCompatibilityRequest
x__ {_UpdateWorkerBuildIdCompatibilityRequest'operation = y__}))
        ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> Maybe Text)
-> (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> Maybe Text
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Lens
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__
              -> case Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__ of
                   (Prelude.Just (UpdateWorkerBuildIdCompatibilityRequest'PromoteBuildIdWithinSet Text
x__val))
                     -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
x__val
                   Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_ Maybe Text
y__
              -> (Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Maybe Text
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'PromoteBuildIdWithinSet
                   Maybe Text
y__))
instance Data.ProtoLens.Field.HasField UpdateWorkerBuildIdCompatibilityRequest "promoteBuildIdWithinSet" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "promoteBuildIdWithinSet"
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "promoteBuildIdWithinSet"
_
    = ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
  -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
 -> UpdateWorkerBuildIdCompatibilityRequest
 -> f UpdateWorkerBuildIdCompatibilityRequest)
-> ((Text -> f Text)
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_UpdateWorkerBuildIdCompatibilityRequest'operation
           (\ UpdateWorkerBuildIdCompatibilityRequest
x__ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
y__
              -> UpdateWorkerBuildIdCompatibilityRequest
x__ {_UpdateWorkerBuildIdCompatibilityRequest'operation = y__}))
        (((Maybe Text -> f (Maybe Text))
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> ((Text -> f Text) -> Maybe Text -> f (Maybe Text))
-> (Text -> f Text)
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
-> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> Maybe Text)
-> (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> Maybe Text
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Lens
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__
                 -> case Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__ of
                      (Prelude.Just (UpdateWorkerBuildIdCompatibilityRequest'PromoteBuildIdWithinSet Text
x__val))
                        -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
x__val
                      Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_ Maybe Text
y__
                 -> (Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Maybe Text
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'PromoteBuildIdWithinSet
                      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.Field.HasField UpdateWorkerBuildIdCompatibilityRequest "maybe'mergeSets" (Prelude.Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'mergeSets"
-> (Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets))
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "maybe'mergeSets"
_
    = ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
  -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
 -> UpdateWorkerBuildIdCompatibilityRequest
 -> f UpdateWorkerBuildIdCompatibilityRequest)
-> ((Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
     -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets))
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> (Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets))
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_UpdateWorkerBuildIdCompatibilityRequest'operation
           (\ UpdateWorkerBuildIdCompatibilityRequest
x__ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
y__
              -> UpdateWorkerBuildIdCompatibilityRequest
x__ {_UpdateWorkerBuildIdCompatibilityRequest'operation = y__}))
        ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
-> (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Lens
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__
              -> case Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__ of
                   (Prelude.Just (UpdateWorkerBuildIdCompatibilityRequest'MergeSets' UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__val))
                     -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall a. a -> Maybe a
Prelude.Just UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__val
                   Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_otherwise -> Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_ Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
y__
              -> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
 -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'MergeSets' Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
y__))
instance Data.ProtoLens.Field.HasField UpdateWorkerBuildIdCompatibilityRequest "mergeSets" UpdateWorkerBuildIdCompatibilityRequest'MergeSets where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "mergeSets"
-> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> f UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
fieldOf Proxy# "mergeSets"
_
    = ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
  -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
 -> UpdateWorkerBuildIdCompatibilityRequest
 -> f UpdateWorkerBuildIdCompatibilityRequest)
-> ((UpdateWorkerBuildIdCompatibilityRequest'MergeSets
     -> f UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> f UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
-> UpdateWorkerBuildIdCompatibilityRequest
-> f UpdateWorkerBuildIdCompatibilityRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> UpdateWorkerBuildIdCompatibilityRequest)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_UpdateWorkerBuildIdCompatibilityRequest'operation
           (\ UpdateWorkerBuildIdCompatibilityRequest
x__ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
y__
              -> UpdateWorkerBuildIdCompatibilityRequest
x__ {_UpdateWorkerBuildIdCompatibilityRequest'operation = y__}))
        (((Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
  -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets))
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation))
-> ((UpdateWorkerBuildIdCompatibilityRequest'MergeSets
     -> f UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets))
-> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> f UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
-> f (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
 -> Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
-> (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Lens
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__
                 -> case Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
x__ of
                      (Prelude.Just (UpdateWorkerBuildIdCompatibilityRequest'MergeSets' UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__val))
                        -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall a. a -> Maybe a
Prelude.Just UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__val
                      Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_otherwise -> Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_ Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
y__
                 -> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
 -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'MergeSets' Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
y__))
           (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> Lens'
     (Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message UpdateWorkerBuildIdCompatibilityRequest where
  messageName :: Proxy UpdateWorkerBuildIdCompatibilityRequest -> Text
messageName Proxy UpdateWorkerBuildIdCompatibilityRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateWorkerBuildIdCompatibilityRequest"
  packedMessageDescriptor :: Proxy UpdateWorkerBuildIdCompatibilityRequest -> ByteString
packedMessageDescriptor Proxy UpdateWorkerBuildIdCompatibilityRequest
_
    = ByteString
"\n\
      \'UpdateWorkerBuildIdCompatibilityRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\GS\n\
      \\n\
      \task_queue\CAN\STX \SOH(\tR\ttaskQueue\DC2K\n\
      \#add_new_build_id_in_new_default_set\CAN\ETX \SOH(\tH\NULR\FSaddNewBuildIdInNewDefaultSet\DC2\160\SOH\n\
      \\ESCadd_new_compatible_build_id\CAN\EOT \SOH(\v2`.temporal.api.workflowservice.v1.UpdateWorkerBuildIdCompatibilityRequest.AddNewCompatibleVersionH\NULR\ETBaddNewCompatibleBuildId\DC26\n\
      \\ETBpromote_set_by_build_id\CAN\ENQ \SOH(\tH\NULR\DC3promoteSetByBuildId\DC2>\n\
      \\ESCpromote_build_id_within_set\CAN\ACK \SOH(\tH\NULR\ETBpromoteBuildIdWithinSet\DC2s\n\
      \\n\
      \merge_sets\CAN\a \SOH(\v2R.temporal.api.workflowservice.v1.UpdateWorkerBuildIdCompatibilityRequest.MergeSetsH\NULR\tmergeSets\SUB\166\SOH\n\
      \\ETBAddNewCompatibleVersion\DC2 \n\
      \\fnew_build_id\CAN\SOH \SOH(\tR\n\
      \newBuildId\DC2?\n\
      \\FSexisting_compatible_build_id\CAN\STX \SOH(\tR\EMexistingCompatibleBuildId\DC2(\n\
      \\DLEmake_set_default\CAN\ETX \SOH(\bR\SOmakeSetDefault\SUBq\n\
      \\tMergeSets\DC2/\n\
      \\DC4primary_set_build_id\CAN\SOH \SOH(\tR\DC1primarySetBuildId\DC23\n\
      \\SYNsecondary_set_build_id\CAN\STX \SOH(\tR\DC3secondarySetBuildIdB\v\n\
      \\toperation"
  packedFileDescriptor :: Proxy UpdateWorkerBuildIdCompatibilityRequest -> ByteString
packedFileDescriptor Proxy UpdateWorkerBuildIdCompatibilityRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateWorkerBuildIdCompatibilityRequest Text
-> FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
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
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest
     Text
     Text
-> FieldAccessor UpdateWorkerBuildIdCompatibilityRequest 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 UpdateWorkerBuildIdCompatibilityRequest
        taskQueue__field_descriptor :: FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateWorkerBuildIdCompatibilityRequest Text
-> FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
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
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest
     Text
     Text
-> FieldAccessor UpdateWorkerBuildIdCompatibilityRequest 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 UpdateWorkerBuildIdCompatibilityRequest
        addNewBuildIdInNewDefaultSet__field_descriptor :: FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
addNewBuildIdInNewDefaultSet__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateWorkerBuildIdCompatibilityRequest Text
-> FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"add_new_build_id_in_new_default_set"
              (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' UpdateWorkerBuildIdCompatibilityRequest (Maybe Text)
-> FieldAccessor UpdateWorkerBuildIdCompatibilityRequest 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'addNewBuildIdInNewDefaultSet")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
        addNewCompatibleBuildId__field_descriptor :: FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
addNewCompatibleBuildId__field_descriptor
          = String
-> FieldTypeDescriptor
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> FieldAccessor
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"add_new_compatible_build_id"
              (MessageOrGroup
-> FieldTypeDescriptor
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
              (Lens'
  UpdateWorkerBuildIdCompatibilityRequest
  (Maybe
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> FieldAccessor
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'addNewCompatibleBuildId")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
        promoteSetByBuildId__field_descriptor :: FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
promoteSetByBuildId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateWorkerBuildIdCompatibilityRequest Text
-> FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"promote_set_by_build_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (Lens' UpdateWorkerBuildIdCompatibilityRequest (Maybe Text)
-> FieldAccessor UpdateWorkerBuildIdCompatibilityRequest 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'promoteSetByBuildId")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
        promoteBuildIdWithinSet__field_descriptor :: FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
promoteBuildIdWithinSet__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateWorkerBuildIdCompatibilityRequest Text
-> FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"promote_build_id_within_set"
              (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' UpdateWorkerBuildIdCompatibilityRequest (Maybe Text)
-> FieldAccessor UpdateWorkerBuildIdCompatibilityRequest 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'promoteBuildIdWithinSet")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
        mergeSets__field_descriptor :: FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
mergeSets__field_descriptor
          = String
-> FieldTypeDescriptor
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> FieldAccessor
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"merge_sets"
              (MessageOrGroup
-> FieldTypeDescriptor
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
              (Lens'
  UpdateWorkerBuildIdCompatibilityRequest
  (Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
-> FieldAccessor
     UpdateWorkerBuildIdCompatibilityRequest
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'mergeSets")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
      in
        [(Tag, FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest)]
-> Map
     Tag (FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, 
            FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
addNewBuildIdInNewDefaultSet__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
addNewCompatibleBuildId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
promoteSetByBuildId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
promoteBuildIdWithinSet__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest
mergeSets__field_descriptor)]
  unknownFields :: Lens' UpdateWorkerBuildIdCompatibilityRequest FieldSet
unknownFields
    = (UpdateWorkerBuildIdCompatibilityRequest -> FieldSet)
-> (UpdateWorkerBuildIdCompatibilityRequest
    -> FieldSet -> UpdateWorkerBuildIdCompatibilityRequest)
-> Lens' UpdateWorkerBuildIdCompatibilityRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateWorkerBuildIdCompatibilityRequest -> FieldSet
_UpdateWorkerBuildIdCompatibilityRequest'_unknownFields
        (\ UpdateWorkerBuildIdCompatibilityRequest
x__ FieldSet
y__
           -> UpdateWorkerBuildIdCompatibilityRequest
x__
                {_UpdateWorkerBuildIdCompatibilityRequest'_unknownFields = y__})
  defMessage :: UpdateWorkerBuildIdCompatibilityRequest
defMessage
    = UpdateWorkerBuildIdCompatibilityRequest'_constructor
        {_UpdateWorkerBuildIdCompatibilityRequest'namespace :: Text
_UpdateWorkerBuildIdCompatibilityRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerBuildIdCompatibilityRequest'taskQueue :: Text
_UpdateWorkerBuildIdCompatibilityRequest'taskQueue = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerBuildIdCompatibilityRequest'operation :: Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_UpdateWorkerBuildIdCompatibilityRequest'operation = Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
forall a. Maybe a
Prelude.Nothing,
         _UpdateWorkerBuildIdCompatibilityRequest'_unknownFields :: FieldSet
_UpdateWorkerBuildIdCompatibilityRequest'_unknownFields = []}
  parseMessage :: Parser UpdateWorkerBuildIdCompatibilityRequest
parseMessage
    = let
        loop ::
          UpdateWorkerBuildIdCompatibilityRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateWorkerBuildIdCompatibilityRequest
        loop :: UpdateWorkerBuildIdCompatibilityRequest
-> Parser UpdateWorkerBuildIdCompatibilityRequest
loop UpdateWorkerBuildIdCompatibilityRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
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)
                        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
"add_new_build_id_in_new_default_set"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"addNewBuildIdInNewDefaultSet") y
                                     x)
                        Word64
34
                          -> do y <- Parser
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> String
-> Parser
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"add_new_compatible_build_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"addNewCompatibleBuildId") y x)
                        Word64
42
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"promote_set_by_build_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"promoteSetByBuildId") y x)
                        Word64
50
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"promote_build_id_within_set"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"promoteBuildIdWithinSet") y x)
                        Word64
58
                          -> do y <- Parser UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> String
-> Parser UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"merge_sets"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"mergeSets") 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 UpdateWorkerBuildIdCompatibilityRequest
-> String -> Parser UpdateWorkerBuildIdCompatibilityRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateWorkerBuildIdCompatibilityRequest
-> Parser UpdateWorkerBuildIdCompatibilityRequest
loop UpdateWorkerBuildIdCompatibilityRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"UpdateWorkerBuildIdCompatibilityRequest"
  buildMessage :: UpdateWorkerBuildIdCompatibilityRequest -> Builder
buildMessage
    = \ UpdateWorkerBuildIdCompatibilityRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  UpdateWorkerBuildIdCompatibilityRequest
  UpdateWorkerBuildIdCompatibilityRequest
  Text
  Text
-> UpdateWorkerBuildIdCompatibilityRequest -> 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") UpdateWorkerBuildIdCompatibilityRequest
_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
  UpdateWorkerBuildIdCompatibilityRequest
  UpdateWorkerBuildIdCompatibilityRequest
  Text
  Text
-> UpdateWorkerBuildIdCompatibilityRequest -> 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") UpdateWorkerBuildIdCompatibilityRequest
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (case
                        FoldLike
  (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
  UpdateWorkerBuildIdCompatibilityRequest
  UpdateWorkerBuildIdCompatibilityRequest
  (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
  (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> UpdateWorkerBuildIdCompatibilityRequest
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'operation") UpdateWorkerBuildIdCompatibilityRequest
_x
                    of
                      Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just (UpdateWorkerBuildIdCompatibilityRequest'AddNewBuildIdInNewDefaultSet 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)
                      (Prelude.Just (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleBuildId UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
v))
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                             ((ByteString -> Builder)
-> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> ByteString)
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
v)
                      (Prelude.Just (UpdateWorkerBuildIdCompatibilityRequest'PromoteSetByBuildId Text
v))
                        -> 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)
                      (Prelude.Just (UpdateWorkerBuildIdCompatibilityRequest'PromoteBuildIdWithinSet Text
v))
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                             ((ByteString -> Builder) -> (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)
                      (Prelude.Just (UpdateWorkerBuildIdCompatibilityRequest'MergeSets' UpdateWorkerBuildIdCompatibilityRequest'MergeSets
v))
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                             ((ByteString -> Builder)
-> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> ByteString)
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                (\ ByteString
bs
                                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                           (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                        (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateWorkerBuildIdCompatibilityRequest'MergeSets
v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  UpdateWorkerBuildIdCompatibilityRequest
  UpdateWorkerBuildIdCompatibilityRequest
  FieldSet
  FieldSet
-> UpdateWorkerBuildIdCompatibilityRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateWorkerBuildIdCompatibilityRequest
  UpdateWorkerBuildIdCompatibilityRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpdateWorkerBuildIdCompatibilityRequest FieldSet
Data.ProtoLens.unknownFields UpdateWorkerBuildIdCompatibilityRequest
_x))))
instance Control.DeepSeq.NFData UpdateWorkerBuildIdCompatibilityRequest where
  rnf :: UpdateWorkerBuildIdCompatibilityRequest -> ()
rnf
    = \ UpdateWorkerBuildIdCompatibilityRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateWorkerBuildIdCompatibilityRequest -> FieldSet
_UpdateWorkerBuildIdCompatibilityRequest'_unknownFields UpdateWorkerBuildIdCompatibilityRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateWorkerBuildIdCompatibilityRequest -> Text
_UpdateWorkerBuildIdCompatibilityRequest'namespace UpdateWorkerBuildIdCompatibilityRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpdateWorkerBuildIdCompatibilityRequest -> Text
_UpdateWorkerBuildIdCompatibilityRequest'taskQueue UpdateWorkerBuildIdCompatibilityRequest
x__)
                   (Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (UpdateWorkerBuildIdCompatibilityRequest
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'Operation
_UpdateWorkerBuildIdCompatibilityRequest'operation UpdateWorkerBuildIdCompatibilityRequest
x__) ())))
instance Control.DeepSeq.NFData UpdateWorkerBuildIdCompatibilityRequest'Operation where
  rnf :: UpdateWorkerBuildIdCompatibilityRequest'Operation -> ()
rnf
    (UpdateWorkerBuildIdCompatibilityRequest'AddNewBuildIdInNewDefaultSet Text
x__)
    = Text -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Text
x__
  rnf
    (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleBuildId UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__)
    = UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__
  rnf
    (UpdateWorkerBuildIdCompatibilityRequest'PromoteSetByBuildId Text
x__)
    = Text -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Text
x__
  rnf
    (UpdateWorkerBuildIdCompatibilityRequest'PromoteBuildIdWithinSet Text
x__)
    = Text -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Text
x__
  rnf (UpdateWorkerBuildIdCompatibilityRequest'MergeSets' UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__)
    = UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__
_UpdateWorkerBuildIdCompatibilityRequest'AddNewBuildIdInNewDefaultSet ::
  Data.ProtoLens.Prism.Prism' UpdateWorkerBuildIdCompatibilityRequest'Operation Data.Text.Text
_UpdateWorkerBuildIdCompatibilityRequest'AddNewBuildIdInNewDefaultSet :: Prism' UpdateWorkerBuildIdCompatibilityRequest'Operation Text
_UpdateWorkerBuildIdCompatibilityRequest'AddNewBuildIdInNewDefaultSet
  = (Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> Maybe Text)
-> Prism' UpdateWorkerBuildIdCompatibilityRequest'Operation Text
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'AddNewBuildIdInNewDefaultSet
      (\ UpdateWorkerBuildIdCompatibilityRequest'Operation
p__
         -> case UpdateWorkerBuildIdCompatibilityRequest'Operation
p__ of
              (UpdateWorkerBuildIdCompatibilityRequest'AddNewBuildIdInNewDefaultSet Text
p__val)
                -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
p__val
              UpdateWorkerBuildIdCompatibilityRequest'Operation
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleBuildId ::
  Data.ProtoLens.Prism.Prism' UpdateWorkerBuildIdCompatibilityRequest'Operation UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleBuildId :: Prism'
  UpdateWorkerBuildIdCompatibilityRequest'Operation
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleBuildId
  = (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
 -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> Maybe
         UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> Prism'
     UpdateWorkerBuildIdCompatibilityRequest'Operation
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleBuildId
      (\ UpdateWorkerBuildIdCompatibilityRequest'Operation
p__
         -> case UpdateWorkerBuildIdCompatibilityRequest'Operation
p__ of
              (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleBuildId UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
p__val)
                -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Maybe
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall a. a -> Maybe a
Prelude.Just UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
p__val
              UpdateWorkerBuildIdCompatibilityRequest'Operation
_otherwise -> Maybe
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall a. Maybe a
Prelude.Nothing)
_UpdateWorkerBuildIdCompatibilityRequest'PromoteSetByBuildId ::
  Data.ProtoLens.Prism.Prism' UpdateWorkerBuildIdCompatibilityRequest'Operation Data.Text.Text
_UpdateWorkerBuildIdCompatibilityRequest'PromoteSetByBuildId :: Prism' UpdateWorkerBuildIdCompatibilityRequest'Operation Text
_UpdateWorkerBuildIdCompatibilityRequest'PromoteSetByBuildId
  = (Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> Maybe Text)
-> Prism' UpdateWorkerBuildIdCompatibilityRequest'Operation Text
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'PromoteSetByBuildId
      (\ UpdateWorkerBuildIdCompatibilityRequest'Operation
p__
         -> case UpdateWorkerBuildIdCompatibilityRequest'Operation
p__ of
              (UpdateWorkerBuildIdCompatibilityRequest'PromoteSetByBuildId Text
p__val)
                -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
p__val
              UpdateWorkerBuildIdCompatibilityRequest'Operation
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
_UpdateWorkerBuildIdCompatibilityRequest'PromoteBuildIdWithinSet ::
  Data.ProtoLens.Prism.Prism' UpdateWorkerBuildIdCompatibilityRequest'Operation Data.Text.Text
_UpdateWorkerBuildIdCompatibilityRequest'PromoteBuildIdWithinSet :: Prism' UpdateWorkerBuildIdCompatibilityRequest'Operation Text
_UpdateWorkerBuildIdCompatibilityRequest'PromoteBuildIdWithinSet
  = (Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> Maybe Text)
-> Prism' UpdateWorkerBuildIdCompatibilityRequest'Operation Text
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      Text -> UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'PromoteBuildIdWithinSet
      (\ UpdateWorkerBuildIdCompatibilityRequest'Operation
p__
         -> case UpdateWorkerBuildIdCompatibilityRequest'Operation
p__ of
              (UpdateWorkerBuildIdCompatibilityRequest'PromoteBuildIdWithinSet Text
p__val)
                -> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
p__val
              UpdateWorkerBuildIdCompatibilityRequest'Operation
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
_UpdateWorkerBuildIdCompatibilityRequest'MergeSets' ::
  Data.ProtoLens.Prism.Prism' UpdateWorkerBuildIdCompatibilityRequest'Operation UpdateWorkerBuildIdCompatibilityRequest'MergeSets
_UpdateWorkerBuildIdCompatibilityRequest'MergeSets' :: Prism'
  UpdateWorkerBuildIdCompatibilityRequest'Operation
  UpdateWorkerBuildIdCompatibilityRequest'MergeSets
_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'
  = (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
 -> UpdateWorkerBuildIdCompatibilityRequest'Operation)
-> (UpdateWorkerBuildIdCompatibilityRequest'Operation
    -> Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
-> Prism'
     UpdateWorkerBuildIdCompatibilityRequest'Operation
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'Operation
UpdateWorkerBuildIdCompatibilityRequest'MergeSets'
      (\ UpdateWorkerBuildIdCompatibilityRequest'Operation
p__
         -> case UpdateWorkerBuildIdCompatibilityRequest'Operation
p__ of
              (UpdateWorkerBuildIdCompatibilityRequest'MergeSets' UpdateWorkerBuildIdCompatibilityRequest'MergeSets
p__val)
                -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall a. a -> Maybe a
Prelude.Just UpdateWorkerBuildIdCompatibilityRequest'MergeSets
p__val
              UpdateWorkerBuildIdCompatibilityRequest'Operation
_otherwise -> Maybe UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.newBuildId' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.existingCompatibleBuildId' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.makeSetDefault' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion Prelude.Bool@ -}
data UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
  = UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'_constructor {UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Text
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'newBuildId :: !Data.Text.Text,
                                                                                  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Text
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'existingCompatibleBuildId :: !Data.Text.Text,
                                                                                  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'makeSetDefault :: !Prelude.Bool,
                                                                                  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> FieldSet
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
(UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
 -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
 -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> Bool)
-> Eq
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
== :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
$c/= :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
/= :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
Prelude.Eq, Eq UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
Eq
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion =>
(UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
 -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
 -> Ordering)
-> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> Ord
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Ordering
UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
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 :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Ordering
compare :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Ordering
$c< :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
< :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
$c<= :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
<= :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
$c> :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
> :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
$c>= :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
>= :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
$cmax :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
max :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
$cmin :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
min :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
Prelude.Ord)
instance Prelude.Show UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion where
  showsPrec :: Int
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> ShowS
showsPrec Int
_ UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion "newBuildId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "newBuildId"
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> f UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
fieldOf Proxy# "newBuildId"
_
    = ((Text -> f Text)
 -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
 -> f UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> f UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
 -> Text)
-> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> Text
    -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Text
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'newBuildId
           (\ UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__ Text
y__
              -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__
                   {_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'newBuildId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion "existingCompatibleBuildId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "existingCompatibleBuildId"
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> f UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
fieldOf Proxy# "existingCompatibleBuildId"
_
    = ((Text -> f Text)
 -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
 -> f UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> f UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
 -> Text)
-> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> Text
    -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Text
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'existingCompatibleBuildId
           (\ UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__ Text
y__
              -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__
                   {_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'existingCompatibleBuildId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion "makeSetDefault" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "makeSetDefault"
-> (Bool -> f Bool)
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> f UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
fieldOf Proxy# "makeSetDefault"
_
    = ((Bool -> f Bool)
 -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
 -> f UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> f UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
 -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> Bool
    -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'makeSetDefault
           (\ UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__ Bool
y__
              -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__
                   {_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'makeSetDefault = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion where
  messageName :: Proxy
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Text
messageName Proxy
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateWorkerBuildIdCompatibilityRequest.AddNewCompatibleVersion"
  packedMessageDescriptor :: Proxy
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> ByteString
packedMessageDescriptor Proxy
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
_
    = ByteString
"\n\
      \\ETBAddNewCompatibleVersion\DC2 \n\
      \\fnew_build_id\CAN\SOH \SOH(\tR\n\
      \newBuildId\DC2?\n\
      \\FSexisting_compatible_build_id\CAN\STX \SOH(\tR\EMexistingCompatibleBuildId\DC2(\n\
      \\DLEmake_set_default\CAN\ETX \SOH(\bR\SOmakeSetDefault"
  packedFileDescriptor :: Proxy
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> ByteString
packedFileDescriptor Proxy
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
fieldsByTag
    = let
        newBuildId__field_descriptor :: FieldDescriptor
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
newBuildId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     Text
-> FieldDescriptor
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"new_build_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     Text
     Text
-> FieldAccessor
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     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 @"newBuildId")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
        existingCompatibleBuildId__field_descriptor :: FieldDescriptor
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
existingCompatibleBuildId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     Text
-> FieldDescriptor
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"existing_compatible_build_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     Text
     Text
-> FieldAccessor
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     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 @"existingCompatibleBuildId")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
        makeSetDefault__field_descriptor :: FieldDescriptor
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
makeSetDefault__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     Bool
-> FieldDescriptor
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"make_set_default"
              (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
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     Bool
     Bool
-> FieldAccessor
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     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 @"makeSetDefault")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
      in
        [(Tag,
  FieldDescriptor
    UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)]
-> Map
     Tag
     (FieldDescriptor
        UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
newBuildId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, 
            FieldDescriptor
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
existingCompatibleBuildId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
makeSetDefault__field_descriptor)]
  unknownFields :: Lens'
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
  FieldSet
unknownFields
    = (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
 -> FieldSet)
-> (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
    -> FieldSet
    -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion)
-> Lens'
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
     FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> FieldSet
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'_unknownFields
        (\ UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__ FieldSet
y__
           -> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__
                {_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'_unknownFields = y__})
  defMessage :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
defMessage
    = UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'_constructor
        {_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'newBuildId :: Text
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'newBuildId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'existingCompatibleBuildId :: Text
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'existingCompatibleBuildId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'makeSetDefault :: Bool
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'makeSetDefault = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'_unknownFields :: FieldSet
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'_unknownFields = []}
  parseMessage :: Parser
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
parseMessage
    = let
        loop ::
          UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
        loop :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Parser
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
loop UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"new_build_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"newBuildId") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"existing_compatible_build_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"existingCompatibleBuildId") y x)
                        Word64
24
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"make_set_default"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"makeSetDefault") 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
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> String
-> Parser
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Parser
     UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
loop UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"AddNewCompatibleVersion"
  buildMessage :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Builder
buildMessage
    = \ UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike
  Text
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
  Text
  Text
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> 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 @"newBuildId") UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
_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
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
  Text
  Text
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> 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 @"existingCompatibleBuildId") UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
_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 :: Bool
_v
                        = FoldLike
  Bool
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
  Bool
  Bool
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> 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 @"makeSetDefault") UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
_x
                    in
                      if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
24)
                            ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt (\ Bool
b -> if Bool
b then Word64
1 else Word64
0)
                               Bool
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
  FieldSet
  FieldSet
-> UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens'
  UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
  FieldSet
Data.ProtoLens.unknownFields UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
_x))))
instance Control.DeepSeq.NFData UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion where
  rnf :: UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> ()
rnf
    = \ UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> FieldSet
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'_unknownFields
                UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Text
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'newBuildId
                   UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Text
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'existingCompatibleBuildId
                      UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__)
                   (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
-> Bool
_UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion'makeSetDefault
                         UpdateWorkerBuildIdCompatibilityRequest'AddNewCompatibleVersion
x__)
                      ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.primarySetBuildId' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest'MergeSets Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.secondarySetBuildId' @:: Lens' UpdateWorkerBuildIdCompatibilityRequest'MergeSets Data.Text.Text@ -}
data UpdateWorkerBuildIdCompatibilityRequest'MergeSets
  = UpdateWorkerBuildIdCompatibilityRequest'MergeSets'_constructor {UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Text
_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'primarySetBuildId :: !Data.Text.Text,
                                                                    UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Text
_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'secondarySetBuildId :: !Data.Text.Text,
                                                                    UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> FieldSet
_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool
(UpdateWorkerBuildIdCompatibilityRequest'MergeSets
 -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool)
-> Eq UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool
== :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool
$c/= :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool
/= :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool
Prelude.Eq, Eq UpdateWorkerBuildIdCompatibilityRequest'MergeSets
Eq UpdateWorkerBuildIdCompatibilityRequest'MergeSets =>
(UpdateWorkerBuildIdCompatibilityRequest'MergeSets
 -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Ordering)
-> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool)
-> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
-> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
-> Ord UpdateWorkerBuildIdCompatibilityRequest'MergeSets
UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool
UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Ordering
UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
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 :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Ordering
compare :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Ordering
$c< :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool
< :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool
$c<= :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool
<= :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool
$c> :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool
> :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool
$c>= :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool
>= :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Bool
$cmax :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
max :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
$cmin :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
min :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
Prelude.Ord)
instance Prelude.Show UpdateWorkerBuildIdCompatibilityRequest'MergeSets where
  showsPrec :: Int -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> ShowS
showsPrec Int
_ UpdateWorkerBuildIdCompatibilityRequest'MergeSets
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateWorkerBuildIdCompatibilityRequest'MergeSets
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateWorkerBuildIdCompatibilityRequest'MergeSets "primarySetBuildId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "primarySetBuildId"
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> f UpdateWorkerBuildIdCompatibilityRequest'MergeSets
fieldOf Proxy# "primarySetBuildId"
_
    = ((Text -> f Text)
 -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
 -> f UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> f UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Text)
-> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> Text -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Text
_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'primarySetBuildId
           (\ UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__ Text
y__
              -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__
                   {_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'primarySetBuildId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerBuildIdCompatibilityRequest'MergeSets "secondarySetBuildId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "secondarySetBuildId"
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> f UpdateWorkerBuildIdCompatibilityRequest'MergeSets
fieldOf Proxy# "secondarySetBuildId"
_
    = ((Text -> f Text)
 -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
 -> f UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> f UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Text)
-> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> Text -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Text
_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'secondarySetBuildId
           (\ UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__ Text
y__
              -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__
                   {_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'secondarySetBuildId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateWorkerBuildIdCompatibilityRequest'MergeSets where
  messageName :: Proxy UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Text
messageName Proxy UpdateWorkerBuildIdCompatibilityRequest'MergeSets
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateWorkerBuildIdCompatibilityRequest.MergeSets"
  packedMessageDescriptor :: Proxy UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> ByteString
packedMessageDescriptor Proxy UpdateWorkerBuildIdCompatibilityRequest'MergeSets
_
    = ByteString
"\n\
      \\tMergeSets\DC2/\n\
      \\DC4primary_set_build_id\CAN\SOH \SOH(\tR\DC1primarySetBuildId\DC23\n\
      \\SYNsecondary_set_build_id\CAN\STX \SOH(\tR\DC3secondarySetBuildId"
  packedFileDescriptor :: Proxy UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> ByteString
packedFileDescriptor Proxy UpdateWorkerBuildIdCompatibilityRequest'MergeSets
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
fieldsByTag
    = let
        primarySetBuildId__field_descriptor :: FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest'MergeSets
primarySetBuildId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets Text
-> FieldDescriptor
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"primary_set_build_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
     Text
     Text
-> FieldAccessor
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets 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 @"primarySetBuildId")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest'MergeSets
        secondarySetBuildId__field_descriptor :: FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest'MergeSets
secondarySetBuildId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets Text
-> FieldDescriptor
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"secondary_set_build_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets
     Text
     Text
-> FieldAccessor
     UpdateWorkerBuildIdCompatibilityRequest'MergeSets 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 @"secondarySetBuildId")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest'MergeSets
      in
        [(Tag,
  FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest'MergeSets)]
-> Map
     Tag
     (FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest'MergeSets
primarySetBuildId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor UpdateWorkerBuildIdCompatibilityRequest'MergeSets
secondarySetBuildId__field_descriptor)]
  unknownFields :: Lens' UpdateWorkerBuildIdCompatibilityRequest'MergeSets FieldSet
unknownFields
    = (UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> FieldSet)
-> (UpdateWorkerBuildIdCompatibilityRequest'MergeSets
    -> FieldSet -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets)
-> Lens' UpdateWorkerBuildIdCompatibilityRequest'MergeSets FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> FieldSet
_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'_unknownFields
        (\ UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__ FieldSet
y__
           -> UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__
                {_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'_unknownFields = y__})
  defMessage :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
defMessage
    = UpdateWorkerBuildIdCompatibilityRequest'MergeSets'_constructor
        {_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'primarySetBuildId :: Text
_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'primarySetBuildId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerBuildIdCompatibilityRequest'MergeSets'secondarySetBuildId :: Text
_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'secondarySetBuildId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerBuildIdCompatibilityRequest'MergeSets'_unknownFields :: FieldSet
_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'_unknownFields = []}
  parseMessage :: Parser UpdateWorkerBuildIdCompatibilityRequest'MergeSets
parseMessage
    = let
        loop ::
          UpdateWorkerBuildIdCompatibilityRequest'MergeSets
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateWorkerBuildIdCompatibilityRequest'MergeSets
        loop :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> Parser UpdateWorkerBuildIdCompatibilityRequest'MergeSets
loop UpdateWorkerBuildIdCompatibilityRequest'MergeSets
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
"primary_set_build_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"primarySetBuildId") y x)
                        Word64
18
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"secondary_set_build_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"secondarySetBuildId") 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 UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> String
-> Parser UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateWorkerBuildIdCompatibilityRequest'MergeSets
-> Parser UpdateWorkerBuildIdCompatibilityRequest'MergeSets
loop UpdateWorkerBuildIdCompatibilityRequest'MergeSets
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"MergeSets"
  buildMessage :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Builder
buildMessage
    = \ UpdateWorkerBuildIdCompatibilityRequest'MergeSets
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike
  Text
  UpdateWorkerBuildIdCompatibilityRequest'MergeSets
  UpdateWorkerBuildIdCompatibilityRequest'MergeSets
  Text
  Text
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> 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 @"primarySetBuildId") UpdateWorkerBuildIdCompatibilityRequest'MergeSets
_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
  UpdateWorkerBuildIdCompatibilityRequest'MergeSets
  UpdateWorkerBuildIdCompatibilityRequest'MergeSets
  Text
  Text
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> 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 @"secondarySetBuildId") UpdateWorkerBuildIdCompatibilityRequest'MergeSets
_x
                 in
                   if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                       Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   else
                       Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                         ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                            (\ ByteString
bs
                               -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                    (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                       (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                    (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                            Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  UpdateWorkerBuildIdCompatibilityRequest'MergeSets
  UpdateWorkerBuildIdCompatibilityRequest'MergeSets
  FieldSet
  FieldSet
-> UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateWorkerBuildIdCompatibilityRequest'MergeSets
  UpdateWorkerBuildIdCompatibilityRequest'MergeSets
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpdateWorkerBuildIdCompatibilityRequest'MergeSets FieldSet
Data.ProtoLens.unknownFields UpdateWorkerBuildIdCompatibilityRequest'MergeSets
_x)))
instance Control.DeepSeq.NFData UpdateWorkerBuildIdCompatibilityRequest'MergeSets where
  rnf :: UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> ()
rnf
    = \ UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> FieldSet
_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'_unknownFields
                UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Text
_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'primarySetBuildId
                   UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpdateWorkerBuildIdCompatibilityRequest'MergeSets -> Text
_UpdateWorkerBuildIdCompatibilityRequest'MergeSets'secondarySetBuildId
                      UpdateWorkerBuildIdCompatibilityRequest'MergeSets
x__)
                   ()))
{- | Fields :
      -}
data UpdateWorkerBuildIdCompatibilityResponse
  = UpdateWorkerBuildIdCompatibilityResponse'_constructor {UpdateWorkerBuildIdCompatibilityResponse -> FieldSet
_UpdateWorkerBuildIdCompatibilityResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Bool
(UpdateWorkerBuildIdCompatibilityResponse
 -> UpdateWorkerBuildIdCompatibilityResponse -> Bool)
-> (UpdateWorkerBuildIdCompatibilityResponse
    -> UpdateWorkerBuildIdCompatibilityResponse -> Bool)
-> Eq UpdateWorkerBuildIdCompatibilityResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Bool
== :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Bool
$c/= :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Bool
/= :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Bool
Prelude.Eq, Eq UpdateWorkerBuildIdCompatibilityResponse
Eq UpdateWorkerBuildIdCompatibilityResponse =>
(UpdateWorkerBuildIdCompatibilityResponse
 -> UpdateWorkerBuildIdCompatibilityResponse -> Ordering)
-> (UpdateWorkerBuildIdCompatibilityResponse
    -> UpdateWorkerBuildIdCompatibilityResponse -> Bool)
-> (UpdateWorkerBuildIdCompatibilityResponse
    -> UpdateWorkerBuildIdCompatibilityResponse -> Bool)
-> (UpdateWorkerBuildIdCompatibilityResponse
    -> UpdateWorkerBuildIdCompatibilityResponse -> Bool)
-> (UpdateWorkerBuildIdCompatibilityResponse
    -> UpdateWorkerBuildIdCompatibilityResponse -> Bool)
-> (UpdateWorkerBuildIdCompatibilityResponse
    -> UpdateWorkerBuildIdCompatibilityResponse
    -> UpdateWorkerBuildIdCompatibilityResponse)
-> (UpdateWorkerBuildIdCompatibilityResponse
    -> UpdateWorkerBuildIdCompatibilityResponse
    -> UpdateWorkerBuildIdCompatibilityResponse)
-> Ord UpdateWorkerBuildIdCompatibilityResponse
UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Bool
UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Ordering
UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse
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 :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Ordering
compare :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Ordering
$c< :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Bool
< :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Bool
$c<= :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Bool
<= :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Bool
$c> :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Bool
> :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Bool
$c>= :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Bool
>= :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse -> Bool
$cmax :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse
max :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse
$cmin :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse
min :: UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse
-> UpdateWorkerBuildIdCompatibilityResponse
Prelude.Ord)
instance Prelude.Show UpdateWorkerBuildIdCompatibilityResponse where
  showsPrec :: Int -> UpdateWorkerBuildIdCompatibilityResponse -> ShowS
showsPrec Int
_ UpdateWorkerBuildIdCompatibilityResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateWorkerBuildIdCompatibilityResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateWorkerBuildIdCompatibilityResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message UpdateWorkerBuildIdCompatibilityResponse where
  messageName :: Proxy UpdateWorkerBuildIdCompatibilityResponse -> Text
messageName Proxy UpdateWorkerBuildIdCompatibilityResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateWorkerBuildIdCompatibilityResponse"
  packedMessageDescriptor :: Proxy UpdateWorkerBuildIdCompatibilityResponse -> ByteString
packedMessageDescriptor Proxy UpdateWorkerBuildIdCompatibilityResponse
_
    = ByteString
"\n\
      \(UpdateWorkerBuildIdCompatibilityResponseJ\EOT\b\SOH\DLE\STXR\SOversion_set_id"
  packedFileDescriptor :: Proxy UpdateWorkerBuildIdCompatibilityResponse -> ByteString
packedFileDescriptor Proxy UpdateWorkerBuildIdCompatibilityResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor UpdateWorkerBuildIdCompatibilityResponse)
fieldsByTag = let in [(Tag, FieldDescriptor UpdateWorkerBuildIdCompatibilityResponse)]
-> Map
     Tag (FieldDescriptor UpdateWorkerBuildIdCompatibilityResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
  unknownFields :: Lens' UpdateWorkerBuildIdCompatibilityResponse FieldSet
unknownFields
    = (UpdateWorkerBuildIdCompatibilityResponse -> FieldSet)
-> (UpdateWorkerBuildIdCompatibilityResponse
    -> FieldSet -> UpdateWorkerBuildIdCompatibilityResponse)
-> Lens' UpdateWorkerBuildIdCompatibilityResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateWorkerBuildIdCompatibilityResponse -> FieldSet
_UpdateWorkerBuildIdCompatibilityResponse'_unknownFields
        (\ UpdateWorkerBuildIdCompatibilityResponse
x__ FieldSet
y__
           -> UpdateWorkerBuildIdCompatibilityResponse
x__
                {_UpdateWorkerBuildIdCompatibilityResponse'_unknownFields = y__})
  defMessage :: UpdateWorkerBuildIdCompatibilityResponse
defMessage
    = UpdateWorkerBuildIdCompatibilityResponse'_constructor
        {_UpdateWorkerBuildIdCompatibilityResponse'_unknownFields :: FieldSet
_UpdateWorkerBuildIdCompatibilityResponse'_unknownFields = []}
  parseMessage :: Parser UpdateWorkerBuildIdCompatibilityResponse
parseMessage
    = let
        loop ::
          UpdateWorkerBuildIdCompatibilityResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateWorkerBuildIdCompatibilityResponse
        loop :: UpdateWorkerBuildIdCompatibilityResponse
-> Parser UpdateWorkerBuildIdCompatibilityResponse
loop UpdateWorkerBuildIdCompatibilityResponse
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 UpdateWorkerBuildIdCompatibilityResponse
-> String -> Parser UpdateWorkerBuildIdCompatibilityResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateWorkerBuildIdCompatibilityResponse
-> Parser UpdateWorkerBuildIdCompatibilityResponse
loop UpdateWorkerBuildIdCompatibilityResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"UpdateWorkerBuildIdCompatibilityResponse"
  buildMessage :: UpdateWorkerBuildIdCompatibilityResponse -> Builder
buildMessage
    = \ UpdateWorkerBuildIdCompatibilityResponse
_x
        -> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
             (FoldLike
  FieldSet
  UpdateWorkerBuildIdCompatibilityResponse
  UpdateWorkerBuildIdCompatibilityResponse
  FieldSet
  FieldSet
-> UpdateWorkerBuildIdCompatibilityResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateWorkerBuildIdCompatibilityResponse
  UpdateWorkerBuildIdCompatibilityResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpdateWorkerBuildIdCompatibilityResponse FieldSet
Data.ProtoLens.unknownFields UpdateWorkerBuildIdCompatibilityResponse
_x)
instance Control.DeepSeq.NFData UpdateWorkerBuildIdCompatibilityResponse where
  rnf :: UpdateWorkerBuildIdCompatibilityResponse -> ()
rnf
    = \ UpdateWorkerBuildIdCompatibilityResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateWorkerBuildIdCompatibilityResponse -> FieldSet
_UpdateWorkerBuildIdCompatibilityResponse'_unknownFields UpdateWorkerBuildIdCompatibilityResponse
x__) ()
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' UpdateWorkerVersioningRulesRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.taskQueue' @:: Lens' UpdateWorkerVersioningRulesRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.conflictToken' @:: Lens' UpdateWorkerVersioningRulesRequest Data.ByteString.ByteString@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'operation' @:: Lens' UpdateWorkerVersioningRulesRequest (Prelude.Maybe UpdateWorkerVersioningRulesRequest'Operation)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'insertAssignmentRule' @:: Lens' UpdateWorkerVersioningRulesRequest (Prelude.Maybe UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.insertAssignmentRule' @:: Lens' UpdateWorkerVersioningRulesRequest UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'replaceAssignmentRule' @:: Lens' UpdateWorkerVersioningRulesRequest (Prelude.Maybe UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.replaceAssignmentRule' @:: Lens' UpdateWorkerVersioningRulesRequest UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'deleteAssignmentRule' @:: Lens' UpdateWorkerVersioningRulesRequest (Prelude.Maybe UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.deleteAssignmentRule' @:: Lens' UpdateWorkerVersioningRulesRequest UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'addCompatibleRedirectRule' @:: Lens' UpdateWorkerVersioningRulesRequest (Prelude.Maybe UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.addCompatibleRedirectRule' @:: Lens' UpdateWorkerVersioningRulesRequest UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'replaceCompatibleRedirectRule' @:: Lens' UpdateWorkerVersioningRulesRequest (Prelude.Maybe UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.replaceCompatibleRedirectRule' @:: Lens' UpdateWorkerVersioningRulesRequest UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'deleteCompatibleRedirectRule' @:: Lens' UpdateWorkerVersioningRulesRequest (Prelude.Maybe UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.deleteCompatibleRedirectRule' @:: Lens' UpdateWorkerVersioningRulesRequest UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'commitBuildId' @:: Lens' UpdateWorkerVersioningRulesRequest (Prelude.Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.commitBuildId' @:: Lens' UpdateWorkerVersioningRulesRequest UpdateWorkerVersioningRulesRequest'CommitBuildId@ -}
data UpdateWorkerVersioningRulesRequest
  = UpdateWorkerVersioningRulesRequest'_constructor {UpdateWorkerVersioningRulesRequest -> Text
_UpdateWorkerVersioningRulesRequest'namespace :: !Data.Text.Text,
                                                     UpdateWorkerVersioningRulesRequest -> Text
_UpdateWorkerVersioningRulesRequest'taskQueue :: !Data.Text.Text,
                                                     UpdateWorkerVersioningRulesRequest -> ByteString
_UpdateWorkerVersioningRulesRequest'conflictToken :: !Data.ByteString.ByteString,
                                                     UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation :: !(Prelude.Maybe UpdateWorkerVersioningRulesRequest'Operation),
                                                     UpdateWorkerVersioningRulesRequest -> FieldSet
_UpdateWorkerVersioningRulesRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Bool
(UpdateWorkerVersioningRulesRequest
 -> UpdateWorkerVersioningRulesRequest -> Bool)
-> (UpdateWorkerVersioningRulesRequest
    -> UpdateWorkerVersioningRulesRequest -> Bool)
-> Eq UpdateWorkerVersioningRulesRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Bool
== :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Bool
$c/= :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Bool
/= :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Bool
Prelude.Eq, Eq UpdateWorkerVersioningRulesRequest
Eq UpdateWorkerVersioningRulesRequest =>
(UpdateWorkerVersioningRulesRequest
 -> UpdateWorkerVersioningRulesRequest -> Ordering)
-> (UpdateWorkerVersioningRulesRequest
    -> UpdateWorkerVersioningRulesRequest -> Bool)
-> (UpdateWorkerVersioningRulesRequest
    -> UpdateWorkerVersioningRulesRequest -> Bool)
-> (UpdateWorkerVersioningRulesRequest
    -> UpdateWorkerVersioningRulesRequest -> Bool)
-> (UpdateWorkerVersioningRulesRequest
    -> UpdateWorkerVersioningRulesRequest -> Bool)
-> (UpdateWorkerVersioningRulesRequest
    -> UpdateWorkerVersioningRulesRequest
    -> UpdateWorkerVersioningRulesRequest)
-> (UpdateWorkerVersioningRulesRequest
    -> UpdateWorkerVersioningRulesRequest
    -> UpdateWorkerVersioningRulesRequest)
-> Ord UpdateWorkerVersioningRulesRequest
UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Bool
UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Ordering
UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest
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 :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Ordering
compare :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Ordering
$c< :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Bool
< :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Bool
$c<= :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Bool
<= :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Bool
$c> :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Bool
> :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Bool
$c>= :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Bool
>= :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest -> Bool
$cmax :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest
max :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest
$cmin :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest
min :: UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest
-> UpdateWorkerVersioningRulesRequest
Prelude.Ord)
instance Prelude.Show UpdateWorkerVersioningRulesRequest where
  showsPrec :: Int -> UpdateWorkerVersioningRulesRequest -> ShowS
showsPrec Int
_ UpdateWorkerVersioningRulesRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateWorkerVersioningRulesRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateWorkerVersioningRulesRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data UpdateWorkerVersioningRulesRequest'Operation
  = UpdateWorkerVersioningRulesRequest'InsertAssignmentRule !UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule |
    UpdateWorkerVersioningRulesRequest'ReplaceAssignmentRule !UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule |
    UpdateWorkerVersioningRulesRequest'DeleteAssignmentRule !UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule |
    UpdateWorkerVersioningRulesRequest'AddCompatibleRedirectRule !UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule |
    UpdateWorkerVersioningRulesRequest'ReplaceCompatibleRedirectRule !UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule |
    UpdateWorkerVersioningRulesRequest'DeleteCompatibleRedirectRule !UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule |
    UpdateWorkerVersioningRulesRequest'CommitBuildId' !UpdateWorkerVersioningRulesRequest'CommitBuildId
  deriving stock (Int -> UpdateWorkerVersioningRulesRequest'Operation -> ShowS
[UpdateWorkerVersioningRulesRequest'Operation] -> ShowS
UpdateWorkerVersioningRulesRequest'Operation -> String
(Int -> UpdateWorkerVersioningRulesRequest'Operation -> ShowS)
-> (UpdateWorkerVersioningRulesRequest'Operation -> String)
-> ([UpdateWorkerVersioningRulesRequest'Operation] -> ShowS)
-> Show UpdateWorkerVersioningRulesRequest'Operation
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> UpdateWorkerVersioningRulesRequest'Operation -> ShowS
showsPrec :: Int -> UpdateWorkerVersioningRulesRequest'Operation -> ShowS
$cshow :: UpdateWorkerVersioningRulesRequest'Operation -> String
show :: UpdateWorkerVersioningRulesRequest'Operation -> String
$cshowList :: [UpdateWorkerVersioningRulesRequest'Operation] -> ShowS
showList :: [UpdateWorkerVersioningRulesRequest'Operation] -> ShowS
Prelude.Show, UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Bool
(UpdateWorkerVersioningRulesRequest'Operation
 -> UpdateWorkerVersioningRulesRequest'Operation -> Bool)
-> (UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest'Operation -> Bool)
-> Eq UpdateWorkerVersioningRulesRequest'Operation
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Bool
== :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Bool
$c/= :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Bool
/= :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Bool
Prelude.Eq, Eq UpdateWorkerVersioningRulesRequest'Operation
Eq UpdateWorkerVersioningRulesRequest'Operation =>
(UpdateWorkerVersioningRulesRequest'Operation
 -> UpdateWorkerVersioningRulesRequest'Operation -> Ordering)
-> (UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest'Operation -> Bool)
-> (UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest'Operation -> Bool)
-> (UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest'Operation -> Bool)
-> (UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest'Operation -> Bool)
-> (UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest'Operation)
-> Ord UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Bool
UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Ordering
UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation
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 :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Ordering
compare :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Ordering
$c< :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Bool
< :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Bool
$c<= :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Bool
<= :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Bool
$c> :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Bool
> :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Bool
$c>= :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Bool
>= :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation -> Bool
$cmax :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation
max :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation
$cmin :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation
min :: UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation
-> UpdateWorkerVersioningRulesRequest'Operation
Prelude.Ord)
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest -> Text)
-> (UpdateWorkerVersioningRulesRequest
    -> Text -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest -> Text
_UpdateWorkerVersioningRulesRequest'namespace
           (\ UpdateWorkerVersioningRulesRequest
x__ Text
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "taskQueue" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (Text -> f Text)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "taskQueue"
_
    = ((Text -> f Text)
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest -> Text)
-> (UpdateWorkerVersioningRulesRequest
    -> Text -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest -> Text
_UpdateWorkerVersioningRulesRequest'taskQueue
           (\ UpdateWorkerVersioningRulesRequest
x__ Text
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'taskQueue = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "conflictToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "conflictToken"
-> (ByteString -> f ByteString)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "conflictToken"
_
    = ((ByteString -> f ByteString)
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest -> ByteString)
-> (UpdateWorkerVersioningRulesRequest
    -> ByteString -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest -> ByteString
_UpdateWorkerVersioningRulesRequest'conflictToken
           (\ UpdateWorkerVersioningRulesRequest
x__ ByteString
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'conflictToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "maybe'operation" (Prelude.Maybe UpdateWorkerVersioningRulesRequest'Operation) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'operation"
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "maybe'operation"
_
    = ((Maybe UpdateWorkerVersioningRulesRequest'Operation
  -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((Maybe UpdateWorkerVersioningRulesRequest'Operation
     -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation
           (\ UpdateWorkerVersioningRulesRequest
x__ Maybe UpdateWorkerVersioningRulesRequest'Operation
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'operation = y__}))
        (Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
-> f (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "maybe'insertAssignmentRule" (Prelude.Maybe UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'insertAssignmentRule"
-> (Maybe
      UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "maybe'insertAssignmentRule"
_
    = ((Maybe UpdateWorkerVersioningRulesRequest'Operation
  -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((Maybe
       UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     -> f (Maybe
             UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule))
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> (Maybe
      UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation
           (\ UpdateWorkerVersioningRulesRequest
x__ Maybe UpdateWorkerVersioningRulesRequest'Operation
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'operation = y__}))
        ((Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> Maybe
      UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> Lens
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe
        UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
     (Maybe
        UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
x__
              -> case Maybe UpdateWorkerVersioningRulesRequest'Operation
x__ of
                   (Prelude.Just (UpdateWorkerVersioningRulesRequest'InsertAssignmentRule UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__val))
                     -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__val
                   Maybe UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
_ Maybe
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
y__
              -> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> Maybe
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'InsertAssignmentRule Maybe
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
y__))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "insertAssignmentRule" UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "insertAssignmentRule"
-> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> f UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "insertAssignmentRule"
_
    = ((Maybe UpdateWorkerVersioningRulesRequest'Operation
  -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     -> f UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> f UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation
           (\ UpdateWorkerVersioningRulesRequest
x__ Maybe UpdateWorkerVersioningRulesRequest'Operation
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'operation = y__}))
        (((Maybe
    UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
  -> f (Maybe
          UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule))
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> ((UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     -> f UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
    -> Maybe
         UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule))
-> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> f UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
-> f (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> Maybe
      UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> Lens
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe
        UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
     (Maybe
        UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
x__
                 -> case Maybe UpdateWorkerVersioningRulesRequest'Operation
x__ of
                      (Prelude.Just (UpdateWorkerVersioningRulesRequest'InsertAssignmentRule UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__val))
                        -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__val
                      Maybe UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
_ Maybe
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
y__
                 -> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> Maybe
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'InsertAssignmentRule Maybe
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
y__))
           (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Lens'
     (Maybe
        UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "maybe'replaceAssignmentRule" (Prelude.Maybe UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'replaceAssignmentRule"
-> (Maybe
      UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "maybe'replaceAssignmentRule"
_
    = ((Maybe UpdateWorkerVersioningRulesRequest'Operation
  -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((Maybe
       UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     -> f (Maybe
             UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule))
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> (Maybe
      UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation
           (\ UpdateWorkerVersioningRulesRequest
x__ Maybe UpdateWorkerVersioningRulesRequest'Operation
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'operation = y__}))
        ((Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> Maybe
      UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> Lens
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe
        UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
     (Maybe
        UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
x__
              -> case Maybe UpdateWorkerVersioningRulesRequest'Operation
x__ of
                   (Prelude.Just (UpdateWorkerVersioningRulesRequest'ReplaceAssignmentRule UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__val))
                     -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__val
                   Maybe UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
_ Maybe
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
y__
              -> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> Maybe
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'ReplaceAssignmentRule Maybe
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
y__))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "replaceAssignmentRule" UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "replaceAssignmentRule"
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "replaceAssignmentRule"
_
    = ((Maybe UpdateWorkerVersioningRulesRequest'Operation
  -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     -> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation
           (\ UpdateWorkerVersioningRulesRequest
x__ Maybe UpdateWorkerVersioningRulesRequest'Operation
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'operation = y__}))
        (((Maybe
    UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  -> f (Maybe
          UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule))
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> ((UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     -> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
    -> Maybe
         UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule))
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
-> f (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> Maybe
      UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> Lens
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe
        UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
     (Maybe
        UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
x__
                 -> case Maybe UpdateWorkerVersioningRulesRequest'Operation
x__ of
                      (Prelude.Just (UpdateWorkerVersioningRulesRequest'ReplaceAssignmentRule UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__val))
                        -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__val
                      Maybe UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
_ Maybe
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
y__
                 -> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> Maybe
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'ReplaceAssignmentRule Maybe
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
y__))
           (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Lens'
     (Maybe
        UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "maybe'deleteAssignmentRule" (Prelude.Maybe UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'deleteAssignmentRule"
-> (Maybe
      UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "maybe'deleteAssignmentRule"
_
    = ((Maybe UpdateWorkerVersioningRulesRequest'Operation
  -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((Maybe
       UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
     -> f (Maybe
             UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule))
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> (Maybe
      UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation
           (\ UpdateWorkerVersioningRulesRequest
x__ Maybe UpdateWorkerVersioningRulesRequest'Operation
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'operation = y__}))
        ((Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> Maybe
      UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> Lens
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe
        UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
     (Maybe
        UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
x__
              -> case Maybe UpdateWorkerVersioningRulesRequest'Operation
x__ of
                   (Prelude.Just (UpdateWorkerVersioningRulesRequest'DeleteAssignmentRule UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__val))
                     -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__val
                   Maybe UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
_ Maybe
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
y__
              -> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> Maybe
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'DeleteAssignmentRule Maybe
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
y__))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "deleteAssignmentRule" UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "deleteAssignmentRule"
-> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> f UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "deleteAssignmentRule"
_
    = ((Maybe UpdateWorkerVersioningRulesRequest'Operation
  -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
     -> f UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> f UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation
           (\ UpdateWorkerVersioningRulesRequest
x__ Maybe UpdateWorkerVersioningRulesRequest'Operation
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'operation = y__}))
        (((Maybe
    UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
  -> f (Maybe
          UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule))
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> ((UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
     -> f UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
    -> Maybe
         UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule))
-> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> f UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
-> f (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> Maybe
      UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> Lens
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe
        UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
     (Maybe
        UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
x__
                 -> case Maybe UpdateWorkerVersioningRulesRequest'Operation
x__ of
                      (Prelude.Just (UpdateWorkerVersioningRulesRequest'DeleteAssignmentRule UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__val))
                        -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__val
                      Maybe UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
_ Maybe
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
y__
                 -> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> Maybe
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'DeleteAssignmentRule Maybe
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
y__))
           (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Lens'
     (Maybe
        UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "maybe'addCompatibleRedirectRule" (Prelude.Maybe UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'addCompatibleRedirectRule"
-> (Maybe
      UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "maybe'addCompatibleRedirectRule"
_
    = ((Maybe UpdateWorkerVersioningRulesRequest'Operation
  -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((Maybe
       UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
     -> f (Maybe
             UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule))
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> (Maybe
      UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation
           (\ UpdateWorkerVersioningRulesRequest
x__ Maybe UpdateWorkerVersioningRulesRequest'Operation
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'operation = y__}))
        ((Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> Maybe
      UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> Lens
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe
        UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
     (Maybe
        UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
x__
              -> case Maybe UpdateWorkerVersioningRulesRequest'Operation
x__ of
                   (Prelude.Just (UpdateWorkerVersioningRulesRequest'AddCompatibleRedirectRule UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
x__val))
                     -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
x__val
                   Maybe UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
_ Maybe
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
y__
              -> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> Maybe
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'AddCompatibleRedirectRule Maybe
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
y__))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "addCompatibleRedirectRule" UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "addCompatibleRedirectRule"
-> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> f UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "addCompatibleRedirectRule"
_
    = ((Maybe UpdateWorkerVersioningRulesRequest'Operation
  -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
     -> f UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> f UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation
           (\ UpdateWorkerVersioningRulesRequest
x__ Maybe UpdateWorkerVersioningRulesRequest'Operation
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'operation = y__}))
        (((Maybe
    UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
  -> f (Maybe
          UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule))
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> ((UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
     -> f UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
    -> Maybe
         UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule))
-> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> f UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
-> f (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> Maybe
      UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> Lens
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe
        UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
     (Maybe
        UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
x__
                 -> case Maybe UpdateWorkerVersioningRulesRequest'Operation
x__ of
                      (Prelude.Just (UpdateWorkerVersioningRulesRequest'AddCompatibleRedirectRule UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
x__val))
                        -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
x__val
                      Maybe UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
_ Maybe
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
y__
                 -> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> Maybe
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'AddCompatibleRedirectRule Maybe
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
y__))
           (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Lens'
     (Maybe
        UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "maybe'replaceCompatibleRedirectRule" (Prelude.Maybe UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'replaceCompatibleRedirectRule"
-> (Maybe
      UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "maybe'replaceCompatibleRedirectRule"
_
    = ((Maybe UpdateWorkerVersioningRulesRequest'Operation
  -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((Maybe
       UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
     -> f (Maybe
             UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule))
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> (Maybe
      UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation
           (\ UpdateWorkerVersioningRulesRequest
x__ Maybe UpdateWorkerVersioningRulesRequest'Operation
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'operation = y__}))
        ((Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> Maybe
      UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> Lens
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe
        UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
     (Maybe
        UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
x__
              -> case Maybe UpdateWorkerVersioningRulesRequest'Operation
x__ of
                   (Prelude.Just (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleRedirectRule UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
x__val))
                     -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
x__val
                   Maybe UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
_ Maybe
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
y__
              -> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> Maybe
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'ReplaceCompatibleRedirectRule
                   Maybe
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
y__))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "replaceCompatibleRedirectRule" UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "replaceCompatibleRedirectRule"
-> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> f UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "replaceCompatibleRedirectRule"
_
    = ((Maybe UpdateWorkerVersioningRulesRequest'Operation
  -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
     -> f UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> f UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation
           (\ UpdateWorkerVersioningRulesRequest
x__ Maybe UpdateWorkerVersioningRulesRequest'Operation
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'operation = y__}))
        (((Maybe
    UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
  -> f (Maybe
          UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule))
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> ((UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
     -> f UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
    -> Maybe
         UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule))
-> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> f UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
-> f (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> Maybe
      UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> Lens
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe
        UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
     (Maybe
        UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
x__
                 -> case Maybe UpdateWorkerVersioningRulesRequest'Operation
x__ of
                      (Prelude.Just (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleRedirectRule UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
x__val))
                        -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
x__val
                      Maybe UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
_ Maybe
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
y__
                 -> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> Maybe
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'ReplaceCompatibleRedirectRule
                      Maybe
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
y__))
           (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Lens'
     (Maybe
        UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "maybe'deleteCompatibleRedirectRule" (Prelude.Maybe UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'deleteCompatibleRedirectRule"
-> (Maybe
      UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "maybe'deleteCompatibleRedirectRule"
_
    = ((Maybe UpdateWorkerVersioningRulesRequest'Operation
  -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((Maybe
       UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
     -> f (Maybe
             UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule))
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> (Maybe
      UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation
           (\ UpdateWorkerVersioningRulesRequest
x__ Maybe UpdateWorkerVersioningRulesRequest'Operation
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'operation = y__}))
        ((Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> Maybe
      UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> Lens
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe
        UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
     (Maybe
        UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
x__
              -> case Maybe UpdateWorkerVersioningRulesRequest'Operation
x__ of
                   (Prelude.Just (UpdateWorkerVersioningRulesRequest'DeleteCompatibleRedirectRule UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
x__val))
                     -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
x__val
                   Maybe UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
_ Maybe
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
y__
              -> (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> Maybe
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'DeleteCompatibleRedirectRule
                   Maybe
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
y__))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "deleteCompatibleRedirectRule" UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "deleteCompatibleRedirectRule"
-> (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> f UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "deleteCompatibleRedirectRule"
_
    = ((Maybe UpdateWorkerVersioningRulesRequest'Operation
  -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
     -> f UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> f UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation
           (\ UpdateWorkerVersioningRulesRequest
x__ Maybe UpdateWorkerVersioningRulesRequest'Operation
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'operation = y__}))
        (((Maybe
    UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
  -> f (Maybe
          UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule))
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> ((UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
     -> f UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
    -> Maybe
         UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> f (Maybe
            UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule))
-> (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> f UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
-> f (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> Maybe
      UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> Lens
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe
        UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
     (Maybe
        UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
x__
                 -> case Maybe UpdateWorkerVersioningRulesRequest'Operation
x__ of
                      (Prelude.Just (UpdateWorkerVersioningRulesRequest'DeleteCompatibleRedirectRule UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
x__val))
                        -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
x__val
                      Maybe UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
_ Maybe
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
y__
                 -> (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> Maybe
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'DeleteCompatibleRedirectRule
                      Maybe
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
y__))
           (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Lens'
     (Maybe
        UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "maybe'commitBuildId" (Prelude.Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'commitBuildId"
-> (Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> f (Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "maybe'commitBuildId"
_
    = ((Maybe UpdateWorkerVersioningRulesRequest'Operation
  -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
     -> f (Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId))
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> (Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> f (Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId))
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation
           (\ UpdateWorkerVersioningRulesRequest
x__ Maybe UpdateWorkerVersioningRulesRequest'Operation
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'operation = y__}))
        ((Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId)
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> Lens
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId)
     (Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
x__
              -> case Maybe UpdateWorkerVersioningRulesRequest'Operation
x__ of
                   (Prelude.Just (UpdateWorkerVersioningRulesRequest'CommitBuildId' UpdateWorkerVersioningRulesRequest'CommitBuildId
x__val))
                     -> UpdateWorkerVersioningRulesRequest'CommitBuildId
-> Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'CommitBuildId
x__val
                   Maybe UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
_ Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
y__
              -> (UpdateWorkerVersioningRulesRequest'CommitBuildId
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'CommitBuildId' Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
y__))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest "commitBuildId" UpdateWorkerVersioningRulesRequest'CommitBuildId where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "commitBuildId"
-> (UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> f UpdateWorkerVersioningRulesRequest'CommitBuildId)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
fieldOf Proxy# "commitBuildId"
_
    = ((Maybe UpdateWorkerVersioningRulesRequest'Operation
  -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
 -> UpdateWorkerVersioningRulesRequest
 -> f UpdateWorkerVersioningRulesRequest)
-> ((UpdateWorkerVersioningRulesRequest'CommitBuildId
     -> f UpdateWorkerVersioningRulesRequest'CommitBuildId)
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> (UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> f UpdateWorkerVersioningRulesRequest'CommitBuildId)
-> UpdateWorkerVersioningRulesRequest
-> f UpdateWorkerVersioningRulesRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> UpdateWorkerVersioningRulesRequest)
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation
           (\ UpdateWorkerVersioningRulesRequest
x__ Maybe UpdateWorkerVersioningRulesRequest'Operation
y__
              -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'operation = y__}))
        (((Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
  -> f (Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId))
 -> Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> f (Maybe UpdateWorkerVersioningRulesRequest'Operation))
-> ((UpdateWorkerVersioningRulesRequest'CommitBuildId
     -> f UpdateWorkerVersioningRulesRequest'CommitBuildId)
    -> Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> f (Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId))
-> (UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> f UpdateWorkerVersioningRulesRequest'CommitBuildId)
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
-> f (Maybe UpdateWorkerVersioningRulesRequest'Operation)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe UpdateWorkerVersioningRulesRequest'Operation
 -> Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId)
-> (Maybe UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> Lens
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'Operation)
     (Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId)
     (Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
x__
                 -> case Maybe UpdateWorkerVersioningRulesRequest'Operation
x__ of
                      (Prelude.Just (UpdateWorkerVersioningRulesRequest'CommitBuildId' UpdateWorkerVersioningRulesRequest'CommitBuildId
x__val))
                        -> UpdateWorkerVersioningRulesRequest'CommitBuildId
-> Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'CommitBuildId
x__val
                      Maybe UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe UpdateWorkerVersioningRulesRequest'Operation
_ Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
y__
                 -> (UpdateWorkerVersioningRulesRequest'CommitBuildId
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'CommitBuildId' Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
y__))
           (UpdateWorkerVersioningRulesRequest'CommitBuildId
-> Lens'
     (Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId)
     UpdateWorkerVersioningRulesRequest'CommitBuildId
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateWorkerVersioningRulesRequest'CommitBuildId
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message UpdateWorkerVersioningRulesRequest where
  messageName :: Proxy UpdateWorkerVersioningRulesRequest -> Text
messageName Proxy UpdateWorkerVersioningRulesRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest"
  packedMessageDescriptor :: Proxy UpdateWorkerVersioningRulesRequest -> ByteString
packedMessageDescriptor Proxy UpdateWorkerVersioningRulesRequest
_
    = ByteString
"\n\
      \\"UpdateWorkerVersioningRulesRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\GS\n\
      \\n\
      \task_queue\CAN\STX \SOH(\tR\ttaskQueue\DC2%\n\
      \\SOconflict_token\CAN\ETX \SOH(\fR\rconflictToken\DC2\151\SOH\n\
      \\SYNinsert_assignment_rule\CAN\EOT \SOH(\v2_.temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.InsertBuildIdAssignmentRuleH\NULR\DC4insertAssignmentRule\DC2\154\SOH\n\
      \\ETBreplace_assignment_rule\CAN\ENQ \SOH(\v2`.temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.ReplaceBuildIdAssignmentRuleH\NULR\NAKreplaceAssignmentRule\DC2\151\SOH\n\
      \\SYNdelete_assignment_rule\CAN\ACK \SOH(\v2_.temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.DeleteBuildIdAssignmentRuleH\NULR\DC4deleteAssignmentRule\DC2\167\SOH\n\
      \\FSadd_compatible_redirect_rule\CAN\a \SOH(\v2d.temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.AddCompatibleBuildIdRedirectRuleH\NULR\EMaddCompatibleRedirectRule\DC2\179\SOH\n\
      \ replace_compatible_redirect_rule\CAN\b \SOH(\v2h.temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.ReplaceCompatibleBuildIdRedirectRuleH\NULR\GSreplaceCompatibleRedirectRule\DC2\176\SOH\n\
      \\USdelete_compatible_redirect_rule\CAN\t \SOH(\v2g.temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.DeleteCompatibleBuildIdRedirectRuleH\NULR\FSdeleteCompatibleRedirectRule\DC2{\n\
      \\SIcommit_build_id\CAN\n\
      \ \SOH(\v2Q.temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.CommitBuildIdH\NULR\rcommitBuildId\SUB\130\SOH\n\
      \\ESCInsertBuildIdAssignmentRule\DC2\GS\n\
      \\n\
      \rule_index\CAN\SOH \SOH(\ENQR\truleIndex\DC2D\n\
      \\EOTrule\CAN\STX \SOH(\v20.temporal.api.taskqueue.v1.BuildIdAssignmentRuleR\EOTrule\SUB\153\SOH\n\
      \\FSReplaceBuildIdAssignmentRule\DC2\GS\n\
      \\n\
      \rule_index\CAN\SOH \SOH(\ENQR\truleIndex\DC2D\n\
      \\EOTrule\CAN\STX \SOH(\v20.temporal.api.taskqueue.v1.BuildIdAssignmentRuleR\EOTrule\DC2\DC4\n\
      \\ENQforce\CAN\ETX \SOH(\bR\ENQforce\SUBR\n\
      \\ESCDeleteBuildIdAssignmentRule\DC2\GS\n\
      \\n\
      \rule_index\CAN\SOH \SOH(\ENQR\truleIndex\DC2\DC4\n\
      \\ENQforce\CAN\STX \SOH(\bR\ENQforce\SUBp\n\
      \ AddCompatibleBuildIdRedirectRule\DC2L\n\
      \\EOTrule\CAN\SOH \SOH(\v28.temporal.api.taskqueue.v1.CompatibleBuildIdRedirectRuleR\EOTrule\SUBt\n\
      \$ReplaceCompatibleBuildIdRedirectRule\DC2L\n\
      \\EOTrule\CAN\SOH \SOH(\v28.temporal.api.taskqueue.v1.CompatibleBuildIdRedirectRuleR\EOTrule\SUBM\n\
      \#DeleteCompatibleBuildIdRedirectRule\DC2&\n\
      \\SIsource_build_id\CAN\SOH \SOH(\tR\rsourceBuildId\SUBM\n\
      \\rCommitBuildId\DC2&\n\
      \\SItarget_build_id\CAN\SOH \SOH(\tR\rtargetBuildId\DC2\DC4\n\
      \\ENQforce\CAN\STX \SOH(\bR\ENQforceB\v\n\
      \\toperation"
  packedFileDescriptor :: Proxy UpdateWorkerVersioningRulesRequest -> ByteString
packedFileDescriptor Proxy UpdateWorkerVersioningRulesRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor UpdateWorkerVersioningRulesRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor UpdateWorkerVersioningRulesRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateWorkerVersioningRulesRequest Text
-> FieldDescriptor UpdateWorkerVersioningRulesRequest
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
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     Text
     Text
-> FieldAccessor UpdateWorkerVersioningRulesRequest 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 UpdateWorkerVersioningRulesRequest
        taskQueue__field_descriptor :: FieldDescriptor UpdateWorkerVersioningRulesRequest
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateWorkerVersioningRulesRequest Text
-> FieldDescriptor UpdateWorkerVersioningRulesRequest
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
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     Text
     Text
-> FieldAccessor UpdateWorkerVersioningRulesRequest 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 UpdateWorkerVersioningRulesRequest
        conflictToken__field_descriptor :: FieldDescriptor UpdateWorkerVersioningRulesRequest
conflictToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor UpdateWorkerVersioningRulesRequest ByteString
-> FieldDescriptor UpdateWorkerVersioningRulesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"conflict_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest
     ByteString
     ByteString
-> FieldAccessor UpdateWorkerVersioningRulesRequest ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"conflictToken")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest
        insertAssignmentRule__field_descriptor :: FieldDescriptor UpdateWorkerVersioningRulesRequest
insertAssignmentRule__field_descriptor
          = String
-> FieldTypeDescriptor
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> FieldDescriptor UpdateWorkerVersioningRulesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"insert_assignment_rule"
              (MessageOrGroup
-> FieldTypeDescriptor
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
              (Lens'
  UpdateWorkerVersioningRulesRequest
  (Maybe
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'insertAssignmentRule")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest
        replaceAssignmentRule__field_descriptor :: FieldDescriptor UpdateWorkerVersioningRulesRequest
replaceAssignmentRule__field_descriptor
          = String
-> FieldTypeDescriptor
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> FieldDescriptor UpdateWorkerVersioningRulesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"replace_assignment_rule"
              (MessageOrGroup
-> FieldTypeDescriptor
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
              (Lens'
  UpdateWorkerVersioningRulesRequest
  (Maybe
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'replaceAssignmentRule")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest
        deleteAssignmentRule__field_descriptor :: FieldDescriptor UpdateWorkerVersioningRulesRequest
deleteAssignmentRule__field_descriptor
          = String
-> FieldTypeDescriptor
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> FieldDescriptor UpdateWorkerVersioningRulesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"delete_assignment_rule"
              (MessageOrGroup
-> FieldTypeDescriptor
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
              (Lens'
  UpdateWorkerVersioningRulesRequest
  (Maybe
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'deleteAssignmentRule")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest
        addCompatibleRedirectRule__field_descriptor :: FieldDescriptor UpdateWorkerVersioningRulesRequest
addCompatibleRedirectRule__field_descriptor
          = String
-> FieldTypeDescriptor
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> FieldDescriptor UpdateWorkerVersioningRulesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"add_compatible_redirect_rule"
              (MessageOrGroup
-> FieldTypeDescriptor
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
              (Lens'
  UpdateWorkerVersioningRulesRequest
  (Maybe
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'addCompatibleRedirectRule")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest
        replaceCompatibleRedirectRule__field_descriptor :: FieldDescriptor UpdateWorkerVersioningRulesRequest
replaceCompatibleRedirectRule__field_descriptor
          = String
-> FieldTypeDescriptor
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> FieldDescriptor UpdateWorkerVersioningRulesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"replace_compatible_redirect_rule"
              (MessageOrGroup
-> FieldTypeDescriptor
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
              (Lens'
  UpdateWorkerVersioningRulesRequest
  (Maybe
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                    @"maybe'replaceCompatibleRedirectRule")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest
        deleteCompatibleRedirectRule__field_descriptor :: FieldDescriptor UpdateWorkerVersioningRulesRequest
deleteCompatibleRedirectRule__field_descriptor
          = String
-> FieldTypeDescriptor
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> FieldDescriptor UpdateWorkerVersioningRulesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"delete_compatible_redirect_rule"
              (MessageOrGroup
-> FieldTypeDescriptor
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
              (Lens'
  UpdateWorkerVersioningRulesRequest
  (Maybe
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
                    @"maybe'deleteCompatibleRedirectRule")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest
        commitBuildId__field_descriptor :: FieldDescriptor UpdateWorkerVersioningRulesRequest
commitBuildId__field_descriptor
          = String
-> FieldTypeDescriptor
     UpdateWorkerVersioningRulesRequest'CommitBuildId
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest'CommitBuildId
-> FieldDescriptor UpdateWorkerVersioningRulesRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"commit_build_id"
              (MessageOrGroup
-> FieldTypeDescriptor
     UpdateWorkerVersioningRulesRequest'CommitBuildId
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpdateWorkerVersioningRulesRequest'CommitBuildId)
              (Lens'
  UpdateWorkerVersioningRulesRequest
  (Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId)
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest
     UpdateWorkerVersioningRulesRequest'CommitBuildId
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'commitBuildId")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest
      in
        [(Tag, FieldDescriptor UpdateWorkerVersioningRulesRequest)]
-> Map Tag (FieldDescriptor UpdateWorkerVersioningRulesRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor UpdateWorkerVersioningRulesRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor UpdateWorkerVersioningRulesRequest
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor UpdateWorkerVersioningRulesRequest
conflictToken__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor UpdateWorkerVersioningRulesRequest
insertAssignmentRule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor UpdateWorkerVersioningRulesRequest
replaceAssignmentRule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor UpdateWorkerVersioningRulesRequest
deleteAssignmentRule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, 
            FieldDescriptor UpdateWorkerVersioningRulesRequest
addCompatibleRedirectRule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, 
            FieldDescriptor UpdateWorkerVersioningRulesRequest
replaceCompatibleRedirectRule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, 
            FieldDescriptor UpdateWorkerVersioningRulesRequest
deleteCompatibleRedirectRule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor UpdateWorkerVersioningRulesRequest
commitBuildId__field_descriptor)]
  unknownFields :: Lens' UpdateWorkerVersioningRulesRequest FieldSet
unknownFields
    = (UpdateWorkerVersioningRulesRequest -> FieldSet)
-> (UpdateWorkerVersioningRulesRequest
    -> FieldSet -> UpdateWorkerVersioningRulesRequest)
-> Lens' UpdateWorkerVersioningRulesRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateWorkerVersioningRulesRequest -> FieldSet
_UpdateWorkerVersioningRulesRequest'_unknownFields
        (\ UpdateWorkerVersioningRulesRequest
x__ FieldSet
y__
           -> UpdateWorkerVersioningRulesRequest
x__ {_UpdateWorkerVersioningRulesRequest'_unknownFields = y__})
  defMessage :: UpdateWorkerVersioningRulesRequest
defMessage
    = UpdateWorkerVersioningRulesRequest'_constructor
        {_UpdateWorkerVersioningRulesRequest'namespace :: Text
_UpdateWorkerVersioningRulesRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerVersioningRulesRequest'taskQueue :: Text
_UpdateWorkerVersioningRulesRequest'taskQueue = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerVersioningRulesRequest'conflictToken :: ByteString
_UpdateWorkerVersioningRulesRequest'conflictToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerVersioningRulesRequest'operation :: Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation = Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a. Maybe a
Prelude.Nothing,
         _UpdateWorkerVersioningRulesRequest'_unknownFields :: FieldSet
_UpdateWorkerVersioningRulesRequest'_unknownFields = []}
  parseMessage :: Parser UpdateWorkerVersioningRulesRequest
parseMessage
    = let
        loop ::
          UpdateWorkerVersioningRulesRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateWorkerVersioningRulesRequest
        loop :: UpdateWorkerVersioningRulesRequest
-> Parser UpdateWorkerVersioningRulesRequest
loop UpdateWorkerVersioningRulesRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
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)
                        Word64
26
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"conflict_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"conflictToken") y x)
                        Word64
34
                          -> do y <- Parser
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> String
-> Parser
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"insert_assignment_rule"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"insertAssignmentRule") y x)
                        Word64
42
                          -> do y <- Parser
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> String
-> Parser
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"replace_assignment_rule"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"replaceAssignmentRule") y x)
                        Word64
50
                          -> do y <- Parser
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> String
-> Parser
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"delete_assignment_rule"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"deleteAssignmentRule") y x)
                        Word64
58
                          -> do y <- Parser
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> String
-> Parser
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"add_compatible_redirect_rule"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"addCompatibleRedirectRule") y x)
                        Word64
66
                          -> do y <- Parser
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> String
-> Parser
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"replace_compatible_redirect_rule"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"replaceCompatibleRedirectRule") y
                                     x)
                        Word64
74
                          -> do y <- Parser
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> String
-> Parser
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"delete_compatible_redirect_rule"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"deleteCompatibleRedirectRule") y
                                     x)
                        Word64
82
                          -> do y <- Parser UpdateWorkerVersioningRulesRequest'CommitBuildId
-> String
-> Parser UpdateWorkerVersioningRulesRequest'CommitBuildId
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"commit_build_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"commitBuildId") 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 UpdateWorkerVersioningRulesRequest
-> String -> Parser UpdateWorkerVersioningRulesRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateWorkerVersioningRulesRequest
-> Parser UpdateWorkerVersioningRulesRequest
loop UpdateWorkerVersioningRulesRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"UpdateWorkerVersioningRulesRequest"
  buildMessage :: UpdateWorkerVersioningRulesRequest -> Builder
buildMessage
    = \ UpdateWorkerVersioningRulesRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  UpdateWorkerVersioningRulesRequest
  UpdateWorkerVersioningRulesRequest
  Text
  Text
-> UpdateWorkerVersioningRulesRequest -> 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") UpdateWorkerVersioningRulesRequest
_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
  UpdateWorkerVersioningRulesRequest
  UpdateWorkerVersioningRulesRequest
  Text
  Text
-> UpdateWorkerVersioningRulesRequest -> 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") UpdateWorkerVersioningRulesRequest
_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 :: ByteString
_v
                        = FoldLike
  ByteString
  UpdateWorkerVersioningRulesRequest
  UpdateWorkerVersioningRulesRequest
  ByteString
  ByteString
-> UpdateWorkerVersioningRulesRequest -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"conflictToken") UpdateWorkerVersioningRulesRequest
_x
                    in
                      if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
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
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               ByteString
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe UpdateWorkerVersioningRulesRequest'Operation)
  UpdateWorkerVersioningRulesRequest
  UpdateWorkerVersioningRulesRequest
  (Maybe UpdateWorkerVersioningRulesRequest'Operation)
  (Maybe UpdateWorkerVersioningRulesRequest'Operation)
-> UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'operation") UpdateWorkerVersioningRulesRequest
_x
                       of
                         Maybe UpdateWorkerVersioningRulesRequest'Operation
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just (UpdateWorkerVersioningRulesRequest'InsertAssignmentRule UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
v))
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> ByteString)
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
v)
                         (Prelude.Just (UpdateWorkerVersioningRulesRequest'ReplaceAssignmentRule UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
v))
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                ((ByteString -> Builder)
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> ByteString)
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
v)
                         (Prelude.Just (UpdateWorkerVersioningRulesRequest'DeleteAssignmentRule UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
v))
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                ((ByteString -> Builder)
-> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> ByteString)
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
v)
                         (Prelude.Just (UpdateWorkerVersioningRulesRequest'AddCompatibleRedirectRule UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
v))
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                ((ByteString -> Builder)
-> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> ByteString)
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
v)
                         (Prelude.Just (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleRedirectRule UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
v))
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                                ((ByteString -> Builder)
-> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> ByteString)
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
v)
                         (Prelude.Just (UpdateWorkerVersioningRulesRequest'DeleteCompatibleRedirectRule UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
v))
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
                                ((ByteString -> Builder)
-> (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> ByteString)
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
v)
                         (Prelude.Just (UpdateWorkerVersioningRulesRequest'CommitBuildId' UpdateWorkerVersioningRulesRequest'CommitBuildId
v))
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
                                ((ByteString -> Builder)
-> (UpdateWorkerVersioningRulesRequest'CommitBuildId -> ByteString)
-> UpdateWorkerVersioningRulesRequest'CommitBuildId
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   UpdateWorkerVersioningRulesRequest'CommitBuildId -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateWorkerVersioningRulesRequest'CommitBuildId
v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  UpdateWorkerVersioningRulesRequest
  UpdateWorkerVersioningRulesRequest
  FieldSet
  FieldSet
-> UpdateWorkerVersioningRulesRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateWorkerVersioningRulesRequest
  UpdateWorkerVersioningRulesRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpdateWorkerVersioningRulesRequest FieldSet
Data.ProtoLens.unknownFields UpdateWorkerVersioningRulesRequest
_x)))))
instance Control.DeepSeq.NFData UpdateWorkerVersioningRulesRequest where
  rnf :: UpdateWorkerVersioningRulesRequest -> ()
rnf
    = \ UpdateWorkerVersioningRulesRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateWorkerVersioningRulesRequest -> FieldSet
_UpdateWorkerVersioningRulesRequest'_unknownFields UpdateWorkerVersioningRulesRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateWorkerVersioningRulesRequest -> Text
_UpdateWorkerVersioningRulesRequest'namespace UpdateWorkerVersioningRulesRequest
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpdateWorkerVersioningRulesRequest -> Text
_UpdateWorkerVersioningRulesRequest'taskQueue UpdateWorkerVersioningRulesRequest
x__)
                   (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (UpdateWorkerVersioningRulesRequest -> ByteString
_UpdateWorkerVersioningRulesRequest'conflictToken UpdateWorkerVersioningRulesRequest
x__)
                      (Maybe UpdateWorkerVersioningRulesRequest'Operation -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (UpdateWorkerVersioningRulesRequest
-> Maybe UpdateWorkerVersioningRulesRequest'Operation
_UpdateWorkerVersioningRulesRequest'operation UpdateWorkerVersioningRulesRequest
x__) ()))))
instance Control.DeepSeq.NFData UpdateWorkerVersioningRulesRequest'Operation where
  rnf :: UpdateWorkerVersioningRulesRequest'Operation -> ()
rnf (UpdateWorkerVersioningRulesRequest'InsertAssignmentRule UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__)
    = UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__
  rnf (UpdateWorkerVersioningRulesRequest'ReplaceAssignmentRule UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__)
    = UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__
  rnf (UpdateWorkerVersioningRulesRequest'DeleteAssignmentRule UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__)
    = UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__
  rnf
    (UpdateWorkerVersioningRulesRequest'AddCompatibleRedirectRule UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
x__)
    = UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
x__
  rnf
    (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleRedirectRule UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
x__)
    = UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
x__
  rnf
    (UpdateWorkerVersioningRulesRequest'DeleteCompatibleRedirectRule UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
x__)
    = UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
x__
  rnf (UpdateWorkerVersioningRulesRequest'CommitBuildId' UpdateWorkerVersioningRulesRequest'CommitBuildId
x__)
    = UpdateWorkerVersioningRulesRequest'CommitBuildId -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf UpdateWorkerVersioningRulesRequest'CommitBuildId
x__
_UpdateWorkerVersioningRulesRequest'InsertAssignmentRule ::
  Data.ProtoLens.Prism.Prism' UpdateWorkerVersioningRulesRequest'Operation UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'InsertAssignmentRule :: Prism'
  UpdateWorkerVersioningRulesRequest'Operation
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'InsertAssignmentRule
  = (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> Prism'
     UpdateWorkerVersioningRulesRequest'Operation
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'InsertAssignmentRule
      (\ UpdateWorkerVersioningRulesRequest'Operation
p__
         -> case UpdateWorkerVersioningRulesRequest'Operation
p__ of
              (UpdateWorkerVersioningRulesRequest'InsertAssignmentRule UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
p__val)
                -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
p__val
              UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall a. Maybe a
Prelude.Nothing)
_UpdateWorkerVersioningRulesRequest'ReplaceAssignmentRule ::
  Data.ProtoLens.Prism.Prism' UpdateWorkerVersioningRulesRequest'Operation UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'ReplaceAssignmentRule :: Prism'
  UpdateWorkerVersioningRulesRequest'Operation
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'ReplaceAssignmentRule
  = (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> Prism'
     UpdateWorkerVersioningRulesRequest'Operation
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'ReplaceAssignmentRule
      (\ UpdateWorkerVersioningRulesRequest'Operation
p__
         -> case UpdateWorkerVersioningRulesRequest'Operation
p__ of
              (UpdateWorkerVersioningRulesRequest'ReplaceAssignmentRule UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
p__val)
                -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
p__val
              UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall a. Maybe a
Prelude.Nothing)
_UpdateWorkerVersioningRulesRequest'DeleteAssignmentRule ::
  Data.ProtoLens.Prism.Prism' UpdateWorkerVersioningRulesRequest'Operation UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'DeleteAssignmentRule :: Prism'
  UpdateWorkerVersioningRulesRequest'Operation
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'DeleteAssignmentRule
  = (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
-> Prism'
     UpdateWorkerVersioningRulesRequest'Operation
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'DeleteAssignmentRule
      (\ UpdateWorkerVersioningRulesRequest'Operation
p__
         -> case UpdateWorkerVersioningRulesRequest'Operation
p__ of
              (UpdateWorkerVersioningRulesRequest'DeleteAssignmentRule UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
p__val)
                -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
p__val
              UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall a. Maybe a
Prelude.Nothing)
_UpdateWorkerVersioningRulesRequest'AddCompatibleRedirectRule ::
  Data.ProtoLens.Prism.Prism' UpdateWorkerVersioningRulesRequest'Operation UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'AddCompatibleRedirectRule :: Prism'
  UpdateWorkerVersioningRulesRequest'Operation
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'AddCompatibleRedirectRule
  = (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
-> Prism'
     UpdateWorkerVersioningRulesRequest'Operation
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'AddCompatibleRedirectRule
      (\ UpdateWorkerVersioningRulesRequest'Operation
p__
         -> case UpdateWorkerVersioningRulesRequest'Operation
p__ of
              (UpdateWorkerVersioningRulesRequest'AddCompatibleRedirectRule UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
p__val)
                -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
p__val
              UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall a. Maybe a
Prelude.Nothing)
_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleRedirectRule ::
  Data.ProtoLens.Prism.Prism' UpdateWorkerVersioningRulesRequest'Operation UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleRedirectRule :: Prism'
  UpdateWorkerVersioningRulesRequest'Operation
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleRedirectRule
  = (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
-> Prism'
     UpdateWorkerVersioningRulesRequest'Operation
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'ReplaceCompatibleRedirectRule
      (\ UpdateWorkerVersioningRulesRequest'Operation
p__
         -> case UpdateWorkerVersioningRulesRequest'Operation
p__ of
              (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleRedirectRule UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
p__val)
                -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
p__val
              UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall a. Maybe a
Prelude.Nothing)
_UpdateWorkerVersioningRulesRequest'DeleteCompatibleRedirectRule ::
  Data.ProtoLens.Prism.Prism' UpdateWorkerVersioningRulesRequest'Operation UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'DeleteCompatibleRedirectRule :: Prism'
  UpdateWorkerVersioningRulesRequest'Operation
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'DeleteCompatibleRedirectRule
  = (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe
         UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
-> Prism'
     UpdateWorkerVersioningRulesRequest'Operation
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'DeleteCompatibleRedirectRule
      (\ UpdateWorkerVersioningRulesRequest'Operation
p__
         -> case UpdateWorkerVersioningRulesRequest'Operation
p__ of
              (UpdateWorkerVersioningRulesRequest'DeleteCompatibleRedirectRule UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
p__val)
                -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Maybe
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
p__val
              UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall a. Maybe a
Prelude.Nothing)
_UpdateWorkerVersioningRulesRequest'CommitBuildId' ::
  Data.ProtoLens.Prism.Prism' UpdateWorkerVersioningRulesRequest'Operation UpdateWorkerVersioningRulesRequest'CommitBuildId
_UpdateWorkerVersioningRulesRequest'CommitBuildId' :: Prism'
  UpdateWorkerVersioningRulesRequest'Operation
  UpdateWorkerVersioningRulesRequest'CommitBuildId
_UpdateWorkerVersioningRulesRequest'CommitBuildId'
  = (UpdateWorkerVersioningRulesRequest'CommitBuildId
 -> UpdateWorkerVersioningRulesRequest'Operation)
-> (UpdateWorkerVersioningRulesRequest'Operation
    -> Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId)
-> Prism'
     UpdateWorkerVersioningRulesRequest'Operation
     UpdateWorkerVersioningRulesRequest'CommitBuildId
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'Operation
UpdateWorkerVersioningRulesRequest'CommitBuildId'
      (\ UpdateWorkerVersioningRulesRequest'Operation
p__
         -> case UpdateWorkerVersioningRulesRequest'Operation
p__ of
              (UpdateWorkerVersioningRulesRequest'CommitBuildId' UpdateWorkerVersioningRulesRequest'CommitBuildId
p__val)
                -> UpdateWorkerVersioningRulesRequest'CommitBuildId
-> Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
forall a. a -> Maybe a
Prelude.Just UpdateWorkerVersioningRulesRequest'CommitBuildId
p__val
              UpdateWorkerVersioningRulesRequest'Operation
_otherwise -> Maybe UpdateWorkerVersioningRulesRequest'CommitBuildId
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.rule' @:: Lens' UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleBuildIdRedirectRule@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'rule' @:: Lens' UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleBuildIdRedirectRule)@ -}
data UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
  = UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'_constructor {UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Maybe CompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'rule :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleBuildIdRedirectRule),
                                                                                      UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Bool
(UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
 -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
 -> Bool)
-> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> Bool)
-> Eq
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Bool
== :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Bool
$c/= :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Bool
/= :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Bool
Prelude.Eq, Eq
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
Eq
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule =>
(UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
 -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
 -> Ordering)
-> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
-> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
-> Ord
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Bool
UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Ordering
UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
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 :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Ordering
compare :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Ordering
$c< :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Bool
< :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Bool
$c<= :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Bool
<= :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Bool
$c> :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Bool
> :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Bool
$c>= :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Bool
>= :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Bool
$cmax :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
max :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
$cmin :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
min :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
Prelude.Ord)
instance Prelude.Show UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule where
  showsPrec :: Int
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> ShowS
showsPrec Int
_ UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule "rule" Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleBuildIdRedirectRule where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "rule"
-> (CompatibleBuildIdRedirectRule
    -> f CompatibleBuildIdRedirectRule)
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> f UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
fieldOf Proxy# "rule"
_
    = ((Maybe CompatibleBuildIdRedirectRule
  -> f (Maybe CompatibleBuildIdRedirectRule))
 -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
 -> f UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
-> ((CompatibleBuildIdRedirectRule
     -> f CompatibleBuildIdRedirectRule)
    -> Maybe CompatibleBuildIdRedirectRule
    -> f (Maybe CompatibleBuildIdRedirectRule))
-> (CompatibleBuildIdRedirectRule
    -> f CompatibleBuildIdRedirectRule)
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> f UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
 -> Maybe CompatibleBuildIdRedirectRule)
-> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> Maybe CompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
-> Lens
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
     (Maybe CompatibleBuildIdRedirectRule)
     (Maybe CompatibleBuildIdRedirectRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Maybe CompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'rule
           (\ UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
x__ Maybe CompatibleBuildIdRedirectRule
y__
              -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
x__
                   {_UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'rule = y__}))
        (CompatibleBuildIdRedirectRule
-> Lens'
     (Maybe CompatibleBuildIdRedirectRule) CompatibleBuildIdRedirectRule
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CompatibleBuildIdRedirectRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule "maybe'rule" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleBuildIdRedirectRule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'rule"
-> (Maybe CompatibleBuildIdRedirectRule
    -> f (Maybe CompatibleBuildIdRedirectRule))
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> f UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
fieldOf Proxy# "maybe'rule"
_
    = ((Maybe CompatibleBuildIdRedirectRule
  -> f (Maybe CompatibleBuildIdRedirectRule))
 -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
 -> f UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
-> ((Maybe CompatibleBuildIdRedirectRule
     -> f (Maybe CompatibleBuildIdRedirectRule))
    -> Maybe CompatibleBuildIdRedirectRule
    -> f (Maybe CompatibleBuildIdRedirectRule))
-> (Maybe CompatibleBuildIdRedirectRule
    -> f (Maybe CompatibleBuildIdRedirectRule))
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> f UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
 -> Maybe CompatibleBuildIdRedirectRule)
-> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> Maybe CompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
-> Lens
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
     (Maybe CompatibleBuildIdRedirectRule)
     (Maybe CompatibleBuildIdRedirectRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Maybe CompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'rule
           (\ UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
x__ Maybe CompatibleBuildIdRedirectRule
y__
              -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
x__
                   {_UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'rule = y__}))
        (Maybe CompatibleBuildIdRedirectRule
 -> f (Maybe CompatibleBuildIdRedirectRule))
-> Maybe CompatibleBuildIdRedirectRule
-> f (Maybe CompatibleBuildIdRedirectRule)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule where
  messageName :: Proxy
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Text
messageName Proxy
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.AddCompatibleBuildIdRedirectRule"
  packedMessageDescriptor :: Proxy
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> ByteString
packedMessageDescriptor Proxy
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
_
    = ByteString
"\n\
      \ AddCompatibleBuildIdRedirectRule\DC2L\n\
      \\EOTrule\CAN\SOH \SOH(\v28.temporal.api.taskqueue.v1.CompatibleBuildIdRedirectRuleR\EOTrule"
  packedFileDescriptor :: Proxy
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> ByteString
packedFileDescriptor Proxy
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
fieldsByTag
    = let
        rule__field_descriptor :: FieldDescriptor
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
rule__field_descriptor
          = String
-> FieldTypeDescriptor CompatibleBuildIdRedirectRule
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
     CompatibleBuildIdRedirectRule
-> FieldDescriptor
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"rule"
              (MessageOrGroup -> FieldTypeDescriptor CompatibleBuildIdRedirectRule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleBuildIdRedirectRule)
              (Lens
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
  (Maybe CompatibleBuildIdRedirectRule)
  (Maybe CompatibleBuildIdRedirectRule)
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
     CompatibleBuildIdRedirectRule
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'rule")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
      in
        [(Tag,
  FieldDescriptor
    UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)]
-> Map
     Tag
     (FieldDescriptor
        UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
rule__field_descriptor)]
  unknownFields :: Lens'
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
  FieldSet
unknownFields
    = (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
 -> FieldSet)
-> (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
    -> FieldSet
    -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule)
-> Lens'
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
     FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'_unknownFields
        (\ UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
x__ FieldSet
y__
           -> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
x__
                {_UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'_unknownFields = y__})
  defMessage :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
defMessage
    = UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'_constructor
        {_UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'rule :: Maybe CompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'rule = Maybe CompatibleBuildIdRedirectRule
forall a. Maybe a
Prelude.Nothing,
         _UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'_unknownFields :: FieldSet
_UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'_unknownFields = []}
  parseMessage :: Parser
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
parseMessage
    = let
        loop ::
          UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
        loop :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Parser
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
loop UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
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 CompatibleBuildIdRedirectRule
-> String -> Parser CompatibleBuildIdRedirectRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"rule"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"rule") 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
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> String
-> Parser
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Parser
     UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
loop UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"AddCompatibleBuildIdRedirectRule"
  buildMessage :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Builder
buildMessage
    = \ UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe CompatibleBuildIdRedirectRule)
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
  (Maybe CompatibleBuildIdRedirectRule)
  (Maybe CompatibleBuildIdRedirectRule)
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Maybe CompatibleBuildIdRedirectRule
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'rule") UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
_x
              of
                Maybe CompatibleBuildIdRedirectRule
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just CompatibleBuildIdRedirectRule
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (CompatibleBuildIdRedirectRule -> ByteString)
-> CompatibleBuildIdRedirectRule
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          CompatibleBuildIdRedirectRule -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage CompatibleBuildIdRedirectRule
_v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
  FieldSet
  FieldSet
-> UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens'
  UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
  FieldSet
Data.ProtoLens.unknownFields UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
_x))
instance Control.DeepSeq.NFData UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule where
  rnf :: UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> ()
rnf
    = \ UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'_unknownFields
                UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
x__)
             (Maybe CompatibleBuildIdRedirectRule -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
-> Maybe CompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule'rule
                   UpdateWorkerVersioningRulesRequest'AddCompatibleBuildIdRedirectRule
x__)
                ())
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.targetBuildId' @:: Lens' UpdateWorkerVersioningRulesRequest'CommitBuildId Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.force' @:: Lens' UpdateWorkerVersioningRulesRequest'CommitBuildId Prelude.Bool@ -}
data UpdateWorkerVersioningRulesRequest'CommitBuildId
  = UpdateWorkerVersioningRulesRequest'CommitBuildId'_constructor {UpdateWorkerVersioningRulesRequest'CommitBuildId -> Text
_UpdateWorkerVersioningRulesRequest'CommitBuildId'targetBuildId :: !Data.Text.Text,
                                                                   UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
_UpdateWorkerVersioningRulesRequest'CommitBuildId'force :: !Prelude.Bool,
                                                                   UpdateWorkerVersioningRulesRequest'CommitBuildId -> FieldSet
_UpdateWorkerVersioningRulesRequest'CommitBuildId'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
(UpdateWorkerVersioningRulesRequest'CommitBuildId
 -> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool)
-> (UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool)
-> Eq UpdateWorkerVersioningRulesRequest'CommitBuildId
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
== :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
$c/= :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
/= :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
Prelude.Eq, Eq UpdateWorkerVersioningRulesRequest'CommitBuildId
Eq UpdateWorkerVersioningRulesRequest'CommitBuildId =>
(UpdateWorkerVersioningRulesRequest'CommitBuildId
 -> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Ordering)
-> (UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool)
-> (UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool)
-> (UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool)
-> (UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool)
-> (UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> UpdateWorkerVersioningRulesRequest'CommitBuildId)
-> (UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> UpdateWorkerVersioningRulesRequest'CommitBuildId)
-> Ord UpdateWorkerVersioningRulesRequest'CommitBuildId
UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Ordering
UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId
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 :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Ordering
compare :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Ordering
$c< :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
< :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
$c<= :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
<= :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
$c> :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
> :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
$c>= :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
>= :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
$cmax :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId
max :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId
$cmin :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId
min :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId
-> UpdateWorkerVersioningRulesRequest'CommitBuildId
Prelude.Ord)
instance Prelude.Show UpdateWorkerVersioningRulesRequest'CommitBuildId where
  showsPrec :: Int -> UpdateWorkerVersioningRulesRequest'CommitBuildId -> ShowS
showsPrec Int
_ UpdateWorkerVersioningRulesRequest'CommitBuildId
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateWorkerVersioningRulesRequest'CommitBuildId -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateWorkerVersioningRulesRequest'CommitBuildId
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'CommitBuildId "targetBuildId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "targetBuildId"
-> (Text -> f Text)
-> UpdateWorkerVersioningRulesRequest'CommitBuildId
-> f UpdateWorkerVersioningRulesRequest'CommitBuildId
fieldOf Proxy# "targetBuildId"
_
    = ((Text -> f Text)
 -> UpdateWorkerVersioningRulesRequest'CommitBuildId
 -> f UpdateWorkerVersioningRulesRequest'CommitBuildId)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateWorkerVersioningRulesRequest'CommitBuildId
-> f UpdateWorkerVersioningRulesRequest'CommitBuildId
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'CommitBuildId -> Text)
-> (UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> Text -> UpdateWorkerVersioningRulesRequest'CommitBuildId)
-> Lens
     UpdateWorkerVersioningRulesRequest'CommitBuildId
     UpdateWorkerVersioningRulesRequest'CommitBuildId
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'CommitBuildId -> Text
_UpdateWorkerVersioningRulesRequest'CommitBuildId'targetBuildId
           (\ UpdateWorkerVersioningRulesRequest'CommitBuildId
x__ Text
y__
              -> UpdateWorkerVersioningRulesRequest'CommitBuildId
x__
                   {_UpdateWorkerVersioningRulesRequest'CommitBuildId'targetBuildId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'CommitBuildId "force" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "force"
-> (Bool -> f Bool)
-> UpdateWorkerVersioningRulesRequest'CommitBuildId
-> f UpdateWorkerVersioningRulesRequest'CommitBuildId
fieldOf Proxy# "force"
_
    = ((Bool -> f Bool)
 -> UpdateWorkerVersioningRulesRequest'CommitBuildId
 -> f UpdateWorkerVersioningRulesRequest'CommitBuildId)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> UpdateWorkerVersioningRulesRequest'CommitBuildId
-> f UpdateWorkerVersioningRulesRequest'CommitBuildId
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool)
-> (UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> Bool -> UpdateWorkerVersioningRulesRequest'CommitBuildId)
-> Lens
     UpdateWorkerVersioningRulesRequest'CommitBuildId
     UpdateWorkerVersioningRulesRequest'CommitBuildId
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
_UpdateWorkerVersioningRulesRequest'CommitBuildId'force
           (\ UpdateWorkerVersioningRulesRequest'CommitBuildId
x__ Bool
y__
              -> UpdateWorkerVersioningRulesRequest'CommitBuildId
x__
                   {_UpdateWorkerVersioningRulesRequest'CommitBuildId'force = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateWorkerVersioningRulesRequest'CommitBuildId where
  messageName :: Proxy UpdateWorkerVersioningRulesRequest'CommitBuildId -> Text
messageName Proxy UpdateWorkerVersioningRulesRequest'CommitBuildId
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.CommitBuildId"
  packedMessageDescriptor :: Proxy UpdateWorkerVersioningRulesRequest'CommitBuildId
-> ByteString
packedMessageDescriptor Proxy UpdateWorkerVersioningRulesRequest'CommitBuildId
_
    = ByteString
"\n\
      \\rCommitBuildId\DC2&\n\
      \\SItarget_build_id\CAN\SOH \SOH(\tR\rtargetBuildId\DC2\DC4\n\
      \\ENQforce\CAN\STX \SOH(\bR\ENQforce"
  packedFileDescriptor :: Proxy UpdateWorkerVersioningRulesRequest'CommitBuildId
-> ByteString
packedFileDescriptor Proxy UpdateWorkerVersioningRulesRequest'CommitBuildId
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor UpdateWorkerVersioningRulesRequest'CommitBuildId)
fieldsByTag
    = let
        targetBuildId__field_descriptor :: FieldDescriptor UpdateWorkerVersioningRulesRequest'CommitBuildId
targetBuildId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'CommitBuildId Text
-> FieldDescriptor UpdateWorkerVersioningRulesRequest'CommitBuildId
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"target_build_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     UpdateWorkerVersioningRulesRequest'CommitBuildId
     UpdateWorkerVersioningRulesRequest'CommitBuildId
     Text
     Text
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'CommitBuildId 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 @"targetBuildId")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest'CommitBuildId
        force__field_descriptor :: FieldDescriptor UpdateWorkerVersioningRulesRequest'CommitBuildId
force__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'CommitBuildId Bool
-> FieldDescriptor UpdateWorkerVersioningRulesRequest'CommitBuildId
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"force"
              (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
     UpdateWorkerVersioningRulesRequest'CommitBuildId
     UpdateWorkerVersioningRulesRequest'CommitBuildId
     Bool
     Bool
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'CommitBuildId 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 @"force")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest'CommitBuildId
      in
        [(Tag,
  FieldDescriptor UpdateWorkerVersioningRulesRequest'CommitBuildId)]
-> Map
     Tag
     (FieldDescriptor UpdateWorkerVersioningRulesRequest'CommitBuildId)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor UpdateWorkerVersioningRulesRequest'CommitBuildId
targetBuildId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor UpdateWorkerVersioningRulesRequest'CommitBuildId
force__field_descriptor)]
  unknownFields :: Lens' UpdateWorkerVersioningRulesRequest'CommitBuildId FieldSet
unknownFields
    = (UpdateWorkerVersioningRulesRequest'CommitBuildId -> FieldSet)
-> (UpdateWorkerVersioningRulesRequest'CommitBuildId
    -> FieldSet -> UpdateWorkerVersioningRulesRequest'CommitBuildId)
-> Lens' UpdateWorkerVersioningRulesRequest'CommitBuildId FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateWorkerVersioningRulesRequest'CommitBuildId -> FieldSet
_UpdateWorkerVersioningRulesRequest'CommitBuildId'_unknownFields
        (\ UpdateWorkerVersioningRulesRequest'CommitBuildId
x__ FieldSet
y__
           -> UpdateWorkerVersioningRulesRequest'CommitBuildId
x__
                {_UpdateWorkerVersioningRulesRequest'CommitBuildId'_unknownFields = y__})
  defMessage :: UpdateWorkerVersioningRulesRequest'CommitBuildId
defMessage
    = UpdateWorkerVersioningRulesRequest'CommitBuildId'_constructor
        {_UpdateWorkerVersioningRulesRequest'CommitBuildId'targetBuildId :: Text
_UpdateWorkerVersioningRulesRequest'CommitBuildId'targetBuildId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerVersioningRulesRequest'CommitBuildId'force :: Bool
_UpdateWorkerVersioningRulesRequest'CommitBuildId'force = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerVersioningRulesRequest'CommitBuildId'_unknownFields :: FieldSet
_UpdateWorkerVersioningRulesRequest'CommitBuildId'_unknownFields = []}
  parseMessage :: Parser UpdateWorkerVersioningRulesRequest'CommitBuildId
parseMessage
    = let
        loop ::
          UpdateWorkerVersioningRulesRequest'CommitBuildId
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateWorkerVersioningRulesRequest'CommitBuildId
        loop :: UpdateWorkerVersioningRulesRequest'CommitBuildId
-> Parser UpdateWorkerVersioningRulesRequest'CommitBuildId
loop UpdateWorkerVersioningRulesRequest'CommitBuildId
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
"target_build_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"targetBuildId") 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
"force"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"force") 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 UpdateWorkerVersioningRulesRequest'CommitBuildId
-> String
-> Parser UpdateWorkerVersioningRulesRequest'CommitBuildId
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateWorkerVersioningRulesRequest'CommitBuildId
-> Parser UpdateWorkerVersioningRulesRequest'CommitBuildId
loop UpdateWorkerVersioningRulesRequest'CommitBuildId
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"CommitBuildId"
  buildMessage :: UpdateWorkerVersioningRulesRequest'CommitBuildId -> Builder
buildMessage
    = \ UpdateWorkerVersioningRulesRequest'CommitBuildId
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike
  Text
  UpdateWorkerVersioningRulesRequest'CommitBuildId
  UpdateWorkerVersioningRulesRequest'CommitBuildId
  Text
  Text
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> 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 @"targetBuildId") UpdateWorkerVersioningRulesRequest'CommitBuildId
_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
  UpdateWorkerVersioningRulesRequest'CommitBuildId
  UpdateWorkerVersioningRulesRequest'CommitBuildId
  Bool
  Bool
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> 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 @"force") UpdateWorkerVersioningRulesRequest'CommitBuildId
_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
  UpdateWorkerVersioningRulesRequest'CommitBuildId
  UpdateWorkerVersioningRulesRequest'CommitBuildId
  FieldSet
  FieldSet
-> UpdateWorkerVersioningRulesRequest'CommitBuildId -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateWorkerVersioningRulesRequest'CommitBuildId
  UpdateWorkerVersioningRulesRequest'CommitBuildId
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpdateWorkerVersioningRulesRequest'CommitBuildId FieldSet
Data.ProtoLens.unknownFields UpdateWorkerVersioningRulesRequest'CommitBuildId
_x)))
instance Control.DeepSeq.NFData UpdateWorkerVersioningRulesRequest'CommitBuildId where
  rnf :: UpdateWorkerVersioningRulesRequest'CommitBuildId -> ()
rnf
    = \ UpdateWorkerVersioningRulesRequest'CommitBuildId
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateWorkerVersioningRulesRequest'CommitBuildId -> FieldSet
_UpdateWorkerVersioningRulesRequest'CommitBuildId'_unknownFields
                UpdateWorkerVersioningRulesRequest'CommitBuildId
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateWorkerVersioningRulesRequest'CommitBuildId -> Text
_UpdateWorkerVersioningRulesRequest'CommitBuildId'targetBuildId
                   UpdateWorkerVersioningRulesRequest'CommitBuildId
x__)
                (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpdateWorkerVersioningRulesRequest'CommitBuildId -> Bool
_UpdateWorkerVersioningRulesRequest'CommitBuildId'force UpdateWorkerVersioningRulesRequest'CommitBuildId
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.ruleIndex' @:: Lens' UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.force' @:: Lens' UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule Prelude.Bool@ -}
data UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
  = UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'_constructor {UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Int32
_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'ruleIndex :: !Data.Int.Int32,
                                                                                 UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'force :: !Prelude.Bool,
                                                                                 UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
(UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
 -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
 -> Bool)
-> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> Bool)
-> Eq
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
== :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
$c/= :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
/= :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
Prelude.Eq, Eq UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
Eq
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule =>
(UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
 -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
 -> Ordering)
-> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
-> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
-> Ord
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Ordering
UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
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 :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Ordering
compare :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Ordering
$c< :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
< :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
$c<= :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
<= :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
$c> :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
> :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
$c>= :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
>= :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
$cmax :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
max :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
$cmin :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
min :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
Prelude.Ord)
instance Prelude.Show UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule where
  showsPrec :: Int
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> ShowS
showsPrec Int
_ UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule "ruleIndex" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "ruleIndex"
-> (Int32 -> f Int32)
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
fieldOf Proxy# "ruleIndex"
_
    = ((Int32 -> f Int32)
 -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
 -> f UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
 -> Int32)
-> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> Int32
    -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
-> Lens
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Int32
_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'ruleIndex
           (\ UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__ Int32
y__
              -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__
                   {_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'ruleIndex = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule "force" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "force"
-> (Bool -> f Bool)
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
fieldOf Proxy# "force"
_
    = ((Bool -> f Bool)
 -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
 -> f UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
 -> Bool)
-> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> Bool
    -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
-> Lens
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'force
           (\ UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__ Bool
y__
              -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__
                   {_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'force = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule where
  messageName :: Proxy
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Text
messageName Proxy
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.DeleteBuildIdAssignmentRule"
  packedMessageDescriptor :: Proxy
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> ByteString
packedMessageDescriptor Proxy
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
_
    = ByteString
"\n\
      \\ESCDeleteBuildIdAssignmentRule\DC2\GS\n\
      \\n\
      \rule_index\CAN\SOH \SOH(\ENQR\truleIndex\DC2\DC4\n\
      \\ENQforce\CAN\STX \SOH(\bR\ENQforce"
  packedFileDescriptor :: Proxy
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> ByteString
packedFileDescriptor Proxy
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
fieldsByTag
    = let
        ruleIndex__field_descriptor :: FieldDescriptor
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
ruleIndex__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
     Int32
-> FieldDescriptor
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"rule_index"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
     Int32
     Int32
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
     Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"ruleIndex")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
        force__field_descriptor :: FieldDescriptor
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
force__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule Bool
-> FieldDescriptor
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"force"
              (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
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
     Bool
     Bool
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule 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 @"force")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
      in
        [(Tag,
  FieldDescriptor
    UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)]
-> Map
     Tag
     (FieldDescriptor
        UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
ruleIndex__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
force__field_descriptor)]
  unknownFields :: Lens'
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
  FieldSet
unknownFields
    = (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
 -> FieldSet)
-> (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
    -> FieldSet
    -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule)
-> Lens'
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
     FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'_unknownFields
        (\ UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__ FieldSet
y__
           -> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__
                {_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'_unknownFields = y__})
  defMessage :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
defMessage
    = UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'_constructor
        {_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'ruleIndex :: Int32
_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'ruleIndex = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'force :: Bool
_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'force = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'_unknownFields :: FieldSet
_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'_unknownFields = []}
  parseMessage :: Parser
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
parseMessage
    = let
        loop ::
          UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
        loop :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Parser
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
loop UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
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 Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"rule_index"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"ruleIndex") 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
"force"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"force") 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
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> String
-> Parser
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Parser
     UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
loop UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"DeleteBuildIdAssignmentRule"
  buildMessage :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Builder
buildMessage
    = \ UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int32
_v = FoldLike
  Int32
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
  Int32
  Int32
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"ruleIndex") UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
_x
              in
                if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
8)
                      ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Bool
_v = FoldLike
  Bool
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
  Bool
  Bool
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> 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 @"force") UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
_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
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
  FieldSet
  FieldSet
-> UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens'
  UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
  FieldSet
Data.ProtoLens.unknownFields UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
_x)))
instance Control.DeepSeq.NFData UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule where
  rnf :: UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> ()
rnf
    = \ UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'_unknownFields
                UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__)
             (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Int32
_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'ruleIndex
                   UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__)
                (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
-> Bool
_UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule'force
                      UpdateWorkerVersioningRulesRequest'DeleteBuildIdAssignmentRule
x__)
                   ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.sourceBuildId' @:: Lens' UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule Data.Text.Text@ -}
data UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
  = UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule'_constructor {UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Text
_UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule'sourceBuildId :: !Data.Text.Text,
                                                                                         UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Bool
(UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
 -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
 -> Bool)
-> (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> Bool)
-> Eq
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Bool
== :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Bool
$c/= :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Bool
/= :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Bool
Prelude.Eq, Eq
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
Eq
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule =>
(UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
 -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
 -> Ordering)
-> (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
-> (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
-> Ord
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Bool
UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Ordering
UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
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 :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Ordering
compare :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Ordering
$c< :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Bool
< :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Bool
$c<= :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Bool
<= :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Bool
$c> :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Bool
> :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Bool
$c>= :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Bool
>= :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Bool
$cmax :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
max :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
$cmin :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
min :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
Prelude.Ord)
instance Prelude.Show UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule where
  showsPrec :: Int
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> ShowS
showsPrec Int
_ UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule "sourceBuildId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "sourceBuildId"
-> (Text -> f Text)
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> f UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
fieldOf Proxy# "sourceBuildId"
_
    = ((Text -> f Text)
 -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
 -> f UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> f UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
 -> Text)
-> (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> Text
    -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
-> Lens
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Text
_UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule'sourceBuildId
           (\ UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
x__ Text
y__
              -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
x__
                   {_UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule'sourceBuildId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule where
  messageName :: Proxy
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Text
messageName Proxy
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.DeleteCompatibleBuildIdRedirectRule"
  packedMessageDescriptor :: Proxy
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> ByteString
packedMessageDescriptor Proxy
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
_
    = ByteString
"\n\
      \#DeleteCompatibleBuildIdRedirectRule\DC2&\n\
      \\SIsource_build_id\CAN\SOH \SOH(\tR\rsourceBuildId"
  packedFileDescriptor :: Proxy
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> ByteString
packedFileDescriptor Proxy
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
fieldsByTag
    = let
        sourceBuildId__field_descriptor :: FieldDescriptor
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
sourceBuildId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
     Text
-> FieldDescriptor
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"source_build_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
     Text
     Text
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
     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 @"sourceBuildId")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
      in
        [(Tag,
  FieldDescriptor
    UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)]
-> Map
     Tag
     (FieldDescriptor
        UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
sourceBuildId__field_descriptor)]
  unknownFields :: Lens'
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
  FieldSet
unknownFields
    = (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
 -> FieldSet)
-> (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
    -> FieldSet
    -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule)
-> Lens'
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
     FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule'_unknownFields
        (\ UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
x__ FieldSet
y__
           -> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
x__
                {_UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule'_unknownFields = y__})
  defMessage :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
defMessage
    = UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule'_constructor
        {_UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule'sourceBuildId :: Text
_UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule'sourceBuildId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule'_unknownFields :: FieldSet
_UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule'_unknownFields = []}
  parseMessage :: Parser
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
parseMessage
    = let
        loop ::
          UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
        loop :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Parser
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
loop UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
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
"source_build_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"sourceBuildId") 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
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> String
-> Parser
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Parser
     UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
loop UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"DeleteCompatibleBuildIdRedirectRule"
  buildMessage :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Builder
buildMessage
    = \ UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike
  Text
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
  Text
  Text
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> 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 @"sourceBuildId") UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
_x
              in
                if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                      ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         (\ ByteString
bs
                            -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                 (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                    (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                 (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                         Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
  FieldSet
  FieldSet
-> UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens'
  UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
  FieldSet
Data.ProtoLens.unknownFields UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
_x))
instance Control.DeepSeq.NFData UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule where
  rnf :: UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> ()
rnf
    = \ UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule'_unknownFields
                UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
-> Text
_UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule'sourceBuildId
                   UpdateWorkerVersioningRulesRequest'DeleteCompatibleBuildIdRedirectRule
x__)
                ())
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.ruleIndex' @:: Lens' UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.rule' @:: Lens' UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdAssignmentRule@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'rule' @:: Lens' UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdAssignmentRule)@ -}
data UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
  = UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'_constructor {UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Int32
_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'ruleIndex :: !Data.Int.Int32,
                                                                                 UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Maybe BuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'rule :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdAssignmentRule),
                                                                                 UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Bool
(UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
 -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
 -> Bool)
-> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> Bool)
-> Eq
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Bool
== :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Bool
$c/= :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Bool
/= :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Bool
Prelude.Eq, Eq UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
Eq
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule =>
(UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
 -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
 -> Ordering)
-> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> Ord
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Bool
UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Ordering
UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
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 :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Ordering
compare :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Ordering
$c< :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Bool
< :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Bool
$c<= :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Bool
<= :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Bool
$c> :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Bool
> :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Bool
$c>= :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Bool
>= :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Bool
$cmax :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
max :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
$cmin :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
min :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
Prelude.Ord)
instance Prelude.Show UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule where
  showsPrec :: Int
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> ShowS
showsPrec Int
_ UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule "ruleIndex" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "ruleIndex"
-> (Int32 -> f Int32)
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
fieldOf Proxy# "ruleIndex"
_
    = ((Int32 -> f Int32)
 -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
 -> f UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
 -> Int32)
-> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> Int32
    -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> Lens
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Int32
_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'ruleIndex
           (\ UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__ Int32
y__
              -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__
                   {_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'ruleIndex = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule "rule" Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdAssignmentRule where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "rule"
-> (BuildIdAssignmentRule -> f BuildIdAssignmentRule)
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
fieldOf Proxy# "rule"
_
    = ((Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule))
 -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
 -> f UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> ((BuildIdAssignmentRule -> f BuildIdAssignmentRule)
    -> Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule))
-> (BuildIdAssignmentRule -> f BuildIdAssignmentRule)
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
 -> Maybe BuildIdAssignmentRule)
-> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> Maybe BuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> Lens
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     (Maybe BuildIdAssignmentRule)
     (Maybe BuildIdAssignmentRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Maybe BuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'rule
           (\ UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__ Maybe BuildIdAssignmentRule
y__
              -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__
                   {_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'rule = y__}))
        (BuildIdAssignmentRule
-> Lens' (Maybe BuildIdAssignmentRule) BuildIdAssignmentRule
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens BuildIdAssignmentRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule "maybe'rule" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdAssignmentRule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'rule"
-> (Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule))
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
fieldOf Proxy# "maybe'rule"
_
    = ((Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule))
 -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
 -> f UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> ((Maybe BuildIdAssignmentRule
     -> f (Maybe BuildIdAssignmentRule))
    -> Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule))
-> (Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule))
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
 -> Maybe BuildIdAssignmentRule)
-> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> Maybe BuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> Lens
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     (Maybe BuildIdAssignmentRule)
     (Maybe BuildIdAssignmentRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Maybe BuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'rule
           (\ UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__ Maybe BuildIdAssignmentRule
y__
              -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__
                   {_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'rule = y__}))
        (Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule))
-> Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule where
  messageName :: Proxy
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Text
messageName Proxy
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.InsertBuildIdAssignmentRule"
  packedMessageDescriptor :: Proxy
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> ByteString
packedMessageDescriptor Proxy
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
_
    = ByteString
"\n\
      \\ESCInsertBuildIdAssignmentRule\DC2\GS\n\
      \\n\
      \rule_index\CAN\SOH \SOH(\ENQR\truleIndex\DC2D\n\
      \\EOTrule\CAN\STX \SOH(\v20.temporal.api.taskqueue.v1.BuildIdAssignmentRuleR\EOTrule"
  packedFileDescriptor :: Proxy
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> ByteString
packedFileDescriptor Proxy
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
fieldsByTag
    = let
        ruleIndex__field_descriptor :: FieldDescriptor
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
ruleIndex__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     Int32
-> FieldDescriptor
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"rule_index"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     Int32
     Int32
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"ruleIndex")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
        rule__field_descriptor :: FieldDescriptor
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
rule__field_descriptor
          = String
-> FieldTypeDescriptor BuildIdAssignmentRule
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     BuildIdAssignmentRule
-> FieldDescriptor
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"rule"
              (MessageOrGroup -> FieldTypeDescriptor BuildIdAssignmentRule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdAssignmentRule)
              (Lens
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
  (Maybe BuildIdAssignmentRule)
  (Maybe BuildIdAssignmentRule)
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     BuildIdAssignmentRule
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'rule")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
      in
        [(Tag,
  FieldDescriptor
    UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)]
-> Map
     Tag
     (FieldDescriptor
        UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
ruleIndex__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
rule__field_descriptor)]
  unknownFields :: Lens'
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
  FieldSet
unknownFields
    = (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
 -> FieldSet)
-> (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
    -> FieldSet
    -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule)
-> Lens'
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
     FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'_unknownFields
        (\ UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__ FieldSet
y__
           -> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__
                {_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'_unknownFields = y__})
  defMessage :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
defMessage
    = UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'_constructor
        {_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'ruleIndex :: Int32
_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'ruleIndex = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'rule :: Maybe BuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'rule = Maybe BuildIdAssignmentRule
forall a. Maybe a
Prelude.Nothing,
         _UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'_unknownFields :: FieldSet
_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'_unknownFields = []}
  parseMessage :: Parser
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
parseMessage
    = let
        loop ::
          UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
        loop :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Parser
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
loop UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
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 Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"rule_index"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"ruleIndex") y x)
                        Word64
18
                          -> do y <- Parser BuildIdAssignmentRule
-> String -> Parser BuildIdAssignmentRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"rule"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"rule") 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
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> String
-> Parser
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Parser
     UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
loop UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"InsertBuildIdAssignmentRule"
  buildMessage :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Builder
buildMessage
    = \ UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int32
_v = FoldLike
  Int32
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
  Int32
  Int32
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"ruleIndex") UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
_x
              in
                if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
8)
                      ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe BuildIdAssignmentRule)
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
  (Maybe BuildIdAssignmentRule)
  (Maybe BuildIdAssignmentRule)
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Maybe BuildIdAssignmentRule
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'rule") UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
_x
                 of
                   Maybe BuildIdAssignmentRule
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just BuildIdAssignmentRule
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (BuildIdAssignmentRule -> ByteString)
-> BuildIdAssignmentRule
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             BuildIdAssignmentRule -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage BuildIdAssignmentRule
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
  FieldSet
  FieldSet
-> UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens'
  UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
  FieldSet
Data.ProtoLens.unknownFields UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
_x)))
instance Control.DeepSeq.NFData UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule where
  rnf :: UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> ()
rnf
    = \ UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'_unknownFields
                UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__)
             (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Int32
_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'ruleIndex
                   UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__)
                (Maybe BuildIdAssignmentRule -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
-> Maybe BuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule'rule
                      UpdateWorkerVersioningRulesRequest'InsertBuildIdAssignmentRule
x__)
                   ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.ruleIndex' @:: Lens' UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule Data.Int.Int32@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.rule' @:: Lens' UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdAssignmentRule@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'rule' @:: Lens' UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdAssignmentRule)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.force' @:: Lens' UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule Prelude.Bool@ -}
data UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  = UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'_constructor {UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Int32
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'ruleIndex :: !Data.Int.Int32,
                                                                                  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Maybe BuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'rule :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdAssignmentRule),
                                                                                  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'force :: !Prelude.Bool,
                                                                                  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
(UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> Bool)
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> Bool)
-> Eq
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
== :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
$c/= :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
/= :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
Prelude.Eq, Eq UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
Eq
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule =>
(UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> Ordering)
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> Ord
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Ordering
UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
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 :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Ordering
compare :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Ordering
$c< :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
< :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
$c<= :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
<= :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
$c> :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
> :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
$c>= :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
>= :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
$cmax :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
max :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
$cmin :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
min :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
Prelude.Ord)
instance Prelude.Show UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule where
  showsPrec :: Int
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> ShowS
showsPrec Int
_ UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule "ruleIndex" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "ruleIndex"
-> (Int32 -> f Int32)
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
fieldOf Proxy# "ruleIndex"
_
    = ((Int32 -> f Int32)
 -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> Int32)
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> Int32
    -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> Lens
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Int32
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'ruleIndex
           (\ UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__ Int32
y__
              -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__
                   {_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'ruleIndex = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule "rule" Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdAssignmentRule where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "rule"
-> (BuildIdAssignmentRule -> f BuildIdAssignmentRule)
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
fieldOf Proxy# "rule"
_
    = ((Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule))
 -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> ((BuildIdAssignmentRule -> f BuildIdAssignmentRule)
    -> Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule))
-> (BuildIdAssignmentRule -> f BuildIdAssignmentRule)
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> Maybe BuildIdAssignmentRule)
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> Maybe BuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> Lens
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     (Maybe BuildIdAssignmentRule)
     (Maybe BuildIdAssignmentRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Maybe BuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'rule
           (\ UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__ Maybe BuildIdAssignmentRule
y__
              -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__
                   {_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'rule = y__}))
        (BuildIdAssignmentRule
-> Lens' (Maybe BuildIdAssignmentRule) BuildIdAssignmentRule
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens BuildIdAssignmentRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule "maybe'rule" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdAssignmentRule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'rule"
-> (Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule))
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
fieldOf Proxy# "maybe'rule"
_
    = ((Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule))
 -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> ((Maybe BuildIdAssignmentRule
     -> f (Maybe BuildIdAssignmentRule))
    -> Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule))
-> (Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule))
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> Maybe BuildIdAssignmentRule)
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> Maybe BuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> Lens
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     (Maybe BuildIdAssignmentRule)
     (Maybe BuildIdAssignmentRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Maybe BuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'rule
           (\ UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__ Maybe BuildIdAssignmentRule
y__
              -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__
                   {_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'rule = y__}))
        (Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule))
-> Maybe BuildIdAssignmentRule -> f (Maybe BuildIdAssignmentRule)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule "force" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "force"
-> (Bool -> f Bool)
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
fieldOf Proxy# "force"
_
    = ((Bool -> f Bool)
 -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> f UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> Bool)
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> Bool
    -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> Lens
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'force
           (\ UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__ Bool
y__
              -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__
                   {_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'force = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule where
  messageName :: Proxy
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Text
messageName Proxy
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.ReplaceBuildIdAssignmentRule"
  packedMessageDescriptor :: Proxy
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> ByteString
packedMessageDescriptor Proxy
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
_
    = ByteString
"\n\
      \\FSReplaceBuildIdAssignmentRule\DC2\GS\n\
      \\n\
      \rule_index\CAN\SOH \SOH(\ENQR\truleIndex\DC2D\n\
      \\EOTrule\CAN\STX \SOH(\v20.temporal.api.taskqueue.v1.BuildIdAssignmentRuleR\EOTrule\DC2\DC4\n\
      \\ENQforce\CAN\ETX \SOH(\bR\ENQforce"
  packedFileDescriptor :: Proxy
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> ByteString
packedFileDescriptor Proxy
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
fieldsByTag
    = let
        ruleIndex__field_descriptor :: FieldDescriptor
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
ruleIndex__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     Int32
-> FieldDescriptor
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"rule_index"
              (ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
              (WireDefault Int32
-> Lens
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     Int32
     Int32
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"ruleIndex")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
        rule__field_descriptor :: FieldDescriptor
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
rule__field_descriptor
          = String
-> FieldTypeDescriptor BuildIdAssignmentRule
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     BuildIdAssignmentRule
-> FieldDescriptor
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"rule"
              (MessageOrGroup -> FieldTypeDescriptor BuildIdAssignmentRule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.BuildIdAssignmentRule)
              (Lens
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  (Maybe BuildIdAssignmentRule)
  (Maybe BuildIdAssignmentRule)
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     BuildIdAssignmentRule
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'rule")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
        force__field_descriptor :: FieldDescriptor
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
force__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     Bool
-> FieldDescriptor
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"force"
              (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
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     Bool
     Bool
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     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 @"force")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
      in
        [(Tag,
  FieldDescriptor
    UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)]
-> Map
     Tag
     (FieldDescriptor
        UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
ruleIndex__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
rule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
force__field_descriptor)]
  unknownFields :: Lens'
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  FieldSet
unknownFields
    = (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
 -> FieldSet)
-> (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
    -> FieldSet
    -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule)
-> Lens'
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
     FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'_unknownFields
        (\ UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__ FieldSet
y__
           -> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__
                {_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'_unknownFields = y__})
  defMessage :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
defMessage
    = UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'_constructor
        {_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'ruleIndex :: Int32
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'ruleIndex = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'rule :: Maybe BuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'rule = Maybe BuildIdAssignmentRule
forall a. Maybe a
Prelude.Nothing,
         _UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'force :: Bool
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'force = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'_unknownFields :: FieldSet
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'_unknownFields = []}
  parseMessage :: Parser
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
parseMessage
    = let
        loop ::
          UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
        loop :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Parser
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
loop UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
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 Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
                                          Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"rule_index"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"ruleIndex") y x)
                        Word64
18
                          -> do y <- Parser BuildIdAssignmentRule
-> String -> Parser BuildIdAssignmentRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"rule"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"rule") y x)
                        Word64
24
                          -> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          (Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
                                       String
"force"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"force") 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
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> String
-> Parser
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Parser
     UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
loop UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ReplaceBuildIdAssignmentRule"
  buildMessage :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Builder
buildMessage
    = \ UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int32
_v = FoldLike
  Int32
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  Int32
  Int32
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"ruleIndex") UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
_x
              in
                if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                    Builder
forall a. Monoid a => a
Data.Monoid.mempty
                else
                    Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
8)
                      ((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                         Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe BuildIdAssignmentRule)
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  (Maybe BuildIdAssignmentRule)
  (Maybe BuildIdAssignmentRule)
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Maybe BuildIdAssignmentRule
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'rule") UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
_x
                 of
                   Maybe BuildIdAssignmentRule
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just BuildIdAssignmentRule
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (BuildIdAssignmentRule -> ByteString)
-> BuildIdAssignmentRule
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             BuildIdAssignmentRule -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage BuildIdAssignmentRule
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Bool
_v = FoldLike
  Bool
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  Bool
  Bool
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> 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 @"force") UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
_x
                    in
                      if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
24)
                            ((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt (\ Bool
b -> if Bool
b then Word64
1 else Word64
0)
                               Bool
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  FieldSet
  FieldSet
-> UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens'
  UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
  FieldSet
Data.ProtoLens.unknownFields UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
_x))))
instance Control.DeepSeq.NFData UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule where
  rnf :: UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> ()
rnf
    = \ UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'_unknownFields
                UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__)
             (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Int32
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'ruleIndex
                   UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__)
                (Maybe BuildIdAssignmentRule -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Maybe BuildIdAssignmentRule
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'rule
                      UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__)
                   (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
-> Bool
_UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule'force
                         UpdateWorkerVersioningRulesRequest'ReplaceBuildIdAssignmentRule
x__)
                      ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.rule' @:: Lens' UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleBuildIdRedirectRule@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'rule' @:: Lens' UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleBuildIdRedirectRule)@ -}
data UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
  = UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'_constructor {UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Maybe CompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'rule :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleBuildIdRedirectRule),
                                                                                          UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Bool
(UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
 -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
 -> Bool)
-> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> Bool)
-> Eq
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Bool
== :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Bool
$c/= :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Bool
/= :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Bool
Prelude.Eq, Eq
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
Eq
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule =>
(UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
 -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
 -> Ordering)
-> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> Bool)
-> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
-> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
-> Ord
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Bool
UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Ordering
UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
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 :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Ordering
compare :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Ordering
$c< :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Bool
< :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Bool
$c<= :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Bool
<= :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Bool
$c> :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Bool
> :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Bool
$c>= :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Bool
>= :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Bool
$cmax :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
max :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
$cmin :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
min :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
Prelude.Ord)
instance Prelude.Show UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule where
  showsPrec :: Int
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> ShowS
showsPrec Int
_ UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule "rule" Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleBuildIdRedirectRule where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "rule"
-> (CompatibleBuildIdRedirectRule
    -> f CompatibleBuildIdRedirectRule)
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> f UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
fieldOf Proxy# "rule"
_
    = ((Maybe CompatibleBuildIdRedirectRule
  -> f (Maybe CompatibleBuildIdRedirectRule))
 -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
 -> f UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
-> ((CompatibleBuildIdRedirectRule
     -> f CompatibleBuildIdRedirectRule)
    -> Maybe CompatibleBuildIdRedirectRule
    -> f (Maybe CompatibleBuildIdRedirectRule))
-> (CompatibleBuildIdRedirectRule
    -> f CompatibleBuildIdRedirectRule)
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> f UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
 -> Maybe CompatibleBuildIdRedirectRule)
-> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> Maybe CompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
-> Lens
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
     (Maybe CompatibleBuildIdRedirectRule)
     (Maybe CompatibleBuildIdRedirectRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Maybe CompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'rule
           (\ UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
x__ Maybe CompatibleBuildIdRedirectRule
y__
              -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
x__
                   {_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'rule = y__}))
        (CompatibleBuildIdRedirectRule
-> Lens'
     (Maybe CompatibleBuildIdRedirectRule) CompatibleBuildIdRedirectRule
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CompatibleBuildIdRedirectRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule "maybe'rule" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleBuildIdRedirectRule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'rule"
-> (Maybe CompatibleBuildIdRedirectRule
    -> f (Maybe CompatibleBuildIdRedirectRule))
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> f UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
fieldOf Proxy# "maybe'rule"
_
    = ((Maybe CompatibleBuildIdRedirectRule
  -> f (Maybe CompatibleBuildIdRedirectRule))
 -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
 -> f UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
-> ((Maybe CompatibleBuildIdRedirectRule
     -> f (Maybe CompatibleBuildIdRedirectRule))
    -> Maybe CompatibleBuildIdRedirectRule
    -> f (Maybe CompatibleBuildIdRedirectRule))
-> (Maybe CompatibleBuildIdRedirectRule
    -> f (Maybe CompatibleBuildIdRedirectRule))
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> f UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
 -> Maybe CompatibleBuildIdRedirectRule)
-> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> Maybe CompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
-> Lens
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
     (Maybe CompatibleBuildIdRedirectRule)
     (Maybe CompatibleBuildIdRedirectRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Maybe CompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'rule
           (\ UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
x__ Maybe CompatibleBuildIdRedirectRule
y__
              -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
x__
                   {_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'rule = y__}))
        (Maybe CompatibleBuildIdRedirectRule
 -> f (Maybe CompatibleBuildIdRedirectRule))
-> Maybe CompatibleBuildIdRedirectRule
-> f (Maybe CompatibleBuildIdRedirectRule)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule where
  messageName :: Proxy
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Text
messageName Proxy
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.ReplaceCompatibleBuildIdRedirectRule"
  packedMessageDescriptor :: Proxy
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> ByteString
packedMessageDescriptor Proxy
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
_
    = ByteString
"\n\
      \$ReplaceCompatibleBuildIdRedirectRule\DC2L\n\
      \\EOTrule\CAN\SOH \SOH(\v28.temporal.api.taskqueue.v1.CompatibleBuildIdRedirectRuleR\EOTrule"
  packedFileDescriptor :: Proxy
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> ByteString
packedFileDescriptor Proxy
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
fieldsByTag
    = let
        rule__field_descriptor :: FieldDescriptor
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
rule__field_descriptor
          = String
-> FieldTypeDescriptor CompatibleBuildIdRedirectRule
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
     CompatibleBuildIdRedirectRule
-> FieldDescriptor
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"rule"
              (MessageOrGroup -> FieldTypeDescriptor CompatibleBuildIdRedirectRule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.CompatibleBuildIdRedirectRule)
              (Lens
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
  (Maybe CompatibleBuildIdRedirectRule)
  (Maybe CompatibleBuildIdRedirectRule)
-> FieldAccessor
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
     CompatibleBuildIdRedirectRule
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'rule")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
      in
        [(Tag,
  FieldDescriptor
    UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)]
-> Map
     Tag
     (FieldDescriptor
        UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
rule__field_descriptor)]
  unknownFields :: Lens'
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
  FieldSet
unknownFields
    = (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
 -> FieldSet)
-> (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
    -> FieldSet
    -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule)
-> Lens'
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
     FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'_unknownFields
        (\ UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
x__ FieldSet
y__
           -> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
x__
                {_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'_unknownFields = y__})
  defMessage :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
defMessage
    = UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'_constructor
        {_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'rule :: Maybe CompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'rule = Maybe CompatibleBuildIdRedirectRule
forall a. Maybe a
Prelude.Nothing,
         _UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'_unknownFields :: FieldSet
_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'_unknownFields = []}
  parseMessage :: Parser
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
parseMessage
    = let
        loop ::
          UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
        loop :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Parser
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
loop UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
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 CompatibleBuildIdRedirectRule
-> String -> Parser CompatibleBuildIdRedirectRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"rule"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"rule") 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
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> String
-> Parser
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Parser
     UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
loop UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ReplaceCompatibleBuildIdRedirectRule"
  buildMessage :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Builder
buildMessage
    = \ UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe CompatibleBuildIdRedirectRule)
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
  (Maybe CompatibleBuildIdRedirectRule)
  (Maybe CompatibleBuildIdRedirectRule)
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Maybe CompatibleBuildIdRedirectRule
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'rule") UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
_x
              of
                Maybe CompatibleBuildIdRedirectRule
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just CompatibleBuildIdRedirectRule
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (CompatibleBuildIdRedirectRule -> ByteString)
-> CompatibleBuildIdRedirectRule
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          CompatibleBuildIdRedirectRule -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage CompatibleBuildIdRedirectRule
_v))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike
  FieldSet
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
  FieldSet
  FieldSet
-> UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens'
  UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
  FieldSet
Data.ProtoLens.unknownFields UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
_x))
instance Control.DeepSeq.NFData UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule where
  rnf :: UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> ()
rnf
    = \ UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> FieldSet
_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'_unknownFields
                UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
x__)
             (Maybe CompatibleBuildIdRedirectRule -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
-> Maybe CompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule'rule
                   UpdateWorkerVersioningRulesRequest'ReplaceCompatibleBuildIdRedirectRule
x__)
                ())
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.assignmentRules' @:: Lens' UpdateWorkerVersioningRulesResponse [Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedBuildIdAssignmentRule]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'assignmentRules' @:: Lens' UpdateWorkerVersioningRulesResponse (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedBuildIdAssignmentRule)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.compatibleRedirectRules' @:: Lens' UpdateWorkerVersioningRulesResponse [Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedCompatibleBuildIdRedirectRule]@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.vec'compatibleRedirectRules' @:: Lens' UpdateWorkerVersioningRulesResponse (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedCompatibleBuildIdRedirectRule)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.conflictToken' @:: Lens' UpdateWorkerVersioningRulesResponse Data.ByteString.ByteString@ -}
data UpdateWorkerVersioningRulesResponse
  = UpdateWorkerVersioningRulesResponse'_constructor {UpdateWorkerVersioningRulesResponse
-> Vector TimestampedBuildIdAssignmentRule
_UpdateWorkerVersioningRulesResponse'assignmentRules :: !(Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedBuildIdAssignmentRule),
                                                      UpdateWorkerVersioningRulesResponse
-> Vector TimestampedCompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesResponse'compatibleRedirectRules :: !(Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedCompatibleBuildIdRedirectRule),
                                                      UpdateWorkerVersioningRulesResponse -> ByteString
_UpdateWorkerVersioningRulesResponse'conflictToken :: !Data.ByteString.ByteString,
                                                      UpdateWorkerVersioningRulesResponse -> FieldSet
_UpdateWorkerVersioningRulesResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Bool
(UpdateWorkerVersioningRulesResponse
 -> UpdateWorkerVersioningRulesResponse -> Bool)
-> (UpdateWorkerVersioningRulesResponse
    -> UpdateWorkerVersioningRulesResponse -> Bool)
-> Eq UpdateWorkerVersioningRulesResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Bool
== :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Bool
$c/= :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Bool
/= :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Bool
Prelude.Eq, Eq UpdateWorkerVersioningRulesResponse
Eq UpdateWorkerVersioningRulesResponse =>
(UpdateWorkerVersioningRulesResponse
 -> UpdateWorkerVersioningRulesResponse -> Ordering)
-> (UpdateWorkerVersioningRulesResponse
    -> UpdateWorkerVersioningRulesResponse -> Bool)
-> (UpdateWorkerVersioningRulesResponse
    -> UpdateWorkerVersioningRulesResponse -> Bool)
-> (UpdateWorkerVersioningRulesResponse
    -> UpdateWorkerVersioningRulesResponse -> Bool)
-> (UpdateWorkerVersioningRulesResponse
    -> UpdateWorkerVersioningRulesResponse -> Bool)
-> (UpdateWorkerVersioningRulesResponse
    -> UpdateWorkerVersioningRulesResponse
    -> UpdateWorkerVersioningRulesResponse)
-> (UpdateWorkerVersioningRulesResponse
    -> UpdateWorkerVersioningRulesResponse
    -> UpdateWorkerVersioningRulesResponse)
-> Ord UpdateWorkerVersioningRulesResponse
UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Bool
UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Ordering
UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse
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 :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Ordering
compare :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Ordering
$c< :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Bool
< :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Bool
$c<= :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Bool
<= :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Bool
$c> :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Bool
> :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Bool
$c>= :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Bool
>= :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse -> Bool
$cmax :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse
max :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse
$cmin :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse
min :: UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse
-> UpdateWorkerVersioningRulesResponse
Prelude.Ord)
instance Prelude.Show UpdateWorkerVersioningRulesResponse where
  showsPrec :: Int -> UpdateWorkerVersioningRulesResponse -> ShowS
showsPrec Int
_ UpdateWorkerVersioningRulesResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateWorkerVersioningRulesResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateWorkerVersioningRulesResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesResponse "assignmentRules" [Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedBuildIdAssignmentRule] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "assignmentRules"
-> ([TimestampedBuildIdAssignmentRule]
    -> f [TimestampedBuildIdAssignmentRule])
-> UpdateWorkerVersioningRulesResponse
-> f UpdateWorkerVersioningRulesResponse
fieldOf Proxy# "assignmentRules"
_
    = ((Vector TimestampedBuildIdAssignmentRule
  -> f (Vector TimestampedBuildIdAssignmentRule))
 -> UpdateWorkerVersioningRulesResponse
 -> f UpdateWorkerVersioningRulesResponse)
-> (([TimestampedBuildIdAssignmentRule]
     -> f [TimestampedBuildIdAssignmentRule])
    -> Vector TimestampedBuildIdAssignmentRule
    -> f (Vector TimestampedBuildIdAssignmentRule))
-> ([TimestampedBuildIdAssignmentRule]
    -> f [TimestampedBuildIdAssignmentRule])
-> UpdateWorkerVersioningRulesResponse
-> f UpdateWorkerVersioningRulesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesResponse
 -> Vector TimestampedBuildIdAssignmentRule)
-> (UpdateWorkerVersioningRulesResponse
    -> Vector TimestampedBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesResponse)
-> Lens
     UpdateWorkerVersioningRulesResponse
     UpdateWorkerVersioningRulesResponse
     (Vector TimestampedBuildIdAssignmentRule)
     (Vector TimestampedBuildIdAssignmentRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesResponse
-> Vector TimestampedBuildIdAssignmentRule
_UpdateWorkerVersioningRulesResponse'assignmentRules
           (\ UpdateWorkerVersioningRulesResponse
x__ Vector TimestampedBuildIdAssignmentRule
y__
              -> UpdateWorkerVersioningRulesResponse
x__
                   {_UpdateWorkerVersioningRulesResponse'assignmentRules = y__}))
        ((Vector TimestampedBuildIdAssignmentRule
 -> [TimestampedBuildIdAssignmentRule])
-> (Vector TimestampedBuildIdAssignmentRule
    -> [TimestampedBuildIdAssignmentRule]
    -> Vector TimestampedBuildIdAssignmentRule)
-> Lens
     (Vector TimestampedBuildIdAssignmentRule)
     (Vector TimestampedBuildIdAssignmentRule)
     [TimestampedBuildIdAssignmentRule]
     [TimestampedBuildIdAssignmentRule]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector TimestampedBuildIdAssignmentRule
-> [TimestampedBuildIdAssignmentRule]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector TimestampedBuildIdAssignmentRule
_ [TimestampedBuildIdAssignmentRule]
y__ -> [TimestampedBuildIdAssignmentRule]
-> Vector TimestampedBuildIdAssignmentRule
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [TimestampedBuildIdAssignmentRule]
y__))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesResponse "vec'assignmentRules" (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedBuildIdAssignmentRule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'assignmentRules"
-> (Vector TimestampedBuildIdAssignmentRule
    -> f (Vector TimestampedBuildIdAssignmentRule))
-> UpdateWorkerVersioningRulesResponse
-> f UpdateWorkerVersioningRulesResponse
fieldOf Proxy# "vec'assignmentRules"
_
    = ((Vector TimestampedBuildIdAssignmentRule
  -> f (Vector TimestampedBuildIdAssignmentRule))
 -> UpdateWorkerVersioningRulesResponse
 -> f UpdateWorkerVersioningRulesResponse)
-> ((Vector TimestampedBuildIdAssignmentRule
     -> f (Vector TimestampedBuildIdAssignmentRule))
    -> Vector TimestampedBuildIdAssignmentRule
    -> f (Vector TimestampedBuildIdAssignmentRule))
-> (Vector TimestampedBuildIdAssignmentRule
    -> f (Vector TimestampedBuildIdAssignmentRule))
-> UpdateWorkerVersioningRulesResponse
-> f UpdateWorkerVersioningRulesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesResponse
 -> Vector TimestampedBuildIdAssignmentRule)
-> (UpdateWorkerVersioningRulesResponse
    -> Vector TimestampedBuildIdAssignmentRule
    -> UpdateWorkerVersioningRulesResponse)
-> Lens
     UpdateWorkerVersioningRulesResponse
     UpdateWorkerVersioningRulesResponse
     (Vector TimestampedBuildIdAssignmentRule)
     (Vector TimestampedBuildIdAssignmentRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesResponse
-> Vector TimestampedBuildIdAssignmentRule
_UpdateWorkerVersioningRulesResponse'assignmentRules
           (\ UpdateWorkerVersioningRulesResponse
x__ Vector TimestampedBuildIdAssignmentRule
y__
              -> UpdateWorkerVersioningRulesResponse
x__
                   {_UpdateWorkerVersioningRulesResponse'assignmentRules = y__}))
        (Vector TimestampedBuildIdAssignmentRule
 -> f (Vector TimestampedBuildIdAssignmentRule))
-> Vector TimestampedBuildIdAssignmentRule
-> f (Vector TimestampedBuildIdAssignmentRule)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesResponse "compatibleRedirectRules" [Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedCompatibleBuildIdRedirectRule] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "compatibleRedirectRules"
-> ([TimestampedCompatibleBuildIdRedirectRule]
    -> f [TimestampedCompatibleBuildIdRedirectRule])
-> UpdateWorkerVersioningRulesResponse
-> f UpdateWorkerVersioningRulesResponse
fieldOf Proxy# "compatibleRedirectRules"
_
    = ((Vector TimestampedCompatibleBuildIdRedirectRule
  -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
 -> UpdateWorkerVersioningRulesResponse
 -> f UpdateWorkerVersioningRulesResponse)
-> (([TimestampedCompatibleBuildIdRedirectRule]
     -> f [TimestampedCompatibleBuildIdRedirectRule])
    -> Vector TimestampedCompatibleBuildIdRedirectRule
    -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
-> ([TimestampedCompatibleBuildIdRedirectRule]
    -> f [TimestampedCompatibleBuildIdRedirectRule])
-> UpdateWorkerVersioningRulesResponse
-> f UpdateWorkerVersioningRulesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesResponse
 -> Vector TimestampedCompatibleBuildIdRedirectRule)
-> (UpdateWorkerVersioningRulesResponse
    -> Vector TimestampedCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesResponse)
-> Lens
     UpdateWorkerVersioningRulesResponse
     UpdateWorkerVersioningRulesResponse
     (Vector TimestampedCompatibleBuildIdRedirectRule)
     (Vector TimestampedCompatibleBuildIdRedirectRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesResponse
-> Vector TimestampedCompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesResponse'compatibleRedirectRules
           (\ UpdateWorkerVersioningRulesResponse
x__ Vector TimestampedCompatibleBuildIdRedirectRule
y__
              -> UpdateWorkerVersioningRulesResponse
x__
                   {_UpdateWorkerVersioningRulesResponse'compatibleRedirectRules = y__}))
        ((Vector TimestampedCompatibleBuildIdRedirectRule
 -> [TimestampedCompatibleBuildIdRedirectRule])
-> (Vector TimestampedCompatibleBuildIdRedirectRule
    -> [TimestampedCompatibleBuildIdRedirectRule]
    -> Vector TimestampedCompatibleBuildIdRedirectRule)
-> Lens
     (Vector TimestampedCompatibleBuildIdRedirectRule)
     (Vector TimestampedCompatibleBuildIdRedirectRule)
     [TimestampedCompatibleBuildIdRedirectRule]
     [TimestampedCompatibleBuildIdRedirectRule]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector TimestampedCompatibleBuildIdRedirectRule
-> [TimestampedCompatibleBuildIdRedirectRule]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector TimestampedCompatibleBuildIdRedirectRule
_ [TimestampedCompatibleBuildIdRedirectRule]
y__ -> [TimestampedCompatibleBuildIdRedirectRule]
-> Vector TimestampedCompatibleBuildIdRedirectRule
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [TimestampedCompatibleBuildIdRedirectRule]
y__))
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesResponse "vec'compatibleRedirectRules" (Data.Vector.Vector Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedCompatibleBuildIdRedirectRule) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'compatibleRedirectRules"
-> (Vector TimestampedCompatibleBuildIdRedirectRule
    -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
-> UpdateWorkerVersioningRulesResponse
-> f UpdateWorkerVersioningRulesResponse
fieldOf Proxy# "vec'compatibleRedirectRules"
_
    = ((Vector TimestampedCompatibleBuildIdRedirectRule
  -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
 -> UpdateWorkerVersioningRulesResponse
 -> f UpdateWorkerVersioningRulesResponse)
-> ((Vector TimestampedCompatibleBuildIdRedirectRule
     -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
    -> Vector TimestampedCompatibleBuildIdRedirectRule
    -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
-> (Vector TimestampedCompatibleBuildIdRedirectRule
    -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
-> UpdateWorkerVersioningRulesResponse
-> f UpdateWorkerVersioningRulesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesResponse
 -> Vector TimestampedCompatibleBuildIdRedirectRule)
-> (UpdateWorkerVersioningRulesResponse
    -> Vector TimestampedCompatibleBuildIdRedirectRule
    -> UpdateWorkerVersioningRulesResponse)
-> Lens
     UpdateWorkerVersioningRulesResponse
     UpdateWorkerVersioningRulesResponse
     (Vector TimestampedCompatibleBuildIdRedirectRule)
     (Vector TimestampedCompatibleBuildIdRedirectRule)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesResponse
-> Vector TimestampedCompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesResponse'compatibleRedirectRules
           (\ UpdateWorkerVersioningRulesResponse
x__ Vector TimestampedCompatibleBuildIdRedirectRule
y__
              -> UpdateWorkerVersioningRulesResponse
x__
                   {_UpdateWorkerVersioningRulesResponse'compatibleRedirectRules = y__}))
        (Vector TimestampedCompatibleBuildIdRedirectRule
 -> f (Vector TimestampedCompatibleBuildIdRedirectRule))
-> Vector TimestampedCompatibleBuildIdRedirectRule
-> f (Vector TimestampedCompatibleBuildIdRedirectRule)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkerVersioningRulesResponse "conflictToken" Data.ByteString.ByteString where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "conflictToken"
-> (ByteString -> f ByteString)
-> UpdateWorkerVersioningRulesResponse
-> f UpdateWorkerVersioningRulesResponse
fieldOf Proxy# "conflictToken"
_
    = ((ByteString -> f ByteString)
 -> UpdateWorkerVersioningRulesResponse
 -> f UpdateWorkerVersioningRulesResponse)
-> ((ByteString -> f ByteString) -> ByteString -> f ByteString)
-> (ByteString -> f ByteString)
-> UpdateWorkerVersioningRulesResponse
-> f UpdateWorkerVersioningRulesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkerVersioningRulesResponse -> ByteString)
-> (UpdateWorkerVersioningRulesResponse
    -> ByteString -> UpdateWorkerVersioningRulesResponse)
-> Lens
     UpdateWorkerVersioningRulesResponse
     UpdateWorkerVersioningRulesResponse
     ByteString
     ByteString
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkerVersioningRulesResponse -> ByteString
_UpdateWorkerVersioningRulesResponse'conflictToken
           (\ UpdateWorkerVersioningRulesResponse
x__ ByteString
y__
              -> UpdateWorkerVersioningRulesResponse
x__ {_UpdateWorkerVersioningRulesResponse'conflictToken = y__}))
        (ByteString -> f ByteString) -> ByteString -> f ByteString
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateWorkerVersioningRulesResponse where
  messageName :: Proxy UpdateWorkerVersioningRulesResponse -> Text
messageName Proxy UpdateWorkerVersioningRulesResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesResponse"
  packedMessageDescriptor :: Proxy UpdateWorkerVersioningRulesResponse -> ByteString
packedMessageDescriptor Proxy UpdateWorkerVersioningRulesResponse
_
    = ByteString
"\n\
      \#UpdateWorkerVersioningRulesResponse\DC2f\n\
      \\DLEassignment_rules\CAN\SOH \ETX(\v2;.temporal.api.taskqueue.v1.TimestampedBuildIdAssignmentRuleR\SIassignmentRules\DC2\DEL\n\
      \\EMcompatible_redirect_rules\CAN\STX \ETX(\v2C.temporal.api.taskqueue.v1.TimestampedCompatibleBuildIdRedirectRuleR\ETBcompatibleRedirectRules\DC2%\n\
      \\SOconflict_token\CAN\ETX \SOH(\fR\rconflictToken"
  packedFileDescriptor :: Proxy UpdateWorkerVersioningRulesResponse -> ByteString
packedFileDescriptor Proxy UpdateWorkerVersioningRulesResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor UpdateWorkerVersioningRulesResponse)
fieldsByTag
    = let
        assignmentRules__field_descriptor :: FieldDescriptor UpdateWorkerVersioningRulesResponse
assignmentRules__field_descriptor
          = String
-> FieldTypeDescriptor TimestampedBuildIdAssignmentRule
-> FieldAccessor
     UpdateWorkerVersioningRulesResponse
     TimestampedBuildIdAssignmentRule
-> FieldDescriptor UpdateWorkerVersioningRulesResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"assignment_rules"
              (MessageOrGroup
-> FieldTypeDescriptor TimestampedBuildIdAssignmentRule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedBuildIdAssignmentRule)
              (Packing
-> Lens'
     UpdateWorkerVersioningRulesResponse
     [TimestampedBuildIdAssignmentRule]
-> FieldAccessor
     UpdateWorkerVersioningRulesResponse
     TimestampedBuildIdAssignmentRule
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 @"assignmentRules")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesResponse
        compatibleRedirectRules__field_descriptor :: FieldDescriptor UpdateWorkerVersioningRulesResponse
compatibleRedirectRules__field_descriptor
          = String
-> FieldTypeDescriptor TimestampedCompatibleBuildIdRedirectRule
-> FieldAccessor
     UpdateWorkerVersioningRulesResponse
     TimestampedCompatibleBuildIdRedirectRule
-> FieldDescriptor UpdateWorkerVersioningRulesResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"compatible_redirect_rules"
              (MessageOrGroup
-> FieldTypeDescriptor TimestampedCompatibleBuildIdRedirectRule
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedCompatibleBuildIdRedirectRule)
              (Packing
-> Lens'
     UpdateWorkerVersioningRulesResponse
     [TimestampedCompatibleBuildIdRedirectRule]
-> FieldAccessor
     UpdateWorkerVersioningRulesResponse
     TimestampedCompatibleBuildIdRedirectRule
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 @"compatibleRedirectRules")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesResponse
        conflictToken__field_descriptor :: FieldDescriptor UpdateWorkerVersioningRulesResponse
conflictToken__field_descriptor
          = String
-> FieldTypeDescriptor ByteString
-> FieldAccessor UpdateWorkerVersioningRulesResponse ByteString
-> FieldDescriptor UpdateWorkerVersioningRulesResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"conflict_token"
              (ScalarField ByteString -> FieldTypeDescriptor ByteString
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ByteString
Data.ProtoLens.BytesField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.ByteString.ByteString)
              (WireDefault ByteString
-> Lens
     UpdateWorkerVersioningRulesResponse
     UpdateWorkerVersioningRulesResponse
     ByteString
     ByteString
-> FieldAccessor UpdateWorkerVersioningRulesResponse ByteString
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ByteString
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"conflictToken")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkerVersioningRulesResponse
      in
        [(Tag, FieldDescriptor UpdateWorkerVersioningRulesResponse)]
-> Map Tag (FieldDescriptor UpdateWorkerVersioningRulesResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor UpdateWorkerVersioningRulesResponse
assignmentRules__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor UpdateWorkerVersioningRulesResponse
compatibleRedirectRules__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor UpdateWorkerVersioningRulesResponse
conflictToken__field_descriptor)]
  unknownFields :: Lens' UpdateWorkerVersioningRulesResponse FieldSet
unknownFields
    = (UpdateWorkerVersioningRulesResponse -> FieldSet)
-> (UpdateWorkerVersioningRulesResponse
    -> FieldSet -> UpdateWorkerVersioningRulesResponse)
-> Lens' UpdateWorkerVersioningRulesResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateWorkerVersioningRulesResponse -> FieldSet
_UpdateWorkerVersioningRulesResponse'_unknownFields
        (\ UpdateWorkerVersioningRulesResponse
x__ FieldSet
y__
           -> UpdateWorkerVersioningRulesResponse
x__ {_UpdateWorkerVersioningRulesResponse'_unknownFields = y__})
  defMessage :: UpdateWorkerVersioningRulesResponse
defMessage
    = UpdateWorkerVersioningRulesResponse'_constructor
        {_UpdateWorkerVersioningRulesResponse'assignmentRules :: Vector TimestampedBuildIdAssignmentRule
_UpdateWorkerVersioningRulesResponse'assignmentRules = Vector TimestampedBuildIdAssignmentRule
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _UpdateWorkerVersioningRulesResponse'compatibleRedirectRules :: Vector TimestampedCompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesResponse'compatibleRedirectRules = Vector TimestampedCompatibleBuildIdRedirectRule
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _UpdateWorkerVersioningRulesResponse'conflictToken :: ByteString
_UpdateWorkerVersioningRulesResponse'conflictToken = ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkerVersioningRulesResponse'_unknownFields :: FieldSet
_UpdateWorkerVersioningRulesResponse'_unknownFields = []}
  parseMessage :: Parser UpdateWorkerVersioningRulesResponse
parseMessage
    = let
        loop ::
          UpdateWorkerVersioningRulesResponse
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedBuildIdAssignmentRule
             -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Taskqueue.V1.Message.TimestampedCompatibleBuildIdRedirectRule
                -> Data.ProtoLens.Encoding.Bytes.Parser UpdateWorkerVersioningRulesResponse
        loop :: UpdateWorkerVersioningRulesResponse
-> Growing Vector RealWorld TimestampedBuildIdAssignmentRule
-> Growing
     Vector RealWorld TimestampedCompatibleBuildIdRedirectRule
-> Parser UpdateWorkerVersioningRulesResponse
loop UpdateWorkerVersioningRulesResponse
x Growing Vector RealWorld TimestampedBuildIdAssignmentRule
mutable'assignmentRules Growing Vector RealWorld TimestampedCompatibleBuildIdRedirectRule
mutable'compatibleRedirectRules
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'assignmentRules <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                  (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                     mutable'assignmentRules)
                      frozen'compatibleRedirectRules <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                          (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                             mutable'compatibleRedirectRules)
                      (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'assignmentRules")
                              frozen'assignmentRules
                              (Lens.Family2.set
                                 (Data.ProtoLens.Field.field @"vec'compatibleRedirectRules")
                                 frozen'compatibleRedirectRules x)))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser TimestampedBuildIdAssignmentRule
-> String -> Parser TimestampedBuildIdAssignmentRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"assignment_rules"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'assignmentRules y)
                                loop x v mutable'compatibleRedirectRules
                        Word64
18
                          -> do !y <- Parser TimestampedCompatibleBuildIdRedirectRule
-> String -> Parser TimestampedCompatibleBuildIdRedirectRule
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                        (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                            Data.ProtoLens.Encoding.Bytes.isolate
                                              (Prelude.fromIntegral len)
                                              Data.ProtoLens.parseMessage)
                                        String
"compatible_redirect_rules"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'compatibleRedirectRules y)
                                loop x mutable'assignmentRules v
                        Word64
26
                          -> do y <- Parser ByteString -> String -> Parser ByteString
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getBytes
                                             (Prelude.fromIntegral len))
                                       String
"conflict_token"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"conflictToken") y x)
                                  mutable'assignmentRules mutable'compatibleRedirectRules
                        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'assignmentRules mutable'compatibleRedirectRules
      in
        Parser UpdateWorkerVersioningRulesResponse
-> String -> Parser UpdateWorkerVersioningRulesResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'assignmentRules <- IO (Growing Vector RealWorld TimestampedBuildIdAssignmentRule)
-> Parser
     (Growing Vector RealWorld TimestampedBuildIdAssignmentRule)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                           IO (Growing Vector RealWorld TimestampedBuildIdAssignmentRule)
IO (Growing Vector (PrimState IO) TimestampedBuildIdAssignmentRule)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
              mutable'compatibleRedirectRules <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                   Data.ProtoLens.Encoding.Growing.new
              loop
                Data.ProtoLens.defMessage mutable'assignmentRules
                mutable'compatibleRedirectRules)
          String
"UpdateWorkerVersioningRulesResponse"
  buildMessage :: UpdateWorkerVersioningRulesResponse -> Builder
buildMessage
    = \ UpdateWorkerVersioningRulesResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((TimestampedBuildIdAssignmentRule -> Builder)
-> Vector TimestampedBuildIdAssignmentRule -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ TimestampedBuildIdAssignmentRule
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (TimestampedBuildIdAssignmentRule -> ByteString)
-> TimestampedBuildIdAssignmentRule
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                           (\ ByteString
bs
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                      (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                   (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                           TimestampedBuildIdAssignmentRule -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TimestampedBuildIdAssignmentRule
_v))
                (FoldLike
  (Vector TimestampedBuildIdAssignmentRule)
  UpdateWorkerVersioningRulesResponse
  UpdateWorkerVersioningRulesResponse
  (Vector TimestampedBuildIdAssignmentRule)
  (Vector TimestampedBuildIdAssignmentRule)
-> UpdateWorkerVersioningRulesResponse
-> Vector TimestampedBuildIdAssignmentRule
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'assignmentRules") UpdateWorkerVersioningRulesResponse
_x))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                ((TimestampedCompatibleBuildIdRedirectRule -> Builder)
-> Vector TimestampedCompatibleBuildIdRedirectRule -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                   (\ TimestampedCompatibleBuildIdRedirectRule
_v
                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                           ((ByteString -> Builder)
-> (TimestampedCompatibleBuildIdRedirectRule -> ByteString)
-> TimestampedCompatibleBuildIdRedirectRule
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                              (\ ByteString
bs
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                         (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                      (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                              TimestampedCompatibleBuildIdRedirectRule -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TimestampedCompatibleBuildIdRedirectRule
_v))
                   (FoldLike
  (Vector TimestampedCompatibleBuildIdRedirectRule)
  UpdateWorkerVersioningRulesResponse
  UpdateWorkerVersioningRulesResponse
  (Vector TimestampedCompatibleBuildIdRedirectRule)
  (Vector TimestampedCompatibleBuildIdRedirectRule)
-> UpdateWorkerVersioningRulesResponse
-> Vector TimestampedCompatibleBuildIdRedirectRule
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'compatibleRedirectRules") UpdateWorkerVersioningRulesResponse
_x))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: ByteString
_v
                        = FoldLike
  ByteString
  UpdateWorkerVersioningRulesResponse
  UpdateWorkerVersioningRulesResponse
  ByteString
  ByteString
-> UpdateWorkerVersioningRulesResponse -> ByteString
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"conflictToken") UpdateWorkerVersioningRulesResponse
_x
                    in
                      if ByteString -> ByteString -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ByteString
_v ByteString
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
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
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               ByteString
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  UpdateWorkerVersioningRulesResponse
  UpdateWorkerVersioningRulesResponse
  FieldSet
  FieldSet
-> UpdateWorkerVersioningRulesResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateWorkerVersioningRulesResponse
  UpdateWorkerVersioningRulesResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpdateWorkerVersioningRulesResponse FieldSet
Data.ProtoLens.unknownFields UpdateWorkerVersioningRulesResponse
_x))))
instance Control.DeepSeq.NFData UpdateWorkerVersioningRulesResponse where
  rnf :: UpdateWorkerVersioningRulesResponse -> ()
rnf
    = \ UpdateWorkerVersioningRulesResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateWorkerVersioningRulesResponse -> FieldSet
_UpdateWorkerVersioningRulesResponse'_unknownFields UpdateWorkerVersioningRulesResponse
x__)
             (Vector TimestampedBuildIdAssignmentRule -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateWorkerVersioningRulesResponse
-> Vector TimestampedBuildIdAssignmentRule
_UpdateWorkerVersioningRulesResponse'assignmentRules UpdateWorkerVersioningRulesResponse
x__)
                (Vector TimestampedCompatibleBuildIdRedirectRule -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpdateWorkerVersioningRulesResponse
-> Vector TimestampedCompatibleBuildIdRedirectRule
_UpdateWorkerVersioningRulesResponse'compatibleRedirectRules UpdateWorkerVersioningRulesResponse
x__)
                   (ByteString -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (UpdateWorkerVersioningRulesResponse -> ByteString
_UpdateWorkerVersioningRulesResponse'conflictToken UpdateWorkerVersioningRulesResponse
x__) ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.namespace' @:: Lens' UpdateWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.workflowExecution' @:: Lens' UpdateWorkflowExecutionRequest Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'workflowExecution' @:: Lens' UpdateWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.firstExecutionRunId' @:: Lens' UpdateWorkflowExecutionRequest Data.Text.Text@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.waitPolicy' @:: Lens' UpdateWorkflowExecutionRequest Proto.Temporal.Api.Update.V1.Message.WaitPolicy@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'waitPolicy' @:: Lens' UpdateWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.WaitPolicy)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.request' @:: Lens' UpdateWorkflowExecutionRequest Proto.Temporal.Api.Update.V1.Message.Request@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'request' @:: Lens' UpdateWorkflowExecutionRequest (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Request)@ -}
data UpdateWorkflowExecutionRequest
  = UpdateWorkflowExecutionRequest'_constructor {UpdateWorkflowExecutionRequest -> Text
_UpdateWorkflowExecutionRequest'namespace :: !Data.Text.Text,
                                                 UpdateWorkflowExecutionRequest -> Maybe WorkflowExecution
_UpdateWorkflowExecutionRequest'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                 UpdateWorkflowExecutionRequest -> Text
_UpdateWorkflowExecutionRequest'firstExecutionRunId :: !Data.Text.Text,
                                                 UpdateWorkflowExecutionRequest -> Maybe WaitPolicy
_UpdateWorkflowExecutionRequest'waitPolicy :: !(Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.WaitPolicy),
                                                 UpdateWorkflowExecutionRequest -> Maybe Request
_UpdateWorkflowExecutionRequest'request :: !(Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Request),
                                                 UpdateWorkflowExecutionRequest -> FieldSet
_UpdateWorkflowExecutionRequest'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Bool
(UpdateWorkflowExecutionRequest
 -> UpdateWorkflowExecutionRequest -> Bool)
-> (UpdateWorkflowExecutionRequest
    -> UpdateWorkflowExecutionRequest -> Bool)
-> Eq UpdateWorkflowExecutionRequest
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Bool
== :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Bool
$c/= :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Bool
/= :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Bool
Prelude.Eq, Eq UpdateWorkflowExecutionRequest
Eq UpdateWorkflowExecutionRequest =>
(UpdateWorkflowExecutionRequest
 -> UpdateWorkflowExecutionRequest -> Ordering)
-> (UpdateWorkflowExecutionRequest
    -> UpdateWorkflowExecutionRequest -> Bool)
-> (UpdateWorkflowExecutionRequest
    -> UpdateWorkflowExecutionRequest -> Bool)
-> (UpdateWorkflowExecutionRequest
    -> UpdateWorkflowExecutionRequest -> Bool)
-> (UpdateWorkflowExecutionRequest
    -> UpdateWorkflowExecutionRequest -> Bool)
-> (UpdateWorkflowExecutionRequest
    -> UpdateWorkflowExecutionRequest
    -> UpdateWorkflowExecutionRequest)
-> (UpdateWorkflowExecutionRequest
    -> UpdateWorkflowExecutionRequest
    -> UpdateWorkflowExecutionRequest)
-> Ord UpdateWorkflowExecutionRequest
UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Bool
UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Ordering
UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> UpdateWorkflowExecutionRequest
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 :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Ordering
compare :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Ordering
$c< :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Bool
< :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Bool
$c<= :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Bool
<= :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Bool
$c> :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Bool
> :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Bool
$c>= :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Bool
>= :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> Bool
$cmax :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> UpdateWorkflowExecutionRequest
max :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> UpdateWorkflowExecutionRequest
$cmin :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> UpdateWorkflowExecutionRequest
min :: UpdateWorkflowExecutionRequest
-> UpdateWorkflowExecutionRequest -> UpdateWorkflowExecutionRequest
Prelude.Ord)
instance Prelude.Show UpdateWorkflowExecutionRequest where
  showsPrec :: Int -> UpdateWorkflowExecutionRequest -> ShowS
showsPrec Int
_ UpdateWorkflowExecutionRequest
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateWorkflowExecutionRequest -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateWorkflowExecutionRequest
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateWorkflowExecutionRequest "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> UpdateWorkflowExecutionRequest
 -> f UpdateWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkflowExecutionRequest -> Text)
-> (UpdateWorkflowExecutionRequest
    -> Text -> UpdateWorkflowExecutionRequest)
-> Lens
     UpdateWorkflowExecutionRequest
     UpdateWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkflowExecutionRequest -> Text
_UpdateWorkflowExecutionRequest'namespace
           (\ UpdateWorkflowExecutionRequest
x__ Text
y__
              -> UpdateWorkflowExecutionRequest
x__ {_UpdateWorkflowExecutionRequest'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkflowExecutionRequest "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> UpdateWorkflowExecutionRequest
 -> f UpdateWorkflowExecutionRequest)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkflowExecutionRequest -> Maybe WorkflowExecution)
-> (UpdateWorkflowExecutionRequest
    -> Maybe WorkflowExecution -> UpdateWorkflowExecutionRequest)
-> Lens
     UpdateWorkflowExecutionRequest
     UpdateWorkflowExecutionRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkflowExecutionRequest -> Maybe WorkflowExecution
_UpdateWorkflowExecutionRequest'workflowExecution
           (\ UpdateWorkflowExecutionRequest
x__ Maybe WorkflowExecution
y__
              -> UpdateWorkflowExecutionRequest
x__ {_UpdateWorkflowExecutionRequest'workflowExecution = y__}))
        (WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateWorkflowExecutionRequest "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> UpdateWorkflowExecutionRequest
 -> f UpdateWorkflowExecutionRequest)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkflowExecutionRequest -> Maybe WorkflowExecution)
-> (UpdateWorkflowExecutionRequest
    -> Maybe WorkflowExecution -> UpdateWorkflowExecutionRequest)
-> Lens
     UpdateWorkflowExecutionRequest
     UpdateWorkflowExecutionRequest
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkflowExecutionRequest -> Maybe WorkflowExecution
_UpdateWorkflowExecutionRequest'workflowExecution
           (\ UpdateWorkflowExecutionRequest
x__ Maybe WorkflowExecution
y__
              -> UpdateWorkflowExecutionRequest
x__ {_UpdateWorkflowExecutionRequest'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkflowExecutionRequest "firstExecutionRunId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "firstExecutionRunId"
-> (Text -> f Text)
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
fieldOf Proxy# "firstExecutionRunId"
_
    = ((Text -> f Text)
 -> UpdateWorkflowExecutionRequest
 -> f UpdateWorkflowExecutionRequest)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkflowExecutionRequest -> Text)
-> (UpdateWorkflowExecutionRequest
    -> Text -> UpdateWorkflowExecutionRequest)
-> Lens
     UpdateWorkflowExecutionRequest
     UpdateWorkflowExecutionRequest
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkflowExecutionRequest -> Text
_UpdateWorkflowExecutionRequest'firstExecutionRunId
           (\ UpdateWorkflowExecutionRequest
x__ Text
y__
              -> UpdateWorkflowExecutionRequest
x__
                   {_UpdateWorkflowExecutionRequest'firstExecutionRunId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkflowExecutionRequest "waitPolicy" Proto.Temporal.Api.Update.V1.Message.WaitPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "waitPolicy"
-> (WaitPolicy -> f WaitPolicy)
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
fieldOf Proxy# "waitPolicy"
_
    = ((Maybe WaitPolicy -> f (Maybe WaitPolicy))
 -> UpdateWorkflowExecutionRequest
 -> f UpdateWorkflowExecutionRequest)
-> ((WaitPolicy -> f WaitPolicy)
    -> Maybe WaitPolicy -> f (Maybe WaitPolicy))
-> (WaitPolicy -> f WaitPolicy)
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkflowExecutionRequest -> Maybe WaitPolicy)
-> (UpdateWorkflowExecutionRequest
    -> Maybe WaitPolicy -> UpdateWorkflowExecutionRequest)
-> Lens
     UpdateWorkflowExecutionRequest
     UpdateWorkflowExecutionRequest
     (Maybe WaitPolicy)
     (Maybe WaitPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkflowExecutionRequest -> Maybe WaitPolicy
_UpdateWorkflowExecutionRequest'waitPolicy
           (\ UpdateWorkflowExecutionRequest
x__ Maybe WaitPolicy
y__
              -> UpdateWorkflowExecutionRequest
x__ {_UpdateWorkflowExecutionRequest'waitPolicy = y__}))
        (WaitPolicy -> Lens' (Maybe WaitPolicy) WaitPolicy
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WaitPolicy
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateWorkflowExecutionRequest "maybe'waitPolicy" (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.WaitPolicy) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'waitPolicy"
-> (Maybe WaitPolicy -> f (Maybe WaitPolicy))
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
fieldOf Proxy# "maybe'waitPolicy"
_
    = ((Maybe WaitPolicy -> f (Maybe WaitPolicy))
 -> UpdateWorkflowExecutionRequest
 -> f UpdateWorkflowExecutionRequest)
-> ((Maybe WaitPolicy -> f (Maybe WaitPolicy))
    -> Maybe WaitPolicy -> f (Maybe WaitPolicy))
-> (Maybe WaitPolicy -> f (Maybe WaitPolicy))
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkflowExecutionRequest -> Maybe WaitPolicy)
-> (UpdateWorkflowExecutionRequest
    -> Maybe WaitPolicy -> UpdateWorkflowExecutionRequest)
-> Lens
     UpdateWorkflowExecutionRequest
     UpdateWorkflowExecutionRequest
     (Maybe WaitPolicy)
     (Maybe WaitPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkflowExecutionRequest -> Maybe WaitPolicy
_UpdateWorkflowExecutionRequest'waitPolicy
           (\ UpdateWorkflowExecutionRequest
x__ Maybe WaitPolicy
y__
              -> UpdateWorkflowExecutionRequest
x__ {_UpdateWorkflowExecutionRequest'waitPolicy = y__}))
        (Maybe WaitPolicy -> f (Maybe WaitPolicy))
-> Maybe WaitPolicy -> f (Maybe WaitPolicy)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkflowExecutionRequest "request" Proto.Temporal.Api.Update.V1.Message.Request where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "request"
-> (Request -> f Request)
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
fieldOf Proxy# "request"
_
    = ((Maybe Request -> f (Maybe Request))
 -> UpdateWorkflowExecutionRequest
 -> f UpdateWorkflowExecutionRequest)
-> ((Request -> f Request) -> Maybe Request -> f (Maybe Request))
-> (Request -> f Request)
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkflowExecutionRequest -> Maybe Request)
-> (UpdateWorkflowExecutionRequest
    -> Maybe Request -> UpdateWorkflowExecutionRequest)
-> Lens
     UpdateWorkflowExecutionRequest
     UpdateWorkflowExecutionRequest
     (Maybe Request)
     (Maybe Request)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkflowExecutionRequest -> Maybe Request
_UpdateWorkflowExecutionRequest'request
           (\ UpdateWorkflowExecutionRequest
x__ Maybe Request
y__ -> UpdateWorkflowExecutionRequest
x__ {_UpdateWorkflowExecutionRequest'request = y__}))
        (Request -> Lens' (Maybe Request) Request
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Request
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateWorkflowExecutionRequest "maybe'request" (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Request) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'request"
-> (Maybe Request -> f (Maybe Request))
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
fieldOf Proxy# "maybe'request"
_
    = ((Maybe Request -> f (Maybe Request))
 -> UpdateWorkflowExecutionRequest
 -> f UpdateWorkflowExecutionRequest)
-> ((Maybe Request -> f (Maybe Request))
    -> Maybe Request -> f (Maybe Request))
-> (Maybe Request -> f (Maybe Request))
-> UpdateWorkflowExecutionRequest
-> f UpdateWorkflowExecutionRequest
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkflowExecutionRequest -> Maybe Request)
-> (UpdateWorkflowExecutionRequest
    -> Maybe Request -> UpdateWorkflowExecutionRequest)
-> Lens
     UpdateWorkflowExecutionRequest
     UpdateWorkflowExecutionRequest
     (Maybe Request)
     (Maybe Request)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkflowExecutionRequest -> Maybe Request
_UpdateWorkflowExecutionRequest'request
           (\ UpdateWorkflowExecutionRequest
x__ Maybe Request
y__ -> UpdateWorkflowExecutionRequest
x__ {_UpdateWorkflowExecutionRequest'request = y__}))
        (Maybe Request -> f (Maybe Request))
-> Maybe Request -> f (Maybe Request)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateWorkflowExecutionRequest where
  messageName :: Proxy UpdateWorkflowExecutionRequest -> Text
messageName Proxy UpdateWorkflowExecutionRequest
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateWorkflowExecutionRequest"
  packedMessageDescriptor :: Proxy UpdateWorkflowExecutionRequest -> ByteString
packedMessageDescriptor Proxy UpdateWorkflowExecutionRequest
_
    = ByteString
"\n\
      \\RSUpdateWorkflowExecutionRequest\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2X\n\
      \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC23\n\
      \\SYNfirst_execution_run_id\CAN\ETX \SOH(\tR\DC3firstExecutionRunId\DC2C\n\
      \\vwait_policy\CAN\EOT \SOH(\v2\".temporal.api.update.v1.WaitPolicyR\n\
      \waitPolicy\DC29\n\
      \\arequest\CAN\ENQ \SOH(\v2\US.temporal.api.update.v1.RequestR\arequest"
  packedFileDescriptor :: Proxy UpdateWorkflowExecutionRequest -> ByteString
packedFileDescriptor Proxy UpdateWorkflowExecutionRequest
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor UpdateWorkflowExecutionRequest)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor UpdateWorkflowExecutionRequest
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateWorkflowExecutionRequest Text
-> FieldDescriptor UpdateWorkflowExecutionRequest
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
     UpdateWorkflowExecutionRequest
     UpdateWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor UpdateWorkflowExecutionRequest 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 UpdateWorkflowExecutionRequest
        workflowExecution__field_descriptor :: FieldDescriptor UpdateWorkflowExecutionRequest
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor UpdateWorkflowExecutionRequest WorkflowExecution
-> FieldDescriptor UpdateWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
              (Lens
  UpdateWorkflowExecutionRequest
  UpdateWorkflowExecutionRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor UpdateWorkflowExecutionRequest WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkflowExecutionRequest
        firstExecutionRunId__field_descriptor :: FieldDescriptor UpdateWorkflowExecutionRequest
firstExecutionRunId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor UpdateWorkflowExecutionRequest Text
-> FieldDescriptor UpdateWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"first_execution_run_id"
              (ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
                 Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
              (WireDefault Text
-> Lens
     UpdateWorkflowExecutionRequest
     UpdateWorkflowExecutionRequest
     Text
     Text
-> FieldAccessor UpdateWorkflowExecutionRequest Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"firstExecutionRunId")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkflowExecutionRequest
        waitPolicy__field_descriptor :: FieldDescriptor UpdateWorkflowExecutionRequest
waitPolicy__field_descriptor
          = String
-> FieldTypeDescriptor WaitPolicy
-> FieldAccessor UpdateWorkflowExecutionRequest WaitPolicy
-> FieldDescriptor UpdateWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"wait_policy"
              (MessageOrGroup -> FieldTypeDescriptor WaitPolicy
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Update.V1.Message.WaitPolicy)
              (Lens
  UpdateWorkflowExecutionRequest
  UpdateWorkflowExecutionRequest
  (Maybe WaitPolicy)
  (Maybe WaitPolicy)
-> FieldAccessor UpdateWorkflowExecutionRequest WaitPolicy
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'waitPolicy")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkflowExecutionRequest
        request__field_descriptor :: FieldDescriptor UpdateWorkflowExecutionRequest
request__field_descriptor
          = String
-> FieldTypeDescriptor Request
-> FieldAccessor UpdateWorkflowExecutionRequest Request
-> FieldDescriptor UpdateWorkflowExecutionRequest
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request"
              (MessageOrGroup -> FieldTypeDescriptor Request
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Update.V1.Message.Request)
              (Lens
  UpdateWorkflowExecutionRequest
  UpdateWorkflowExecutionRequest
  (Maybe Request)
  (Maybe Request)
-> FieldAccessor UpdateWorkflowExecutionRequest Request
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'request")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkflowExecutionRequest
      in
        [(Tag, FieldDescriptor UpdateWorkflowExecutionRequest)]
-> Map Tag (FieldDescriptor UpdateWorkflowExecutionRequest)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor UpdateWorkflowExecutionRequest
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor UpdateWorkflowExecutionRequest
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor UpdateWorkflowExecutionRequest
firstExecutionRunId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor UpdateWorkflowExecutionRequest
waitPolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor UpdateWorkflowExecutionRequest
request__field_descriptor)]
  unknownFields :: Lens' UpdateWorkflowExecutionRequest FieldSet
unknownFields
    = (UpdateWorkflowExecutionRequest -> FieldSet)
-> (UpdateWorkflowExecutionRequest
    -> FieldSet -> UpdateWorkflowExecutionRequest)
-> Lens' UpdateWorkflowExecutionRequest FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateWorkflowExecutionRequest -> FieldSet
_UpdateWorkflowExecutionRequest'_unknownFields
        (\ UpdateWorkflowExecutionRequest
x__ FieldSet
y__
           -> UpdateWorkflowExecutionRequest
x__ {_UpdateWorkflowExecutionRequest'_unknownFields = y__})
  defMessage :: UpdateWorkflowExecutionRequest
defMessage
    = UpdateWorkflowExecutionRequest'_constructor
        {_UpdateWorkflowExecutionRequest'namespace :: Text
_UpdateWorkflowExecutionRequest'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkflowExecutionRequest'workflowExecution :: Maybe WorkflowExecution
_UpdateWorkflowExecutionRequest'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _UpdateWorkflowExecutionRequest'firstExecutionRunId :: Text
_UpdateWorkflowExecutionRequest'firstExecutionRunId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkflowExecutionRequest'waitPolicy :: Maybe WaitPolicy
_UpdateWorkflowExecutionRequest'waitPolicy = Maybe WaitPolicy
forall a. Maybe a
Prelude.Nothing,
         _UpdateWorkflowExecutionRequest'request :: Maybe Request
_UpdateWorkflowExecutionRequest'request = Maybe Request
forall a. Maybe a
Prelude.Nothing,
         _UpdateWorkflowExecutionRequest'_unknownFields :: FieldSet
_UpdateWorkflowExecutionRequest'_unknownFields = []}
  parseMessage :: Parser UpdateWorkflowExecutionRequest
parseMessage
    = let
        loop ::
          UpdateWorkflowExecutionRequest
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateWorkflowExecutionRequest
        loop :: UpdateWorkflowExecutionRequest
-> Parser UpdateWorkflowExecutionRequest
loop UpdateWorkflowExecutionRequest
x
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do (let missing = []
                       in
                         if Prelude.null missing then
                             Prelude.return ()
                         else
                             Prelude.fail
                               ((Prelude.++)
                                  "Missing required fields: "
                                  (Prelude.show (missing :: [Prelude.String]))))
                      Prelude.return
                        (Lens.Family2.over
                           Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
18
                          -> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                        Word64
26
                          -> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.getText
                                             (Prelude.fromIntegral len))
                                       String
"first_execution_run_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"firstExecutionRunId") y x)
                        Word64
34
                          -> do y <- Parser WaitPolicy -> String -> Parser WaitPolicy
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"wait_policy"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"waitPolicy") y x)
                        Word64
42
                          -> do y <- Parser Request -> String -> Parser Request
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"request"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"request") y x)
                        Word64
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 UpdateWorkflowExecutionRequest
-> String -> Parser UpdateWorkflowExecutionRequest
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateWorkflowExecutionRequest
-> Parser UpdateWorkflowExecutionRequest
loop UpdateWorkflowExecutionRequest
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"UpdateWorkflowExecutionRequest"
  buildMessage :: UpdateWorkflowExecutionRequest -> Builder
buildMessage
    = \ UpdateWorkflowExecutionRequest
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  UpdateWorkflowExecutionRequest
  UpdateWorkflowExecutionRequest
  Text
  Text
-> UpdateWorkflowExecutionRequest -> 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") UpdateWorkflowExecutionRequest
_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 WorkflowExecution)
  UpdateWorkflowExecutionRequest
  UpdateWorkflowExecutionRequest
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> UpdateWorkflowExecutionRequest -> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecution") UpdateWorkflowExecutionRequest
_x
                 of
                   Maybe WorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just WorkflowExecution
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Text
_v
                        = FoldLike
  Text
  UpdateWorkflowExecutionRequest
  UpdateWorkflowExecutionRequest
  Text
  Text
-> UpdateWorkflowExecutionRequest -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                            (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"firstExecutionRunId") UpdateWorkflowExecutionRequest
_x
                    in
                      if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
                            ((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                               (\ ByteString
bs
                                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                          (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                       (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                               Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe WaitPolicy)
  UpdateWorkflowExecutionRequest
  UpdateWorkflowExecutionRequest
  (Maybe WaitPolicy)
  (Maybe WaitPolicy)
-> UpdateWorkflowExecutionRequest -> Maybe WaitPolicy
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'waitPolicy") UpdateWorkflowExecutionRequest
_x
                       of
                         Maybe WaitPolicy
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just WaitPolicy
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (WaitPolicy -> ByteString) -> WaitPolicy -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                   (\ ByteString
bs
                                      -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                              (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                           (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                   WaitPolicy -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WaitPolicy
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Request)
  UpdateWorkflowExecutionRequest
  UpdateWorkflowExecutionRequest
  (Maybe Request)
  (Maybe Request)
-> UpdateWorkflowExecutionRequest -> Maybe Request
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'request") UpdateWorkflowExecutionRequest
_x
                          of
                            Maybe Request
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                            (Prelude.Just Request
_v)
                              -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                   (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
                                   ((ByteString -> Builder)
-> (Request -> ByteString) -> Request -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                                      (\ ByteString
bs
                                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                 (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                              (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                                      Request -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Request
_v))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  UpdateWorkflowExecutionRequest
  UpdateWorkflowExecutionRequest
  FieldSet
  FieldSet
-> UpdateWorkflowExecutionRequest -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateWorkflowExecutionRequest
  UpdateWorkflowExecutionRequest
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpdateWorkflowExecutionRequest FieldSet
Data.ProtoLens.unknownFields UpdateWorkflowExecutionRequest
_x))))))
instance Control.DeepSeq.NFData UpdateWorkflowExecutionRequest where
  rnf :: UpdateWorkflowExecutionRequest -> ()
rnf
    = \ UpdateWorkflowExecutionRequest
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateWorkflowExecutionRequest -> FieldSet
_UpdateWorkflowExecutionRequest'_unknownFields UpdateWorkflowExecutionRequest
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateWorkflowExecutionRequest -> Text
_UpdateWorkflowExecutionRequest'namespace UpdateWorkflowExecutionRequest
x__)
                (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpdateWorkflowExecutionRequest -> Maybe WorkflowExecution
_UpdateWorkflowExecutionRequest'workflowExecution UpdateWorkflowExecutionRequest
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (UpdateWorkflowExecutionRequest -> Text
_UpdateWorkflowExecutionRequest'firstExecutionRunId UpdateWorkflowExecutionRequest
x__)
                      (Maybe WaitPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (UpdateWorkflowExecutionRequest -> Maybe WaitPolicy
_UpdateWorkflowExecutionRequest'waitPolicy UpdateWorkflowExecutionRequest
x__)
                         (Maybe Request -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (UpdateWorkflowExecutionRequest -> Maybe Request
_UpdateWorkflowExecutionRequest'request UpdateWorkflowExecutionRequest
x__) ())))))
{- | Fields :
     
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.updateRef' @:: Lens' UpdateWorkflowExecutionResponse Proto.Temporal.Api.Update.V1.Message.UpdateRef@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'updateRef' @:: Lens' UpdateWorkflowExecutionResponse (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.UpdateRef)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.outcome' @:: Lens' UpdateWorkflowExecutionResponse Proto.Temporal.Api.Update.V1.Message.Outcome@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.maybe'outcome' @:: Lens' UpdateWorkflowExecutionResponse (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Outcome)@
         * 'Proto.Temporal.Api.Workflowservice.V1.RequestResponse_Fields.stage' @:: Lens' UpdateWorkflowExecutionResponse Proto.Temporal.Api.Enums.V1.Update.UpdateWorkflowExecutionLifecycleStage@ -}
data UpdateWorkflowExecutionResponse
  = UpdateWorkflowExecutionResponse'_constructor {UpdateWorkflowExecutionResponse -> Maybe UpdateRef
_UpdateWorkflowExecutionResponse'updateRef :: !(Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.UpdateRef),
                                                  UpdateWorkflowExecutionResponse -> Maybe Outcome
_UpdateWorkflowExecutionResponse'outcome :: !(Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Outcome),
                                                  UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionLifecycleStage
_UpdateWorkflowExecutionResponse'stage :: !Proto.Temporal.Api.Enums.V1.Update.UpdateWorkflowExecutionLifecycleStage,
                                                  UpdateWorkflowExecutionResponse -> FieldSet
_UpdateWorkflowExecutionResponse'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Bool
(UpdateWorkflowExecutionResponse
 -> UpdateWorkflowExecutionResponse -> Bool)
-> (UpdateWorkflowExecutionResponse
    -> UpdateWorkflowExecutionResponse -> Bool)
-> Eq UpdateWorkflowExecutionResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Bool
== :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Bool
$c/= :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Bool
/= :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Bool
Prelude.Eq, Eq UpdateWorkflowExecutionResponse
Eq UpdateWorkflowExecutionResponse =>
(UpdateWorkflowExecutionResponse
 -> UpdateWorkflowExecutionResponse -> Ordering)
-> (UpdateWorkflowExecutionResponse
    -> UpdateWorkflowExecutionResponse -> Bool)
-> (UpdateWorkflowExecutionResponse
    -> UpdateWorkflowExecutionResponse -> Bool)
-> (UpdateWorkflowExecutionResponse
    -> UpdateWorkflowExecutionResponse -> Bool)
-> (UpdateWorkflowExecutionResponse
    -> UpdateWorkflowExecutionResponse -> Bool)
-> (UpdateWorkflowExecutionResponse
    -> UpdateWorkflowExecutionResponse
    -> UpdateWorkflowExecutionResponse)
-> (UpdateWorkflowExecutionResponse
    -> UpdateWorkflowExecutionResponse
    -> UpdateWorkflowExecutionResponse)
-> Ord UpdateWorkflowExecutionResponse
UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Bool
UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Ordering
UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse
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 :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Ordering
compare :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Ordering
$c< :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Bool
< :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Bool
$c<= :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Bool
<= :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Bool
$c> :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Bool
> :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Bool
$c>= :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Bool
>= :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse -> Bool
$cmax :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse
max :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse
$cmin :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse
min :: UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionResponse
Prelude.Ord)
instance Prelude.Show UpdateWorkflowExecutionResponse where
  showsPrec :: Int -> UpdateWorkflowExecutionResponse -> ShowS
showsPrec Int
_ UpdateWorkflowExecutionResponse
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpdateWorkflowExecutionResponse -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpdateWorkflowExecutionResponse
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpdateWorkflowExecutionResponse "updateRef" Proto.Temporal.Api.Update.V1.Message.UpdateRef where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "updateRef"
-> (UpdateRef -> f UpdateRef)
-> UpdateWorkflowExecutionResponse
-> f UpdateWorkflowExecutionResponse
fieldOf Proxy# "updateRef"
_
    = ((Maybe UpdateRef -> f (Maybe UpdateRef))
 -> UpdateWorkflowExecutionResponse
 -> f UpdateWorkflowExecutionResponse)
-> ((UpdateRef -> f UpdateRef)
    -> Maybe UpdateRef -> f (Maybe UpdateRef))
-> (UpdateRef -> f UpdateRef)
-> UpdateWorkflowExecutionResponse
-> f UpdateWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkflowExecutionResponse -> Maybe UpdateRef)
-> (UpdateWorkflowExecutionResponse
    -> Maybe UpdateRef -> UpdateWorkflowExecutionResponse)
-> Lens
     UpdateWorkflowExecutionResponse
     UpdateWorkflowExecutionResponse
     (Maybe UpdateRef)
     (Maybe UpdateRef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkflowExecutionResponse -> Maybe UpdateRef
_UpdateWorkflowExecutionResponse'updateRef
           (\ UpdateWorkflowExecutionResponse
x__ Maybe UpdateRef
y__
              -> UpdateWorkflowExecutionResponse
x__ {_UpdateWorkflowExecutionResponse'updateRef = y__}))
        (UpdateRef -> Lens' (Maybe UpdateRef) UpdateRef
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpdateRef
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateWorkflowExecutionResponse "maybe'updateRef" (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.UpdateRef) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'updateRef"
-> (Maybe UpdateRef -> f (Maybe UpdateRef))
-> UpdateWorkflowExecutionResponse
-> f UpdateWorkflowExecutionResponse
fieldOf Proxy# "maybe'updateRef"
_
    = ((Maybe UpdateRef -> f (Maybe UpdateRef))
 -> UpdateWorkflowExecutionResponse
 -> f UpdateWorkflowExecutionResponse)
-> ((Maybe UpdateRef -> f (Maybe UpdateRef))
    -> Maybe UpdateRef -> f (Maybe UpdateRef))
-> (Maybe UpdateRef -> f (Maybe UpdateRef))
-> UpdateWorkflowExecutionResponse
-> f UpdateWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkflowExecutionResponse -> Maybe UpdateRef)
-> (UpdateWorkflowExecutionResponse
    -> Maybe UpdateRef -> UpdateWorkflowExecutionResponse)
-> Lens
     UpdateWorkflowExecutionResponse
     UpdateWorkflowExecutionResponse
     (Maybe UpdateRef)
     (Maybe UpdateRef)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkflowExecutionResponse -> Maybe UpdateRef
_UpdateWorkflowExecutionResponse'updateRef
           (\ UpdateWorkflowExecutionResponse
x__ Maybe UpdateRef
y__
              -> UpdateWorkflowExecutionResponse
x__ {_UpdateWorkflowExecutionResponse'updateRef = y__}))
        (Maybe UpdateRef -> f (Maybe UpdateRef))
-> Maybe UpdateRef -> f (Maybe UpdateRef)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkflowExecutionResponse "outcome" Proto.Temporal.Api.Update.V1.Message.Outcome where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "outcome"
-> (Outcome -> f Outcome)
-> UpdateWorkflowExecutionResponse
-> f UpdateWorkflowExecutionResponse
fieldOf Proxy# "outcome"
_
    = ((Maybe Outcome -> f (Maybe Outcome))
 -> UpdateWorkflowExecutionResponse
 -> f UpdateWorkflowExecutionResponse)
-> ((Outcome -> f Outcome) -> Maybe Outcome -> f (Maybe Outcome))
-> (Outcome -> f Outcome)
-> UpdateWorkflowExecutionResponse
-> f UpdateWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkflowExecutionResponse -> Maybe Outcome)
-> (UpdateWorkflowExecutionResponse
    -> Maybe Outcome -> UpdateWorkflowExecutionResponse)
-> Lens
     UpdateWorkflowExecutionResponse
     UpdateWorkflowExecutionResponse
     (Maybe Outcome)
     (Maybe Outcome)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkflowExecutionResponse -> Maybe Outcome
_UpdateWorkflowExecutionResponse'outcome
           (\ UpdateWorkflowExecutionResponse
x__ Maybe Outcome
y__
              -> UpdateWorkflowExecutionResponse
x__ {_UpdateWorkflowExecutionResponse'outcome = y__}))
        (Outcome -> Lens' (Maybe Outcome) Outcome
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Outcome
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField UpdateWorkflowExecutionResponse "maybe'outcome" (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Outcome) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'outcome"
-> (Maybe Outcome -> f (Maybe Outcome))
-> UpdateWorkflowExecutionResponse
-> f UpdateWorkflowExecutionResponse
fieldOf Proxy# "maybe'outcome"
_
    = ((Maybe Outcome -> f (Maybe Outcome))
 -> UpdateWorkflowExecutionResponse
 -> f UpdateWorkflowExecutionResponse)
-> ((Maybe Outcome -> f (Maybe Outcome))
    -> Maybe Outcome -> f (Maybe Outcome))
-> (Maybe Outcome -> f (Maybe Outcome))
-> UpdateWorkflowExecutionResponse
-> f UpdateWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkflowExecutionResponse -> Maybe Outcome)
-> (UpdateWorkflowExecutionResponse
    -> Maybe Outcome -> UpdateWorkflowExecutionResponse)
-> Lens
     UpdateWorkflowExecutionResponse
     UpdateWorkflowExecutionResponse
     (Maybe Outcome)
     (Maybe Outcome)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkflowExecutionResponse -> Maybe Outcome
_UpdateWorkflowExecutionResponse'outcome
           (\ UpdateWorkflowExecutionResponse
x__ Maybe Outcome
y__
              -> UpdateWorkflowExecutionResponse
x__ {_UpdateWorkflowExecutionResponse'outcome = y__}))
        (Maybe Outcome -> f (Maybe Outcome))
-> Maybe Outcome -> f (Maybe Outcome)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpdateWorkflowExecutionResponse "stage" Proto.Temporal.Api.Enums.V1.Update.UpdateWorkflowExecutionLifecycleStage where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "stage"
-> (UpdateWorkflowExecutionLifecycleStage
    -> f UpdateWorkflowExecutionLifecycleStage)
-> UpdateWorkflowExecutionResponse
-> f UpdateWorkflowExecutionResponse
fieldOf Proxy# "stage"
_
    = ((UpdateWorkflowExecutionLifecycleStage
  -> f UpdateWorkflowExecutionLifecycleStage)
 -> UpdateWorkflowExecutionResponse
 -> f UpdateWorkflowExecutionResponse)
-> ((UpdateWorkflowExecutionLifecycleStage
     -> f UpdateWorkflowExecutionLifecycleStage)
    -> UpdateWorkflowExecutionLifecycleStage
    -> f UpdateWorkflowExecutionLifecycleStage)
-> (UpdateWorkflowExecutionLifecycleStage
    -> f UpdateWorkflowExecutionLifecycleStage)
-> UpdateWorkflowExecutionResponse
-> f UpdateWorkflowExecutionResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpdateWorkflowExecutionResponse
 -> UpdateWorkflowExecutionLifecycleStage)
-> (UpdateWorkflowExecutionResponse
    -> UpdateWorkflowExecutionLifecycleStage
    -> UpdateWorkflowExecutionResponse)
-> Lens
     UpdateWorkflowExecutionResponse
     UpdateWorkflowExecutionResponse
     UpdateWorkflowExecutionLifecycleStage
     UpdateWorkflowExecutionLifecycleStage
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionLifecycleStage
_UpdateWorkflowExecutionResponse'stage
           (\ UpdateWorkflowExecutionResponse
x__ UpdateWorkflowExecutionLifecycleStage
y__ -> UpdateWorkflowExecutionResponse
x__ {_UpdateWorkflowExecutionResponse'stage = y__}))
        (UpdateWorkflowExecutionLifecycleStage
 -> f UpdateWorkflowExecutionLifecycleStage)
-> UpdateWorkflowExecutionLifecycleStage
-> f UpdateWorkflowExecutionLifecycleStage
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpdateWorkflowExecutionResponse where
  messageName :: Proxy UpdateWorkflowExecutionResponse -> Text
messageName Proxy UpdateWorkflowExecutionResponse
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.workflowservice.v1.UpdateWorkflowExecutionResponse"
  packedMessageDescriptor :: Proxy UpdateWorkflowExecutionResponse -> ByteString
packedMessageDescriptor Proxy UpdateWorkflowExecutionResponse
_
    = ByteString
"\n\
      \\USUpdateWorkflowExecutionResponse\DC2@\n\
      \\n\
      \update_ref\CAN\SOH \SOH(\v2!.temporal.api.update.v1.UpdateRefR\tupdateRef\DC29\n\
      \\aoutcome\CAN\STX \SOH(\v2\US.temporal.api.update.v1.OutcomeR\aoutcome\DC2R\n\
      \\ENQstage\CAN\ETX \SOH(\SO2<.temporal.api.enums.v1.UpdateWorkflowExecutionLifecycleStageR\ENQstage"
  packedFileDescriptor :: Proxy UpdateWorkflowExecutionResponse -> ByteString
packedFileDescriptor Proxy UpdateWorkflowExecutionResponse
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor UpdateWorkflowExecutionResponse)
fieldsByTag
    = let
        updateRef__field_descriptor :: FieldDescriptor UpdateWorkflowExecutionResponse
updateRef__field_descriptor
          = String
-> FieldTypeDescriptor UpdateRef
-> FieldAccessor UpdateWorkflowExecutionResponse UpdateRef
-> FieldDescriptor UpdateWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"update_ref"
              (MessageOrGroup -> FieldTypeDescriptor UpdateRef
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Update.V1.Message.UpdateRef)
              (Lens
  UpdateWorkflowExecutionResponse
  UpdateWorkflowExecutionResponse
  (Maybe UpdateRef)
  (Maybe UpdateRef)
-> FieldAccessor UpdateWorkflowExecutionResponse UpdateRef
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'updateRef")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkflowExecutionResponse
        outcome__field_descriptor :: FieldDescriptor UpdateWorkflowExecutionResponse
outcome__field_descriptor
          = String
-> FieldTypeDescriptor Outcome
-> FieldAccessor UpdateWorkflowExecutionResponse Outcome
-> FieldDescriptor UpdateWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"outcome"
              (MessageOrGroup -> FieldTypeDescriptor Outcome
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Update.V1.Message.Outcome)
              (Lens
  UpdateWorkflowExecutionResponse
  UpdateWorkflowExecutionResponse
  (Maybe Outcome)
  (Maybe Outcome)
-> FieldAccessor UpdateWorkflowExecutionResponse Outcome
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'outcome")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkflowExecutionResponse
        stage__field_descriptor :: FieldDescriptor UpdateWorkflowExecutionResponse
stage__field_descriptor
          = String
-> FieldTypeDescriptor UpdateWorkflowExecutionLifecycleStage
-> FieldAccessor
     UpdateWorkflowExecutionResponse
     UpdateWorkflowExecutionLifecycleStage
-> FieldDescriptor UpdateWorkflowExecutionResponse
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"stage"
              (ScalarField UpdateWorkflowExecutionLifecycleStage
-> FieldTypeDescriptor UpdateWorkflowExecutionLifecycleStage
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField UpdateWorkflowExecutionLifecycleStage
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Update.UpdateWorkflowExecutionLifecycleStage)
              (WireDefault UpdateWorkflowExecutionLifecycleStage
-> Lens
     UpdateWorkflowExecutionResponse
     UpdateWorkflowExecutionResponse
     UpdateWorkflowExecutionLifecycleStage
     UpdateWorkflowExecutionLifecycleStage
-> FieldAccessor
     UpdateWorkflowExecutionResponse
     UpdateWorkflowExecutionLifecycleStage
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault UpdateWorkflowExecutionLifecycleStage
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"stage")) ::
              Data.ProtoLens.FieldDescriptor UpdateWorkflowExecutionResponse
      in
        [(Tag, FieldDescriptor UpdateWorkflowExecutionResponse)]
-> Map Tag (FieldDescriptor UpdateWorkflowExecutionResponse)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor UpdateWorkflowExecutionResponse
updateRef__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor UpdateWorkflowExecutionResponse
outcome__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor UpdateWorkflowExecutionResponse
stage__field_descriptor)]
  unknownFields :: Lens' UpdateWorkflowExecutionResponse FieldSet
unknownFields
    = (UpdateWorkflowExecutionResponse -> FieldSet)
-> (UpdateWorkflowExecutionResponse
    -> FieldSet -> UpdateWorkflowExecutionResponse)
-> Lens' UpdateWorkflowExecutionResponse FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpdateWorkflowExecutionResponse -> FieldSet
_UpdateWorkflowExecutionResponse'_unknownFields
        (\ UpdateWorkflowExecutionResponse
x__ FieldSet
y__
           -> UpdateWorkflowExecutionResponse
x__ {_UpdateWorkflowExecutionResponse'_unknownFields = y__})
  defMessage :: UpdateWorkflowExecutionResponse
defMessage
    = UpdateWorkflowExecutionResponse'_constructor
        {_UpdateWorkflowExecutionResponse'updateRef :: Maybe UpdateRef
_UpdateWorkflowExecutionResponse'updateRef = Maybe UpdateRef
forall a. Maybe a
Prelude.Nothing,
         _UpdateWorkflowExecutionResponse'outcome :: Maybe Outcome
_UpdateWorkflowExecutionResponse'outcome = Maybe Outcome
forall a. Maybe a
Prelude.Nothing,
         _UpdateWorkflowExecutionResponse'stage :: UpdateWorkflowExecutionLifecycleStage
_UpdateWorkflowExecutionResponse'stage = UpdateWorkflowExecutionLifecycleStage
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpdateWorkflowExecutionResponse'_unknownFields :: FieldSet
_UpdateWorkflowExecutionResponse'_unknownFields = []}
  parseMessage :: Parser UpdateWorkflowExecutionResponse
parseMessage
    = let
        loop ::
          UpdateWorkflowExecutionResponse
          -> Data.ProtoLens.Encoding.Bytes.Parser UpdateWorkflowExecutionResponse
        loop :: UpdateWorkflowExecutionResponse
-> Parser UpdateWorkflowExecutionResponse
loop UpdateWorkflowExecutionResponse
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 UpdateRef -> String -> Parser UpdateRef
forall a. Parser a -> String -> Parser a
(Data.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_ref"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"updateRef") y x)
                        Word64
18
                          -> do y <- Parser Outcome -> String -> Parser Outcome
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       (do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
                                           Data.ProtoLens.Encoding.Bytes.isolate
                                             (Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
                                       String
"outcome"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"outcome") y x)
                        Word64
24
                          -> do y <- Parser UpdateWorkflowExecutionLifecycleStage
-> String -> Parser UpdateWorkflowExecutionLifecycleStage
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> UpdateWorkflowExecutionLifecycleStage)
-> Parser Int -> Parser UpdateWorkflowExecutionLifecycleStage
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> UpdateWorkflowExecutionLifecycleStage
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
"stage"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"stage") 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 UpdateWorkflowExecutionResponse
-> String -> Parser UpdateWorkflowExecutionResponse
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpdateWorkflowExecutionResponse
-> Parser UpdateWorkflowExecutionResponse
loop UpdateWorkflowExecutionResponse
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"UpdateWorkflowExecutionResponse"
  buildMessage :: UpdateWorkflowExecutionResponse -> Builder
buildMessage
    = \ UpdateWorkflowExecutionResponse
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe UpdateRef)
  UpdateWorkflowExecutionResponse
  UpdateWorkflowExecutionResponse
  (Maybe UpdateRef)
  (Maybe UpdateRef)
-> UpdateWorkflowExecutionResponse -> Maybe UpdateRef
forall a s t b. FoldLike a s t a b -> s -> a
Lens.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'updateRef") UpdateWorkflowExecutionResponse
_x
              of
                Maybe UpdateRef
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just UpdateRef
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (UpdateRef -> ByteString) -> UpdateRef -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                          (\ ByteString
bs
                             -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                  (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                     (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                  (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                          UpdateRef -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpdateRef
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (case
                     FoldLike
  (Maybe Outcome)
  UpdateWorkflowExecutionResponse
  UpdateWorkflowExecutionResponse
  (Maybe Outcome)
  (Maybe Outcome)
-> UpdateWorkflowExecutionResponse -> Maybe Outcome
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'outcome") UpdateWorkflowExecutionResponse
_x
                 of
                   Maybe Outcome
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just Outcome
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (Outcome -> ByteString) -> Outcome -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
                             (\ ByteString
bs
                                -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                        (Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
                                     (ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
                             Outcome -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Outcome
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: UpdateWorkflowExecutionLifecycleStage
_v = FoldLike
  UpdateWorkflowExecutionLifecycleStage
  UpdateWorkflowExecutionResponse
  UpdateWorkflowExecutionResponse
  UpdateWorkflowExecutionLifecycleStage
  UpdateWorkflowExecutionLifecycleStage
-> UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionLifecycleStage
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"stage") UpdateWorkflowExecutionResponse
_x
                    in
                      if UpdateWorkflowExecutionLifecycleStage
-> UpdateWorkflowExecutionLifecycleStage -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) UpdateWorkflowExecutionLifecycleStage
_v UpdateWorkflowExecutionLifecycleStage
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
                          Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      else
                          Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
24)
                            ((Int -> Builder)
-> (UpdateWorkflowExecutionLifecycleStage -> Int)
-> UpdateWorkflowExecutionLifecycleStage
-> 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)
                               UpdateWorkflowExecutionLifecycleStage -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum UpdateWorkflowExecutionLifecycleStage
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  UpdateWorkflowExecutionResponse
  UpdateWorkflowExecutionResponse
  FieldSet
  FieldSet
-> UpdateWorkflowExecutionResponse -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpdateWorkflowExecutionResponse
  UpdateWorkflowExecutionResponse
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpdateWorkflowExecutionResponse FieldSet
Data.ProtoLens.unknownFields UpdateWorkflowExecutionResponse
_x))))
instance Control.DeepSeq.NFData UpdateWorkflowExecutionResponse where
  rnf :: UpdateWorkflowExecutionResponse -> ()
rnf
    = \ UpdateWorkflowExecutionResponse
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpdateWorkflowExecutionResponse -> FieldSet
_UpdateWorkflowExecutionResponse'_unknownFields UpdateWorkflowExecutionResponse
x__)
             (Maybe UpdateRef -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpdateWorkflowExecutionResponse -> Maybe UpdateRef
_UpdateWorkflowExecutionResponse'updateRef UpdateWorkflowExecutionResponse
x__)
                (Maybe Outcome -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpdateWorkflowExecutionResponse -> Maybe Outcome
_UpdateWorkflowExecutionResponse'outcome UpdateWorkflowExecutionResponse
x__)
                   (UpdateWorkflowExecutionLifecycleStage -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (UpdateWorkflowExecutionResponse
-> UpdateWorkflowExecutionLifecycleStage
_UpdateWorkflowExecutionResponse'stage UpdateWorkflowExecutionResponse
x__) ())))
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
  = ByteString
"\n\
    \6temporal/api/workflowservice/v1/request_response.proto\DC2\UStemporal.api.workflowservice.v1\SUB+temporal/api/enums/v1/batch_operation.proto\SUB$temporal/api/enums/v1/workflow.proto\SUB%temporal/api/enums/v1/namespace.proto\SUB(temporal/api/enums/v1/failed_cause.proto\SUB\"temporal/api/enums/v1/common.proto\SUB!temporal/api/enums/v1/query.proto\SUB!temporal/api/enums/v1/reset.proto\SUB&temporal/api/enums/v1/task_queue.proto\SUB\"temporal/api/enums/v1/update.proto\SUB$temporal/api/common/v1/message.proto\SUB%temporal/api/history/v1/message.proto\SUB&temporal/api/workflow/v1/message.proto\SUB%temporal/api/command/v1/message.proto\SUB%temporal/api/failure/v1/message.proto\SUB$temporal/api/filter/v1/message.proto\SUB&temporal/api/protocol/v1/message.proto\SUB'temporal/api/namespace/v1/message.proto\SUB#temporal/api/query/v1/message.proto\SUB)temporal/api/replication/v1/message.proto\SUB&temporal/api/schedule/v1/message.proto\SUB'temporal/api/taskqueue/v1/message.proto\SUB$temporal/api/update/v1/message.proto\SUB%temporal/api/version/v1/message.proto\SUB#temporal/api/batch/v1/message.proto\SUB0temporal/api/sdk/v1/task_complete_metadata.proto\SUB#temporal/api/nexus/v1/message.proto\SUB\RSgoogle/protobuf/duration.proto\SUB\USgoogle/protobuf/timestamp.proto\"\249\ACK\n\
    \\CANRegisterNamespaceRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2 \n\
    \\vdescription\CAN\STX \SOH(\tR\vdescription\DC2\US\n\
    \\vowner_email\CAN\ETX \SOH(\tR\n\
    \ownerEmail\DC2h\n\
    \#workflow_execution_retention_period\CAN\EOT \SOH(\v2\EM.google.protobuf.DurationR workflowExecutionRetentionPeriod\DC2Q\n\
    \\bclusters\CAN\ENQ \ETX(\v25.temporal.api.replication.v1.ClusterReplicationConfigR\bclusters\DC2.\n\
    \\DC3active_cluster_name\CAN\ACK \SOH(\tR\DC1activeClusterName\DC2W\n\
    \\EOTdata\CAN\a \ETX(\v2C.temporal.api.workflowservice.v1.RegisterNamespaceRequest.DataEntryR\EOTdata\DC2%\n\
    \\SOsecurity_token\CAN\b \SOH(\tR\rsecurityToken\DC2.\n\
    \\DC3is_global_namespace\CAN\t \SOH(\bR\DC1isGlobalNamespace\DC2Z\n\
    \\SYNhistory_archival_state\CAN\n\
    \ \SOH(\SO2$.temporal.api.enums.v1.ArchivalStateR\DC4historyArchivalState\DC20\n\
    \\DC4history_archival_uri\CAN\v \SOH(\tR\DC2historyArchivalUri\DC2`\n\
    \\EMvisibility_archival_state\CAN\f \SOH(\SO2$.temporal.api.enums.v1.ArchivalStateR\ETBvisibilityArchivalState\DC26\n\
    \\ETBvisibility_archival_uri\CAN\r \SOH(\tR\NAKvisibilityArchivalUri\SUB7\n\
    \\tDataEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
    \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH\"\ESC\n\
    \\EMRegisterNamespaceResponse\"\179\SOH\n\
    \\NAKListNamespacesRequest\DC2\ESC\n\
    \\tpage_size\CAN\SOH \SOH(\ENQR\bpageSize\DC2&\n\
    \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken\DC2U\n\
    \\DLEnamespace_filter\CAN\ETX \SOH(\v2*.temporal.api.namespace.v1.NamespaceFilterR\SInamespaceFilter\"\156\SOH\n\
    \\SYNListNamespacesResponse\DC2Z\n\
    \\n\
    \namespaces\CAN\SOH \ETX(\v2:.temporal.api.workflowservice.v1.DescribeNamespaceResponseR\n\
    \namespaces\DC2&\n\
    \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken\"H\n\
    \\CANDescribeNamespaceRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\SO\n\
    \\STXid\CAN\STX \SOH(\tR\STXid\"\203\ETX\n\
    \\EMDescribeNamespaceResponse\DC2O\n\
    \\SOnamespace_info\CAN\SOH \SOH(\v2(.temporal.api.namespace.v1.NamespaceInfoR\rnamespaceInfo\DC2B\n\
    \\ACKconfig\CAN\STX \SOH(\v2*.temporal.api.namespace.v1.NamespaceConfigR\ACKconfig\DC2f\n\
    \\DC2replication_config\CAN\ETX \SOH(\v27.temporal.api.replication.v1.NamespaceReplicationConfigR\DC1replicationConfig\DC2)\n\
    \\DLEfailover_version\CAN\EOT \SOH(\ETXR\SIfailoverVersion\DC2.\n\
    \\DC3is_global_namespace\CAN\ENQ \SOH(\bR\DC1isGlobalNamespace\DC2V\n\
    \\DLEfailover_history\CAN\ACK \ETX(\v2+.temporal.api.replication.v1.FailoverStatusR\SIfailoverHistory\"\179\ETX\n\
    \\SYNUpdateNamespaceRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2O\n\
    \\vupdate_info\CAN\STX \SOH(\v2..temporal.api.namespace.v1.UpdateNamespaceInfoR\n\
    \updateInfo\DC2B\n\
    \\ACKconfig\CAN\ETX \SOH(\v2*.temporal.api.namespace.v1.NamespaceConfigR\ACKconfig\DC2f\n\
    \\DC2replication_config\CAN\EOT \SOH(\v27.temporal.api.replication.v1.NamespaceReplicationConfigR\DC1replicationConfig\DC2%\n\
    \\SOsecurity_token\CAN\ENQ \SOH(\tR\rsecurityToken\DC2*\n\
    \\DC1delete_bad_binary\CAN\ACK \SOH(\tR\SIdeleteBadBinary\DC2+\n\
    \\DC1promote_namespace\CAN\a \SOH(\bR\DLEpromoteNamespace\"\241\STX\n\
    \\ETBUpdateNamespaceResponse\DC2O\n\
    \\SOnamespace_info\CAN\SOH \SOH(\v2(.temporal.api.namespace.v1.NamespaceInfoR\rnamespaceInfo\DC2B\n\
    \\ACKconfig\CAN\STX \SOH(\v2*.temporal.api.namespace.v1.NamespaceConfigR\ACKconfig\DC2f\n\
    \\DC2replication_config\CAN\ETX \SOH(\v27.temporal.api.replication.v1.NamespaceReplicationConfigR\DC1replicationConfig\DC2)\n\
    \\DLEfailover_version\CAN\EOT \SOH(\ETXR\SIfailoverVersion\DC2.\n\
    \\DC3is_global_namespace\CAN\ENQ \SOH(\bR\DC1isGlobalNamespace\"`\n\
    \\EMDeprecateNamespaceRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2%\n\
    \\SOsecurity_token\CAN\STX \SOH(\tR\rsecurityToken\"\FS\n\
    \\SUBDeprecateNamespaceResponse\"\220\v\n\
    \\GSStartWorkflowExecutionRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
    \\vworkflow_id\CAN\STX \SOH(\tR\n\
    \workflowId\DC2I\n\
    \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2C\n\
    \\n\
    \task_queue\CAN\EOT \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC26\n\
    \\ENQinput\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2W\n\
    \\SUBworkflow_execution_timeout\CAN\ACK \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
    \\DC4workflow_run_timeout\CAN\a \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
    \\NAKworkflow_task_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2\SUB\n\
    \\bidentity\CAN\t \SOH(\tR\bidentity\DC2\GS\n\
    \\n\
    \request_id\CAN\n\
    \ \SOH(\tR\trequestId\DC2e\n\
    \\CANworkflow_id_reuse_policy\CAN\v \SOH(\SO2,.temporal.api.enums.v1.WorkflowIdReusePolicyR\NAKworkflowIdReusePolicy\DC2n\n\
    \\ESCworkflow_id_conflict_policy\CAN\SYN \SOH(\SO2/.temporal.api.enums.v1.WorkflowIdConflictPolicyR\CANworkflowIdConflictPolicy\DC2F\n\
    \\fretry_policy\CAN\f \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2#\n\
    \\rcron_schedule\CAN\r \SOH(\tR\fcronSchedule\DC20\n\
    \\EOTmemo\CAN\SO \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
    \\DC1search_attributes\CAN\SI \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC26\n\
    \\ACKheader\CAN\DLE \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC26\n\
    \\ETBrequest_eager_execution\CAN\DC1 \SOH(\bR\NAKrequestEagerExecution\DC2M\n\
    \\DC1continued_failure\CAN\DC2 \SOH(\v2 .temporal.api.failure.v1.FailureR\DLEcontinuedFailure\DC2V\n\
    \\SYNlast_completion_result\CAN\DC3 \SOH(\v2 .temporal.api.common.v1.PayloadsR\DC4lastCompletionResult\DC2K\n\
    \\DC4workflow_start_delay\CAN\DC4 \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowStartDelay\DC2S\n\
    \\DC4completion_callbacks\CAN\NAK \ETX(\v2 .temporal.api.common.v1.CallbackR\DC3completionCallbacks\"\193\SOH\n\
    \\RSStartWorkflowExecutionResponse\DC2\NAK\n\
    \\ACKrun_id\CAN\SOH \SOH(\tR\ENQrunId\DC2\CAN\n\
    \\astarted\CAN\ETX \SOH(\bR\astarted\DC2n\n\
    \\DC3eager_workflow_task\CAN\STX \SOH(\v2>.temporal.api.workflowservice.v1.PollWorkflowTaskQueueResponseR\DC1eagerWorkflowTask\"\148\ETX\n\
    \\"GetWorkflowExecutionHistoryRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2G\n\
    \\texecution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\texecution\DC2*\n\
    \\DC1maximum_page_size\CAN\ETX \SOH(\ENQR\SImaximumPageSize\DC2&\n\
    \\SInext_page_token\CAN\EOT \SOH(\fR\rnextPageToken\DC2$\n\
    \\SOwait_new_event\CAN\ENQ \SOH(\bR\fwaitNewEvent\DC2h\n\
    \\EMhistory_event_filter_type\CAN\ACK \SOH(\SO2-.temporal.api.enums.v1.HistoryEventFilterTypeR\SYNhistoryEventFilterType\DC2#\n\
    \\rskip_archival\CAN\a \SOH(\bR\fskipArchival\"\232\SOH\n\
    \#GetWorkflowExecutionHistoryResponse\DC2:\n\
    \\ahistory\CAN\SOH \SOH(\v2 .temporal.api.history.v1.HistoryR\ahistory\DC2A\n\
    \\vraw_history\CAN\STX \ETX(\v2 .temporal.api.common.v1.DataBlobR\n\
    \rawHistory\DC2&\n\
    \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\DC2\SUB\n\
    \\barchived\CAN\EOT \SOH(\bR\barchived\"\230\SOH\n\
    \)GetWorkflowExecutionHistoryReverseRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2G\n\
    \\texecution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\texecution\DC2*\n\
    \\DC1maximum_page_size\CAN\ETX \SOH(\ENQR\SImaximumPageSize\DC2&\n\
    \\SInext_page_token\CAN\EOT \SOH(\fR\rnextPageToken\"\144\SOH\n\
    \*GetWorkflowExecutionHistoryReverseResponse\DC2:\n\
    \\ahistory\CAN\SOH \SOH(\v2 .temporal.api.history.v1.HistoryR\ahistory\DC2&\n\
    \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\"\185\STX\n\
    \\FSPollWorkflowTaskQueueRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2C\n\
    \\n\
    \task_queue\CAN\STX \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC2\SUB\n\
    \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2'\n\
    \\SIbinary_checksum\CAN\EOT \SOH(\tR\SObinaryChecksum\DC2q\n\
    \\ESCworker_version_capabilities\CAN\ENQ \SOH(\v21.temporal.api.common.v1.WorkerVersionCapabilitiesR\EMworkerVersionCapabilities\"\163\b\n\
    \\GSPollWorkflowTaskQueueResponse\DC2\GS\n\
    \\n\
    \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2X\n\
    \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
    \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC29\n\
    \\EMprevious_started_event_id\CAN\EOT \SOH(\ETXR\SYNpreviousStartedEventId\DC2(\n\
    \\DLEstarted_event_id\CAN\ENQ \SOH(\ETXR\SOstartedEventId\DC2\CAN\n\
    \\aattempt\CAN\ACK \SOH(\ENQR\aattempt\DC2,\n\
    \\DC2backlog_count_hint\CAN\a \SOH(\ETXR\DLEbacklogCountHint\DC2:\n\
    \\ahistory\CAN\b \SOH(\v2 .temporal.api.history.v1.HistoryR\ahistory\DC2&\n\
    \\SInext_page_token\CAN\t \SOH(\fR\rnextPageToken\DC2:\n\
    \\ENQquery\CAN\n\
    \ \SOH(\v2$.temporal.api.query.v1.WorkflowQueryR\ENQquery\DC2g\n\
    \\GSworkflow_execution_task_queue\CAN\v \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\SUBworkflowExecutionTaskQueue\DC2A\n\
    \\SOscheduled_time\CAN\f \SOH(\v2\SUB.google.protobuf.TimestampR\rscheduledTime\DC2=\n\
    \\fstarted_time\CAN\r \SOH(\v2\SUB.google.protobuf.TimestampR\vstartedTime\DC2e\n\
    \\aqueries\CAN\SO \ETX(\v2K.temporal.api.workflowservice.v1.PollWorkflowTaskQueueResponse.QueriesEntryR\aqueries\DC2=\n\
    \\bmessages\CAN\SI \ETX(\v2!.temporal.api.protocol.v1.MessageR\bmessages\SUB`\n\
    \\fQueriesEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2:\n\
    \\ENQvalue\CAN\STX \SOH(\v2$.temporal.api.query.v1.WorkflowQueryR\ENQvalue:\STX8\SOH\"\250\a\n\
    \#RespondWorkflowTaskCompletedRequest\DC2\GS\n\
    \\n\
    \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2<\n\
    \\bcommands\CAN\STX \ETX(\v2 .temporal.api.command.v1.CommandR\bcommands\DC2\SUB\n\
    \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2a\n\
    \\DC1sticky_attributes\CAN\EOT \SOH(\v24.temporal.api.taskqueue.v1.StickyExecutionAttributesR\DLEstickyAttributes\DC27\n\
    \\CANreturn_new_workflow_task\CAN\ENQ \SOH(\bR\NAKreturnNewWorkflowTask\DC2B\n\
    \\RSforce_create_new_workflow_task\CAN\ACK \SOH(\bR\SUBforceCreateNewWorkflowTask\DC2'\n\
    \\SIbinary_checksum\CAN\a \SOH(\tR\SObinaryChecksum\DC2{\n\
    \\rquery_results\CAN\b \ETX(\v2V.temporal.api.workflowservice.v1.RespondWorkflowTaskCompletedRequest.QueryResultsEntryR\fqueryResults\DC2\FS\n\
    \\tnamespace\CAN\t \SOH(\tR\tnamespace\DC2\\\n\
    \\DC4worker_version_stamp\CAN\n\
    \ \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\DC2workerVersionStamp\DC2=\n\
    \\bmessages\CAN\v \ETX(\v2!.temporal.api.protocol.v1.MessageR\bmessages\DC2U\n\
    \\fsdk_metadata\CAN\f \SOH(\v22.temporal.api.sdk.v1.WorkflowTaskCompletedMetadataR\vsdkMetadata\DC2U\n\
    \\DC1metering_metadata\CAN\r \SOH(\v2(.temporal.api.common.v1.MeteringMetadataR\DLEmeteringMetadata\SUBk\n\
    \\DC1QueryResultsEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2@\n\
    \\ENQvalue\CAN\STX \SOH(\v2*.temporal.api.query.v1.WorkflowQueryResultR\ENQvalue:\STX8\SOH\"\167\STX\n\
    \$RespondWorkflowTaskCompletedResponse\DC2c\n\
    \\rworkflow_task\CAN\SOH \SOH(\v2>.temporal.api.workflowservice.v1.PollWorkflowTaskQueueResponseR\fworkflowTask\DC2e\n\
    \\SOactivity_tasks\CAN\STX \ETX(\v2>.temporal.api.workflowservice.v1.PollActivityTaskQueueResponseR\ractivityTasks\DC23\n\
    \\SYNreset_history_event_id\CAN\ETX \SOH(\ETXR\DC3resetHistoryEventId\"\184\ETX\n\
    \ RespondWorkflowTaskFailedRequest\DC2\GS\n\
    \\n\
    \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2D\n\
    \\ENQcause\CAN\STX \SOH(\SO2..temporal.api.enums.v1.WorkflowTaskFailedCauseR\ENQcause\DC2:\n\
    \\afailure\CAN\ETX \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2\SUB\n\
    \\bidentity\CAN\EOT \SOH(\tR\bidentity\DC2'\n\
    \\SIbinary_checksum\CAN\ENQ \SOH(\tR\SObinaryChecksum\DC2\FS\n\
    \\tnamespace\CAN\ACK \SOH(\tR\tnamespace\DC2=\n\
    \\bmessages\CAN\a \ETX(\v2!.temporal.api.protocol.v1.MessageR\bmessages\DC2Q\n\
    \\SOworker_version\CAN\b \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion\"#\n\
    \!RespondWorkflowTaskFailedResponse\"\238\STX\n\
    \\FSPollActivityTaskQueueRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2C\n\
    \\n\
    \task_queue\CAN\STX \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC2\SUB\n\
    \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2\\\n\
    \\DC3task_queue_metadata\CAN\EOT \SOH(\v2,.temporal.api.taskqueue.v1.TaskQueueMetadataR\DC1taskQueueMetadata\DC2q\n\
    \\ESCworker_version_capabilities\CAN\ENQ \SOH(\v21.temporal.api.common.v1.WorkerVersionCapabilitiesR\EMworkerVersionCapabilities\"\240\b\n\
    \\GSPollActivityTaskQueueResponse\DC2\GS\n\
    \\n\
    \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2-\n\
    \\DC2workflow_namespace\CAN\STX \SOH(\tR\DC1workflowNamespace\DC2I\n\
    \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2X\n\
    \\DC2workflow_execution\CAN\EOT \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
    \\ractivity_type\CAN\ENQ \SOH(\v2$.temporal.api.common.v1.ActivityTypeR\factivityType\DC2\US\n\
    \\vactivity_id\CAN\ACK \SOH(\tR\n\
    \activityId\DC26\n\
    \\ACKheader\CAN\a \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC26\n\
    \\ENQinput\CAN\b \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2M\n\
    \\DC1heartbeat_details\CAN\t \SOH(\v2 .temporal.api.common.v1.PayloadsR\DLEheartbeatDetails\DC2A\n\
    \\SOscheduled_time\CAN\n\
    \ \SOH(\v2\SUB.google.protobuf.TimestampR\rscheduledTime\DC2_\n\
    \\RScurrent_attempt_scheduled_time\CAN\v \SOH(\v2\SUB.google.protobuf.TimestampR\ESCcurrentAttemptScheduledTime\DC2=\n\
    \\fstarted_time\CAN\f \SOH(\v2\SUB.google.protobuf.TimestampR\vstartedTime\DC2\CAN\n\
    \\aattempt\CAN\r \SOH(\ENQR\aattempt\DC2T\n\
    \\EMschedule_to_close_timeout\CAN\SO \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToCloseTimeout\DC2N\n\
    \\SYNstart_to_close_timeout\CAN\SI \SOH(\v2\EM.google.protobuf.DurationR\DC3startToCloseTimeout\DC2F\n\
    \\DC1heartbeat_timeout\CAN\DLE \SOH(\v2\EM.google.protobuf.DurationR\DLEheartbeatTimeout\DC2F\n\
    \\fretry_policy\CAN\DC1 \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\"\185\SOH\n\
    \\"RecordActivityTaskHeartbeatRequest\DC2\GS\n\
    \\n\
    \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2:\n\
    \\adetails\CAN\STX \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2\SUB\n\
    \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2\FS\n\
    \\tnamespace\CAN\EOT \SOH(\tR\tnamespace\"P\n\
    \#RecordActivityTaskHeartbeatResponse\DC2)\n\
    \\DLEcancel_requested\CAN\SOH \SOH(\bR\SIcancelRequested\"\247\SOH\n\
    \&RecordActivityTaskHeartbeatByIdRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
    \\vworkflow_id\CAN\STX \SOH(\tR\n\
    \workflowId\DC2\NAK\n\
    \\ACKrun_id\CAN\ETX \SOH(\tR\ENQrunId\DC2\US\n\
    \\vactivity_id\CAN\EOT \SOH(\tR\n\
    \activityId\DC2:\n\
    \\adetails\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2\SUB\n\
    \\bidentity\CAN\ACK \SOH(\tR\bidentity\"T\n\
    \'RecordActivityTaskHeartbeatByIdResponse\DC2)\n\
    \\DLEcancel_requested\CAN\SOH \SOH(\bR\SIcancelRequested\"\139\STX\n\
    \#RespondActivityTaskCompletedRequest\DC2\GS\n\
    \\n\
    \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC28\n\
    \\ACKresult\CAN\STX \SOH(\v2 .temporal.api.common.v1.PayloadsR\ACKresult\DC2\SUB\n\
    \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2\FS\n\
    \\tnamespace\CAN\EOT \SOH(\tR\tnamespace\DC2Q\n\
    \\SOworker_version\CAN\ENQ \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion\"&\n\
    \$RespondActivityTaskCompletedResponse\"\246\SOH\n\
    \'RespondActivityTaskCompletedByIdRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
    \\vworkflow_id\CAN\STX \SOH(\tR\n\
    \workflowId\DC2\NAK\n\
    \\ACKrun_id\CAN\ETX \SOH(\tR\ENQrunId\DC2\US\n\
    \\vactivity_id\CAN\EOT \SOH(\tR\n\
    \activityId\DC28\n\
    \\ACKresult\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\ACKresult\DC2\SUB\n\
    \\bidentity\CAN\ACK \SOH(\tR\bidentity\"*\n\
    \(RespondActivityTaskCompletedByIdResponse\"\226\STX\n\
    \ RespondActivityTaskFailedRequest\DC2\GS\n\
    \\n\
    \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2:\n\
    \\afailure\CAN\STX \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2\SUB\n\
    \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2\FS\n\
    \\tnamespace\CAN\EOT \SOH(\tR\tnamespace\DC2V\n\
    \\SYNlast_heartbeat_details\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\DC4lastHeartbeatDetails\DC2Q\n\
    \\SOworker_version\CAN\ACK \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion\"a\n\
    \!RespondActivityTaskFailedResponse\DC2<\n\
    \\bfailures\CAN\SOH \ETX(\v2 .temporal.api.failure.v1.FailureR\bfailures\"\205\STX\n\
    \$RespondActivityTaskFailedByIdRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
    \\vworkflow_id\CAN\STX \SOH(\tR\n\
    \workflowId\DC2\NAK\n\
    \\ACKrun_id\CAN\ETX \SOH(\tR\ENQrunId\DC2\US\n\
    \\vactivity_id\CAN\EOT \SOH(\tR\n\
    \activityId\DC2:\n\
    \\afailure\CAN\ENQ \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2\SUB\n\
    \\bidentity\CAN\ACK \SOH(\tR\bidentity\DC2V\n\
    \\SYNlast_heartbeat_details\CAN\a \SOH(\v2 .temporal.api.common.v1.PayloadsR\DC4lastHeartbeatDetails\"e\n\
    \%RespondActivityTaskFailedByIdResponse\DC2<\n\
    \\bfailures\CAN\SOH \ETX(\v2 .temporal.api.failure.v1.FailureR\bfailures\"\140\STX\n\
    \\"RespondActivityTaskCanceledRequest\DC2\GS\n\
    \\n\
    \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2:\n\
    \\adetails\CAN\STX \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2\SUB\n\
    \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2\FS\n\
    \\tnamespace\CAN\EOT \SOH(\tR\tnamespace\DC2Q\n\
    \\SOworker_version\CAN\ENQ \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion\"%\n\
    \#RespondActivityTaskCanceledResponse\"\247\SOH\n\
    \&RespondActivityTaskCanceledByIdRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
    \\vworkflow_id\CAN\STX \SOH(\tR\n\
    \workflowId\DC2\NAK\n\
    \\ACKrun_id\CAN\ETX \SOH(\tR\ENQrunId\DC2\US\n\
    \\vactivity_id\CAN\EOT \SOH(\tR\n\
    \activityId\DC2:\n\
    \\adetails\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2\SUB\n\
    \\bidentity\CAN\ACK \SOH(\tR\bidentity\")\n\
    \'RespondActivityTaskCanceledByIdResponse\"\167\STX\n\
    \%RequestCancelWorkflowExecutionRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2X\n\
    \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2\SUB\n\
    \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2\GS\n\
    \\n\
    \request_id\CAN\EOT \SOH(\tR\trequestId\DC23\n\
    \\SYNfirst_execution_run_id\CAN\ENQ \SOH(\tR\DC3firstExecutionRunId\DC2\SYN\n\
    \\ACKreason\CAN\ACK \SOH(\tR\ACKreason\"(\n\
    \&RequestCancelWorkflowExecutionResponse\"\189\ETX\n\
    \\RSSignalWorkflowExecutionRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2X\n\
    \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2\US\n\
    \\vsignal_name\CAN\ETX \SOH(\tR\n\
    \signalName\DC26\n\
    \\ENQinput\CAN\EOT \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2\SUB\n\
    \\bidentity\CAN\ENQ \SOH(\tR\bidentity\DC2\GS\n\
    \\n\
    \request_id\CAN\ACK \SOH(\tR\trequestId\DC2\CAN\n\
    \\acontrol\CAN\a \SOH(\tR\acontrol\DC26\n\
    \\ACKheader\CAN\b \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC2=\n\
    \\ESCskip_generate_workflow_task\CAN\t \SOH(\bR\CANskipGenerateWorkflowTask\"!\n\
    \\USSignalWorkflowExecutionResponse\"\241\n\
    \\n\
    \'SignalWithStartWorkflowExecutionRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
    \\vworkflow_id\CAN\STX \SOH(\tR\n\
    \workflowId\DC2I\n\
    \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2C\n\
    \\n\
    \task_queue\CAN\EOT \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC26\n\
    \\ENQinput\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2W\n\
    \\SUBworkflow_execution_timeout\CAN\ACK \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
    \\DC4workflow_run_timeout\CAN\a \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
    \\NAKworkflow_task_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2\SUB\n\
    \\bidentity\CAN\t \SOH(\tR\bidentity\DC2\GS\n\
    \\n\
    \request_id\CAN\n\
    \ \SOH(\tR\trequestId\DC2e\n\
    \\CANworkflow_id_reuse_policy\CAN\v \SOH(\SO2,.temporal.api.enums.v1.WorkflowIdReusePolicyR\NAKworkflowIdReusePolicy\DC2n\n\
    \\ESCworkflow_id_conflict_policy\CAN\SYN \SOH(\SO2/.temporal.api.enums.v1.WorkflowIdConflictPolicyR\CANworkflowIdConflictPolicy\DC2\US\n\
    \\vsignal_name\CAN\f \SOH(\tR\n\
    \signalName\DC2C\n\
    \\fsignal_input\CAN\r \SOH(\v2 .temporal.api.common.v1.PayloadsR\vsignalInput\DC2\CAN\n\
    \\acontrol\CAN\SO \SOH(\tR\acontrol\DC2F\n\
    \\fretry_policy\CAN\SI \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2#\n\
    \\rcron_schedule\CAN\DLE \SOH(\tR\fcronSchedule\DC20\n\
    \\EOTmemo\CAN\DC1 \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
    \\DC1search_attributes\CAN\DC2 \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC26\n\
    \\ACKheader\CAN\DC3 \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC2K\n\
    \\DC4workflow_start_delay\CAN\DC4 \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowStartDelay\DC2=\n\
    \\ESCskip_generate_workflow_task\CAN\NAK \SOH(\bR\CANskipGenerateWorkflowTask\"[\n\
    \(SignalWithStartWorkflowExecutionResponse\DC2\NAK\n\
    \\ACKrun_id\CAN\SOH \SOH(\tR\ENQrunId\DC2\CAN\n\
    \\astarted\CAN\STX \SOH(\bR\astarted\"\214\ETX\n\
    \\GSResetWorkflowExecutionRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2X\n\
    \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2\SYN\n\
    \\ACKreason\CAN\ETX \SOH(\tR\ACKreason\DC2@\n\
    \\GSworkflow_task_finish_event_id\CAN\EOT \SOH(\ETXR\EMworkflowTaskFinishEventId\DC2\GS\n\
    \\n\
    \request_id\CAN\ENQ \SOH(\tR\trequestId\DC2U\n\
    \\DC2reset_reapply_type\CAN\ACK \SOH(\SO2'.temporal.api.enums.v1.ResetReapplyTypeR\DLEresetReapplyType\DC2m\n\
    \\ESCreset_reapply_exclude_types\CAN\a \ETX(\SO2..temporal.api.enums.v1.ResetReapplyExcludeTypeR\CANresetReapplyExcludeTypes\"7\n\
    \\RSResetWorkflowExecutionResponse\DC2\NAK\n\
    \\ACKrun_id\CAN\SOH \SOH(\tR\ENQrunId\"\192\STX\n\
    \!TerminateWorkflowExecutionRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2X\n\
    \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2\SYN\n\
    \\ACKreason\CAN\ETX \SOH(\tR\ACKreason\DC2:\n\
    \\adetails\CAN\EOT \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2\SUB\n\
    \\bidentity\CAN\ENQ \SOH(\tR\bidentity\DC23\n\
    \\SYNfirst_execution_run_id\CAN\ACK \SOH(\tR\DC3firstExecutionRunId\"$\n\
    \\"TerminateWorkflowExecutionResponse\"\152\SOH\n\
    \\RSDeleteWorkflowExecutionRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2X\n\
    \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\"!\n\
    \\USDeleteWorkflowExecutionResponse\"\162\ETX\n\
    \!ListOpenWorkflowExecutionsRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2*\n\
    \\DC1maximum_page_size\CAN\STX \SOH(\ENQR\SImaximumPageSize\DC2&\n\
    \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\DC2S\n\
    \\DC1start_time_filter\CAN\EOT \SOH(\v2'.temporal.api.filter.v1.StartTimeFilterR\SIstartTimeFilter\DC2\\\n\
    \\DLEexecution_filter\CAN\ENQ \SOH(\v2/.temporal.api.filter.v1.WorkflowExecutionFilterH\NULR\SIexecutionFilter\DC2M\n\
    \\vtype_filter\CAN\ACK \SOH(\v2*.temporal.api.filter.v1.WorkflowTypeFilterH\NULR\n\
    \typeFilterB\t\n\
    \\afilters\"\157\SOH\n\
    \\"ListOpenWorkflowExecutionsResponse\DC2O\n\
    \\n\
    \executions\CAN\SOH \ETX(\v2/.temporal.api.workflow.v1.WorkflowExecutionInfoR\n\
    \executions\DC2&\n\
    \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken\"\241\ETX\n\
    \#ListClosedWorkflowExecutionsRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2*\n\
    \\DC1maximum_page_size\CAN\STX \SOH(\ENQR\SImaximumPageSize\DC2&\n\
    \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\DC2S\n\
    \\DC1start_time_filter\CAN\EOT \SOH(\v2'.temporal.api.filter.v1.StartTimeFilterR\SIstartTimeFilter\DC2\\\n\
    \\DLEexecution_filter\CAN\ENQ \SOH(\v2/.temporal.api.filter.v1.WorkflowExecutionFilterH\NULR\SIexecutionFilter\DC2M\n\
    \\vtype_filter\CAN\ACK \SOH(\v2*.temporal.api.filter.v1.WorkflowTypeFilterH\NULR\n\
    \typeFilter\DC2K\n\
    \\rstatus_filter\CAN\a \SOH(\v2$.temporal.api.filter.v1.StatusFilterH\NULR\fstatusFilterB\t\n\
    \\afilters\"\159\SOH\n\
    \$ListClosedWorkflowExecutionsResponse\DC2O\n\
    \\n\
    \executions\CAN\SOH \ETX(\v2/.temporal.api.workflow.v1.WorkflowExecutionInfoR\n\
    \executions\DC2&\n\
    \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken\"\152\SOH\n\
    \\GSListWorkflowExecutionsRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\ESC\n\
    \\tpage_size\CAN\STX \SOH(\ENQR\bpageSize\DC2&\n\
    \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\DC2\DC4\n\
    \\ENQquery\CAN\EOT \SOH(\tR\ENQquery\"\153\SOH\n\
    \\RSListWorkflowExecutionsResponse\DC2O\n\
    \\n\
    \executions\CAN\SOH \ETX(\v2/.temporal.api.workflow.v1.WorkflowExecutionInfoR\n\
    \executions\DC2&\n\
    \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken\"\160\SOH\n\
    \%ListArchivedWorkflowExecutionsRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\ESC\n\
    \\tpage_size\CAN\STX \SOH(\ENQR\bpageSize\DC2&\n\
    \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\DC2\DC4\n\
    \\ENQquery\CAN\EOT \SOH(\tR\ENQquery\"\161\SOH\n\
    \&ListArchivedWorkflowExecutionsResponse\DC2O\n\
    \\n\
    \executions\CAN\SOH \ETX(\v2/.temporal.api.workflow.v1.WorkflowExecutionInfoR\n\
    \executions\DC2&\n\
    \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken\"\152\SOH\n\
    \\GSScanWorkflowExecutionsRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\ESC\n\
    \\tpage_size\CAN\STX \SOH(\ENQR\bpageSize\DC2&\n\
    \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\DC2\DC4\n\
    \\ENQquery\CAN\EOT \SOH(\tR\ENQquery\"\153\SOH\n\
    \\RSScanWorkflowExecutionsResponse\DC2O\n\
    \\n\
    \executions\CAN\SOH \ETX(\v2/.temporal.api.workflow.v1.WorkflowExecutionInfoR\n\
    \executions\DC2&\n\
    \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken\"T\n\
    \\RSCountWorkflowExecutionsRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\DC4\n\
    \\ENQquery\CAN\STX \SOH(\tR\ENQquery\"\144\STX\n\
    \\USCountWorkflowExecutionsResponse\DC2\DC4\n\
    \\ENQcount\CAN\SOH \SOH(\ETXR\ENQcount\DC2i\n\
    \\ACKgroups\CAN\STX \ETX(\v2Q.temporal.api.workflowservice.v1.CountWorkflowExecutionsResponse.AggregationGroupR\ACKgroups\SUBl\n\
    \\DLEAggregationGroup\DC2B\n\
    \\fgroup_values\CAN\SOH \ETX(\v2\US.temporal.api.common.v1.PayloadR\vgroupValues\DC2\DC4\n\
    \\ENQcount\CAN\STX \SOH(\ETXR\ENQcount\"\FS\n\
    \\SUBGetSearchAttributesRequest\"\219\SOH\n\
    \\ESCGetSearchAttributesResponse\DC2Z\n\
    \\EOTkeys\CAN\SOH \ETX(\v2F.temporal.api.workflowservice.v1.GetSearchAttributesResponse.KeysEntryR\EOTkeys\SUB`\n\
    \\tKeysEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2=\n\
    \\ENQvalue\CAN\STX \SOH(\SO2'.temporal.api.enums.v1.IndexedValueTypeR\ENQvalue:\STX8\SOH\"\158\STX\n\
    \ RespondQueryTaskCompletedRequest\DC2\GS\n\
    \\n\
    \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC2M\n\
    \\SOcompleted_type\CAN\STX \SOH(\SO2&.temporal.api.enums.v1.QueryResultTypeR\rcompletedType\DC2C\n\
    \\fquery_result\CAN\ETX \SOH(\v2 .temporal.api.common.v1.PayloadsR\vqueryResult\DC2#\n\
    \\rerror_message\CAN\EOT \SOH(\tR\ferrorMessage\DC2\FS\n\
    \\tnamespace\CAN\ACK \SOH(\tR\tnamespaceJ\EOT\b\ENQ\DLE\ACK\"#\n\
    \!RespondQueryTaskCompletedResponse\"\132\SOH\n\
    \\ESCResetStickyTaskQueueRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2G\n\
    \\texecution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\texecution\"\RS\n\
    \\FSResetStickyTaskQueueResponse\"\156\STX\n\
    \\DC4QueryWorkflowRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2G\n\
    \\texecution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\texecution\DC2:\n\
    \\ENQquery\CAN\ETX \SOH(\v2$.temporal.api.query.v1.WorkflowQueryR\ENQquery\DC2a\n\
    \\SYNquery_reject_condition\CAN\EOT \SOH(\SO2+.temporal.api.enums.v1.QueryRejectConditionR\DC4queryRejectCondition\"\169\SOH\n\
    \\NAKQueryWorkflowResponse\DC2C\n\
    \\fquery_result\CAN\SOH \SOH(\v2 .temporal.api.common.v1.PayloadsR\vqueryResult\DC2K\n\
    \\SOquery_rejected\CAN\STX \SOH(\v2$.temporal.api.query.v1.QueryRejectedR\rqueryRejected\"\137\SOH\n\
    \ DescribeWorkflowExecutionRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2G\n\
    \\texecution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\texecution\"\196\ENQ\n\
    \!DescribeWorkflowExecutionResponse\DC2\\\n\
    \\DLEexecution_config\CAN\SOH \SOH(\v21.temporal.api.workflow.v1.WorkflowExecutionConfigR\SIexecutionConfig\DC2g\n\
    \\ETBworkflow_execution_info\CAN\STX \SOH(\v2/.temporal.api.workflow.v1.WorkflowExecutionInfoR\NAKworkflowExecutionInfo\DC2\\\n\
    \\DC2pending_activities\CAN\ETX \ETX(\v2-.temporal.api.workflow.v1.PendingActivityInfoR\DC1pendingActivities\DC2^\n\
    \\DLEpending_children\CAN\EOT \ETX(\v23.temporal.api.workflow.v1.PendingChildExecutionInfoR\SIpendingChildren\DC2e\n\
    \\NAKpending_workflow_task\CAN\ENQ \SOH(\v21.temporal.api.workflow.v1.PendingWorkflowTaskInfoR\DC3pendingWorkflowTask\DC2D\n\
    \\tcallbacks\CAN\ACK \ETX(\v2&.temporal.api.workflow.v1.CallbackInfoR\tcallbacks\DC2m\n\
    \\CANpending_nexus_operations\CAN\a \ETX(\v23.temporal.api.workflow.v1.PendingNexusOperationInfoR\SYNpendingNexusOperations\"\210\EOT\n\
    \\CANDescribeTaskQueueRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2C\n\
    \\n\
    \task_queue\CAN\STX \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC2L\n\
    \\SItask_queue_type\CAN\ETX \SOH(\SO2$.temporal.api.enums.v1.TaskQueueTypeR\rtaskQueueType\DC29\n\
    \\EMinclude_task_queue_status\CAN\EOT \SOH(\bR\SYNincludeTaskQueueStatus\DC2G\n\
    \\bapi_mode\CAN\ENQ \SOH(\SO2,.temporal.api.enums.v1.DescribeTaskQueueModeR\aapiMode\DC2P\n\
    \\bversions\CAN\ACK \SOH(\v24.temporal.api.taskqueue.v1.TaskQueueVersionSelectionR\bversions\DC2N\n\
    \\DLEtask_queue_types\CAN\a \ETX(\SO2$.temporal.api.enums.v1.TaskQueueTypeR\SOtaskQueueTypes\DC2%\n\
    \\SOreport_pollers\CAN\t \SOH(\bR\rreportPollers\DC28\n\
    \\CANreport_task_reachability\CAN\n\
    \ \SOH(\bR\SYNreportTaskReachability\"\153\ETX\n\
    \\EMDescribeTaskQueueResponse\DC2?\n\
    \\apollers\CAN\SOH \ETX(\v2%.temporal.api.taskqueue.v1.PollerInfoR\apollers\DC2V\n\
    \\DC1task_queue_status\CAN\STX \SOH(\v2*.temporal.api.taskqueue.v1.TaskQueueStatusR\SItaskQueueStatus\DC2q\n\
    \\rversions_info\CAN\ETX \ETX(\v2L.temporal.api.workflowservice.v1.DescribeTaskQueueResponse.VersionsInfoEntryR\fversionsInfo\SUBp\n\
    \\DC1VersionsInfoEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2E\n\
    \\ENQvalue\CAN\STX \SOH(\v2/.temporal.api.taskqueue.v1.TaskQueueVersionInfoR\ENQvalue:\STX8\SOH\"\ETB\n\
    \\NAKGetClusterInfoRequest\"\147\EOT\n\
    \\SYNGetClusterInfoResponse\DC2z\n\
    \\DC1supported_clients\CAN\SOH \ETX(\v2M.temporal.api.workflowservice.v1.GetClusterInfoResponse.SupportedClientsEntryR\DLEsupportedClients\DC2%\n\
    \\SOserver_version\CAN\STX \SOH(\tR\rserverVersion\DC2\GS\n\
    \\n\
    \cluster_id\CAN\ETX \SOH(\tR\tclusterId\DC2G\n\
    \\fversion_info\CAN\EOT \SOH(\v2$.temporal.api.version.v1.VersionInfoR\vversionInfo\DC2!\n\
    \\fcluster_name\CAN\ENQ \SOH(\tR\vclusterName\DC2.\n\
    \\DC3history_shard_count\CAN\ACK \SOH(\ENQR\DC1historyShardCount\DC2+\n\
    \\DC1persistence_store\CAN\a \SOH(\tR\DLEpersistenceStore\DC2)\n\
    \\DLEvisibility_store\CAN\b \SOH(\tR\SIvisibilityStore\SUBC\n\
    \\NAKSupportedClientsEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
    \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH\"\SYN\n\
    \\DC4GetSystemInfoRequest\"\230\ENQ\n\
    \\NAKGetSystemInfoResponse\DC2%\n\
    \\SOserver_version\CAN\SOH \SOH(\tR\rserverVersion\DC2g\n\
    \\fcapabilities\CAN\STX \SOH(\v2C.temporal.api.workflowservice.v1.GetSystemInfoResponse.CapabilitiesR\fcapabilities\SUB\188\EOT\n\
    \\fCapabilities\DC25\n\
    \\ETBsignal_and_query_header\CAN\SOH \SOH(\bR\DC4signalAndQueryHeader\DC2D\n\
    \\RSinternal_error_differentiation\CAN\STX \SOH(\bR\FSinternalErrorDifferentiation\DC2K\n\
    \\"activity_failure_include_heartbeat\CAN\ETX \SOH(\bR\USactivityFailureIncludeHeartbeat\DC2-\n\
    \\DC2supports_schedules\CAN\EOT \SOH(\bR\DC1supportsSchedules\DC2<\n\
    \\SUBencoded_failure_attributes\CAN\ENQ \SOH(\bR\CANencodedFailureAttributes\DC29\n\
    \\EMbuild_id_based_versioning\CAN\ACK \SOH(\bR\SYNbuildIdBasedVersioning\DC2\US\n\
    \\vupsert_memo\CAN\a \SOH(\bR\n\
    \upsertMemo\DC20\n\
    \\DC4eager_workflow_start\CAN\b \SOH(\bR\DC2eagerWorkflowStart\DC2!\n\
    \\fsdk_metadata\CAN\t \SOH(\bR\vsdkMetadata\DC2D\n\
    \\UScount_group_by_execution_status\CAN\n\
    \ \SOH(\bR\ESCcountGroupByExecutionStatus\"\131\SOH\n\
    \\RSListTaskQueuePartitionsRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2C\n\
    \\n\
    \task_queue\CAN\STX \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\"\153\STX\n\
    \\USListTaskQueuePartitionsResponse\DC2z\n\
    \\RSactivity_task_queue_partitions\CAN\SOH \ETX(\v25.temporal.api.taskqueue.v1.TaskQueuePartitionMetadataR\ESCactivityTaskQueuePartitions\DC2z\n\
    \\RSworkflow_task_queue_partitions\CAN\STX \ETX(\v25.temporal.api.taskqueue.v1.TaskQueuePartitionMetadataR\ESCworkflowTaskQueuePartitions\"\168\ETX\n\
    \\NAKCreateScheduleRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
    \\vschedule_id\CAN\STX \SOH(\tR\n\
    \scheduleId\DC2>\n\
    \\bschedule\CAN\ETX \SOH(\v2\".temporal.api.schedule.v1.ScheduleR\bschedule\DC2L\n\
    \\rinitial_patch\CAN\EOT \SOH(\v2'.temporal.api.schedule.v1.SchedulePatchR\finitialPatch\DC2\SUB\n\
    \\bidentity\CAN\ENQ \SOH(\tR\bidentity\DC2\GS\n\
    \\n\
    \request_id\CAN\ACK \SOH(\tR\trequestId\DC20\n\
    \\EOTmemo\CAN\a \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
    \\DC1search_attributes\CAN\b \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\"?\n\
    \\SYNCreateScheduleResponse\DC2%\n\
    \\SOconflict_token\CAN\SOH \SOH(\fR\rconflictToken\"X\n\
    \\ETBDescribeScheduleRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
    \\vschedule_id\CAN\STX \SOH(\tR\n\
    \scheduleId\"\198\STX\n\
    \\CANDescribeScheduleResponse\DC2>\n\
    \\bschedule\CAN\SOH \SOH(\v2\".temporal.api.schedule.v1.ScheduleR\bschedule\DC2:\n\
    \\EOTinfo\CAN\STX \SOH(\v2&.temporal.api.schedule.v1.ScheduleInfoR\EOTinfo\DC20\n\
    \\EOTmemo\CAN\ETX \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
    \\DC1search_attributes\CAN\EOT \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC2%\n\
    \\SOconflict_token\CAN\ENQ \SOH(\fR\rconflictToken\"\207\STX\n\
    \\NAKUpdateScheduleRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
    \\vschedule_id\CAN\STX \SOH(\tR\n\
    \scheduleId\DC2>\n\
    \\bschedule\CAN\ETX \SOH(\v2\".temporal.api.schedule.v1.ScheduleR\bschedule\DC2%\n\
    \\SOconflict_token\CAN\EOT \SOH(\fR\rconflictToken\DC2\SUB\n\
    \\bidentity\CAN\ENQ \SOH(\tR\bidentity\DC2\GS\n\
    \\n\
    \request_id\CAN\ACK \SOH(\tR\trequestId\DC2U\n\
    \\DC1search_attributes\CAN\a \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\"\CAN\n\
    \\SYNUpdateScheduleResponse\"\207\SOH\n\
    \\DC4PatchScheduleRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
    \\vschedule_id\CAN\STX \SOH(\tR\n\
    \scheduleId\DC2=\n\
    \\ENQpatch\CAN\ETX \SOH(\v2'.temporal.api.schedule.v1.SchedulePatchR\ENQpatch\DC2\SUB\n\
    \\bidentity\CAN\EOT \SOH(\tR\bidentity\DC2\GS\n\
    \\n\
    \request_id\CAN\ENQ \SOH(\tR\trequestId\"\ETB\n\
    \\NAKPatchScheduleResponse\"\211\SOH\n\
    \ ListScheduleMatchingTimesRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
    \\vschedule_id\CAN\STX \SOH(\tR\n\
    \scheduleId\DC29\n\
    \\n\
    \start_time\CAN\ETX \SOH(\v2\SUB.google.protobuf.TimestampR\tstartTime\DC25\n\
    \\bend_time\CAN\EOT \SOH(\v2\SUB.google.protobuf.TimestampR\aendTime\"^\n\
    \!ListScheduleMatchingTimesResponse\DC29\n\
    \\n\
    \start_time\CAN\SOH \ETX(\v2\SUB.google.protobuf.TimestampR\tstartTime\"r\n\
    \\NAKDeleteScheduleRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\US\n\
    \\vschedule_id\CAN\STX \SOH(\tR\n\
    \scheduleId\DC2\SUB\n\
    \\bidentity\CAN\ETX \SOH(\tR\bidentity\"\CAN\n\
    \\SYNDeleteScheduleResponse\"\158\SOH\n\
    \\DC4ListSchedulesRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2*\n\
    \\DC1maximum_page_size\CAN\STX \SOH(\ENQR\SImaximumPageSize\DC2&\n\
    \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\DC2\DC4\n\
    \\ENQquery\CAN\EOT \SOH(\tR\ENQquery\"\138\SOH\n\
    \\NAKListSchedulesResponse\DC2I\n\
    \\tschedules\CAN\SOH \ETX(\v2+.temporal.api.schedule.v1.ScheduleListEntryR\tschedules\DC2&\n\
    \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken\"\236\ACK\n\
    \'UpdateWorkerBuildIdCompatibilityRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\GS\n\
    \\n\
    \task_queue\CAN\STX \SOH(\tR\ttaskQueue\DC2K\n\
    \#add_new_build_id_in_new_default_set\CAN\ETX \SOH(\tH\NULR\FSaddNewBuildIdInNewDefaultSet\DC2\160\SOH\n\
    \\ESCadd_new_compatible_build_id\CAN\EOT \SOH(\v2`.temporal.api.workflowservice.v1.UpdateWorkerBuildIdCompatibilityRequest.AddNewCompatibleVersionH\NULR\ETBaddNewCompatibleBuildId\DC26\n\
    \\ETBpromote_set_by_build_id\CAN\ENQ \SOH(\tH\NULR\DC3promoteSetByBuildId\DC2>\n\
    \\ESCpromote_build_id_within_set\CAN\ACK \SOH(\tH\NULR\ETBpromoteBuildIdWithinSet\DC2s\n\
    \\n\
    \merge_sets\CAN\a \SOH(\v2R.temporal.api.workflowservice.v1.UpdateWorkerBuildIdCompatibilityRequest.MergeSetsH\NULR\tmergeSets\SUB\166\SOH\n\
    \\ETBAddNewCompatibleVersion\DC2 \n\
    \\fnew_build_id\CAN\SOH \SOH(\tR\n\
    \newBuildId\DC2?\n\
    \\FSexisting_compatible_build_id\CAN\STX \SOH(\tR\EMexistingCompatibleBuildId\DC2(\n\
    \\DLEmake_set_default\CAN\ETX \SOH(\bR\SOmakeSetDefault\SUBq\n\
    \\tMergeSets\DC2/\n\
    \\DC4primary_set_build_id\CAN\SOH \SOH(\tR\DC1primarySetBuildId\DC23\n\
    \\SYNsecondary_set_build_id\CAN\STX \SOH(\tR\DC3secondarySetBuildIdB\v\n\
    \\toperation\"@\n\
    \(UpdateWorkerBuildIdCompatibilityResponseJ\EOT\b\SOH\DLE\STXR\SOversion_set_id\"~\n\
    \$GetWorkerBuildIdCompatibilityRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\GS\n\
    \\n\
    \task_queue\CAN\STX \SOH(\tR\ttaskQueue\DC2\EM\n\
    \\bmax_sets\CAN\ETX \SOH(\ENQR\amaxSets\"\134\SOH\n\
    \%GetWorkerBuildIdCompatibilityResponse\DC2]\n\
    \\DC2major_version_sets\CAN\SOH \ETX(\v2/.temporal.api.taskqueue.v1.CompatibleVersionSetR\DLEmajorVersionSets\"\241\SI\n\
    \\"UpdateWorkerVersioningRulesRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\GS\n\
    \\n\
    \task_queue\CAN\STX \SOH(\tR\ttaskQueue\DC2%\n\
    \\SOconflict_token\CAN\ETX \SOH(\fR\rconflictToken\DC2\151\SOH\n\
    \\SYNinsert_assignment_rule\CAN\EOT \SOH(\v2_.temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.InsertBuildIdAssignmentRuleH\NULR\DC4insertAssignmentRule\DC2\154\SOH\n\
    \\ETBreplace_assignment_rule\CAN\ENQ \SOH(\v2`.temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.ReplaceBuildIdAssignmentRuleH\NULR\NAKreplaceAssignmentRule\DC2\151\SOH\n\
    \\SYNdelete_assignment_rule\CAN\ACK \SOH(\v2_.temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.DeleteBuildIdAssignmentRuleH\NULR\DC4deleteAssignmentRule\DC2\167\SOH\n\
    \\FSadd_compatible_redirect_rule\CAN\a \SOH(\v2d.temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.AddCompatibleBuildIdRedirectRuleH\NULR\EMaddCompatibleRedirectRule\DC2\179\SOH\n\
    \ replace_compatible_redirect_rule\CAN\b \SOH(\v2h.temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.ReplaceCompatibleBuildIdRedirectRuleH\NULR\GSreplaceCompatibleRedirectRule\DC2\176\SOH\n\
    \\USdelete_compatible_redirect_rule\CAN\t \SOH(\v2g.temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.DeleteCompatibleBuildIdRedirectRuleH\NULR\FSdeleteCompatibleRedirectRule\DC2{\n\
    \\SIcommit_build_id\CAN\n\
    \ \SOH(\v2Q.temporal.api.workflowservice.v1.UpdateWorkerVersioningRulesRequest.CommitBuildIdH\NULR\rcommitBuildId\SUB\130\SOH\n\
    \\ESCInsertBuildIdAssignmentRule\DC2\GS\n\
    \\n\
    \rule_index\CAN\SOH \SOH(\ENQR\truleIndex\DC2D\n\
    \\EOTrule\CAN\STX \SOH(\v20.temporal.api.taskqueue.v1.BuildIdAssignmentRuleR\EOTrule\SUB\153\SOH\n\
    \\FSReplaceBuildIdAssignmentRule\DC2\GS\n\
    \\n\
    \rule_index\CAN\SOH \SOH(\ENQR\truleIndex\DC2D\n\
    \\EOTrule\CAN\STX \SOH(\v20.temporal.api.taskqueue.v1.BuildIdAssignmentRuleR\EOTrule\DC2\DC4\n\
    \\ENQforce\CAN\ETX \SOH(\bR\ENQforce\SUBR\n\
    \\ESCDeleteBuildIdAssignmentRule\DC2\GS\n\
    \\n\
    \rule_index\CAN\SOH \SOH(\ENQR\truleIndex\DC2\DC4\n\
    \\ENQforce\CAN\STX \SOH(\bR\ENQforce\SUBp\n\
    \ AddCompatibleBuildIdRedirectRule\DC2L\n\
    \\EOTrule\CAN\SOH \SOH(\v28.temporal.api.taskqueue.v1.CompatibleBuildIdRedirectRuleR\EOTrule\SUBt\n\
    \$ReplaceCompatibleBuildIdRedirectRule\DC2L\n\
    \\EOTrule\CAN\SOH \SOH(\v28.temporal.api.taskqueue.v1.CompatibleBuildIdRedirectRuleR\EOTrule\SUBM\n\
    \#DeleteCompatibleBuildIdRedirectRule\DC2&\n\
    \\SIsource_build_id\CAN\SOH \SOH(\tR\rsourceBuildId\SUBM\n\
    \\rCommitBuildId\DC2&\n\
    \\SItarget_build_id\CAN\SOH \SOH(\tR\rtargetBuildId\DC2\DC4\n\
    \\ENQforce\CAN\STX \SOH(\bR\ENQforceB\v\n\
    \\toperation\"\181\STX\n\
    \#UpdateWorkerVersioningRulesResponse\DC2f\n\
    \\DLEassignment_rules\CAN\SOH \ETX(\v2;.temporal.api.taskqueue.v1.TimestampedBuildIdAssignmentRuleR\SIassignmentRules\DC2\DEL\n\
    \\EMcompatible_redirect_rules\CAN\STX \ETX(\v2C.temporal.api.taskqueue.v1.TimestampedCompatibleBuildIdRedirectRuleR\ETBcompatibleRedirectRules\DC2%\n\
    \\SOconflict_token\CAN\ETX \SOH(\fR\rconflictToken\"^\n\
    \\USGetWorkerVersioningRulesRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\GS\n\
    \\n\
    \task_queue\CAN\STX \SOH(\tR\ttaskQueue\"\178\STX\n\
    \ GetWorkerVersioningRulesResponse\DC2f\n\
    \\DLEassignment_rules\CAN\SOH \ETX(\v2;.temporal.api.taskqueue.v1.TimestampedBuildIdAssignmentRuleR\SIassignmentRules\DC2\DEL\n\
    \\EMcompatible_redirect_rules\CAN\STX \ETX(\v2C.temporal.api.taskqueue.v1.TimestampedCompatibleBuildIdRedirectRuleR\ETBcompatibleRedirectRules\DC2%\n\
    \\SOconflict_token\CAN\ETX \SOH(\fR\rconflictToken\"\203\SOH\n\
    \ GetWorkerTaskReachabilityRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\ESC\n\
    \\tbuild_ids\CAN\STX \ETX(\tR\bbuildIds\DC2\US\n\
    \\vtask_queues\CAN\ETX \ETX(\tR\n\
    \taskQueues\DC2K\n\
    \\freachability\CAN\EOT \SOH(\SO2'.temporal.api.enums.v1.TaskReachabilityR\freachability\"\135\SOH\n\
    \!GetWorkerTaskReachabilityResponse\DC2b\n\
    \\NAKbuild_id_reachability\CAN\SOH \ETX(\v2..temporal.api.taskqueue.v1.BuildIdReachabilityR\DC3buildIdReachability\"\205\STX\n\
    \\RSUpdateWorkflowExecutionRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2X\n\
    \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC23\n\
    \\SYNfirst_execution_run_id\CAN\ETX \SOH(\tR\DC3firstExecutionRunId\DC2C\n\
    \\vwait_policy\CAN\EOT \SOH(\v2\".temporal.api.update.v1.WaitPolicyR\n\
    \waitPolicy\DC29\n\
    \\arequest\CAN\ENQ \SOH(\v2\US.temporal.api.update.v1.RequestR\arequest\"\242\SOH\n\
    \\USUpdateWorkflowExecutionResponse\DC2@\n\
    \\n\
    \update_ref\CAN\SOH \SOH(\v2!.temporal.api.update.v1.UpdateRefR\tupdateRef\DC29\n\
    \\aoutcome\CAN\STX \SOH(\v2\US.temporal.api.update.v1.OutcomeR\aoutcome\DC2R\n\
    \\ENQstage\CAN\ETX \SOH(\SO2<.temporal.api.enums.v1.UpdateWorkflowExecutionLifecycleStageR\ENQstage\"\141\ACK\n\
    \\SUBStartBatchOperationRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2)\n\
    \\DLEvisibility_query\CAN\STX \SOH(\tR\SIvisibilityQuery\DC2\NAK\n\
    \\ACKjob_id\CAN\ETX \SOH(\tR\ENQjobId\DC2\SYN\n\
    \\ACKreason\CAN\EOT \SOH(\tR\ACKreason\DC2I\n\
    \\n\
    \executions\CAN\ENQ \ETX(\v2).temporal.api.common.v1.WorkflowExecutionR\n\
    \executions\DC29\n\
    \\EMmax_operations_per_second\CAN\ACK \SOH(\STXR\SYNmaxOperationsPerSecond\DC2g\n\
    \\NAKtermination_operation\CAN\n\
    \ \SOH(\v20.temporal.api.batch.v1.BatchOperationTerminationH\NULR\DC4terminationOperation\DC2X\n\
    \\DLEsignal_operation\CAN\v \SOH(\v2+.temporal.api.batch.v1.BatchOperationSignalH\NULR\SIsignalOperation\DC2j\n\
    \\SYNcancellation_operation\CAN\f \SOH(\v21.temporal.api.batch.v1.BatchOperationCancellationH\NULR\NAKcancellationOperation\DC2^\n\
    \\DC2deletion_operation\CAN\r \SOH(\v2-.temporal.api.batch.v1.BatchOperationDeletionH\NULR\DC1deletionOperation\DC2U\n\
    \\SIreset_operation\CAN\SO \SOH(\v2*.temporal.api.batch.v1.BatchOperationResetH\NULR\SOresetOperationB\v\n\
    \\toperation\"\GS\n\
    \\ESCStartBatchOperationResponse\"\132\SOH\n\
    \\EMStopBatchOperationRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\NAK\n\
    \\ACKjob_id\CAN\STX \SOH(\tR\ENQjobId\DC2\SYN\n\
    \\ACKreason\CAN\ETX \SOH(\tR\ACKreason\DC2\SUB\n\
    \\bidentity\CAN\EOT \SOH(\tR\bidentity\"\FS\n\
    \\SUBStopBatchOperationResponse\"T\n\
    \\GSDescribeBatchOperationRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\NAK\n\
    \\ACKjob_id\CAN\STX \SOH(\tR\ENQjobId\"\155\EOT\n\
    \\RSDescribeBatchOperationResponse\DC2P\n\
    \\SOoperation_type\CAN\SOH \SOH(\SO2).temporal.api.enums.v1.BatchOperationTypeR\roperationType\DC2\NAK\n\
    \\ACKjob_id\CAN\STX \SOH(\tR\ENQjobId\DC2@\n\
    \\ENQstate\CAN\ETX \SOH(\SO2*.temporal.api.enums.v1.BatchOperationStateR\ENQstate\DC29\n\
    \\n\
    \start_time\CAN\EOT \SOH(\v2\SUB.google.protobuf.TimestampR\tstartTime\DC29\n\
    \\n\
    \close_time\CAN\ENQ \SOH(\v2\SUB.google.protobuf.TimestampR\tcloseTime\DC22\n\
    \\NAKtotal_operation_count\CAN\ACK \SOH(\ETXR\DC3totalOperationCount\DC28\n\
    \\CANcomplete_operation_count\CAN\a \SOH(\ETXR\SYNcompleteOperationCount\DC26\n\
    \\ETBfailure_operation_count\CAN\b \SOH(\ETXR\NAKfailureOperationCount\DC2\SUB\n\
    \\bidentity\CAN\t \SOH(\tR\bidentity\DC2\SYN\n\
    \\ACKreason\CAN\n\
    \ \SOH(\tR\ACKreason\"\DEL\n\
    \\SUBListBatchOperationsRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\ESC\n\
    \\tpage_size\CAN\STX \SOH(\ENQR\bpageSize\DC2&\n\
    \\SInext_page_token\CAN\ETX \SOH(\fR\rnextPageToken\"\151\SOH\n\
    \\ESCListBatchOperationsResponse\DC2P\n\
    \\SOoperation_info\CAN\SOH \ETX(\v2).temporal.api.batch.v1.BatchOperationInfoR\roperationInfo\DC2&\n\
    \\SInext_page_token\CAN\STX \SOH(\fR\rnextPageToken\"\229\SOH\n\
    \\"PollWorkflowExecutionUpdateRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2@\n\
    \\n\
    \update_ref\CAN\STX \SOH(\v2!.temporal.api.update.v1.UpdateRefR\tupdateRef\DC2\SUB\n\
    \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2C\n\
    \\vwait_policy\CAN\EOT \SOH(\v2\".temporal.api.update.v1.WaitPolicyR\n\
    \waitPolicy\"\246\SOH\n\
    \#PollWorkflowExecutionUpdateResponse\DC29\n\
    \\aoutcome\CAN\SOH \SOH(\v2\US.temporal.api.update.v1.OutcomeR\aoutcome\DC2R\n\
    \\ENQstage\CAN\STX \SOH(\SO2<.temporal.api.enums.v1.UpdateWorkflowExecutionLifecycleStageR\ENQstage\DC2@\n\
    \\n\
    \update_ref\CAN\ETX \SOH(\v2!.temporal.api.update.v1.UpdateRefR\tupdateRef\"\141\STX\n\
    \\EMPollNexusTaskQueueRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\SUB\n\
    \\bidentity\CAN\STX \SOH(\tR\bidentity\DC2C\n\
    \\n\
    \task_queue\CAN\ETX \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC2q\n\
    \\ESCworker_version_capabilities\CAN\EOT \SOH(\v21.temporal.api.common.v1.WorkerVersionCapabilitiesR\EMworkerVersionCapabilities\"u\n\
    \\SUBPollNexusTaskQueueResponse\DC2\GS\n\
    \\n\
    \task_token\CAN\SOH \SOH(\fR\ttaskToken\DC28\n\
    \\arequest\CAN\STX \SOH(\v2\RS.temporal.api.nexus.v1.RequestR\arequest\"\184\SOH\n\
    \ RespondNexusTaskCompletedRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\SUB\n\
    \\bidentity\CAN\STX \SOH(\tR\bidentity\DC2\GS\n\
    \\n\
    \task_token\CAN\ETX \SOH(\fR\ttaskToken\DC2;\n\
    \\bresponse\CAN\EOT \SOH(\v2\US.temporal.api.nexus.v1.ResponseR\bresponse\"#\n\
    \!RespondNexusTaskCompletedResponse\"\179\SOH\n\
    \\GSRespondNexusTaskFailedRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2\SUB\n\
    \\bidentity\CAN\STX \SOH(\tR\bidentity\DC2\GS\n\
    \\n\
    \task_token\CAN\ETX \SOH(\fR\ttaskToken\DC29\n\
    \\ENQerror\CAN\EOT \SOH(\v2#.temporal.api.nexus.v1.HandlerErrorR\ENQerror\" \n\
    \\RSRespondNexusTaskFailedResponse\"\149\ETX\n\
    \\FSExecuteMultiOperationRequest\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2g\n\
    \\n\
    \operations\CAN\STX \ETX(\v2G.temporal.api.workflowservice.v1.ExecuteMultiOperationRequest.OperationR\n\
    \operations\SUB\237\SOH\n\
    \\tOperation\DC2g\n\
    \\SOstart_workflow\CAN\SOH \SOH(\v2>.temporal.api.workflowservice.v1.StartWorkflowExecutionRequestH\NULR\rstartWorkflow\DC2j\n\
    \\SIupdate_workflow\CAN\STX \SOH(\v2?.temporal.api.workflowservice.v1.UpdateWorkflowExecutionRequestH\NULR\SOupdateWorkflowB\v\n\
    \\toperation\"\246\STX\n\
    \\GSExecuteMultiOperationResponse\DC2e\n\
    \\tresponses\CAN\SOH \ETX(\v2G.temporal.api.workflowservice.v1.ExecuteMultiOperationResponse.ResponseR\tresponses\SUB\237\SOH\n\
    \\bResponse\DC2h\n\
    \\SOstart_workflow\CAN\SOH \SOH(\v2?.temporal.api.workflowservice.v1.StartWorkflowExecutionResponseH\NULR\rstartWorkflow\DC2k\n\
    \\SIupdate_workflow\CAN\STX \SOH(\v2@.temporal.api.workflowservice.v1.UpdateWorkflowExecutionResponseH\NULR\SOupdateWorkflowB\n\
    \\n\
    \\bresponseB\190\SOH\n\
    \\"io.temporal.api.workflowservice.v1B\DC4RequestResponseProtoP\SOHZ5go.temporal.io/api/workflowservice/v1;workflowservice\170\STX!Temporalio.Api.WorkflowService.V1\234\STX$Temporalio::Api::WorkflowService::V1J\216\188\EOT\n\
    \\a\DC2\ENQ\SYN\NUL\219\f\SOH\n\
    \\241\b\n\
    \\SOH\f\DC2\ETX\SYN\NUL\DC22\230\b The MIT License\n\
    \\n\
    \ Copyright (c) 2020 Temporal Technologies Inc.  All rights reserved.\n\
    \\n\
    \ Permission is hereby granted, free of charge, to any person obtaining a copy\n\
    \ of this software and associated documentation files (the \"Software\"), to deal\n\
    \ in the Software without restriction, including without limitation the rights\n\
    \ to use, copy, modify, merge, publish, distribute, sublicense, and/or sell\n\
    \ copies of the Software, and to permit persons to whom the Software is\n\
    \ furnished to do so, subject to the following conditions:\n\
    \\n\
    \ The above copyright notice and this permission notice shall be included in\n\
    \ all copies or substantial portions of the Software.\n\
    \\n\
    \ THE SOFTWARE IS PROVIDED \"AS IS\", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR\n\
    \ IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,\n\
    \ FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE\n\
    \ AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER\n\
    \ LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,\n\
    \ OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN\n\
    \ THE SOFTWARE.\n\
    \\n\
    \\b\n\
    \\SOH\STX\DC2\ETX\CAN\NUL(\n\
    \\b\n\
    \\SOH\b\DC2\ETX\SUB\NULL\n\
    \\t\n\
    \\STX\b\v\DC2\ETX\SUB\NULL\n\
    \\b\n\
    \\SOH\b\DC2\ETX\ESC\NUL;\n\
    \\t\n\
    \\STX\b\SOH\DC2\ETX\ESC\NUL;\n\
    \\b\n\
    \\SOH\b\DC2\ETX\FS\NUL\"\n\
    \\t\n\
    \\STX\b\n\
    \\DC2\ETX\FS\NUL\"\n\
    \\b\n\
    \\SOH\b\DC2\ETX\GS\NUL5\n\
    \\t\n\
    \\STX\b\b\DC2\ETX\GS\NUL5\n\
    \\b\n\
    \\SOH\b\DC2\ETX\RS\NUL=\n\
    \\t\n\
    \\STX\b-\DC2\ETX\RS\NUL=\n\
    \\b\n\
    \\SOH\b\DC2\ETX\US\NUL>\n\
    \\t\n\
    \\STX\b%\DC2\ETX\US\NUL>\n\
    \\t\n\
    \\STX\ETX\NUL\DC2\ETX!\NUL5\n\
    \\t\n\
    \\STX\ETX\SOH\DC2\ETX\"\NUL.\n\
    \\t\n\
    \\STX\ETX\STX\DC2\ETX#\NUL/\n\
    \\t\n\
    \\STX\ETX\ETX\DC2\ETX$\NUL2\n\
    \\t\n\
    \\STX\ETX\EOT\DC2\ETX%\NUL,\n\
    \\t\n\
    \\STX\ETX\ENQ\DC2\ETX&\NUL+\n\
    \\t\n\
    \\STX\ETX\ACK\DC2\ETX'\NUL+\n\
    \\t\n\
    \\STX\ETX\a\DC2\ETX(\NUL0\n\
    \\t\n\
    \\STX\ETX\b\DC2\ETX)\NUL,\n\
    \\t\n\
    \\STX\ETX\t\DC2\ETX*\NUL.\n\
    \\t\n\
    \\STX\ETX\n\
    \\DC2\ETX+\NUL/\n\
    \\t\n\
    \\STX\ETX\v\DC2\ETX,\NUL0\n\
    \\t\n\
    \\STX\ETX\f\DC2\ETX-\NUL/\n\
    \\t\n\
    \\STX\ETX\r\DC2\ETX.\NUL/\n\
    \\t\n\
    \\STX\ETX\SO\DC2\ETX/\NUL.\n\
    \\t\n\
    \\STX\ETX\SI\DC2\ETX0\NUL0\n\
    \\t\n\
    \\STX\ETX\DLE\DC2\ETX1\NUL1\n\
    \\t\n\
    \\STX\ETX\DC1\DC2\ETX2\NUL-\n\
    \\t\n\
    \\STX\ETX\DC2\DC2\ETX3\NUL3\n\
    \\t\n\
    \\STX\ETX\DC3\DC2\ETX4\NUL0\n\
    \\t\n\
    \\STX\ETX\DC4\DC2\ETX5\NUL1\n\
    \\t\n\
    \\STX\ETX\NAK\DC2\ETX6\NUL.\n\
    \\t\n\
    \\STX\ETX\SYN\DC2\ETX7\NUL/\n\
    \\t\n\
    \\STX\ETX\ETB\DC2\ETX8\NUL-\n\
    \\t\n\
    \\STX\ETX\CAN\DC2\ETX9\NUL:\n\
    \\t\n\
    \\STX\ETX\EM\DC2\ETX:\NUL-\n\
    \\t\n\
    \\STX\ETX\SUB\DC2\ETX<\NUL(\n\
    \\t\n\
    \\STX\ETX\ESC\DC2\ETX=\NUL)\n\
    \\n\
    \\n\
    \\STX\EOT\NUL\DC2\EOT?\NULP\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\NUL\SOH\DC2\ETX?\b \n\
    \\v\n\
    \\EOT\EOT\NUL\STX\NUL\DC2\ETX@\EOT\EM\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ENQ\DC2\ETX@\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX@\v\DC4\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX@\ETB\CAN\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\SOH\DC2\ETXA\EOT\ESC\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ENQ\DC2\ETXA\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETXA\v\SYN\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETXA\EM\SUB\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\STX\DC2\ETXB\EOT\ESC\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ENQ\DC2\ETXB\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETXB\v\SYN\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETXB\EM\SUB\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\ETX\DC2\ETXC\EOTE\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ACK\DC2\ETXC\EOT\FS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETXC\GS@\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETXCCD\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\EOT\DC2\ETXD\EOTO\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\EOT\DC2\ETXD\EOT\f\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ACK\DC2\ETXD\rA\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETXDBJ\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETXDMN\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\ENQ\DC2\ETXE\EOT#\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ENQ\DC2\ETXE\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\SOH\DC2\ETXE\v\RS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ETX\DC2\ETXE!\"\n\
    \:\n\
    \\EOT\EOT\NUL\STX\ACK\DC2\ETXG\EOT!\SUB- A key-value map for any customized purpose.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ACK\DC2\ETXG\EOT\ETB\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\SOH\DC2\ETXG\CAN\FS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ETX\DC2\ETXG\US \n\
    \\v\n\
    \\EOT\EOT\NUL\STX\a\DC2\ETXH\EOT\RS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\ENQ\DC2\ETXH\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\SOH\DC2\ETXH\v\EM\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\ETX\DC2\ETXH\FS\GS\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\b\DC2\ETXI\EOT!\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\ENQ\DC2\ETXI\EOT\b\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\SOH\DC2\ETXI\t\FS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\ETX\DC2\ETXI\US \n\
    \e\n\
    \\EOT\EOT\NUL\STX\t\DC2\ETXK\EOTD\SUBX If unspecified (ARCHIVAL_STATE_UNSPECIFIED) then default server configuration is used.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\t\ACK\DC2\ETXK\EOT'\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\t\SOH\DC2\ETXK(>\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\t\ETX\DC2\ETXKAC\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\n\
    \\DC2\ETXL\EOT%\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\n\
    \\ENQ\DC2\ETXL\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\n\
    \\SOH\DC2\ETXL\v\US\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\n\
    \\ETX\DC2\ETXL\"$\n\
    \e\n\
    \\EOT\EOT\NUL\STX\v\DC2\ETXN\EOTG\SUBX If unspecified (ARCHIVAL_STATE_UNSPECIFIED) then default server configuration is used.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\v\ACK\DC2\ETXN\EOT'\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\v\SOH\DC2\ETXN(A\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\v\ETX\DC2\ETXNDF\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\f\DC2\ETXO\EOT(\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\f\ENQ\DC2\ETXO\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\f\SOH\DC2\ETXO\v\"\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\f\ETX\DC2\ETXO%'\n\
    \\n\
    \\n\
    \\STX\EOT\SOH\DC2\EOTR\NULS\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\SOH\SOH\DC2\ETXR\b!\n\
    \\n\
    \\n\
    \\STX\EOT\STX\DC2\EOTU\NULY\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\STX\SOH\DC2\ETXU\b\GS\n\
    \\v\n\
    \\EOT\EOT\STX\STX\NUL\DC2\ETXV\EOT\CAN\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\NUL\ENQ\DC2\ETXV\EOT\t\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETXV\n\
    \\DC3\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETXV\SYN\ETB\n\
    \\v\n\
    \\EOT\EOT\STX\STX\SOH\DC2\ETXW\EOT\RS\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\SOH\ENQ\DC2\ETXW\EOT\t\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETXW\n\
    \\EM\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETXW\FS\GS\n\
    \\v\n\
    \\EOT\EOT\STX\STX\STX\DC2\ETXX\EOTC\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\STX\ACK\DC2\ETXX\EOT-\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\STX\SOH\DC2\ETXX.>\n\
    \\f\n\
    \\ENQ\EOT\STX\STX\STX\ETX\DC2\ETXXAB\n\
    \\n\
    \\n\
    \\STX\EOT\ETX\DC2\EOT[\NUL^\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\ETX\SOH\DC2\ETX[\b\RS\n\
    \\v\n\
    \\EOT\EOT\ETX\STX\NUL\DC2\ETX\\\EOT6\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\NUL\EOT\DC2\ETX\\\EOT\f\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\NUL\ACK\DC2\ETX\\\r&\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\ETX\\'1\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\ETX\\45\n\
    \\v\n\
    \\EOT\EOT\ETX\STX\SOH\DC2\ETX]\EOT\RS\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\SOH\ENQ\DC2\ETX]\EOT\t\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\SOH\SOH\DC2\ETX]\n\
    \\EM\n\
    \\f\n\
    \\ENQ\EOT\ETX\STX\SOH\ETX\DC2\ETX]\FS\GS\n\
    \\n\
    \\n\
    \\STX\EOT\EOT\DC2\EOT`\NULc\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\EOT\SOH\DC2\ETX`\b \n\
    \\v\n\
    \\EOT\EOT\EOT\STX\NUL\DC2\ETXa\EOT\EM\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\NUL\ENQ\DC2\ETXa\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\ETXa\v\DC4\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\ETXa\ETB\CAN\n\
    \\v\n\
    \\EOT\EOT\EOT\STX\SOH\DC2\ETXb\EOT\DC2\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\SOH\ENQ\DC2\ETXb\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\ETXb\v\r\n\
    \\f\n\
    \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\ETXb\DLE\DC1\n\
    \\n\
    \\n\
    \\STX\EOT\ENQ\DC2\EOTe\NULn\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\ENQ\SOH\DC2\ETXe\b!\n\
    \\v\n\
    \\EOT\EOT\ENQ\STX\NUL\DC2\ETXf\EOT?\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\NUL\ACK\DC2\ETXf\EOT+\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\NUL\SOH\DC2\ETXf,:\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\NUL\ETX\DC2\ETXf=>\n\
    \\v\n\
    \\EOT\EOT\ENQ\STX\SOH\DC2\ETXg\EOT9\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\SOH\ACK\DC2\ETXg\EOT-\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\SOH\SOH\DC2\ETXg.4\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\SOH\ETX\DC2\ETXg78\n\
    \\v\n\
    \\EOT\EOT\ENQ\STX\STX\DC2\ETXh\EOTR\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\STX\ACK\DC2\ETXh\EOT:\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\STX\SOH\DC2\ETXh;M\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\STX\ETX\DC2\ETXhPQ\n\
    \\v\n\
    \\EOT\EOT\ENQ\STX\ETX\DC2\ETXi\EOT\US\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\ETX\ENQ\DC2\ETXi\EOT\t\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\ETX\SOH\DC2\ETXi\n\
    \\SUB\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\ETX\ETX\DC2\ETXi\GS\RS\n\
    \\v\n\
    \\EOT\EOT\ENQ\STX\EOT\DC2\ETXj\EOT!\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\EOT\ENQ\DC2\ETXj\EOT\b\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\EOT\SOH\DC2\ETXj\t\FS\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\EOT\ETX\DC2\ETXj\US \n\
    \\177\SOH\n\
    \\EOT\EOT\ENQ\STX\ENQ\DC2\ETXm\EOTM\SUB\163\SOH Contains the historical state of failover_versions for the cluster, truncated to contain only the last N\n\
    \ states to ensure that the list does not grow unbounded.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\ENQ\EOT\DC2\ETXm\EOT\f\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\ENQ\ACK\DC2\ETXm\r7\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\ENQ\SOH\DC2\ETXm8H\n\
    \\f\n\
    \\ENQ\EOT\ENQ\STX\ENQ\ETX\DC2\ETXmKL\n\
    \\n\
    \\n\
    \\STX\EOT\ACK\DC2\EOTp\NULy\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\ACK\SOH\DC2\ETXp\b\RS\n\
    \\v\n\
    \\EOT\EOT\ACK\STX\NUL\DC2\ETXq\EOT\EM\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\NUL\ENQ\DC2\ETXq\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\NUL\SOH\DC2\ETXq\v\DC4\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\NUL\ETX\DC2\ETXq\ETB\CAN\n\
    \\v\n\
    \\EOT\EOT\ACK\STX\SOH\DC2\ETXr\EOTB\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\SOH\ACK\DC2\ETXr\EOT1\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\SOH\SOH\DC2\ETXr2=\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\SOH\ETX\DC2\ETXr@A\n\
    \\v\n\
    \\EOT\EOT\ACK\STX\STX\DC2\ETXs\EOT9\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\STX\ACK\DC2\ETXs\EOT-\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\STX\SOH\DC2\ETXs.4\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\STX\ETX\DC2\ETXs78\n\
    \\v\n\
    \\EOT\EOT\ACK\STX\ETX\DC2\ETXt\EOTR\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\ETX\ACK\DC2\ETXt\EOT:\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\ETX\SOH\DC2\ETXt;M\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\ETX\ETX\DC2\ETXtPQ\n\
    \\v\n\
    \\EOT\EOT\ACK\STX\EOT\DC2\ETXu\EOT\RS\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\EOT\ENQ\DC2\ETXu\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\EOT\SOH\DC2\ETXu\v\EM\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\EOT\ETX\DC2\ETXu\FS\GS\n\
    \\v\n\
    \\EOT\EOT\ACK\STX\ENQ\DC2\ETXv\EOT!\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\ENQ\ENQ\DC2\ETXv\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\ENQ\SOH\DC2\ETXv\v\FS\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\ENQ\ETX\DC2\ETXv\US \n\
    \m\n\
    \\EOT\EOT\ACK\STX\ACK\DC2\ETXx\EOT\US\SUB` promote local namespace to global namespace. Ignored if namespace is already global namespace.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\ACK\ENQ\DC2\ETXx\EOT\b\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\ACK\SOH\DC2\ETXx\t\SUB\n\
    \\f\n\
    \\ENQ\EOT\ACK\STX\ACK\ETX\DC2\ETXx\GS\RS\n\
    \\v\n\
    \\STX\EOT\a\DC2\ENQ{\NUL\129\SOH\SOH\n\
    \\n\
    \\n\
    \\ETX\EOT\a\SOH\DC2\ETX{\b\US\n\
    \\v\n\
    \\EOT\EOT\a\STX\NUL\DC2\ETX|\EOT?\n\
    \\f\n\
    \\ENQ\EOT\a\STX\NUL\ACK\DC2\ETX|\EOT+\n\
    \\f\n\
    \\ENQ\EOT\a\STX\NUL\SOH\DC2\ETX|,:\n\
    \\f\n\
    \\ENQ\EOT\a\STX\NUL\ETX\DC2\ETX|=>\n\
    \\v\n\
    \\EOT\EOT\a\STX\SOH\DC2\ETX}\EOT9\n\
    \\f\n\
    \\ENQ\EOT\a\STX\SOH\ACK\DC2\ETX}\EOT-\n\
    \\f\n\
    \\ENQ\EOT\a\STX\SOH\SOH\DC2\ETX}.4\n\
    \\f\n\
    \\ENQ\EOT\a\STX\SOH\ETX\DC2\ETX}78\n\
    \\v\n\
    \\EOT\EOT\a\STX\STX\DC2\ETX~\EOTR\n\
    \\f\n\
    \\ENQ\EOT\a\STX\STX\ACK\DC2\ETX~\EOT:\n\
    \\f\n\
    \\ENQ\EOT\a\STX\STX\SOH\DC2\ETX~;M\n\
    \\f\n\
    \\ENQ\EOT\a\STX\STX\ETX\DC2\ETX~PQ\n\
    \\v\n\
    \\EOT\EOT\a\STX\ETX\DC2\ETX\DEL\EOT\US\n\
    \\f\n\
    \\ENQ\EOT\a\STX\ETX\ENQ\DC2\ETX\DEL\EOT\t\n\
    \\f\n\
    \\ENQ\EOT\a\STX\ETX\SOH\DC2\ETX\DEL\n\
    \\SUB\n\
    \\f\n\
    \\ENQ\EOT\a\STX\ETX\ETX\DC2\ETX\DEL\GS\RS\n\
    \\f\n\
    \\EOT\EOT\a\STX\EOT\DC2\EOT\128\SOH\EOT!\n\
    \\r\n\
    \\ENQ\EOT\a\STX\EOT\ENQ\DC2\EOT\128\SOH\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\a\STX\EOT\SOH\DC2\EOT\128\SOH\t\FS\n\
    \\r\n\
    \\ENQ\EOT\a\STX\EOT\ETX\DC2\EOT\128\SOH\US \n\
    \\ESC\n\
    \\STX\EOT\b\DC2\ACK\132\SOH\NUL\135\SOH\SOH\SUB\r Deprecated.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\b\SOH\DC2\EOT\132\SOH\b!\n\
    \\f\n\
    \\EOT\EOT\b\STX\NUL\DC2\EOT\133\SOH\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\ENQ\DC2\EOT\133\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\SOH\DC2\EOT\133\SOH\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\ETX\DC2\EOT\133\SOH\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\b\STX\SOH\DC2\EOT\134\SOH\EOT\RS\n\
    \\r\n\
    \\ENQ\EOT\b\STX\SOH\ENQ\DC2\EOT\134\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\b\STX\SOH\SOH\DC2\EOT\134\SOH\v\EM\n\
    \\r\n\
    \\ENQ\EOT\b\STX\SOH\ETX\DC2\EOT\134\SOH\FS\GS\n\
    \\ESC\n\
    \\STX\EOT\t\DC2\ACK\138\SOH\NUL\139\SOH\SOH\SUB\r Deprecated.\n\
    \\n\
    \\v\n\
    \\ETX\EOT\t\SOH\DC2\EOT\138\SOH\b\"\n\
    \\f\n\
    \\STX\EOT\n\
    \\DC2\ACK\141\SOH\NUL\194\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\n\
    \\SOH\DC2\EOT\141\SOH\b%\n\
    \\f\n\
    \\EOT\EOT\n\
    \\STX\NUL\DC2\EOT\142\SOH\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\ENQ\DC2\EOT\142\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\SOH\DC2\EOT\142\SOH\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\ETX\DC2\EOT\142\SOH\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\n\
    \\STX\SOH\DC2\EOT\143\SOH\EOT\ESC\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SOH\ENQ\DC2\EOT\143\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SOH\SOH\DC2\EOT\143\SOH\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SOH\ETX\DC2\EOT\143\SOH\EM\SUB\n\
    \\f\n\
    \\EOT\EOT\n\
    \\STX\STX\DC2\EOT\144\SOH\EOT:\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\STX\ACK\DC2\EOT\144\SOH\EOT'\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\STX\SOH\DC2\EOT\144\SOH(5\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\STX\ETX\DC2\EOT\144\SOH89\n\
    \\f\n\
    \\EOT\EOT\n\
    \\STX\ETX\DC2\EOT\145\SOH\EOT7\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ETX\ACK\DC2\EOT\145\SOH\EOT'\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ETX\SOH\DC2\EOT\145\SOH(2\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ETX\ETX\DC2\EOT\145\SOH56\n\
    \m\n\
    \\EOT\EOT\n\
    \\STX\EOT\DC2\EOT\147\SOH\EOT.\SUB_ Serialized arguments to the workflow. These are passed as arguments to the workflow function.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\EOT\ACK\DC2\EOT\147\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\EOT\SOH\DC2\EOT\147\SOH$)\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\EOT\ETX\DC2\EOT\147\SOH,-\n\
    \W\n\
    \\EOT\EOT\n\
    \\STX\ENQ\DC2\EOT\149\SOH\EOT<\SUBI Total workflow execution timeout including retries and continue as new.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ENQ\ACK\DC2\EOT\149\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ENQ\SOH\DC2\EOT\149\SOH\GS7\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ENQ\ETX\DC2\EOT\149\SOH:;\n\
    \1\n\
    \\EOT\EOT\n\
    \\STX\ACK\DC2\EOT\151\SOH\EOT6\SUB# Timeout of a single workflow run.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ACK\ACK\DC2\EOT\151\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ACK\SOH\DC2\EOT\151\SOH\GS1\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ACK\ETX\DC2\EOT\151\SOH45\n\
    \2\n\
    \\EOT\EOT\n\
    \\STX\a\DC2\EOT\153\SOH\EOT7\SUB$ Timeout of a single workflow task.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\a\ACK\DC2\EOT\153\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\a\SOH\DC2\EOT\153\SOH\GS2\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\a\ETX\DC2\EOT\153\SOH56\n\
    \E\n\
    \\EOT\EOT\n\
    \\STX\b\DC2\EOT\155\SOH\EOT\CAN\SUB7 The identity of the client who initiated this request\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\b\ENQ\DC2\EOT\155\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\b\SOH\DC2\EOT\155\SOH\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\b\ETX\DC2\EOT\155\SOH\SYN\ETB\n\
    \M\n\
    \\EOT\EOT\n\
    \\STX\t\DC2\EOT\157\SOH\EOT\ESC\SUB? A unique identifier for this start request. Typically UUIDv4.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\t\ENQ\DC2\EOT\157\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\t\SOH\DC2\EOT\157\SOH\v\NAK\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\t\ETX\DC2\EOT\157\SOH\CAN\SUB\n\
    \\142\STX\n\
    \\EOT\EOT\n\
    \\STX\n\
    \\DC2\EOT\162\SOH\EOTN\SUB\255\SOH Defines whether to allow re-using the workflow id from a previously *closed* workflow.\n\
    \ The default policy is WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE.\n\
    \\n\
    \ See `workflow_id_conflict_policy` for handling a workflow id duplication with a *running* workflow.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\n\
    \\ACK\DC2\EOT\162\SOH\EOT/\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\n\
    \\SOH\DC2\EOT\162\SOH0H\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\n\
    \\ETX\DC2\EOT\162\SOHKM\n\
    \\244\SOH\n\
    \\EOT\EOT\n\
    \\STX\v\DC2\EOT\167\SOH\EOTT\SUB\229\SOH Defines how to resolve a workflow id conflict with a *running* workflow.\n\
    \ The default policy is WORKFLOW_ID_CONFLICT_POLICY_FAIL.\n\
    \\n\
    \ See `workflow_id_reuse_policy` for handling a workflow id duplication with a *closed* workflow.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\v\ACK\DC2\EOT\167\SOH\EOT2\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\v\SOH\DC2\EOT\167\SOH3N\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\v\ETX\DC2\EOT\167\SOHQS\n\
    \b\n\
    \\EOT\EOT\n\
    \\STX\f\DC2\EOT\169\SOH\EOT9\SUBT The retry policy for the workflow. Will never exceed `workflow_execution_timeout`.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\f\ACK\DC2\EOT\169\SOH\EOT&\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\f\SOH\DC2\EOT\169\SOH'3\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\f\ETX\DC2\EOT\169\SOH68\n\
    \V\n\
    \\EOT\EOT\n\
    \\STX\r\DC2\EOT\171\SOH\EOT\RS\SUBH See https://docs.temporal.io/docs/content/what-is-a-temporal-cron-job/\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\r\ENQ\DC2\EOT\171\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\r\SOH\DC2\EOT\171\SOH\v\CAN\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\r\ETX\DC2\EOT\171\SOH\ESC\GS\n\
    \\f\n\
    \\EOT\EOT\n\
    \\STX\SO\DC2\EOT\172\SOH\EOT*\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SO\ACK\DC2\EOT\172\SOH\EOT\US\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SO\SOH\DC2\EOT\172\SOH $\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SO\ETX\DC2\EOT\172\SOH')\n\
    \\f\n\
    \\EOT\EOT\n\
    \\STX\SI\DC2\EOT\173\SOH\EOTC\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SI\ACK\DC2\EOT\173\SOH\EOT+\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SI\SOH\DC2\EOT\173\SOH,=\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SI\ETX\DC2\EOT\173\SOH@B\n\
    \\f\n\
    \\EOT\EOT\n\
    \\STX\DLE\DC2\EOT\174\SOH\EOT.\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\DLE\ACK\DC2\EOT\174\SOH\EOT!\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\DLE\SOH\DC2\EOT\174\SOH\"(\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\DLE\ETX\DC2\EOT\174\SOH+-\n\
    \\221\STX\n\
    \\EOT\EOT\n\
    \\STX\DC1\DC2\EOT\179\SOH\EOT&\SUB\206\STX Request to get the first workflow task inline in the response bypassing matching service and worker polling.\n\
    \ If set to `true` the caller is expected to have a worker available and capable of processing the task.\n\
    \ The returned task will be marked as started and is expected to be completed by the specified\n\
    \ `workflow_task_timeout`.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\DC1\ENQ\DC2\EOT\179\SOH\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\DC1\SOH\DC2\EOT\179\SOH\t \n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\DC1\ETX\DC2\EOT\179\SOH#%\n\
    \\162\STX\n\
    \\EOT\EOT\n\
    \\STX\DC2\DC2\EOT\184\SOH\EOT;\SUB\147\STX These values will be available as ContinuedFailure and LastCompletionResult in the\n\
    \ WorkflowExecutionStarted event and through SDKs. The are currently only used by the\n\
    \ server itself (for the schedules feature) and are not intended to be exposed in\n\
    \ StartWorkflowExecution.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\DC2\ACK\DC2\EOT\184\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\DC2\SOH\DC2\EOT\184\SOH$5\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\DC2\ETX\DC2\EOT\184\SOH8:\n\
    \\f\n\
    \\EOT\EOT\n\
    \\STX\DC3\DC2\EOT\185\SOH\EOT@\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\DC3\ACK\DC2\EOT\185\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\DC3\SOH\DC2\EOT\185\SOH$:\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\DC3\ETX\DC2\EOT\185\SOH=?\n\
    \\238\SOH\n\
    \\EOT\EOT\n\
    \\STX\DC4\DC2\EOT\189\SOH\EOT7\SUB\223\SOH Time to wait before dispatching the first workflow task. Cannot be used with `cron_schedule`.\n\
    \ If the workflow gets a signal before the delay, a workflow task will be dispatched and the rest\n\
    \ of the delay will be ignored.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\DC4\ACK\DC2\EOT\189\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\DC4\SOH\DC2\EOT\189\SOH\GS1\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\DC4\ETX\DC2\EOT\189\SOH46\n\
    \\143\STX\n\
    \\EOT\EOT\n\
    \\STX\NAK\DC2\EOT\193\SOH\EOTG\SUB\128\STX Callbacks to be called by the server when this workflow reaches a terminal state.\n\
    \ If the workflow continues-as-new, these callbacks will be carried over to the new execution.\n\
    \ Callback addresses must be whitelisted in the server's dynamic configuration.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NAK\EOT\DC2\EOT\193\SOH\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NAK\ACK\DC2\EOT\193\SOH\r,\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NAK\SOH\DC2\EOT\193\SOH-A\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NAK\ETX\DC2\EOT\193\SOHDF\n\
    \\f\n\
    \\STX\EOT\v\DC2\ACK\196\SOH\NUL\205\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\v\SOH\DC2\EOT\196\SOH\b&\n\
    \r\n\
    \\EOT\EOT\v\STX\NUL\DC2\EOT\198\SOH\EOT\SYN\SUBd The run id of the workflow that was started - or used (via WorkflowIdConflictPolicy USE_EXISTING).\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\ENQ\DC2\EOT\198\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\SOH\DC2\EOT\198\SOH\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\ETX\DC2\EOT\198\SOH\DC4\NAK\n\
    \4\n\
    \\EOT\EOT\v\STX\SOH\DC2\EOT\200\SOH\EOT\NAK\SUB& If true, a new workflow was started.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\SOH\ENQ\DC2\EOT\200\SOH\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\v\STX\SOH\SOH\DC2\EOT\200\SOH\t\DLE\n\
    \\r\n\
    \\ENQ\EOT\v\STX\SOH\ETX\DC2\EOT\200\SOH\DC3\DC4\n\
    \\255\SOH\n\
    \\EOT\EOT\v\STX\STX\DC2\EOT\204\SOH\EOT:\SUB\240\SOH When `request_eager_execution` is set on the `StartWorkflowExecutionRequest`, the server - if supported - will\n\
    \ return the first workflow task to be eagerly executed.\n\
    \ The caller is expected to have a worker available to process the task.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\ACK\DC2\EOT\204\SOH\EOT!\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\SOH\DC2\EOT\204\SOH\"5\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\ETX\DC2\EOT\204\SOH89\n\
    \\f\n\
    \\STX\EOT\f\DC2\ACK\207\SOH\NUL\221\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\f\SOH\DC2\EOT\207\SOH\b*\n\
    \\f\n\
    \\EOT\EOT\f\STX\NUL\DC2\EOT\208\SOH\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT\f\STX\NUL\ENQ\DC2\EOT\208\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\NUL\SOH\DC2\EOT\208\SOH\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\f\STX\NUL\ETX\DC2\EOT\208\SOH\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\f\STX\SOH\DC2\EOT\209\SOH\EOT;\n\
    \\r\n\
    \\ENQ\EOT\f\STX\SOH\ACK\DC2\EOT\209\SOH\EOT,\n\
    \\r\n\
    \\ENQ\EOT\f\STX\SOH\SOH\DC2\EOT\209\SOH-6\n\
    \\r\n\
    \\ENQ\EOT\f\STX\SOH\ETX\DC2\EOT\209\SOH9:\n\
    \\f\n\
    \\EOT\EOT\f\STX\STX\DC2\EOT\210\SOH\EOT \n\
    \\r\n\
    \\ENQ\EOT\f\STX\STX\ENQ\DC2\EOT\210\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\f\STX\STX\SOH\DC2\EOT\210\SOH\n\
    \\ESC\n\
    \\r\n\
    \\ENQ\EOT\f\STX\STX\ETX\DC2\EOT\210\SOH\RS\US\n\
    \\164\SOH\n\
    \\EOT\EOT\f\STX\ETX\DC2\EOT\213\SOH\EOT\RS\SUB\149\SOH If a `GetWorkflowExecutionHistoryResponse` or a `PollWorkflowTaskQueueResponse` had one of\n\
    \ these, it should be passed here to fetch the next page.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ETX\ENQ\DC2\EOT\213\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ETX\SOH\DC2\EOT\213\SOH\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ETX\ETX\DC2\EOT\213\SOH\FS\GS\n\
    \\158\SOH\n\
    \\EOT\EOT\f\STX\EOT\DC2\EOT\216\SOH\EOT\FS\SUB\143\SOH If set to true, the RPC call will not resolve until there is a new event which matches\n\
    \ the `history_event_filter_type`, or a timeout is hit.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\EOT\ENQ\DC2\EOT\216\SOH\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\f\STX\EOT\SOH\DC2\EOT\216\SOH\t\ETB\n\
    \\r\n\
    \\ENQ\EOT\f\STX\EOT\ETX\DC2\EOT\216\SOH\SUB\ESC\n\
    \\133\SOH\n\
    \\EOT\EOT\f\STX\ENQ\DC2\EOT\219\SOH\EOTO\SUBw Filter returned events such that they match the specified filter type.\n\
    \ Default: HISTORY_EVENT_FILTER_TYPE_ALL_EVENT.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ENQ\ACK\DC2\EOT\219\SOH\EOT0\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ENQ\SOH\DC2\EOT\219\SOH1J\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ENQ\ETX\DC2\EOT\219\SOHMN\n\
    \\f\n\
    \\EOT\EOT\f\STX\ACK\DC2\EOT\220\SOH\EOT\ESC\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ACK\ENQ\DC2\EOT\220\SOH\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ACK\SOH\DC2\EOT\220\SOH\t\SYN\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ACK\ETX\DC2\EOT\220\SOH\EM\SUB\n\
    \\f\n\
    \\STX\EOT\r\DC2\ACK\223\SOH\NUL\231\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\r\SOH\DC2\EOT\223\SOH\b+\n\
    \\f\n\
    \\EOT\EOT\r\STX\NUL\DC2\EOT\224\SOH\EOT0\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\ACK\DC2\EOT\224\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\SOH\DC2\EOT\224\SOH$+\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\ETX\DC2\EOT\224\SOH./\n\
    \\196\SOH\n\
    \\EOT\EOT\r\STX\SOH\DC2\EOT\227\SOH\EOT=\SUB\181\SOH Raw history is an alternate representation of history that may be returned if configured on\n\
    \ the frontend. This is not supported by all SDKs. Either this or `history` will be set.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\EOT\DC2\EOT\227\SOH\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\ACK\DC2\EOT\227\SOH\r,\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\SOH\DC2\EOT\227\SOH-8\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\ETX\DC2\EOT\227\SOH;<\n\
    \`\n\
    \\EOT\EOT\r\STX\STX\DC2\EOT\229\SOH\EOT\RS\SUBR Will be set if there are more history events than were included in this response\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\STX\ENQ\DC2\EOT\229\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\r\STX\STX\SOH\DC2\EOT\229\SOH\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT\r\STX\STX\ETX\DC2\EOT\229\SOH\FS\GS\n\
    \\f\n\
    \\EOT\EOT\r\STX\ETX\DC2\EOT\230\SOH\EOT\SYN\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ETX\ENQ\DC2\EOT\230\SOH\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ETX\SOH\DC2\EOT\230\SOH\t\DC1\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ETX\ETX\DC2\EOT\230\SOH\DC4\NAK\n\
    \\f\n\
    \\STX\EOT\SO\DC2\ACK\233\SOH\NUL\238\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\SO\SOH\DC2\EOT\233\SOH\b1\n\
    \\f\n\
    \\EOT\EOT\SO\STX\NUL\DC2\EOT\234\SOH\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\NUL\ENQ\DC2\EOT\234\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\NUL\SOH\DC2\EOT\234\SOH\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\NUL\ETX\DC2\EOT\234\SOH\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\SO\STX\SOH\DC2\EOT\235\SOH\EOT;\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\SOH\ACK\DC2\EOT\235\SOH\EOT,\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\SOH\SOH\DC2\EOT\235\SOH-6\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\SOH\ETX\DC2\EOT\235\SOH9:\n\
    \\f\n\
    \\EOT\EOT\SO\STX\STX\DC2\EOT\236\SOH\EOT \n\
    \\r\n\
    \\ENQ\EOT\SO\STX\STX\ENQ\DC2\EOT\236\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\STX\SOH\DC2\EOT\236\SOH\n\
    \\ESC\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\STX\ETX\DC2\EOT\236\SOH\RS\US\n\
    \\f\n\
    \\EOT\EOT\SO\STX\ETX\DC2\EOT\237\SOH\EOT\RS\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ETX\ENQ\DC2\EOT\237\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ETX\SOH\DC2\EOT\237\SOH\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ETX\ETX\DC2\EOT\237\SOH\FS\GS\n\
    \\f\n\
    \\STX\EOT\SI\DC2\ACK\240\SOH\NUL\244\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\SI\SOH\DC2\EOT\240\SOH\b2\n\
    \\f\n\
    \\EOT\EOT\SI\STX\NUL\DC2\EOT\241\SOH\EOT0\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\NUL\ACK\DC2\EOT\241\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\NUL\SOH\DC2\EOT\241\SOH$+\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\NUL\ETX\DC2\EOT\241\SOH./\n\
    \`\n\
    \\EOT\EOT\SI\STX\SOH\DC2\EOT\243\SOH\EOT\RS\SUBR Will be set if there are more history events than were included in this response\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\SOH\ENQ\DC2\EOT\243\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\SOH\SOH\DC2\EOT\243\SOH\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\SOH\ETX\DC2\EOT\243\SOH\FS\GS\n\
    \\f\n\
    \\STX\EOT\DLE\DC2\ACK\246\SOH\NUL\130\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\DLE\SOH\DC2\EOT\246\SOH\b$\n\
    \\f\n\
    \\EOT\EOT\DLE\STX\NUL\DC2\EOT\247\SOH\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\NUL\ENQ\DC2\EOT\247\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\NUL\SOH\DC2\EOT\247\SOH\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\NUL\ETX\DC2\EOT\247\SOH\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\DLE\STX\SOH\DC2\EOT\248\SOH\EOT7\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\SOH\ACK\DC2\EOT\248\SOH\EOT'\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\SOH\SOH\DC2\EOT\248\SOH(2\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\SOH\ETX\DC2\EOT\248\SOH56\n\
    \P\n\
    \\EOT\EOT\DLE\STX\STX\DC2\EOT\250\SOH\EOT\CAN\SUBB The identity of the worker/client who is polling this task queue\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\STX\ENQ\DC2\EOT\250\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\STX\SOH\DC2\EOT\250\SOH\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\STX\ETX\DC2\EOT\250\SOH\SYN\ETB\n\
    \\131\STX\n\
    \\EOT\EOT\DLE\STX\ETX\DC2\EOT\254\SOH\EOT\US\SUB\244\SOH DEPRECATED since 1.21 - use `worker_version_capabilities` instead.\n\
    \ Each worker process should provide an ID unique to the specific set of code it is running\n\
    \ \"checksum\" in this field name isn't very accurate, it should be though of as an id.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\ETX\ENQ\DC2\EOT\254\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\ETX\SOH\DC2\EOT\254\SOH\v\SUB\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\ETX\ETX\DC2\EOT\254\SOH\GS\RS\n\
    \\175\SOH\n\
    \\EOT\EOT\DLE\STX\EOT\DC2\EOT\129\STX\EOTU\SUB\160\SOH Information about this worker's build identifier and if it is choosing to use the versioning\n\
    \ feature. See the `WorkerVersionCapabilities` docstring for more.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\EOT\ACK\DC2\EOT\129\STX\EOT4\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\EOT\SOH\DC2\EOT\129\STX5P\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\EOT\ETX\DC2\EOT\129\STXST\n\
    \\f\n\
    \\STX\EOT\DC1\DC2\ACK\132\STX\NUL\174\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\DC1\SOH\DC2\EOT\132\STX\b%\n\
    \1\n\
    \\EOT\EOT\DC1\STX\NUL\DC2\EOT\134\STX\EOT\EM\SUB# A unique identifier for this task\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\NUL\ENQ\DC2\EOT\134\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\NUL\SOH\DC2\EOT\134\STX\n\
    \\DC4\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\NUL\ETX\DC2\EOT\134\STX\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\DC1\STX\SOH\DC2\EOT\135\STX\EOTD\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SOH\ACK\DC2\EOT\135\STX\EOT,\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SOH\SOH\DC2\EOT\135\STX-?\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SOH\ETX\DC2\EOT\135\STXBC\n\
    \\f\n\
    \\EOT\EOT\DC1\STX\STX\DC2\EOT\136\STX\EOT:\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\STX\ACK\DC2\EOT\136\STX\EOT'\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\STX\SOH\DC2\EOT\136\STX(5\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\STX\ETX\DC2\EOT\136\STX89\n\
    \\151\SOH\n\
    \\EOT\EOT\DC1\STX\ETX\DC2\EOT\139\STX\EOT(\SUB\136\SOH The last workflow task started event which was processed by some worker for this execution.\n\
    \ Will be zero if no task has ever started.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ETX\ENQ\DC2\EOT\139\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ETX\SOH\DC2\EOT\139\STX\n\
    \#\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ETX\ETX\DC2\EOT\139\STX&'\n\
    \\166\STX\n\
    \\EOT\EOT\DC1\STX\EOT\DC2\EOT\144\STX\EOT\US\SUB\151\STX The id of the most recent workflow task started event, which will have been generated as a\n\
    \ result of this poll request being served. Will be zero if the task\n\
    \ does not contain any events which would advance history (no new WFT started).\n\
    \ Currently this can happen for queries.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\EOT\ENQ\DC2\EOT\144\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\EOT\SOH\DC2\EOT\144\STX\n\
    \\SUB\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\EOT\ETX\DC2\EOT\144\STX\GS\RS\n\
    \Z\n\
    \\EOT\EOT\DC1\STX\ENQ\DC2\EOT\146\STX\EOT\SYN\SUBL Starting at 1, the number of attempts to complete this task by any worker.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ENQ\ENQ\DC2\EOT\146\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ENQ\SOH\DC2\EOT\146\STX\n\
    \\DC1\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ENQ\ETX\DC2\EOT\146\STX\DC4\NAK\n\
    \\172\SOH\n\
    \\EOT\EOT\DC1\STX\ACK\DC2\EOT\149\STX\EOT!\SUB\157\SOH A hint that there are more tasks already present in this task queue. Can be used to\n\
    \ prioritize draining a sticky queue before polling from a normal queue.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ACK\ENQ\DC2\EOT\149\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ACK\SOH\DC2\EOT\149\STX\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\ACK\ETX\DC2\EOT\149\STX\US \n\
    \\215\SOH\n\
    \\EOT\EOT\DC1\STX\a\DC2\EOT\153\STX\EOT0\SUB\200\SOH The history for this workflow, which will either be complete or partial. Partial histories\n\
    \ are sent to workers who have signaled that they are using a sticky queue when completing\n\
    \ a workflow task.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\a\ACK\DC2\EOT\153\STX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\a\SOH\DC2\EOT\153\STX$+\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\a\ETX\DC2\EOT\153\STX./\n\
    \\164\SOH\n\
    \\EOT\EOT\DC1\STX\b\DC2\EOT\156\STX\EOT\RS\SUB\149\SOH Will be set if there are more history events than were included in this response. Such events\n\
    \ should be fetched via `GetWorkflowExecutionHistory`.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\b\ENQ\DC2\EOT\156\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\b\SOH\DC2\EOT\156\STX\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\b\ETX\DC2\EOT\156\STX\FS\GS\n\
    \\210\STX\n\
    \\EOT\EOT\DC1\STX\t\DC2\EOT\161\STX\EOT3\SUB\195\STX Legacy queries appear in this field. The query must be responded to via\n\
    \ `RespondQueryTaskCompleted`. If the workflow is already closed (queries are permitted on\n\
    \ closed workflows) then the `history` field will be populated with the entire history. It\n\
    \ may also be populated if this task originates on a non-sticky queue.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\t\ACK\DC2\EOT\161\STX\EOT'\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\t\SOH\DC2\EOT\161\STX(-\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\t\ETX\DC2\EOT\161\STX02\n\
    \\180\SOH\n\
    \\EOT\EOT\DC1\STX\n\
    \\DC2\EOT\164\STX\EOTK\SUB\165\SOH The task queue this task originated from, which will always be the original non-sticky name\n\
    \ for the queue, even if this response came from polling a sticky queue.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\n\
    \\ACK\DC2\EOT\164\STX\EOT'\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\n\
    \\SOH\DC2\EOT\164\STX(E\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\n\
    \\ETX\DC2\EOT\164\STXHJ\n\
    \:\n\
    \\EOT\EOT\DC1\STX\v\DC2\EOT\166\STX\EOT2\SUB, When this task was scheduled by the server\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\v\ACK\DC2\EOT\166\STX\EOT\GS\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\v\SOH\DC2\EOT\166\STX\RS,\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\v\ETX\DC2\EOT\166\STX/1\n\
    \h\n\
    \\EOT\EOT\DC1\STX\f\DC2\EOT\168\STX\EOT0\SUBZ When the current workflow task started event was generated, meaning the current attempt.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\f\ACK\DC2\EOT\168\STX\EOT\GS\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\f\SOH\DC2\EOT\168\STX\RS*\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\f\ETX\DC2\EOT\168\STX-/\n\
    \\175\SOH\n\
    \\EOT\EOT\DC1\STX\r\DC2\EOT\171\STX\EOTB\SUB\160\SOH Queries that should be executed after applying the history in this task. Responses should be\n\
    \ attached to `RespondWorkflowTaskCompletedRequest::query_results`\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\r\ACK\DC2\EOT\171\STX\EOT4\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\r\SOH\DC2\EOT\171\STX5<\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\r\ETX\DC2\EOT\171\STX?A\n\
    \F\n\
    \\EOT\EOT\DC1\STX\SO\DC2\EOT\173\STX\EOT<\SUB8 Protocol messages piggybacking on a WFT as a transport\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SO\EOT\DC2\EOT\173\STX\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SO\ACK\DC2\EOT\173\STX\r-\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SO\SOH\DC2\EOT\173\STX.6\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SO\ETX\DC2\EOT\173\STX9;\n\
    \\f\n\
    \\STX\EOT\DC2\DC2\ACK\176\STX\NUL\211\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\DC2\SOH\DC2\EOT\176\STX\b+\n\
    \M\n\
    \\EOT\EOT\DC2\STX\NUL\DC2\EOT\178\STX\EOT\EM\SUB? The task token as received in `PollWorkflowTaskQueueResponse`\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\NUL\ENQ\DC2\EOT\178\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\NUL\SOH\DC2\EOT\178\STX\n\
    \\DC4\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\NUL\ETX\DC2\EOT\178\STX\ETB\CAN\n\
    \g\n\
    \\EOT\EOT\DC2\STX\SOH\DC2\EOT\180\STX\EOT:\SUBY A list of commands generated when driving the workflow code in response to the new task\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\SOH\EOT\DC2\EOT\180\STX\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\SOH\ACK\DC2\EOT\180\STX\r,\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\SOH\SOH\DC2\EOT\180\STX-5\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\SOH\ETX\DC2\EOT\180\STX89\n\
    \1\n\
    \\EOT\EOT\DC2\STX\STX\DC2\EOT\182\STX\EOT\CAN\SUB# The identity of the worker/client\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\STX\ENQ\DC2\EOT\182\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\STX\SOH\DC2\EOT\182\STX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\STX\ETX\DC2\EOT\182\STX\SYN\ETB\n\
    \\147\SOH\n\
    \\EOT\EOT\DC2\STX\ETX\DC2\EOT\185\STX\EOTN\SUB\132\SOH May be set by workers to indicate that the worker desires future tasks to be provided with\n\
    \ incremental history on a sticky queue.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\ETX\ACK\DC2\EOT\185\STX\EOT7\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\ETX\SOH\DC2\EOT\185\STX8I\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\ETX\ETX\DC2\EOT\185\STXLM\n\
    \\161\SOH\n\
    \\EOT\EOT\DC2\STX\EOT\DC2\EOT\188\STX\EOT&\SUB\146\SOH If set, the worker wishes to immediately receive the next workflow task as a response to\n\
    \ this completion. This can save on polling round-trips.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\EOT\ENQ\DC2\EOT\188\STX\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\EOT\SOH\DC2\EOT\188\STX\t!\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\EOT\ETX\DC2\EOT\188\STX$%\n\
    \\236\STX\n\
    \\EOT\EOT\DC2\STX\ENQ\DC2\EOT\193\STX\EOT,\SUB\221\STX Can be used to *force* creation of a new workflow task, even if no commands have resolved or\n\
    \ one would not otherwise have been generated. This is used when the worker knows it is doing\n\
    \ something useful, but cannot complete it within the workflow task timeout. Local activities\n\
    \ which run for longer than the task timeout being the prime example.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\ENQ\ENQ\DC2\EOT\193\STX\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\ENQ\SOH\DC2\EOT\193\STX\t'\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\ENQ\ETX\DC2\EOT\193\STX*+\n\
    \m\n\
    \\EOT\EOT\DC2\STX\ACK\DC2\EOT\196\STX\EOT\US\SUB_ DEPRECATED since 1.21 - use `worker_version_stamp` instead.\n\
    \ Worker process' unique binary id\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\ACK\ENQ\DC2\EOT\196\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\ACK\SOH\DC2\EOT\196\STX\v\SUB\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\ACK\ETX\DC2\EOT\196\STX\GS\RS\n\
    \O\n\
    \\EOT\EOT\DC2\STX\a\DC2\EOT\198\STX\EOTM\SUBA Responses to the `queries` field in the task being responded to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\a\ACK\DC2\EOT\198\STX\EOT:\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\a\SOH\DC2\EOT\198\STX;H\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\a\ETX\DC2\EOT\198\STXKL\n\
    \\f\n\
    \\EOT\EOT\DC2\STX\b\DC2\EOT\199\STX\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\b\ENQ\DC2\EOT\199\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\b\SOH\DC2\EOT\199\STX\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\b\ETX\DC2\EOT\199\STX\ETB\CAN\n\
    \\246\SOH\n\
    \\EOT\EOT\DC2\STX\t\DC2\EOT\203\STX\EOTH\SUB\231\SOH Version info of the worker who processed this task. This message's `build_id` field should\n\
    \ always be set by SDKs. Workers opting into versioning will also set the `use_versioning`\n\
    \ field to true. See message docstrings for more.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\t\ACK\DC2\EOT\203\STX\EOT-\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\t\SOH\DC2\EOT\203\STX.B\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\t\ETX\DC2\EOT\203\STXEG\n\
    \F\n\
    \\EOT\EOT\DC2\STX\n\
    \\DC2\EOT\205\STX\EOT<\SUB8 Protocol messages piggybacking on a WFT as a transport\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\n\
    \\EOT\DC2\EOT\205\STX\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\n\
    \\ACK\DC2\EOT\205\STX\r-\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\n\
    \\SOH\DC2\EOT\205\STX.6\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\n\
    \\ETX\DC2\EOT\205\STX9;\n\
    \\134\SOH\n\
    \\EOT\EOT\DC2\STX\v\DC2\EOT\208\STX\EOTH\SUBx Data the SDK wishes to record for itself, but server need not interpret, and does not\n\
    \ directly impact workflow state.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\v\ACK\DC2\EOT\208\STX\EOT5\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\v\SOH\DC2\EOT\208\STX6B\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\v\ETX\DC2\EOT\208\STXEG\n\
    \7\n\
    \\EOT\EOT\DC2\STX\f\DC2\EOT\210\STX\EOTC\SUB) Local usage data collected for metering\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\f\ACK\DC2\EOT\210\STX\EOT+\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\f\SOH\DC2\EOT\210\STX,=\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\f\ETX\DC2\EOT\210\STX@B\n\
    \\f\n\
    \\STX\EOT\DC3\DC2\ACK\213\STX\NUL\220\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\DC3\SOH\DC2\EOT\213\STX\b,\n\
    \T\n\
    \\EOT\EOT\DC3\STX\NUL\DC2\EOT\215\STX\EOT4\SUBF See `RespondWorkflowTaskCompletedResponse::return_new_workflow_task`\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\NUL\ACK\DC2\EOT\215\STX\EOT!\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\NUL\SOH\DC2\EOT\215\STX\"/\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\NUL\ETX\DC2\EOT\215\STX23\n\
    \J\n\
    \\EOT\EOT\DC3\STX\SOH\DC2\EOT\217\STX\EOT>\SUB< See `ScheduleActivityTaskCommandAttributes::request_start`\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\SOH\EOT\DC2\EOT\217\STX\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\SOH\ACK\DC2\EOT\217\STX\r*\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\SOH\SOH\DC2\EOT\217\STX+9\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\SOH\ETX\DC2\EOT\217\STX<=\n\
    \\f\n\
    \\EOT\EOT\DC3\STX\STX\DC2\EOT\219\STX\EOT%\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\STX\ENQ\DC2\EOT\219\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\STX\SOH\DC2\EOT\219\STX\n\
    \ \n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\STX\ETX\DC2\EOT\219\STX#$\n\
    \\f\n\
    \\STX\EOT\DC4\DC2\ACK\222\STX\NUL\242\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\DC4\SOH\DC2\EOT\222\STX\b(\n\
    \M\n\
    \\EOT\EOT\DC4\STX\NUL\DC2\EOT\224\STX\EOT\EM\SUB? The task token as received in `PollWorkflowTaskQueueResponse`\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\NUL\ENQ\DC2\EOT\224\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\NUL\SOH\DC2\EOT\224\STX\n\
    \\DC4\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\NUL\ETX\DC2\EOT\224\STX\ETB\CAN\n\
    \\165\SOH\n\
    \\EOT\EOT\DC4\STX\SOH\DC2\EOT\227\STX\EOT<\SUB\150\SOH Why did the task fail? It's important to note that many of the variants in this enum cannot\n\
    \ apply to worker responses. See the type's doc for more.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\SOH\ACK\DC2\EOT\227\STX\EOT1\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\SOH\SOH\DC2\EOT\227\STX27\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\SOH\ETX\DC2\EOT\227\STX:;\n\
    \\US\n\
    \\EOT\EOT\DC4\STX\STX\DC2\EOT\229\STX\EOT0\SUB\DC1 Failure details\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\STX\ACK\DC2\EOT\229\STX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\STX\SOH\DC2\EOT\229\STX$+\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\STX\ETX\DC2\EOT\229\STX./\n\
    \1\n\
    \\EOT\EOT\DC4\STX\ETX\DC2\EOT\231\STX\EOT\CAN\SUB# The identity of the worker/client\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\ETX\ENQ\DC2\EOT\231\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\ETX\SOH\DC2\EOT\231\STX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\ETX\ETX\DC2\EOT\231\STX\SYN\ETB\n\
    \m\n\
    \\EOT\EOT\DC4\STX\EOT\DC2\EOT\234\STX\EOT\US\SUB_ DEPRECATED since 1.21 - use `worker_version_stamp` instead.\n\
    \ Worker process' unique binary id\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\EOT\ENQ\DC2\EOT\234\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\EOT\SOH\DC2\EOT\234\STX\v\SUB\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\EOT\ETX\DC2\EOT\234\STX\GS\RS\n\
    \\f\n\
    \\EOT\EOT\DC4\STX\ENQ\DC2\EOT\235\STX\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\ENQ\ENQ\DC2\EOT\235\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\ENQ\SOH\DC2\EOT\235\STX\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\ENQ\ETX\DC2\EOT\235\STX\ETB\CAN\n\
    \F\n\
    \\EOT\EOT\DC4\STX\ACK\DC2\EOT\237\STX\EOT;\SUB8 Protocol messages piggybacking on a WFT as a transport\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\ACK\EOT\DC2\EOT\237\STX\EOT\f\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\ACK\ACK\DC2\EOT\237\STX\r-\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\ACK\SOH\DC2\EOT\237\STX.6\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\ACK\ETX\DC2\EOT\237\STX9:\n\
    \\246\SOH\n\
    \\EOT\EOT\DC4\STX\a\DC2\EOT\241\STX\EOTA\SUB\231\SOH Version info of the worker who processed this task. This message's `build_id` field should\n\
    \ always be set by SDKs. Workers opting into versioning will also set the `use_versioning`\n\
    \ field to true. See message docstrings for more.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\a\ACK\DC2\EOT\241\STX\EOT-\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\a\SOH\DC2\EOT\241\STX.<\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\a\ETX\DC2\EOT\241\STX?@\n\
    \\f\n\
    \\STX\EOT\NAK\DC2\ACK\244\STX\NUL\245\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\NAK\SOH\DC2\EOT\244\STX\b)\n\
    \\f\n\
    \\STX\EOT\SYN\DC2\ACK\247\STX\NUL\128\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\SYN\SOH\DC2\EOT\247\STX\b$\n\
    \\f\n\
    \\EOT\EOT\SYN\STX\NUL\DC2\EOT\248\STX\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\NUL\ENQ\DC2\EOT\248\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\NUL\SOH\DC2\EOT\248\STX\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\NUL\ETX\DC2\EOT\248\STX\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\SYN\STX\SOH\DC2\EOT\249\STX\EOT7\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\SOH\ACK\DC2\EOT\249\STX\EOT'\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\SOH\SOH\DC2\EOT\249\STX(2\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\SOH\ETX\DC2\EOT\249\STX56\n\
    \1\n\
    \\EOT\EOT\SYN\STX\STX\DC2\EOT\251\STX\EOT\CAN\SUB# The identity of the worker/client\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\STX\ENQ\DC2\EOT\251\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\STX\SOH\DC2\EOT\251\STX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\STX\ETX\DC2\EOT\251\STX\SYN\ETB\n\
    \\f\n\
    \\EOT\EOT\SYN\STX\ETX\DC2\EOT\252\STX\EOTH\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\ETX\ACK\DC2\EOT\252\STX\EOT/\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\ETX\SOH\DC2\EOT\252\STX0C\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\ETX\ETX\DC2\EOT\252\STXFG\n\
    \\175\SOH\n\
    \\EOT\EOT\SYN\STX\EOT\DC2\EOT\255\STX\EOTU\SUB\160\SOH Information about this worker's build identifier and if it is choosing to use the versioning\n\
    \ feature. See the `WorkerVersionCapabilities` docstring for more.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\EOT\ACK\DC2\EOT\255\STX\EOT4\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\EOT\SOH\DC2\EOT\255\STX5P\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\EOT\ETX\DC2\EOT\255\STXST\n\
    \\f\n\
    \\STX\EOT\ETB\DC2\ACK\130\ETX\NUL\176\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\ETB\SOH\DC2\EOT\130\ETX\b%\n\
    \1\n\
    \\EOT\EOT\ETB\STX\NUL\DC2\EOT\132\ETX\EOT\EM\SUB# A unique identifier for this task\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\NUL\ENQ\DC2\EOT\132\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\NUL\SOH\DC2\EOT\132\ETX\n\
    \\DC4\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\NUL\ETX\DC2\EOT\132\ETX\ETB\CAN\n\
    \Q\n\
    \\EOT\EOT\ETB\STX\SOH\DC2\EOT\134\ETX\EOT\"\SUBC The namespace the workflow which requested this activity lives in\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\SOH\ENQ\DC2\EOT\134\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\SOH\SOH\DC2\EOT\134\ETX\v\GS\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\SOH\ETX\DC2\EOT\134\ETX !\n\
    \/\n\
    \\EOT\EOT\ETB\STX\STX\DC2\EOT\136\ETX\EOT:\SUB! Type of the requesting workflow\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\STX\ACK\DC2\EOT\136\ETX\EOT'\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\STX\SOH\DC2\EOT\136\ETX(5\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\STX\ETX\DC2\EOT\136\ETX89\n\
    \9\n\
    \\EOT\EOT\ETB\STX\ETX\DC2\EOT\138\ETX\EOTD\SUB+ Execution info of the requesting workflow\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\ETX\ACK\DC2\EOT\138\ETX\EOT,\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\ETX\SOH\DC2\EOT\138\ETX-?\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\ETX\ETX\DC2\EOT\138\ETXBC\n\
    \\f\n\
    \\EOT\EOT\ETB\STX\EOT\DC2\EOT\139\ETX\EOT:\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\EOT\ACK\DC2\EOT\139\ETX\EOT'\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\EOT\SOH\DC2\EOT\139\ETX(5\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\EOT\ETX\DC2\EOT\139\ETX89\n\
    \\148\STX\n\
    \\EOT\EOT\ETB\STX\ENQ\DC2\EOT\143\ETX\EOT\ESC\SUB\133\STX The autogenerated or user specified identifier of this activity. Can be used to complete the\n\
    \ activity via `RespondActivityTaskCompletedById`. May be re-used as long as the last usage\n\
    \ has resolved, but unique IDs for every activity invocation is a good idea.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\ENQ\ENQ\DC2\EOT\143\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\ENQ\SOH\DC2\EOT\143\ETX\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\ENQ\ETX\DC2\EOT\143\ETX\EM\SUB\n\
    \\174\SOH\n\
    \\EOT\EOT\ETB\STX\ACK\DC2\EOT\146\ETX\EOT-\SUB\159\SOH Headers specified by the scheduling workflow. Commonly used to propagate contextual info\n\
    \ from the workflow to its activities. For example, tracing contexts.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\ACK\ACK\DC2\EOT\146\ETX\EOT!\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\ACK\SOH\DC2\EOT\146\ETX\"(\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\ACK\ETX\DC2\EOT\146\ETX+,\n\
    \4\n\
    \\EOT\EOT\ETB\STX\a\DC2\EOT\148\ETX\EOT.\SUB& Arguments to the activity invocation\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\a\ACK\DC2\EOT\148\ETX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\a\SOH\DC2\EOT\148\ETX$)\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\a\ETX\DC2\EOT\148\ETX,-\n\
    \z\n\
    \\EOT\EOT\ETB\STX\b\DC2\EOT\151\ETX\EOT:\SUBl Details of the last heartbeat that was recorded for this activity as of the time this task\n\
    \ was delivered.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\b\ACK\DC2\EOT\151\ETX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\b\SOH\DC2\EOT\151\ETX$5\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\b\ETX\DC2\EOT\151\ETX89\n\
    \2\n\
    \\EOT\EOT\ETB\STX\t\DC2\EOT\153\ETX\EOT2\SUB$ When was this task first scheduled\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\t\ACK\DC2\EOT\153\ETX\EOT\GS\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\t\SOH\DC2\EOT\153\ETX\RS,\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\t\ETX\DC2\EOT\153\ETX/1\n\
    \4\n\
    \\EOT\EOT\ETB\STX\n\
    \\DC2\EOT\155\ETX\EOTB\SUB& When was this task attempt scheduled\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\n\
    \\ACK\DC2\EOT\155\ETX\EOT\GS\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\n\
    \\SOH\DC2\EOT\155\ETX\RS<\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\n\
    \\ETX\DC2\EOT\155\ETX?A\n\
    \9\n\
    \\EOT\EOT\ETB\STX\v\DC2\EOT\157\ETX\EOT0\SUB+ When was this task started (this attempt)\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\v\ACK\DC2\EOT\157\ETX\EOT\GS\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\v\SOH\DC2\EOT\157\ETX\RS*\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\v\ETX\DC2\EOT\157\ETX-/\n\
    \N\n\
    \\EOT\EOT\ETB\STX\f\DC2\EOT\159\ETX\EOT\ETB\SUB@ Starting at 1, the number of attempts to perform this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\f\ENQ\DC2\EOT\159\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\f\SOH\DC2\EOT\159\ETX\n\
    \\DC1\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\f\ETX\DC2\EOT\159\ETX\DC4\SYN\n\
    \\184\SOH\n\
    \\EOT\EOT\ETB\STX\r\DC2\EOT\164\ETX\EOT<\SUB\169\SOH First scheduled -> final result reported timeout\n\
    \\n\
    \ (-- api-linter: core::0140::prepositions=disabled\n\
    \     aip.dev/not-precedent: \"to\" is used to indicate interval. --)\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\r\ACK\DC2\EOT\164\ETX\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\r\SOH\DC2\EOT\164\ETX\GS6\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\r\ETX\DC2\EOT\164\ETX9;\n\
    \\190\SOH\n\
    \\EOT\EOT\ETB\STX\SO\DC2\EOT\169\ETX\EOT9\SUB\175\SOH Current attempt start -> final result reported timeout\n\
    \\n\
    \ (-- api-linter: core::0140::prepositions=disabled\n\
    \     aip.dev/not-precedent: \"to\" is used to indicate interval. --)\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\SO\ACK\DC2\EOT\169\ETX\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\SO\SOH\DC2\EOT\169\ETX\GS3\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\SO\ETX\DC2\EOT\169\ETX68\n\
    \Z\n\
    \\EOT\EOT\ETB\STX\SI\DC2\EOT\171\ETX\EOT4\SUBL Window within which the activity must report a heartbeat, or be timed out.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\SI\ACK\DC2\EOT\171\ETX\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\SI\SOH\DC2\EOT\171\ETX\GS.\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\SI\ETX\DC2\EOT\171\ETX13\n\
    \\253\SOH\n\
    \\EOT\EOT\ETB\STX\DLE\DC2\EOT\175\ETX\EOT9\SUB\238\SOH This is the retry policy the service uses which may be different from the one provided\n\
    \ (or not) during activity scheduling. The service can override the provided one if some\n\
    \ values are not specified or exceed configured system limits.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\DLE\ACK\DC2\EOT\175\ETX\EOT&\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\DLE\SOH\DC2\EOT\175\ETX'3\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\DLE\ETX\DC2\EOT\175\ETX68\n\
    \\f\n\
    \\STX\EOT\CAN\DC2\ACK\178\ETX\NUL\186\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\CAN\SOH\DC2\EOT\178\ETX\b*\n\
    \M\n\
    \\EOT\EOT\CAN\STX\NUL\DC2\EOT\180\ETX\EOT\EM\SUB? The task token as received in `PollActivityTaskQueueResponse`\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\NUL\ENQ\DC2\EOT\180\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\NUL\SOH\DC2\EOT\180\ETX\n\
    \\DC4\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\NUL\ETX\DC2\EOT\180\ETX\ETB\CAN\n\
    \a\n\
    \\EOT\EOT\CAN\STX\SOH\DC2\EOT\182\ETX\EOT0\SUBS Arbitrary data, of which the most recent call is kept, to store for this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\SOH\ACK\DC2\EOT\182\ETX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\SOH\SOH\DC2\EOT\182\ETX$+\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\SOH\ETX\DC2\EOT\182\ETX./\n\
    \1\n\
    \\EOT\EOT\CAN\STX\STX\DC2\EOT\184\ETX\EOT\CAN\SUB# The identity of the worker/client\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\STX\ENQ\DC2\EOT\184\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\STX\SOH\DC2\EOT\184\ETX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\STX\ETX\DC2\EOT\184\ETX\SYN\ETB\n\
    \\f\n\
    \\EOT\EOT\CAN\STX\ETX\DC2\EOT\185\ETX\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\ETX\ENQ\DC2\EOT\185\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\ETX\SOH\DC2\EOT\185\ETX\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\ETX\ETX\DC2\EOT\185\ETX\ETB\CAN\n\
    \\f\n\
    \\STX\EOT\EM\DC2\ACK\188\ETX\NUL\192\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\EM\SOH\DC2\EOT\188\ETX\b+\n\
    \\166\SOH\n\
    \\EOT\EOT\EM\STX\NUL\DC2\EOT\191\ETX\EOT\RS\SUB\151\SOH Will be set to true if the activity has been asked to cancel itself. The SDK should then\n\
    \ notify the activity of cancellation if it is still running.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\NUL\ENQ\DC2\EOT\191\ETX\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\NUL\SOH\DC2\EOT\191\ETX\t\EM\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\NUL\ETX\DC2\EOT\191\ETX\FS\GS\n\
    \\f\n\
    \\STX\EOT\SUB\DC2\ACK\194\ETX\NUL\207\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\SUB\SOH\DC2\EOT\194\ETX\b.\n\
    \G\n\
    \\EOT\EOT\SUB\STX\NUL\DC2\EOT\196\ETX\EOT\EM\SUB9 Namespace of the workflow which scheduled this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\NUL\ENQ\DC2\EOT\196\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\NUL\SOH\DC2\EOT\196\ETX\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\NUL\ETX\DC2\EOT\196\ETX\ETB\CAN\n\
    \@\n\
    \\EOT\EOT\SUB\STX\SOH\DC2\EOT\198\ETX\EOT\ESC\SUB2 Id of the workflow which scheduled this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\SOH\ENQ\DC2\EOT\198\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\SOH\SOH\DC2\EOT\198\ETX\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\SOH\ETX\DC2\EOT\198\ETX\EM\SUB\n\
    \D\n\
    \\EOT\EOT\SUB\STX\STX\DC2\EOT\200\ETX\EOT\SYN\SUB6 Run Id of the workflow which scheduled this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\STX\ENQ\DC2\EOT\200\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\STX\SOH\DC2\EOT\200\ETX\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\STX\ETX\DC2\EOT\200\ETX\DC4\NAK\n\
    \5\n\
    \\EOT\EOT\SUB\STX\ETX\DC2\EOT\202\ETX\EOT\ESC\SUB' Id of the activity we're heartbeating\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\ETX\ENQ\DC2\EOT\202\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\ETX\SOH\DC2\EOT\202\ETX\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\ETX\ETX\DC2\EOT\202\ETX\EM\SUB\n\
    \a\n\
    \\EOT\EOT\SUB\STX\EOT\DC2\EOT\204\ETX\EOT0\SUBS Arbitrary data, of which the most recent call is kept, to store for this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\EOT\ACK\DC2\EOT\204\ETX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\EOT\SOH\DC2\EOT\204\ETX$+\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\EOT\ETX\DC2\EOT\204\ETX./\n\
    \1\n\
    \\EOT\EOT\SUB\STX\ENQ\DC2\EOT\206\ETX\EOT\CAN\SUB# The identity of the worker/client\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\ENQ\ENQ\DC2\EOT\206\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\ENQ\SOH\DC2\EOT\206\ETX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\ENQ\ETX\DC2\EOT\206\ETX\SYN\ETB\n\
    \\f\n\
    \\STX\EOT\ESC\DC2\ACK\209\ETX\NUL\213\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\ESC\SOH\DC2\EOT\209\ETX\b/\n\
    \\166\SOH\n\
    \\EOT\EOT\ESC\STX\NUL\DC2\EOT\212\ETX\EOT\RS\SUB\151\SOH Will be set to true if the activity has been asked to cancel itself. The SDK should then\n\
    \ notify the activity of cancellation if it is still running.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ESC\STX\NUL\ENQ\DC2\EOT\212\ETX\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\ESC\STX\NUL\SOH\DC2\EOT\212\ETX\t\EM\n\
    \\r\n\
    \\ENQ\EOT\ESC\STX\NUL\ETX\DC2\EOT\212\ETX\FS\GS\n\
    \\f\n\
    \\STX\EOT\FS\DC2\ACK\215\ETX\NUL\227\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\FS\SOH\DC2\EOT\215\ETX\b+\n\
    \M\n\
    \\EOT\EOT\FS\STX\NUL\DC2\EOT\217\ETX\EOT\EM\SUB? The task token as received in `PollActivityTaskQueueResponse`\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\NUL\ENQ\DC2\EOT\217\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\NUL\SOH\DC2\EOT\217\ETX\n\
    \\DC4\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\NUL\ETX\DC2\EOT\217\ETX\ETB\CAN\n\
    \A\n\
    \\EOT\EOT\FS\STX\SOH\DC2\EOT\219\ETX\EOT/\SUB3 The result of successfully executing the activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\SOH\ACK\DC2\EOT\219\ETX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\SOH\SOH\DC2\EOT\219\ETX$*\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\SOH\ETX\DC2\EOT\219\ETX-.\n\
    \1\n\
    \\EOT\EOT\FS\STX\STX\DC2\EOT\221\ETX\EOT\CAN\SUB# The identity of the worker/client\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\STX\ENQ\DC2\EOT\221\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\STX\SOH\DC2\EOT\221\ETX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\STX\ETX\DC2\EOT\221\ETX\SYN\ETB\n\
    \\f\n\
    \\EOT\EOT\FS\STX\ETX\DC2\EOT\222\ETX\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\ETX\ENQ\DC2\EOT\222\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\ETX\SOH\DC2\EOT\222\ETX\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\ETX\ETX\DC2\EOT\222\ETX\ETB\CAN\n\
    \\246\SOH\n\
    \\EOT\EOT\FS\STX\EOT\DC2\EOT\226\ETX\EOTA\SUB\231\SOH Version info of the worker who processed this task. This message's `build_id` field should\n\
    \ always be set by SDKs. Workers opting into versioning will also set the `use_versioning`\n\
    \ field to true. See message docstrings for more.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\EOT\ACK\DC2\EOT\226\ETX\EOT-\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\EOT\SOH\DC2\EOT\226\ETX.<\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\EOT\ETX\DC2\EOT\226\ETX?@\n\
    \\f\n\
    \\STX\EOT\GS\DC2\ACK\229\ETX\NUL\230\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\GS\SOH\DC2\EOT\229\ETX\b,\n\
    \\f\n\
    \\STX\EOT\RS\DC2\ACK\232\ETX\NUL\245\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\RS\SOH\DC2\EOT\232\ETX\b/\n\
    \G\n\
    \\EOT\EOT\RS\STX\NUL\DC2\EOT\234\ETX\EOT\EM\SUB9 Namespace of the workflow which scheduled this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\NUL\ENQ\DC2\EOT\234\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\NUL\SOH\DC2\EOT\234\ETX\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\NUL\ETX\DC2\EOT\234\ETX\ETB\CAN\n\
    \@\n\
    \\EOT\EOT\RS\STX\SOH\DC2\EOT\236\ETX\EOT\ESC\SUB2 Id of the workflow which scheduled this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\SOH\ENQ\DC2\EOT\236\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\SOH\SOH\DC2\EOT\236\ETX\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\SOH\ETX\DC2\EOT\236\ETX\EM\SUB\n\
    \D\n\
    \\EOT\EOT\RS\STX\STX\DC2\EOT\238\ETX\EOT\SYN\SUB6 Run Id of the workflow which scheduled this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\STX\ENQ\DC2\EOT\238\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\STX\SOH\DC2\EOT\238\ETX\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\STX\ETX\DC2\EOT\238\ETX\DC4\NAK\n\
    \.\n\
    \\EOT\EOT\RS\STX\ETX\DC2\EOT\240\ETX\EOT\ESC\SUB  Id of the activity to complete\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\ETX\ENQ\DC2\EOT\240\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\ETX\SOH\DC2\EOT\240\ETX\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\ETX\ETX\DC2\EOT\240\ETX\EM\SUB\n\
    \;\n\
    \\EOT\EOT\RS\STX\EOT\DC2\EOT\242\ETX\EOT/\SUB- The serialized result of activity execution\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\EOT\ACK\DC2\EOT\242\ETX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\EOT\SOH\DC2\EOT\242\ETX$*\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\EOT\ETX\DC2\EOT\242\ETX-.\n\
    \1\n\
    \\EOT\EOT\RS\STX\ENQ\DC2\EOT\244\ETX\EOT\CAN\SUB# The identity of the worker/client\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\ENQ\ENQ\DC2\EOT\244\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\ENQ\SOH\DC2\EOT\244\ETX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\ENQ\ETX\DC2\EOT\244\ETX\SYN\ETB\n\
    \\f\n\
    \\STX\EOT\US\DC2\ACK\247\ETX\NUL\248\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\US\SOH\DC2\EOT\247\ETX\b0\n\
    \\f\n\
    \\STX\EOT \DC2\ACK\250\ETX\NUL\136\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT \SOH\DC2\EOT\250\ETX\b(\n\
    \M\n\
    \\EOT\EOT \STX\NUL\DC2\EOT\252\ETX\EOT\EM\SUB? The task token as received in `PollActivityTaskQueueResponse`\n\
    \\n\
    \\r\n\
    \\ENQ\EOT \STX\NUL\ENQ\DC2\EOT\252\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT \STX\NUL\SOH\DC2\EOT\252\ETX\n\
    \\DC4\n\
    \\r\n\
    \\ENQ\EOT \STX\NUL\ETX\DC2\EOT\252\ETX\ETB\CAN\n\
    \,\n\
    \\EOT\EOT \STX\SOH\DC2\EOT\254\ETX\EOT0\SUB\RS Detailed failure information\n\
    \\n\
    \\r\n\
    \\ENQ\EOT \STX\SOH\ACK\DC2\EOT\254\ETX\EOT#\n\
    \\r\n\
    \\ENQ\EOT \STX\SOH\SOH\DC2\EOT\254\ETX$+\n\
    \\r\n\
    \\ENQ\EOT \STX\SOH\ETX\DC2\EOT\254\ETX./\n\
    \1\n\
    \\EOT\EOT \STX\STX\DC2\EOT\128\EOT\EOT\CAN\SUB# The identity of the worker/client\n\
    \\n\
    \\r\n\
    \\ENQ\EOT \STX\STX\ENQ\DC2\EOT\128\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT \STX\STX\SOH\DC2\EOT\128\EOT\v\DC3\n\
    \\r\n\
    \\ENQ\EOT \STX\STX\ETX\DC2\EOT\128\EOT\SYN\ETB\n\
    \\f\n\
    \\EOT\EOT \STX\ETX\DC2\EOT\129\EOT\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT \STX\ETX\ENQ\DC2\EOT\129\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT \STX\ETX\SOH\DC2\EOT\129\EOT\v\DC4\n\
    \\r\n\
    \\ENQ\EOT \STX\ETX\ETX\DC2\EOT\129\EOT\ETB\CAN\n\
    \J\n\
    \\EOT\EOT \STX\EOT\DC2\EOT\131\EOT\EOT?\SUB< Additional details to be stored as last activity heartbeat\n\
    \\n\
    \\r\n\
    \\ENQ\EOT \STX\EOT\ACK\DC2\EOT\131\EOT\EOT#\n\
    \\r\n\
    \\ENQ\EOT \STX\EOT\SOH\DC2\EOT\131\EOT$:\n\
    \\r\n\
    \\ENQ\EOT \STX\EOT\ETX\DC2\EOT\131\EOT=>\n\
    \\246\SOH\n\
    \\EOT\EOT \STX\ENQ\DC2\EOT\135\EOT\EOTA\SUB\231\SOH Version info of the worker who processed this task. This message's `build_id` field should\n\
    \ always be set by SDKs. Workers opting into versioning will also set the `use_versioning`\n\
    \ field to true. See message docstrings for more.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT \STX\ENQ\ACK\DC2\EOT\135\EOT\EOT-\n\
    \\r\n\
    \\ENQ\EOT \STX\ENQ\SOH\DC2\EOT\135\EOT.<\n\
    \\r\n\
    \\ENQ\EOT \STX\ENQ\ETX\DC2\EOT\135\EOT?@\n\
    \\f\n\
    \\STX\EOT!\DC2\ACK\138\EOT\NUL\142\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT!\SOH\DC2\EOT\138\EOT\b)\n\
    \\131\SOH\n\
    \\EOT\EOT!\STX\NUL\DC2\EOT\141\EOT\EOT:\SUBu Server validation failures could include\n\
    \ last_heartbeat_details payload is too large, request failure is too large\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\NUL\EOT\DC2\EOT\141\EOT\EOT\f\n\
    \\r\n\
    \\ENQ\EOT!\STX\NUL\ACK\DC2\EOT\141\EOT\r,\n\
    \\r\n\
    \\ENQ\EOT!\STX\NUL\SOH\DC2\EOT\141\EOT-5\n\
    \\r\n\
    \\ENQ\EOT!\STX\NUL\ETX\DC2\EOT\141\EOT89\n\
    \\f\n\
    \\STX\EOT\"\DC2\ACK\144\EOT\NUL\159\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT\"\SOH\DC2\EOT\144\EOT\b,\n\
    \G\n\
    \\EOT\EOT\"\STX\NUL\DC2\EOT\146\EOT\EOT\EM\SUB9 Namespace of the workflow which scheduled this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\NUL\ENQ\DC2\EOT\146\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\NUL\SOH\DC2\EOT\146\EOT\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\"\STX\NUL\ETX\DC2\EOT\146\EOT\ETB\CAN\n\
    \@\n\
    \\EOT\EOT\"\STX\SOH\DC2\EOT\148\EOT\EOT\ESC\SUB2 Id of the workflow which scheduled this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\SOH\ENQ\DC2\EOT\148\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\SOH\SOH\DC2\EOT\148\EOT\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\"\STX\SOH\ETX\DC2\EOT\148\EOT\EM\SUB\n\
    \D\n\
    \\EOT\EOT\"\STX\STX\DC2\EOT\150\EOT\EOT\SYN\SUB6 Run Id of the workflow which scheduled this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\STX\ENQ\DC2\EOT\150\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\STX\SOH\DC2\EOT\150\EOT\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\"\STX\STX\ETX\DC2\EOT\150\EOT\DC4\NAK\n\
    \*\n\
    \\EOT\EOT\"\STX\ETX\DC2\EOT\152\EOT\EOT\ESC\SUB\FS Id of the activity to fail\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ETX\ENQ\DC2\EOT\152\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ETX\SOH\DC2\EOT\152\EOT\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ETX\ETX\DC2\EOT\152\EOT\EM\SUB\n\
    \,\n\
    \\EOT\EOT\"\STX\EOT\DC2\EOT\154\EOT\EOT0\SUB\RS Detailed failure information\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\EOT\ACK\DC2\EOT\154\EOT\EOT#\n\
    \\r\n\
    \\ENQ\EOT\"\STX\EOT\SOH\DC2\EOT\154\EOT$+\n\
    \\r\n\
    \\ENQ\EOT\"\STX\EOT\ETX\DC2\EOT\154\EOT./\n\
    \1\n\
    \\EOT\EOT\"\STX\ENQ\DC2\EOT\156\EOT\EOT\CAN\SUB# The identity of the worker/client\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ENQ\ENQ\DC2\EOT\156\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ENQ\SOH\DC2\EOT\156\EOT\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ENQ\ETX\DC2\EOT\156\EOT\SYN\ETB\n\
    \J\n\
    \\EOT\EOT\"\STX\ACK\DC2\EOT\158\EOT\EOT?\SUB< Additional details to be stored as last activity heartbeat\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ACK\ACK\DC2\EOT\158\EOT\EOT#\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ACK\SOH\DC2\EOT\158\EOT$:\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ACK\ETX\DC2\EOT\158\EOT=>\n\
    \\f\n\
    \\STX\EOT#\DC2\ACK\161\EOT\NUL\165\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT#\SOH\DC2\EOT\161\EOT\b-\n\
    \\131\SOH\n\
    \\EOT\EOT#\STX\NUL\DC2\EOT\164\EOT\EOT:\SUBu Server validation failures could include\n\
    \ last_heartbeat_details payload is too large, request failure is too large\n\
    \\n\
    \\r\n\
    \\ENQ\EOT#\STX\NUL\EOT\DC2\EOT\164\EOT\EOT\f\n\
    \\r\n\
    \\ENQ\EOT#\STX\NUL\ACK\DC2\EOT\164\EOT\r,\n\
    \\r\n\
    \\ENQ\EOT#\STX\NUL\SOH\DC2\EOT\164\EOT-5\n\
    \\r\n\
    \\ENQ\EOT#\STX\NUL\ETX\DC2\EOT\164\EOT89\n\
    \\f\n\
    \\STX\EOT$\DC2\ACK\167\EOT\NUL\179\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT$\SOH\DC2\EOT\167\EOT\b*\n\
    \M\n\
    \\EOT\EOT$\STX\NUL\DC2\EOT\169\EOT\EOT\EM\SUB? The task token as received in `PollActivityTaskQueueResponse`\n\
    \\n\
    \\r\n\
    \\ENQ\EOT$\STX\NUL\ENQ\DC2\EOT\169\EOT\EOT\t\n\
    \\r\n\
    \\ENQ\EOT$\STX\NUL\SOH\DC2\EOT\169\EOT\n\
    \\DC4\n\
    \\r\n\
    \\ENQ\EOT$\STX\NUL\ETX\DC2\EOT\169\EOT\ETB\CAN\n\
    \O\n\
    \\EOT\EOT$\STX\SOH\DC2\EOT\171\EOT\EOT0\SUBA Serialized additional information to attach to the cancellation\n\
    \\n\
    \\r\n\
    \\ENQ\EOT$\STX\SOH\ACK\DC2\EOT\171\EOT\EOT#\n\
    \\r\n\
    \\ENQ\EOT$\STX\SOH\SOH\DC2\EOT\171\EOT$+\n\
    \\r\n\
    \\ENQ\EOT$\STX\SOH\ETX\DC2\EOT\171\EOT./\n\
    \1\n\
    \\EOT\EOT$\STX\STX\DC2\EOT\173\EOT\EOT\CAN\SUB# The identity of the worker/client\n\
    \\n\
    \\r\n\
    \\ENQ\EOT$\STX\STX\ENQ\DC2\EOT\173\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT$\STX\STX\SOH\DC2\EOT\173\EOT\v\DC3\n\
    \\r\n\
    \\ENQ\EOT$\STX\STX\ETX\DC2\EOT\173\EOT\SYN\ETB\n\
    \\f\n\
    \\EOT\EOT$\STX\ETX\DC2\EOT\174\EOT\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT$\STX\ETX\ENQ\DC2\EOT\174\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT$\STX\ETX\SOH\DC2\EOT\174\EOT\v\DC4\n\
    \\r\n\
    \\ENQ\EOT$\STX\ETX\ETX\DC2\EOT\174\EOT\ETB\CAN\n\
    \\246\SOH\n\
    \\EOT\EOT$\STX\EOT\DC2\EOT\178\EOT\EOTA\SUB\231\SOH Version info of the worker who processed this task. This message's `build_id` field should\n\
    \ always be set by SDKs. Workers opting into versioning will also set the `use_versioning`\n\
    \ field to true. See message docstrings for more.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT$\STX\EOT\ACK\DC2\EOT\178\EOT\EOT-\n\
    \\r\n\
    \\ENQ\EOT$\STX\EOT\SOH\DC2\EOT\178\EOT.<\n\
    \\r\n\
    \\ENQ\EOT$\STX\EOT\ETX\DC2\EOT\178\EOT?@\n\
    \\f\n\
    \\STX\EOT%\DC2\ACK\181\EOT\NUL\182\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT%\SOH\DC2\EOT\181\EOT\b+\n\
    \\f\n\
    \\STX\EOT&\DC2\ACK\184\EOT\NUL\197\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT&\SOH\DC2\EOT\184\EOT\b.\n\
    \G\n\
    \\EOT\EOT&\STX\NUL\DC2\EOT\186\EOT\EOT\EM\SUB9 Namespace of the workflow which scheduled this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\NUL\ENQ\DC2\EOT\186\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\NUL\SOH\DC2\EOT\186\EOT\v\DC4\n\
    \\r\n\
    \\ENQ\EOT&\STX\NUL\ETX\DC2\EOT\186\EOT\ETB\CAN\n\
    \@\n\
    \\EOT\EOT&\STX\SOH\DC2\EOT\188\EOT\EOT\ESC\SUB2 Id of the workflow which scheduled this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\SOH\ENQ\DC2\EOT\188\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\SOH\SOH\DC2\EOT\188\EOT\v\SYN\n\
    \\r\n\
    \\ENQ\EOT&\STX\SOH\ETX\DC2\EOT\188\EOT\EM\SUB\n\
    \D\n\
    \\EOT\EOT&\STX\STX\DC2\EOT\190\EOT\EOT\SYN\SUB6 Run Id of the workflow which scheduled this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\STX\ENQ\DC2\EOT\190\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\STX\SOH\DC2\EOT\190\EOT\v\DC1\n\
    \\r\n\
    \\ENQ\EOT&\STX\STX\ETX\DC2\EOT\190\EOT\DC4\NAK\n\
    \:\n\
    \\EOT\EOT&\STX\ETX\DC2\EOT\192\EOT\EOT\ESC\SUB, Id of the activity to confirm is cancelled\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\ETX\ENQ\DC2\EOT\192\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\ETX\SOH\DC2\EOT\192\EOT\v\SYN\n\
    \\r\n\
    \\ENQ\EOT&\STX\ETX\ETX\DC2\EOT\192\EOT\EM\SUB\n\
    \O\n\
    \\EOT\EOT&\STX\EOT\DC2\EOT\194\EOT\EOT0\SUBA Serialized additional information to attach to the cancellation\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\EOT\ACK\DC2\EOT\194\EOT\EOT#\n\
    \\r\n\
    \\ENQ\EOT&\STX\EOT\SOH\DC2\EOT\194\EOT$+\n\
    \\r\n\
    \\ENQ\EOT&\STX\EOT\ETX\DC2\EOT\194\EOT./\n\
    \1\n\
    \\EOT\EOT&\STX\ENQ\DC2\EOT\196\EOT\EOT\CAN\SUB# The identity of the worker/client\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\ENQ\ENQ\DC2\EOT\196\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\ENQ\SOH\DC2\EOT\196\EOT\v\DC3\n\
    \\r\n\
    \\ENQ\EOT&\STX\ENQ\ETX\DC2\EOT\196\EOT\SYN\ETB\n\
    \\f\n\
    \\STX\EOT'\DC2\ACK\199\EOT\NUL\200\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT'\SOH\DC2\EOT\199\EOT\b/\n\
    \\f\n\
    \\STX\EOT(\DC2\ACK\202\EOT\NUL\215\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT(\SOH\DC2\EOT\202\EOT\b-\n\
    \\f\n\
    \\EOT\EOT(\STX\NUL\DC2\EOT\203\EOT\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT(\STX\NUL\ENQ\DC2\EOT\203\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT(\STX\NUL\SOH\DC2\EOT\203\EOT\v\DC4\n\
    \\r\n\
    \\ENQ\EOT(\STX\NUL\ETX\DC2\EOT\203\EOT\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT(\STX\SOH\DC2\EOT\204\EOT\EOTD\n\
    \\r\n\
    \\ENQ\EOT(\STX\SOH\ACK\DC2\EOT\204\EOT\EOT,\n\
    \\r\n\
    \\ENQ\EOT(\STX\SOH\SOH\DC2\EOT\204\EOT-?\n\
    \\r\n\
    \\ENQ\EOT(\STX\SOH\ETX\DC2\EOT\204\EOTBC\n\
    \1\n\
    \\EOT\EOT(\STX\STX\DC2\EOT\206\EOT\EOT\CAN\SUB# The identity of the worker/client\n\
    \\n\
    \\r\n\
    \\ENQ\EOT(\STX\STX\ENQ\DC2\EOT\206\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT(\STX\STX\SOH\DC2\EOT\206\EOT\v\DC3\n\
    \\r\n\
    \\ENQ\EOT(\STX\STX\ETX\DC2\EOT\206\EOT\SYN\ETB\n\
    \5\n\
    \\EOT\EOT(\STX\ETX\DC2\EOT\208\EOT\EOT\SUB\SUB' Used to de-dupe cancellation requests\n\
    \\n\
    \\r\n\
    \\ENQ\EOT(\STX\ETX\ENQ\DC2\EOT\208\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT(\STX\ETX\SOH\DC2\EOT\208\EOT\v\NAK\n\
    \\r\n\
    \\ENQ\EOT(\STX\ETX\ETX\DC2\EOT\208\EOT\CAN\EM\n\
    \\208\SOH\n\
    \\EOT\EOT(\STX\EOT\DC2\EOT\212\EOT\EOT&\SUB\193\SOH If set, this call will error if the most recent (if no run id is set on\n\
    \ `workflow_execution`), or specified (if it is) workflow execution is not part of the same\n\
    \ execution chain as this id.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT(\STX\EOT\ENQ\DC2\EOT\212\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT(\STX\EOT\SOH\DC2\EOT\212\EOT\v!\n\
    \\r\n\
    \\ENQ\EOT(\STX\EOT\ETX\DC2\EOT\212\EOT$%\n\
    \6\n\
    \\EOT\EOT(\STX\ENQ\DC2\EOT\214\EOT\EOT\SYN\SUB( Reason for requesting the cancellation\n\
    \\n\
    \\r\n\
    \\ENQ\EOT(\STX\ENQ\ENQ\DC2\EOT\214\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT(\STX\ENQ\SOH\DC2\EOT\214\EOT\v\DC1\n\
    \\r\n\
    \\ENQ\EOT(\STX\ENQ\ETX\DC2\EOT\214\EOT\DC4\NAK\n\
    \\f\n\
    \\STX\EOT)\DC2\ACK\217\EOT\NUL\218\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT)\SOH\DC2\EOT\217\EOT\b.\n\
    \\f\n\
    \\STX\EOT*\DC2\ACK\220\EOT\NUL\238\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT*\SOH\DC2\EOT\220\EOT\b&\n\
    \\f\n\
    \\EOT\EOT*\STX\NUL\DC2\EOT\221\EOT\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT*\STX\NUL\ENQ\DC2\EOT\221\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT*\STX\NUL\SOH\DC2\EOT\221\EOT\v\DC4\n\
    \\r\n\
    \\ENQ\EOT*\STX\NUL\ETX\DC2\EOT\221\EOT\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT*\STX\SOH\DC2\EOT\222\EOT\EOTD\n\
    \\r\n\
    \\ENQ\EOT*\STX\SOH\ACK\DC2\EOT\222\EOT\EOT,\n\
    \\r\n\
    \\ENQ\EOT*\STX\SOH\SOH\DC2\EOT\222\EOT-?\n\
    \\r\n\
    \\ENQ\EOT*\STX\SOH\ETX\DC2\EOT\222\EOTBC\n\
    \V\n\
    \\EOT\EOT*\STX\STX\DC2\EOT\224\EOT\EOT\ESC\SUBH The workflow author-defined name of the signal to send to the workflow\n\
    \\n\
    \\r\n\
    \\ENQ\EOT*\STX\STX\ENQ\DC2\EOT\224\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT*\STX\STX\SOH\DC2\EOT\224\EOT\v\SYN\n\
    \\r\n\
    \\ENQ\EOT*\STX\STX\ETX\DC2\EOT\224\EOT\EM\SUB\n\
    \>\n\
    \\EOT\EOT*\STX\ETX\DC2\EOT\226\EOT\EOT.\SUB0 Serialized value(s) to provide with the signal\n\
    \\n\
    \\r\n\
    \\ENQ\EOT*\STX\ETX\ACK\DC2\EOT\226\EOT\EOT#\n\
    \\r\n\
    \\ENQ\EOT*\STX\ETX\SOH\DC2\EOT\226\EOT$)\n\
    \\r\n\
    \\ENQ\EOT*\STX\ETX\ETX\DC2\EOT\226\EOT,-\n\
    \1\n\
    \\EOT\EOT*\STX\EOT\DC2\EOT\228\EOT\EOT\CAN\SUB# The identity of the worker/client\n\
    \\n\
    \\r\n\
    \\ENQ\EOT*\STX\EOT\ENQ\DC2\EOT\228\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT*\STX\EOT\SOH\DC2\EOT\228\EOT\v\DC3\n\
    \\r\n\
    \\ENQ\EOT*\STX\EOT\ETX\DC2\EOT\228\EOT\SYN\ETB\n\
    \,\n\
    \\EOT\EOT*\STX\ENQ\DC2\EOT\230\EOT\EOT\SUB\SUB\RS Used to de-dupe sent signals\n\
    \\n\
    \\r\n\
    \\ENQ\EOT*\STX\ENQ\ENQ\DC2\EOT\230\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT*\STX\ENQ\SOH\DC2\EOT\230\EOT\v\NAK\n\
    \\r\n\
    \\ENQ\EOT*\STX\ENQ\ETX\DC2\EOT\230\EOT\CAN\EM\n\
    \\SUB\n\
    \\EOT\EOT*\STX\ACK\DC2\EOT\232\EOT\EOT\ETB\SUB\f Deprecated\n\
    \\n\
    \\r\n\
    \\ENQ\EOT*\STX\ACK\ENQ\DC2\EOT\232\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT*\STX\ACK\SOH\DC2\EOT\232\EOT\v\DC2\n\
    \\r\n\
    \\ENQ\EOT*\STX\ACK\ETX\DC2\EOT\232\EOT\NAK\SYN\n\
    \\138\SOH\n\
    \\EOT\EOT*\STX\a\DC2\EOT\235\EOT\EOT-\SUB| Headers that are passed with the signal to the processing workflow.\n\
    \ These can include things like auth or tracing tokens.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT*\STX\a\ACK\DC2\EOT\235\EOT\EOT!\n\
    \\r\n\
    \\ENQ\EOT*\STX\a\SOH\DC2\EOT\235\EOT\"(\n\
    \\r\n\
    \\ENQ\EOT*\STX\a\ETX\DC2\EOT\235\EOT+,\n\
    \h\n\
    \\EOT\EOT*\STX\b\DC2\EOT\237\EOT\EOT)\SUBZ Indicates that a new workflow task should not be generated when this signal is received.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT*\STX\b\ENQ\DC2\EOT\237\EOT\EOT\b\n\
    \\r\n\
    \\ENQ\EOT*\STX\b\SOH\DC2\EOT\237\EOT\t$\n\
    \\r\n\
    \\ENQ\EOT*\STX\b\ETX\DC2\EOT\237\EOT'(\n\
    \\f\n\
    \\STX\EOT+\DC2\ACK\240\EOT\NUL\241\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT+\SOH\DC2\EOT\240\EOT\b'\n\
    \\f\n\
    \\STX\EOT,\DC2\ACK\243\EOT\NUL\166\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT,\SOH\DC2\EOT\243\EOT\b/\n\
    \\f\n\
    \\EOT\EOT,\STX\NUL\DC2\EOT\244\EOT\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT,\STX\NUL\ENQ\DC2\EOT\244\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\NUL\SOH\DC2\EOT\244\EOT\v\DC4\n\
    \\r\n\
    \\ENQ\EOT,\STX\NUL\ETX\DC2\EOT\244\EOT\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT,\STX\SOH\DC2\EOT\245\EOT\EOT\ESC\n\
    \\r\n\
    \\ENQ\EOT,\STX\SOH\ENQ\DC2\EOT\245\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\SOH\SOH\DC2\EOT\245\EOT\v\SYN\n\
    \\r\n\
    \\ENQ\EOT,\STX\SOH\ETX\DC2\EOT\245\EOT\EM\SUB\n\
    \\f\n\
    \\EOT\EOT,\STX\STX\DC2\EOT\246\EOT\EOT:\n\
    \\r\n\
    \\ENQ\EOT,\STX\STX\ACK\DC2\EOT\246\EOT\EOT'\n\
    \\r\n\
    \\ENQ\EOT,\STX\STX\SOH\DC2\EOT\246\EOT(5\n\
    \\r\n\
    \\ENQ\EOT,\STX\STX\ETX\DC2\EOT\246\EOT89\n\
    \O\n\
    \\EOT\EOT,\STX\ETX\DC2\EOT\248\EOT\EOT7\SUBA The task queue to start this workflow on, if it will be started\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\ETX\ACK\DC2\EOT\248\EOT\EOT'\n\
    \\r\n\
    \\ENQ\EOT,\STX\ETX\SOH\DC2\EOT\248\EOT(2\n\
    \\r\n\
    \\ENQ\EOT,\STX\ETX\ETX\DC2\EOT\248\EOT56\n\
    \m\n\
    \\EOT\EOT,\STX\EOT\DC2\EOT\250\EOT\EOT.\SUB_ Serialized arguments to the workflow. These are passed as arguments to the workflow function.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\EOT\ACK\DC2\EOT\250\EOT\EOT#\n\
    \\r\n\
    \\ENQ\EOT,\STX\EOT\SOH\DC2\EOT\250\EOT$)\n\
    \\r\n\
    \\ENQ\EOT,\STX\EOT\ETX\DC2\EOT\250\EOT,-\n\
    \V\n\
    \\EOT\EOT,\STX\ENQ\DC2\EOT\252\EOT\EOT<\SUBH Total workflow execution timeout including retries and continue as new\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\ENQ\ACK\DC2\EOT\252\EOT\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT,\STX\ENQ\SOH\DC2\EOT\252\EOT\GS7\n\
    \\r\n\
    \\ENQ\EOT,\STX\ENQ\ETX\DC2\EOT\252\EOT:;\n\
    \0\n\
    \\EOT\EOT,\STX\ACK\DC2\EOT\254\EOT\EOT6\SUB\" Timeout of a single workflow run\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\ACK\ACK\DC2\EOT\254\EOT\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT,\STX\ACK\SOH\DC2\EOT\254\EOT\GS1\n\
    \\r\n\
    \\ENQ\EOT,\STX\ACK\ETX\DC2\EOT\254\EOT45\n\
    \1\n\
    \\EOT\EOT,\STX\a\DC2\EOT\128\ENQ\EOT7\SUB# Timeout of a single workflow task\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\a\ACK\DC2\EOT\128\ENQ\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT,\STX\a\SOH\DC2\EOT\128\ENQ\GS2\n\
    \\r\n\
    \\ENQ\EOT,\STX\a\ETX\DC2\EOT\128\ENQ56\n\
    \1\n\
    \\EOT\EOT,\STX\b\DC2\EOT\130\ENQ\EOT\CAN\SUB# The identity of the worker/client\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\b\ENQ\DC2\EOT\130\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\b\SOH\DC2\EOT\130\ENQ\v\DC3\n\
    \\r\n\
    \\ENQ\EOT,\STX\b\ETX\DC2\EOT\130\ENQ\SYN\ETB\n\
    \8\n\
    \\EOT\EOT,\STX\t\DC2\EOT\132\ENQ\EOT\ESC\SUB* Used to de-dupe signal w/ start requests\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\t\ENQ\DC2\EOT\132\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\t\SOH\DC2\EOT\132\ENQ\v\NAK\n\
    \\r\n\
    \\ENQ\EOT,\STX\t\ETX\DC2\EOT\132\ENQ\CAN\SUB\n\
    \\139\STX\n\
    \\EOT\EOT,\STX\n\
    \\DC2\EOT\137\ENQ\EOTN\SUB\252\SOH Defines whether to allow re-using the workflow id from a previously *closed* workflow.\n\
    \ The default policy is WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE.\n\
    \\n\
    \ See `workflow_id_reuse_policy` for handling a workflow id duplication with a *running* workflow.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\n\
    \\ACK\DC2\EOT\137\ENQ\EOT/\n\
    \\r\n\
    \\ENQ\EOT,\STX\n\
    \\SOH\DC2\EOT\137\ENQ0H\n\
    \\r\n\
    \\ENQ\EOT,\STX\n\
    \\ETX\DC2\EOT\137\ENQKM\n\
    \\190\STX\n\
    \\EOT\EOT,\STX\v\DC2\EOT\143\ENQ\EOTT\SUB\175\STX Defines how to resolve a workflow id conflict with a *running* workflow.\n\
    \ The default policy is WORKFLOW_ID_CONFLICT_POLICY_USE_EXISTING.\n\
    \ Note that WORKFLOW_ID_CONFLICT_POLICY_FAIL is an invalid option.\n\
    \\n\
    \ See `workflow_id_reuse_policy` for handling a workflow id duplication with a *closed* workflow.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\v\ACK\DC2\EOT\143\ENQ\EOT2\n\
    \\r\n\
    \\ENQ\EOT,\STX\v\SOH\DC2\EOT\143\ENQ3N\n\
    \\r\n\
    \\ENQ\EOT,\STX\v\ETX\DC2\EOT\143\ENQQS\n\
    \V\n\
    \\EOT\EOT,\STX\f\DC2\EOT\145\ENQ\EOT\FS\SUBH The workflow author-defined name of the signal to send to the workflow\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\f\ENQ\DC2\EOT\145\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\f\SOH\DC2\EOT\145\ENQ\v\SYN\n\
    \\r\n\
    \\ENQ\EOT,\STX\f\ETX\DC2\EOT\145\ENQ\EM\ESC\n\
    \>\n\
    \\EOT\EOT,\STX\r\DC2\EOT\147\ENQ\EOT6\SUB0 Serialized value(s) to provide with the signal\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\r\ACK\DC2\EOT\147\ENQ\EOT#\n\
    \\r\n\
    \\ENQ\EOT,\STX\r\SOH\DC2\EOT\147\ENQ$0\n\
    \\r\n\
    \\ENQ\EOT,\STX\r\ETX\DC2\EOT\147\ENQ35\n\
    \\SUB\n\
    \\EOT\EOT,\STX\SO\DC2\EOT\149\ENQ\EOT\CAN\SUB\f Deprecated\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\SO\ENQ\DC2\EOT\149\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\SO\SOH\DC2\EOT\149\ENQ\v\DC2\n\
    \\r\n\
    \\ENQ\EOT,\STX\SO\ETX\DC2\EOT\149\ENQ\NAK\ETB\n\
    \-\n\
    \\EOT\EOT,\STX\SI\DC2\EOT\151\ENQ\EOT9\SUB\US Retry policy for the workflow\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\SI\ACK\DC2\EOT\151\ENQ\EOT&\n\
    \\r\n\
    \\ENQ\EOT,\STX\SI\SOH\DC2\EOT\151\ENQ'3\n\
    \\r\n\
    \\ENQ\EOT,\STX\SI\ETX\DC2\EOT\151\ENQ68\n\
    \V\n\
    \\EOT\EOT,\STX\DLE\DC2\EOT\153\ENQ\EOT\RS\SUBH See https://docs.temporal.io/docs/content/what-is-a-temporal-cron-job/\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\DLE\ENQ\DC2\EOT\153\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\DLE\SOH\DC2\EOT\153\ENQ\v\CAN\n\
    \\r\n\
    \\ENQ\EOT,\STX\DLE\ETX\DC2\EOT\153\ENQ\ESC\GS\n\
    \\f\n\
    \\EOT\EOT,\STX\DC1\DC2\EOT\154\ENQ\EOT*\n\
    \\r\n\
    \\ENQ\EOT,\STX\DC1\ACK\DC2\EOT\154\ENQ\EOT\US\n\
    \\r\n\
    \\ENQ\EOT,\STX\DC1\SOH\DC2\EOT\154\ENQ $\n\
    \\r\n\
    \\ENQ\EOT,\STX\DC1\ETX\DC2\EOT\154\ENQ')\n\
    \\f\n\
    \\EOT\EOT,\STX\DC2\DC2\EOT\155\ENQ\EOTC\n\
    \\r\n\
    \\ENQ\EOT,\STX\DC2\ACK\DC2\EOT\155\ENQ\EOT+\n\
    \\r\n\
    \\ENQ\EOT,\STX\DC2\SOH\DC2\EOT\155\ENQ,=\n\
    \\r\n\
    \\ENQ\EOT,\STX\DC2\ETX\DC2\EOT\155\ENQ@B\n\
    \\f\n\
    \\EOT\EOT,\STX\DC3\DC2\EOT\156\ENQ\EOT.\n\
    \\r\n\
    \\ENQ\EOT,\STX\DC3\ACK\DC2\EOT\156\ENQ\EOT!\n\
    \\r\n\
    \\ENQ\EOT,\STX\DC3\SOH\DC2\EOT\156\ENQ\"(\n\
    \\r\n\
    \\ENQ\EOT,\STX\DC3\ETX\DC2\EOT\156\ENQ+-\n\
    \\255\ETX\n\
    \\EOT\EOT,\STX\DC4\DC2\EOT\163\ENQ\EOT7\SUB\240\ETX Time to wait before dispatching the first workflow task. Cannot be used with `cron_schedule`.\n\
    \ Note that the signal will be delivered with the first workflow task. If the workflow gets\n\
    \ another SignalWithStartWorkflow before the delay and `skip_generate_workflow_task` is false\n\
    \ or not set, a workflow task will be dispatched immediately and the rest of the delay period\n\
    \ will be ignored, even if that request also had a delay. Signal via SignalWorkflowExecution\n\
    \ will not unblock the workflow.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\DC4\ACK\DC2\EOT\163\ENQ\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT,\STX\DC4\SOH\DC2\EOT\163\ENQ\GS1\n\
    \\r\n\
    \\ENQ\EOT,\STX\DC4\ETX\DC2\EOT\163\ENQ46\n\
    \h\n\
    \\EOT\EOT,\STX\NAK\DC2\EOT\165\ENQ\EOT*\SUBZ Indicates that a new workflow task should not be generated when this signal is received.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\NAK\ENQ\DC2\EOT\165\ENQ\EOT\b\n\
    \\r\n\
    \\ENQ\EOT,\STX\NAK\SOH\DC2\EOT\165\ENQ\t$\n\
    \\r\n\
    \\ENQ\EOT,\STX\NAK\ETX\DC2\EOT\165\ENQ')\n\
    \\f\n\
    \\STX\EOT-\DC2\ACK\168\ENQ\NUL\173\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT-\SOH\DC2\EOT\168\ENQ\b0\n\
    \j\n\
    \\EOT\EOT-\STX\NUL\DC2\EOT\170\ENQ\EOT\SYN\SUB\\ The run id of the workflow that was started - or just signaled, if it was already running.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT-\STX\NUL\ENQ\DC2\EOT\170\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT-\STX\NUL\SOH\DC2\EOT\170\ENQ\v\DC1\n\
    \\r\n\
    \\ENQ\EOT-\STX\NUL\ETX\DC2\EOT\170\ENQ\DC4\NAK\n\
    \4\n\
    \\EOT\EOT-\STX\SOH\DC2\EOT\172\ENQ\EOT\NAK\SUB& If true, a new workflow was started.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT-\STX\SOH\ENQ\DC2\EOT\172\ENQ\EOT\b\n\
    \\r\n\
    \\ENQ\EOT-\STX\SOH\SOH\DC2\EOT\172\ENQ\t\DLE\n\
    \\r\n\
    \\ENQ\EOT-\STX\SOH\ETX\DC2\EOT\172\ENQ\DC3\DC4\n\
    \\f\n\
    \\STX\EOT.\DC2\ACK\175\ENQ\NUL\189\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT.\SOH\DC2\EOT\175\ENQ\b%\n\
    \\f\n\
    \\EOT\EOT.\STX\NUL\DC2\EOT\176\ENQ\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT.\STX\NUL\ENQ\DC2\EOT\176\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT.\STX\NUL\SOH\DC2\EOT\176\ENQ\v\DC4\n\
    \\r\n\
    \\ENQ\EOT.\STX\NUL\ETX\DC2\EOT\176\ENQ\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT.\STX\SOH\DC2\EOT\177\ENQ\EOTD\n\
    \\r\n\
    \\ENQ\EOT.\STX\SOH\ACK\DC2\EOT\177\ENQ\EOT,\n\
    \\r\n\
    \\ENQ\EOT.\STX\SOH\SOH\DC2\EOT\177\ENQ-?\n\
    \\r\n\
    \\ENQ\EOT.\STX\SOH\ETX\DC2\EOT\177\ENQBC\n\
    \\f\n\
    \\EOT\EOT.\STX\STX\DC2\EOT\178\ENQ\EOT\SYN\n\
    \\r\n\
    \\ENQ\EOT.\STX\STX\ENQ\DC2\EOT\178\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT.\STX\STX\SOH\DC2\EOT\178\ENQ\v\DC1\n\
    \\r\n\
    \\ENQ\EOT.\STX\STX\ETX\DC2\EOT\178\ENQ\DC4\NAK\n\
    \\152\SOH\n\
    \\EOT\EOT.\STX\ETX\DC2\EOT\181\ENQ\EOT,\SUB\137\SOH The id of a `WORKFLOW_TASK_COMPLETED`,`WORKFLOW_TASK_TIMED_OUT`, `WORKFLOW_TASK_FAILED`, or\n\
    \ `WORKFLOW_TASK_STARTED` event to reset to.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT.\STX\ETX\ENQ\DC2\EOT\181\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT.\STX\ETX\SOH\DC2\EOT\181\ENQ\n\
    \'\n\
    \\r\n\
    \\ENQ\EOT.\STX\ETX\ETX\DC2\EOT\181\ENQ*+\n\
    \.\n\
    \\EOT\EOT.\STX\EOT\DC2\EOT\183\ENQ\EOT\SUB\SUB  Used to de-dupe reset requests\n\
    \\n\
    \\r\n\
    \\ENQ\EOT.\STX\EOT\ENQ\DC2\EOT\183\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT.\STX\EOT\SOH\DC2\EOT\183\ENQ\v\NAK\n\
    \\r\n\
    \\ENQ\EOT.\STX\EOT\ETX\DC2\EOT\183\ENQ\CAN\EM\n\
    \\\\n\
    \\EOT\EOT.\STX\ENQ\DC2\EOT\186\ENQ\EOTB\SUBN Event types to be reapplied (deprecated)\n\
    \ Default: RESET_REAPPLY_TYPE_SIGNAL\n\
    \\n\
    \\r\n\
    \\ENQ\EOT.\STX\ENQ\ACK\DC2\EOT\186\ENQ\EOT*\n\
    \\r\n\
    \\ENQ\EOT.\STX\ENQ\SOH\DC2\EOT\186\ENQ+=\n\
    \\r\n\
    \\ENQ\EOT.\STX\ENQ\ETX\DC2\EOT\186\ENQ@A\n\
    \/\n\
    \\EOT\EOT.\STX\ACK\DC2\EOT\188\ENQ\EOT[\SUB! Event types not to be reapplied\n\
    \\n\
    \\r\n\
    \\ENQ\EOT.\STX\ACK\EOT\DC2\EOT\188\ENQ\EOT\f\n\
    \\r\n\
    \\ENQ\EOT.\STX\ACK\ACK\DC2\EOT\188\ENQ\r:\n\
    \\r\n\
    \\ENQ\EOT.\STX\ACK\SOH\DC2\EOT\188\ENQ;V\n\
    \\r\n\
    \\ENQ\EOT.\STX\ACK\ETX\DC2\EOT\188\ENQYZ\n\
    \\f\n\
    \\STX\EOT/\DC2\ACK\191\ENQ\NUL\193\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT/\SOH\DC2\EOT\191\ENQ\b&\n\
    \\f\n\
    \\EOT\EOT/\STX\NUL\DC2\EOT\192\ENQ\EOT\SYN\n\
    \\r\n\
    \\ENQ\EOT/\STX\NUL\ENQ\DC2\EOT\192\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT/\STX\NUL\SOH\DC2\EOT\192\ENQ\v\DC1\n\
    \\r\n\
    \\ENQ\EOT/\STX\NUL\ETX\DC2\EOT\192\ENQ\DC4\NAK\n\
    \\f\n\
    \\STX\EOT0\DC2\ACK\195\ENQ\NUL\207\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT0\SOH\DC2\EOT\195\ENQ\b)\n\
    \\f\n\
    \\EOT\EOT0\STX\NUL\DC2\EOT\196\ENQ\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT0\STX\NUL\ENQ\DC2\EOT\196\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT0\STX\NUL\SOH\DC2\EOT\196\ENQ\v\DC4\n\
    \\r\n\
    \\ENQ\EOT0\STX\NUL\ETX\DC2\EOT\196\ENQ\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT0\STX\SOH\DC2\EOT\197\ENQ\EOTD\n\
    \\r\n\
    \\ENQ\EOT0\STX\SOH\ACK\DC2\EOT\197\ENQ\EOT,\n\
    \\r\n\
    \\ENQ\EOT0\STX\SOH\SOH\DC2\EOT\197\ENQ-?\n\
    \\r\n\
    \\ENQ\EOT0\STX\SOH\ETX\DC2\EOT\197\ENQBC\n\
    \\f\n\
    \\EOT\EOT0\STX\STX\DC2\EOT\198\ENQ\EOT\SYN\n\
    \\r\n\
    \\ENQ\EOT0\STX\STX\ENQ\DC2\EOT\198\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT0\STX\STX\SOH\DC2\EOT\198\ENQ\v\DC1\n\
    \\r\n\
    \\ENQ\EOT0\STX\STX\ETX\DC2\EOT\198\ENQ\DC4\NAK\n\
    \T\n\
    \\EOT\EOT0\STX\ETX\DC2\EOT\200\ENQ\EOT0\SUBF Serialized additional information to attach to the termination event\n\
    \\n\
    \\r\n\
    \\ENQ\EOT0\STX\ETX\ACK\DC2\EOT\200\ENQ\EOT#\n\
    \\r\n\
    \\ENQ\EOT0\STX\ETX\SOH\DC2\EOT\200\ENQ$+\n\
    \\r\n\
    \\ENQ\EOT0\STX\ETX\ETX\DC2\EOT\200\ENQ./\n\
    \1\n\
    \\EOT\EOT0\STX\EOT\DC2\EOT\202\ENQ\EOT\CAN\SUB# The identity of the worker/client\n\
    \\n\
    \\r\n\
    \\ENQ\EOT0\STX\EOT\ENQ\DC2\EOT\202\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT0\STX\EOT\SOH\DC2\EOT\202\ENQ\v\DC3\n\
    \\r\n\
    \\ENQ\EOT0\STX\EOT\ETX\DC2\EOT\202\ENQ\SYN\ETB\n\
    \\208\SOH\n\
    \\EOT\EOT0\STX\ENQ\DC2\EOT\206\ENQ\EOT&\SUB\193\SOH If set, this call will error if the most recent (if no run id is set on\n\
    \ `workflow_execution`), or specified (if it is) workflow execution is not part of the same\n\
    \ execution chain as this id.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT0\STX\ENQ\ENQ\DC2\EOT\206\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT0\STX\ENQ\SOH\DC2\EOT\206\ENQ\v!\n\
    \\r\n\
    \\ENQ\EOT0\STX\ENQ\ETX\DC2\EOT\206\ENQ$%\n\
    \\f\n\
    \\STX\EOT1\DC2\ACK\209\ENQ\NUL\210\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT1\SOH\DC2\EOT\209\ENQ\b*\n\
    \\f\n\
    \\STX\EOT2\DC2\ACK\212\ENQ\NUL\216\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT2\SOH\DC2\EOT\212\ENQ\b&\n\
    \\f\n\
    \\EOT\EOT2\STX\NUL\DC2\EOT\213\ENQ\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT2\STX\NUL\ENQ\DC2\EOT\213\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT2\STX\NUL\SOH\DC2\EOT\213\ENQ\v\DC4\n\
    \\r\n\
    \\ENQ\EOT2\STX\NUL\ETX\DC2\EOT\213\ENQ\ETB\CAN\n\
    \a\n\
    \\EOT\EOT2\STX\SOH\DC2\EOT\215\ENQ\EOTD\SUBS Workflow Execution to delete. If run_id is not specified, the latest one is used.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT2\STX\SOH\ACK\DC2\EOT\215\ENQ\EOT,\n\
    \\r\n\
    \\ENQ\EOT2\STX\SOH\SOH\DC2\EOT\215\ENQ-?\n\
    \\r\n\
    \\ENQ\EOT2\STX\SOH\ETX\DC2\EOT\215\ENQBC\n\
    \\f\n\
    \\STX\EOT3\DC2\ACK\218\ENQ\NUL\219\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT3\SOH\DC2\EOT\218\ENQ\b'\n\
    \\f\n\
    \\STX\EOT4\DC2\ACK\221\ENQ\NUL\230\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT4\SOH\DC2\EOT\221\ENQ\b)\n\
    \\f\n\
    \\EOT\EOT4\STX\NUL\DC2\EOT\222\ENQ\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT4\STX\NUL\ENQ\DC2\EOT\222\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT4\STX\NUL\SOH\DC2\EOT\222\ENQ\v\DC4\n\
    \\r\n\
    \\ENQ\EOT4\STX\NUL\ETX\DC2\EOT\222\ENQ\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT4\STX\SOH\DC2\EOT\223\ENQ\EOT \n\
    \\r\n\
    \\ENQ\EOT4\STX\SOH\ENQ\DC2\EOT\223\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT4\STX\SOH\SOH\DC2\EOT\223\ENQ\n\
    \\ESC\n\
    \\r\n\
    \\ENQ\EOT4\STX\SOH\ETX\DC2\EOT\223\ENQ\RS\US\n\
    \\f\n\
    \\EOT\EOT4\STX\STX\DC2\EOT\224\ENQ\EOT\RS\n\
    \\r\n\
    \\ENQ\EOT4\STX\STX\ENQ\DC2\EOT\224\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT4\STX\STX\SOH\DC2\EOT\224\ENQ\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT4\STX\STX\ETX\DC2\EOT\224\ENQ\FS\GS\n\
    \\f\n\
    \\EOT\EOT4\STX\ETX\DC2\EOT\225\ENQ\EOTA\n\
    \\r\n\
    \\ENQ\EOT4\STX\ETX\ACK\DC2\EOT\225\ENQ\EOT*\n\
    \\r\n\
    \\ENQ\EOT4\STX\ETX\SOH\DC2\EOT\225\ENQ+<\n\
    \\r\n\
    \\ENQ\EOT4\STX\ETX\ETX\DC2\EOT\225\ENQ?@\n\
    \\SO\n\
    \\EOT\EOT4\b\NUL\DC2\ACK\226\ENQ\EOT\229\ENQ\ENQ\n\
    \\r\n\
    \\ENQ\EOT4\b\NUL\SOH\DC2\EOT\226\ENQ\n\
    \\DC1\n\
    \\f\n\
    \\EOT\EOT4\STX\EOT\DC2\EOT\227\ENQ\bL\n\
    \\r\n\
    \\ENQ\EOT4\STX\EOT\ACK\DC2\EOT\227\ENQ\b6\n\
    \\r\n\
    \\ENQ\EOT4\STX\EOT\SOH\DC2\EOT\227\ENQ7G\n\
    \\r\n\
    \\ENQ\EOT4\STX\EOT\ETX\DC2\EOT\227\ENQJK\n\
    \\f\n\
    \\EOT\EOT4\STX\ENQ\DC2\EOT\228\ENQ\bB\n\
    \\r\n\
    \\ENQ\EOT4\STX\ENQ\ACK\DC2\EOT\228\ENQ\b1\n\
    \\r\n\
    \\ENQ\EOT4\STX\ENQ\SOH\DC2\EOT\228\ENQ2=\n\
    \\r\n\
    \\ENQ\EOT4\STX\ENQ\ETX\DC2\EOT\228\ENQ@A\n\
    \\f\n\
    \\STX\EOT5\DC2\ACK\232\ENQ\NUL\235\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT5\SOH\DC2\EOT\232\ENQ\b*\n\
    \\f\n\
    \\EOT\EOT5\STX\NUL\DC2\EOT\233\ENQ\EOTK\n\
    \\r\n\
    \\ENQ\EOT5\STX\NUL\EOT\DC2\EOT\233\ENQ\EOT\f\n\
    \\r\n\
    \\ENQ\EOT5\STX\NUL\ACK\DC2\EOT\233\ENQ\r;\n\
    \\r\n\
    \\ENQ\EOT5\STX\NUL\SOH\DC2\EOT\233\ENQ<F\n\
    \\r\n\
    \\ENQ\EOT5\STX\NUL\ETX\DC2\EOT\233\ENQIJ\n\
    \\f\n\
    \\EOT\EOT5\STX\SOH\DC2\EOT\234\ENQ\EOT\RS\n\
    \\r\n\
    \\ENQ\EOT5\STX\SOH\ENQ\DC2\EOT\234\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT5\STX\SOH\SOH\DC2\EOT\234\ENQ\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT5\STX\SOH\ETX\DC2\EOT\234\ENQ\FS\GS\n\
    \\f\n\
    \\STX\EOT6\DC2\ACK\237\ENQ\NUL\247\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT6\SOH\DC2\EOT\237\ENQ\b+\n\
    \\f\n\
    \\EOT\EOT6\STX\NUL\DC2\EOT\238\ENQ\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT6\STX\NUL\ENQ\DC2\EOT\238\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT6\STX\NUL\SOH\DC2\EOT\238\ENQ\v\DC4\n\
    \\r\n\
    \\ENQ\EOT6\STX\NUL\ETX\DC2\EOT\238\ENQ\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT6\STX\SOH\DC2\EOT\239\ENQ\EOT \n\
    \\r\n\
    \\ENQ\EOT6\STX\SOH\ENQ\DC2\EOT\239\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT6\STX\SOH\SOH\DC2\EOT\239\ENQ\n\
    \\ESC\n\
    \\r\n\
    \\ENQ\EOT6\STX\SOH\ETX\DC2\EOT\239\ENQ\RS\US\n\
    \\f\n\
    \\EOT\EOT6\STX\STX\DC2\EOT\240\ENQ\EOT\RS\n\
    \\r\n\
    \\ENQ\EOT6\STX\STX\ENQ\DC2\EOT\240\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT6\STX\STX\SOH\DC2\EOT\240\ENQ\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT6\STX\STX\ETX\DC2\EOT\240\ENQ\FS\GS\n\
    \\f\n\
    \\EOT\EOT6\STX\ETX\DC2\EOT\241\ENQ\EOTA\n\
    \\r\n\
    \\ENQ\EOT6\STX\ETX\ACK\DC2\EOT\241\ENQ\EOT*\n\
    \\r\n\
    \\ENQ\EOT6\STX\ETX\SOH\DC2\EOT\241\ENQ+<\n\
    \\r\n\
    \\ENQ\EOT6\STX\ETX\ETX\DC2\EOT\241\ENQ?@\n\
    \\SO\n\
    \\EOT\EOT6\b\NUL\DC2\ACK\242\ENQ\EOT\246\ENQ\ENQ\n\
    \\r\n\
    \\ENQ\EOT6\b\NUL\SOH\DC2\EOT\242\ENQ\n\
    \\DC1\n\
    \\f\n\
    \\EOT\EOT6\STX\EOT\DC2\EOT\243\ENQ\bL\n\
    \\r\n\
    \\ENQ\EOT6\STX\EOT\ACK\DC2\EOT\243\ENQ\b6\n\
    \\r\n\
    \\ENQ\EOT6\STX\EOT\SOH\DC2\EOT\243\ENQ7G\n\
    \\r\n\
    \\ENQ\EOT6\STX\EOT\ETX\DC2\EOT\243\ENQJK\n\
    \\f\n\
    \\EOT\EOT6\STX\ENQ\DC2\EOT\244\ENQ\bB\n\
    \\r\n\
    \\ENQ\EOT6\STX\ENQ\ACK\DC2\EOT\244\ENQ\b1\n\
    \\r\n\
    \\ENQ\EOT6\STX\ENQ\SOH\DC2\EOT\244\ENQ2=\n\
    \\r\n\
    \\ENQ\EOT6\STX\ENQ\ETX\DC2\EOT\244\ENQ@A\n\
    \\f\n\
    \\EOT\EOT6\STX\ACK\DC2\EOT\245\ENQ\b>\n\
    \\r\n\
    \\ENQ\EOT6\STX\ACK\ACK\DC2\EOT\245\ENQ\b+\n\
    \\r\n\
    \\ENQ\EOT6\STX\ACK\SOH\DC2\EOT\245\ENQ,9\n\
    \\r\n\
    \\ENQ\EOT6\STX\ACK\ETX\DC2\EOT\245\ENQ<=\n\
    \\f\n\
    \\STX\EOT7\DC2\ACK\249\ENQ\NUL\252\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT7\SOH\DC2\EOT\249\ENQ\b,\n\
    \\f\n\
    \\EOT\EOT7\STX\NUL\DC2\EOT\250\ENQ\EOTK\n\
    \\r\n\
    \\ENQ\EOT7\STX\NUL\EOT\DC2\EOT\250\ENQ\EOT\f\n\
    \\r\n\
    \\ENQ\EOT7\STX\NUL\ACK\DC2\EOT\250\ENQ\r;\n\
    \\r\n\
    \\ENQ\EOT7\STX\NUL\SOH\DC2\EOT\250\ENQ<F\n\
    \\r\n\
    \\ENQ\EOT7\STX\NUL\ETX\DC2\EOT\250\ENQIJ\n\
    \\f\n\
    \\EOT\EOT7\STX\SOH\DC2\EOT\251\ENQ\EOT\RS\n\
    \\r\n\
    \\ENQ\EOT7\STX\SOH\ENQ\DC2\EOT\251\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT7\STX\SOH\SOH\DC2\EOT\251\ENQ\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT7\STX\SOH\ETX\DC2\EOT\251\ENQ\FS\GS\n\
    \\f\n\
    \\STX\EOT8\DC2\ACK\254\ENQ\NUL\131\ACK\SOH\n\
    \\v\n\
    \\ETX\EOT8\SOH\DC2\EOT\254\ENQ\b%\n\
    \\f\n\
    \\EOT\EOT8\STX\NUL\DC2\EOT\255\ENQ\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT8\STX\NUL\ENQ\DC2\EOT\255\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT8\STX\NUL\SOH\DC2\EOT\255\ENQ\v\DC4\n\
    \\r\n\
    \\ENQ\EOT8\STX\NUL\ETX\DC2\EOT\255\ENQ\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT8\STX\SOH\DC2\EOT\128\ACK\EOT\CAN\n\
    \\r\n\
    \\ENQ\EOT8\STX\SOH\ENQ\DC2\EOT\128\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT8\STX\SOH\SOH\DC2\EOT\128\ACK\n\
    \\DC3\n\
    \\r\n\
    \\ENQ\EOT8\STX\SOH\ETX\DC2\EOT\128\ACK\SYN\ETB\n\
    \\f\n\
    \\EOT\EOT8\STX\STX\DC2\EOT\129\ACK\EOT\RS\n\
    \\r\n\
    \\ENQ\EOT8\STX\STX\ENQ\DC2\EOT\129\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT8\STX\STX\SOH\DC2\EOT\129\ACK\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT8\STX\STX\ETX\DC2\EOT\129\ACK\FS\GS\n\
    \\f\n\
    \\EOT\EOT8\STX\ETX\DC2\EOT\130\ACK\EOT\NAK\n\
    \\r\n\
    \\ENQ\EOT8\STX\ETX\ENQ\DC2\EOT\130\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT8\STX\ETX\SOH\DC2\EOT\130\ACK\v\DLE\n\
    \\r\n\
    \\ENQ\EOT8\STX\ETX\ETX\DC2\EOT\130\ACK\DC3\DC4\n\
    \\f\n\
    \\STX\EOT9\DC2\ACK\133\ACK\NUL\136\ACK\SOH\n\
    \\v\n\
    \\ETX\EOT9\SOH\DC2\EOT\133\ACK\b&\n\
    \\f\n\
    \\EOT\EOT9\STX\NUL\DC2\EOT\134\ACK\EOTK\n\
    \\r\n\
    \\ENQ\EOT9\STX\NUL\EOT\DC2\EOT\134\ACK\EOT\f\n\
    \\r\n\
    \\ENQ\EOT9\STX\NUL\ACK\DC2\EOT\134\ACK\r;\n\
    \\r\n\
    \\ENQ\EOT9\STX\NUL\SOH\DC2\EOT\134\ACK<F\n\
    \\r\n\
    \\ENQ\EOT9\STX\NUL\ETX\DC2\EOT\134\ACKIJ\n\
    \\f\n\
    \\EOT\EOT9\STX\SOH\DC2\EOT\135\ACK\EOT\RS\n\
    \\r\n\
    \\ENQ\EOT9\STX\SOH\ENQ\DC2\EOT\135\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT9\STX\SOH\SOH\DC2\EOT\135\ACK\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT9\STX\SOH\ETX\DC2\EOT\135\ACK\FS\GS\n\
    \\f\n\
    \\STX\EOT:\DC2\ACK\138\ACK\NUL\143\ACK\SOH\n\
    \\v\n\
    \\ETX\EOT:\SOH\DC2\EOT\138\ACK\b-\n\
    \\f\n\
    \\EOT\EOT:\STX\NUL\DC2\EOT\139\ACK\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT:\STX\NUL\ENQ\DC2\EOT\139\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT:\STX\NUL\SOH\DC2\EOT\139\ACK\v\DC4\n\
    \\r\n\
    \\ENQ\EOT:\STX\NUL\ETX\DC2\EOT\139\ACK\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT:\STX\SOH\DC2\EOT\140\ACK\EOT\CAN\n\
    \\r\n\
    \\ENQ\EOT:\STX\SOH\ENQ\DC2\EOT\140\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT:\STX\SOH\SOH\DC2\EOT\140\ACK\n\
    \\DC3\n\
    \\r\n\
    \\ENQ\EOT:\STX\SOH\ETX\DC2\EOT\140\ACK\SYN\ETB\n\
    \\f\n\
    \\EOT\EOT:\STX\STX\DC2\EOT\141\ACK\EOT\RS\n\
    \\r\n\
    \\ENQ\EOT:\STX\STX\ENQ\DC2\EOT\141\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT:\STX\STX\SOH\DC2\EOT\141\ACK\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT:\STX\STX\ETX\DC2\EOT\141\ACK\FS\GS\n\
    \\f\n\
    \\EOT\EOT:\STX\ETX\DC2\EOT\142\ACK\EOT\NAK\n\
    \\r\n\
    \\ENQ\EOT:\STX\ETX\ENQ\DC2\EOT\142\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT:\STX\ETX\SOH\DC2\EOT\142\ACK\v\DLE\n\
    \\r\n\
    \\ENQ\EOT:\STX\ETX\ETX\DC2\EOT\142\ACK\DC3\DC4\n\
    \\f\n\
    \\STX\EOT;\DC2\ACK\145\ACK\NUL\148\ACK\SOH\n\
    \\v\n\
    \\ETX\EOT;\SOH\DC2\EOT\145\ACK\b.\n\
    \\f\n\
    \\EOT\EOT;\STX\NUL\DC2\EOT\146\ACK\EOTK\n\
    \\r\n\
    \\ENQ\EOT;\STX\NUL\EOT\DC2\EOT\146\ACK\EOT\f\n\
    \\r\n\
    \\ENQ\EOT;\STX\NUL\ACK\DC2\EOT\146\ACK\r;\n\
    \\r\n\
    \\ENQ\EOT;\STX\NUL\SOH\DC2\EOT\146\ACK<F\n\
    \\r\n\
    \\ENQ\EOT;\STX\NUL\ETX\DC2\EOT\146\ACKIJ\n\
    \\f\n\
    \\EOT\EOT;\STX\SOH\DC2\EOT\147\ACK\EOT\RS\n\
    \\r\n\
    \\ENQ\EOT;\STX\SOH\ENQ\DC2\EOT\147\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT;\STX\SOH\SOH\DC2\EOT\147\ACK\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT;\STX\SOH\ETX\DC2\EOT\147\ACK\FS\GS\n\
    \\f\n\
    \\STX\EOT<\DC2\ACK\150\ACK\NUL\155\ACK\SOH\n\
    \\v\n\
    \\ETX\EOT<\SOH\DC2\EOT\150\ACK\b%\n\
    \\f\n\
    \\EOT\EOT<\STX\NUL\DC2\EOT\151\ACK\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT<\STX\NUL\ENQ\DC2\EOT\151\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT<\STX\NUL\SOH\DC2\EOT\151\ACK\v\DC4\n\
    \\r\n\
    \\ENQ\EOT<\STX\NUL\ETX\DC2\EOT\151\ACK\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT<\STX\SOH\DC2\EOT\152\ACK\EOT\CAN\n\
    \\r\n\
    \\ENQ\EOT<\STX\SOH\ENQ\DC2\EOT\152\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT<\STX\SOH\SOH\DC2\EOT\152\ACK\n\
    \\DC3\n\
    \\r\n\
    \\ENQ\EOT<\STX\SOH\ETX\DC2\EOT\152\ACK\SYN\ETB\n\
    \\f\n\
    \\EOT\EOT<\STX\STX\DC2\EOT\153\ACK\EOT\RS\n\
    \\r\n\
    \\ENQ\EOT<\STX\STX\ENQ\DC2\EOT\153\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT<\STX\STX\SOH\DC2\EOT\153\ACK\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT<\STX\STX\ETX\DC2\EOT\153\ACK\FS\GS\n\
    \\f\n\
    \\EOT\EOT<\STX\ETX\DC2\EOT\154\ACK\EOT\NAK\n\
    \\r\n\
    \\ENQ\EOT<\STX\ETX\ENQ\DC2\EOT\154\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT<\STX\ETX\SOH\DC2\EOT\154\ACK\v\DLE\n\
    \\r\n\
    \\ENQ\EOT<\STX\ETX\ETX\DC2\EOT\154\ACK\DC3\DC4\n\
    \\f\n\
    \\STX\EOT=\DC2\ACK\157\ACK\NUL\160\ACK\SOH\n\
    \\v\n\
    \\ETX\EOT=\SOH\DC2\EOT\157\ACK\b&\n\
    \\f\n\
    \\EOT\EOT=\STX\NUL\DC2\EOT\158\ACK\EOTK\n\
    \\r\n\
    \\ENQ\EOT=\STX\NUL\EOT\DC2\EOT\158\ACK\EOT\f\n\
    \\r\n\
    \\ENQ\EOT=\STX\NUL\ACK\DC2\EOT\158\ACK\r;\n\
    \\r\n\
    \\ENQ\EOT=\STX\NUL\SOH\DC2\EOT\158\ACK<F\n\
    \\r\n\
    \\ENQ\EOT=\STX\NUL\ETX\DC2\EOT\158\ACKIJ\n\
    \\f\n\
    \\EOT\EOT=\STX\SOH\DC2\EOT\159\ACK\EOT\RS\n\
    \\r\n\
    \\ENQ\EOT=\STX\SOH\ENQ\DC2\EOT\159\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT=\STX\SOH\SOH\DC2\EOT\159\ACK\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT=\STX\SOH\ETX\DC2\EOT\159\ACK\FS\GS\n\
    \\f\n\
    \\STX\EOT>\DC2\ACK\162\ACK\NUL\165\ACK\SOH\n\
    \\v\n\
    \\ETX\EOT>\SOH\DC2\EOT\162\ACK\b&\n\
    \\f\n\
    \\EOT\EOT>\STX\NUL\DC2\EOT\163\ACK\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT>\STX\NUL\ENQ\DC2\EOT\163\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT>\STX\NUL\SOH\DC2\EOT\163\ACK\v\DC4\n\
    \\r\n\
    \\ENQ\EOT>\STX\NUL\ETX\DC2\EOT\163\ACK\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT>\STX\SOH\DC2\EOT\164\ACK\EOT\NAK\n\
    \\r\n\
    \\ENQ\EOT>\STX\SOH\ENQ\DC2\EOT\164\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT>\STX\SOH\SOH\DC2\EOT\164\ACK\v\DLE\n\
    \\r\n\
    \\ENQ\EOT>\STX\SOH\ETX\DC2\EOT\164\ACK\DC3\DC4\n\
    \\f\n\
    \\STX\EOT?\DC2\ACK\167\ACK\NUL\183\ACK\SOH\n\
    \\v\n\
    \\ETX\EOT?\SOH\DC2\EOT\167\ACK\b'\n\
    \\204\STX\n\
    \\EOT\EOT?\STX\NUL\DC2\EOT\173\ACK\EOT\DC4\SUB\189\STX If `query` is not grouping by any field, the count is an approximate number\n\
    \ of workflows that matches the query.\n\
    \ If `query` is grouping by a field, the count is simply the sum of the counts\n\
    \ of the groups returned in the response. This number can be smaller than the\n\
    \ total number of workflows matching the query.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT?\STX\NUL\ENQ\DC2\EOT\173\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT?\STX\NUL\SOH\DC2\EOT\173\ACK\n\
    \\SI\n\
    \\r\n\
    \\ENQ\EOT?\STX\NUL\ETX\DC2\EOT\173\ACK\DC2\DC3\n\
    \\162\SOH\n\
    \\EOT\EOT?\STX\SOH\DC2\EOT\177\ACK\EOT)\SUB\147\SOH `groups` contains the groups if the request is grouping by a field.\n\
    \ The list might not be complete, and the counts of each group is approximate.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT?\STX\SOH\EOT\DC2\EOT\177\ACK\EOT\f\n\
    \\r\n\
    \\ENQ\EOT?\STX\SOH\ACK\DC2\EOT\177\ACK\r\GS\n\
    \\r\n\
    \\ENQ\EOT?\STX\SOH\SOH\DC2\EOT\177\ACK\RS$\n\
    \\r\n\
    \\ENQ\EOT?\STX\SOH\ETX\DC2\EOT\177\ACK'(\n\
    \\SO\n\
    \\EOT\EOT?\ETX\NUL\DC2\ACK\179\ACK\EOT\182\ACK\ENQ\n\
    \\r\n\
    \\ENQ\EOT?\ETX\NUL\SOH\DC2\EOT\179\ACK\f\FS\n\
    \\SO\n\
    \\ACK\EOT?\ETX\NUL\STX\NUL\DC2\EOT\180\ACK\bA\n\
    \\SI\n\
    \\a\EOT?\ETX\NUL\STX\NUL\EOT\DC2\EOT\180\ACK\b\DLE\n\
    \\SI\n\
    \\a\EOT?\ETX\NUL\STX\NUL\ACK\DC2\EOT\180\ACK\DC1/\n\
    \\SI\n\
    \\a\EOT?\ETX\NUL\STX\NUL\SOH\DC2\EOT\180\ACK0<\n\
    \\SI\n\
    \\a\EOT?\ETX\NUL\STX\NUL\ETX\DC2\EOT\180\ACK?@\n\
    \\SO\n\
    \\ACK\EOT?\ETX\NUL\STX\SOH\DC2\EOT\181\ACK\b\CAN\n\
    \\SI\n\
    \\a\EOT?\ETX\NUL\STX\SOH\ENQ\DC2\EOT\181\ACK\b\r\n\
    \\SI\n\
    \\a\EOT?\ETX\NUL\STX\SOH\SOH\DC2\EOT\181\ACK\SO\DC3\n\
    \\SI\n\
    \\a\EOT?\ETX\NUL\STX\SOH\ETX\DC2\EOT\181\ACK\SYN\ETB\n\
    \\f\n\
    \\STX\EOT@\DC2\ACK\185\ACK\NUL\186\ACK\SOH\n\
    \\v\n\
    \\ETX\EOT@\SOH\DC2\EOT\185\ACK\b\"\n\
    \\f\n\
    \\STX\EOTA\DC2\ACK\188\ACK\NUL\190\ACK\SOH\n\
    \\v\n\
    \\ETX\EOTA\SOH\DC2\EOT\188\ACK\b#\n\
    \\f\n\
    \\EOT\EOTA\STX\NUL\DC2\EOT\189\ACK\EOTA\n\
    \\r\n\
    \\ENQ\EOTA\STX\NUL\ACK\DC2\EOT\189\ACK\EOT7\n\
    \\r\n\
    \\ENQ\EOTA\STX\NUL\SOH\DC2\EOT\189\ACK8<\n\
    \\r\n\
    \\ENQ\EOTA\STX\NUL\ETX\DC2\EOT\189\ACK?@\n\
    \\f\n\
    \\STX\EOTB\DC2\ACK\192\ACK\NUL\199\ACK\SOH\n\
    \\v\n\
    \\ETX\EOTB\SOH\DC2\EOT\192\ACK\b(\n\
    \\f\n\
    \\EOT\EOTB\STX\NUL\DC2\EOT\193\ACK\EOT\EM\n\
    \\r\n\
    \\ENQ\EOTB\STX\NUL\ENQ\DC2\EOT\193\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOTB\STX\NUL\SOH\DC2\EOT\193\ACK\n\
    \\DC4\n\
    \\r\n\
    \\ENQ\EOTB\STX\NUL\ETX\DC2\EOT\193\ACK\ETB\CAN\n\
    \\f\n\
    \\EOT\EOTB\STX\SOH\DC2\EOT\194\ACK\EOT=\n\
    \\r\n\
    \\ENQ\EOTB\STX\SOH\ACK\DC2\EOT\194\ACK\EOT)\n\
    \\r\n\
    \\ENQ\EOTB\STX\SOH\SOH\DC2\EOT\194\ACK*8\n\
    \\r\n\
    \\ENQ\EOTB\STX\SOH\ETX\DC2\EOT\194\ACK;<\n\
    \\f\n\
    \\EOT\EOTB\STX\STX\DC2\EOT\195\ACK\EOT5\n\
    \\r\n\
    \\ENQ\EOTB\STX\STX\ACK\DC2\EOT\195\ACK\EOT#\n\
    \\r\n\
    \\ENQ\EOTB\STX\STX\SOH\DC2\EOT\195\ACK$0\n\
    \\r\n\
    \\ENQ\EOTB\STX\STX\ETX\DC2\EOT\195\ACK34\n\
    \\f\n\
    \\EOT\EOTB\STX\ETX\DC2\EOT\196\ACK\EOT\GS\n\
    \\r\n\
    \\ENQ\EOTB\STX\ETX\ENQ\DC2\EOT\196\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTB\STX\ETX\SOH\DC2\EOT\196\ACK\v\CAN\n\
    \\r\n\
    \\ENQ\EOTB\STX\ETX\ETX\DC2\EOT\196\ACK\ESC\FS\n\
    \\v\n\
    \\ETX\EOTB\t\DC2\EOT\197\ACK\EOT\SI\n\
    \\f\n\
    \\EOT\EOTB\t\NUL\DC2\EOT\197\ACK\r\SO\n\
    \\r\n\
    \\ENQ\EOTB\t\NUL\SOH\DC2\EOT\197\ACK\r\SO\n\
    \\r\n\
    \\ENQ\EOTB\t\NUL\STX\DC2\EOT\197\ACK\r\SO\n\
    \\f\n\
    \\EOT\EOTB\STX\EOT\DC2\EOT\198\ACK\EOT\EM\n\
    \\r\n\
    \\ENQ\EOTB\STX\EOT\ENQ\DC2\EOT\198\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTB\STX\EOT\SOH\DC2\EOT\198\ACK\v\DC4\n\
    \\r\n\
    \\ENQ\EOTB\STX\EOT\ETX\DC2\EOT\198\ACK\ETB\CAN\n\
    \\f\n\
    \\STX\EOTC\DC2\ACK\201\ACK\NUL\202\ACK\SOH\n\
    \\v\n\
    \\ETX\EOTC\SOH\DC2\EOT\201\ACK\b)\n\
    \\f\n\
    \\STX\EOTD\DC2\ACK\204\ACK\NUL\207\ACK\SOH\n\
    \\v\n\
    \\ETX\EOTD\SOH\DC2\EOT\204\ACK\b#\n\
    \\f\n\
    \\EOT\EOTD\STX\NUL\DC2\EOT\205\ACK\EOT\EM\n\
    \\r\n\
    \\ENQ\EOTD\STX\NUL\ENQ\DC2\EOT\205\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTD\STX\NUL\SOH\DC2\EOT\205\ACK\v\DC4\n\
    \\r\n\
    \\ENQ\EOTD\STX\NUL\ETX\DC2\EOT\205\ACK\ETB\CAN\n\
    \\f\n\
    \\EOT\EOTD\STX\SOH\DC2\EOT\206\ACK\EOT;\n\
    \\r\n\
    \\ENQ\EOTD\STX\SOH\ACK\DC2\EOT\206\ACK\EOT,\n\
    \\r\n\
    \\ENQ\EOTD\STX\SOH\SOH\DC2\EOT\206\ACK-6\n\
    \\r\n\
    \\ENQ\EOTD\STX\SOH\ETX\DC2\EOT\206\ACK9:\n\
    \\f\n\
    \\STX\EOTE\DC2\ACK\209\ACK\NUL\210\ACK\SOH\n\
    \\v\n\
    \\ETX\EOTE\SOH\DC2\EOT\209\ACK\b$\n\
    \\f\n\
    \\STX\EOTF\DC2\ACK\212\ACK\NUL\219\ACK\SOH\n\
    \\v\n\
    \\ETX\EOTF\SOH\DC2\EOT\212\ACK\b\FS\n\
    \\f\n\
    \\EOT\EOTF\STX\NUL\DC2\EOT\213\ACK\EOT\EM\n\
    \\r\n\
    \\ENQ\EOTF\STX\NUL\ENQ\DC2\EOT\213\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTF\STX\NUL\SOH\DC2\EOT\213\ACK\v\DC4\n\
    \\r\n\
    \\ENQ\EOTF\STX\NUL\ETX\DC2\EOT\213\ACK\ETB\CAN\n\
    \\f\n\
    \\EOT\EOTF\STX\SOH\DC2\EOT\214\ACK\EOT;\n\
    \\r\n\
    \\ENQ\EOTF\STX\SOH\ACK\DC2\EOT\214\ACK\EOT,\n\
    \\r\n\
    \\ENQ\EOTF\STX\SOH\SOH\DC2\EOT\214\ACK-6\n\
    \\r\n\
    \\ENQ\EOTF\STX\SOH\ETX\DC2\EOT\214\ACK9:\n\
    \\f\n\
    \\EOT\EOTF\STX\STX\DC2\EOT\215\ACK\EOT2\n\
    \\r\n\
    \\ENQ\EOTF\STX\STX\ACK\DC2\EOT\215\ACK\EOT'\n\
    \\r\n\
    \\ENQ\EOTF\STX\STX\SOH\DC2\EOT\215\ACK(-\n\
    \\r\n\
    \\ENQ\EOTF\STX\STX\ETX\DC2\EOT\215\ACK01\n\
    \\151\SOH\n\
    \\EOT\EOTF\STX\ETX\DC2\EOT\218\ACK\EOTJ\SUB\136\SOH QueryRejectCondition can used to reject the query if workflow state does not satisfy condition.\n\
    \ Default: QUERY_REJECT_CONDITION_NONE.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTF\STX\ETX\ACK\DC2\EOT\218\ACK\EOT.\n\
    \\r\n\
    \\ENQ\EOTF\STX\ETX\SOH\DC2\EOT\218\ACK/E\n\
    \\r\n\
    \\ENQ\EOTF\STX\ETX\ETX\DC2\EOT\218\ACKHI\n\
    \\f\n\
    \\STX\EOTG\DC2\ACK\221\ACK\NUL\224\ACK\SOH\n\
    \\v\n\
    \\ETX\EOTG\SOH\DC2\EOT\221\ACK\b\GS\n\
    \\f\n\
    \\EOT\EOTG\STX\NUL\DC2\EOT\222\ACK\EOT5\n\
    \\r\n\
    \\ENQ\EOTG\STX\NUL\ACK\DC2\EOT\222\ACK\EOT#\n\
    \\r\n\
    \\ENQ\EOTG\STX\NUL\SOH\DC2\EOT\222\ACK$0\n\
    \\r\n\
    \\ENQ\EOTG\STX\NUL\ETX\DC2\EOT\222\ACK34\n\
    \\f\n\
    \\EOT\EOTG\STX\SOH\DC2\EOT\223\ACK\EOT;\n\
    \\r\n\
    \\ENQ\EOTG\STX\SOH\ACK\DC2\EOT\223\ACK\EOT'\n\
    \\r\n\
    \\ENQ\EOTG\STX\SOH\SOH\DC2\EOT\223\ACK(6\n\
    \\r\n\
    \\ENQ\EOTG\STX\SOH\ETX\DC2\EOT\223\ACK9:\n\
    \\f\n\
    \\STX\EOTH\DC2\ACK\226\ACK\NUL\229\ACK\SOH\n\
    \\v\n\
    \\ETX\EOTH\SOH\DC2\EOT\226\ACK\b(\n\
    \\f\n\
    \\EOT\EOTH\STX\NUL\DC2\EOT\227\ACK\EOT\EM\n\
    \\r\n\
    \\ENQ\EOTH\STX\NUL\ENQ\DC2\EOT\227\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTH\STX\NUL\SOH\DC2\EOT\227\ACK\v\DC4\n\
    \\r\n\
    \\ENQ\EOTH\STX\NUL\ETX\DC2\EOT\227\ACK\ETB\CAN\n\
    \\f\n\
    \\EOT\EOTH\STX\SOH\DC2\EOT\228\ACK\EOT;\n\
    \\r\n\
    \\ENQ\EOTH\STX\SOH\ACK\DC2\EOT\228\ACK\EOT,\n\
    \\r\n\
    \\ENQ\EOTH\STX\SOH\SOH\DC2\EOT\228\ACK-6\n\
    \\r\n\
    \\ENQ\EOTH\STX\SOH\ETX\DC2\EOT\228\ACK9:\n\
    \\f\n\
    \\STX\EOTI\DC2\ACK\231\ACK\NUL\239\ACK\SOH\n\
    \\v\n\
    \\ETX\EOTI\SOH\DC2\EOT\231\ACK\b)\n\
    \\f\n\
    \\EOT\EOTI\STX\NUL\DC2\EOT\232\ACK\EOTJ\n\
    \\r\n\
    \\ENQ\EOTI\STX\NUL\ACK\DC2\EOT\232\ACK\EOT4\n\
    \\r\n\
    \\ENQ\EOTI\STX\NUL\SOH\DC2\EOT\232\ACK5E\n\
    \\r\n\
    \\ENQ\EOTI\STX\NUL\ETX\DC2\EOT\232\ACKHI\n\
    \\f\n\
    \\EOT\EOTI\STX\SOH\DC2\EOT\233\ACK\EOTO\n\
    \\r\n\
    \\ENQ\EOTI\STX\SOH\ACK\DC2\EOT\233\ACK\EOT2\n\
    \\r\n\
    \\ENQ\EOTI\STX\SOH\SOH\DC2\EOT\233\ACK3J\n\
    \\r\n\
    \\ENQ\EOTI\STX\SOH\ETX\DC2\EOT\233\ACKMN\n\
    \\f\n\
    \\EOT\EOTI\STX\STX\DC2\EOT\234\ACK\EOTQ\n\
    \\r\n\
    \\ENQ\EOTI\STX\STX\EOT\DC2\EOT\234\ACK\EOT\f\n\
    \\r\n\
    \\ENQ\EOTI\STX\STX\ACK\DC2\EOT\234\ACK\r9\n\
    \\r\n\
    \\ENQ\EOTI\STX\STX\SOH\DC2\EOT\234\ACK:L\n\
    \\r\n\
    \\ENQ\EOTI\STX\STX\ETX\DC2\EOT\234\ACKOP\n\
    \\f\n\
    \\EOT\EOTI\STX\ETX\DC2\EOT\235\ACK\EOTU\n\
    \\r\n\
    \\ENQ\EOTI\STX\ETX\EOT\DC2\EOT\235\ACK\EOT\f\n\
    \\r\n\
    \\ENQ\EOTI\STX\ETX\ACK\DC2\EOT\235\ACK\r?\n\
    \\r\n\
    \\ENQ\EOTI\STX\ETX\SOH\DC2\EOT\235\ACK@P\n\
    \\r\n\
    \\ENQ\EOTI\STX\ETX\ETX\DC2\EOT\235\ACKST\n\
    \\f\n\
    \\EOT\EOTI\STX\EOT\DC2\EOT\236\ACK\EOTO\n\
    \\r\n\
    \\ENQ\EOTI\STX\EOT\ACK\DC2\EOT\236\ACK\EOT4\n\
    \\r\n\
    \\ENQ\EOTI\STX\EOT\SOH\DC2\EOT\236\ACK5J\n\
    \\r\n\
    \\ENQ\EOTI\STX\EOT\ETX\DC2\EOT\236\ACKMN\n\
    \\f\n\
    \\EOT\EOTI\STX\ENQ\DC2\EOT\237\ACK\EOTA\n\
    \\r\n\
    \\ENQ\EOTI\STX\ENQ\EOT\DC2\EOT\237\ACK\EOT\f\n\
    \\r\n\
    \\ENQ\EOTI\STX\ENQ\ACK\DC2\EOT\237\ACK\r2\n\
    \\r\n\
    \\ENQ\EOTI\STX\ENQ\SOH\DC2\EOT\237\ACK3<\n\
    \\r\n\
    \\ENQ\EOTI\STX\ENQ\ETX\DC2\EOT\237\ACK?@\n\
    \\f\n\
    \\EOT\EOTI\STX\ACK\DC2\EOT\238\ACK\EOT]\n\
    \\r\n\
    \\ENQ\EOTI\STX\ACK\EOT\DC2\EOT\238\ACK\EOT\f\n\
    \\r\n\
    \\ENQ\EOTI\STX\ACK\ACK\DC2\EOT\238\ACK\r?\n\
    \\r\n\
    \\ENQ\EOTI\STX\ACK\SOH\DC2\EOT\238\ACK@X\n\
    \\r\n\
    \\ENQ\EOTI\STX\ACK\ETX\DC2\EOT\238\ACK[\\\n\
    \\151\SOH\n\
    \\STX\EOTJ\DC2\ACK\243\ACK\NUL\143\a\SOH\SUB\136\SOH (-- api-linter: core::0203::optional=disabled\n\
    \     aip.dev/not-precedent: field_behavior annotation not available in our gogo fork --)\n\
    \\n\
    \\v\n\
    \\ETX\EOTJ\SOH\DC2\EOT\243\ACK\b \n\
    \\f\n\
    \\EOT\EOTJ\STX\NUL\DC2\EOT\244\ACK\EOT\EM\n\
    \\r\n\
    \\ENQ\EOTJ\STX\NUL\ENQ\DC2\EOT\244\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTJ\STX\NUL\SOH\DC2\EOT\244\ACK\v\DC4\n\
    \\r\n\
    \\ENQ\EOTJ\STX\NUL\ETX\DC2\EOT\244\ACK\ETB\CAN\n\
    \C\n\
    \\EOT\EOTJ\STX\SOH\DC2\EOT\246\ACK\EOT7\SUB5 Sticky queues are not supported in `ENHANCED` mode.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTJ\STX\SOH\ACK\DC2\EOT\246\ACK\EOT'\n\
    \\r\n\
    \\ENQ\EOTJ\STX\SOH\SOH\DC2\EOT\246\ACK(2\n\
    \\r\n\
    \\ENQ\EOTJ\STX\SOH\ETX\DC2\EOT\246\ACK56\n\
    \\208\SOH\n\
    \\EOT\EOTJ\STX\STX\DC2\EOT\249\ACK\EOT<\SUB\193\SOH Deprecated. Use `ENHANCED` mode with `task_queue_types`. Ignored in `ENHANCED` mode.\n\
    \ If unspecified (TASK_QUEUE_TYPE_UNSPECIFIED), then default value (TASK_QUEUE_TYPE_WORKFLOW) will be used.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTJ\STX\STX\ACK\DC2\EOT\249\ACK\EOT'\n\
    \\r\n\
    \\ENQ\EOTJ\STX\STX\SOH\DC2\EOT\249\ACK(7\n\
    \\r\n\
    \\ENQ\EOTJ\STX\STX\ETX\DC2\EOT\249\ACK:;\n\
    \7\n\
    \\EOT\EOTJ\STX\ETX\DC2\EOT\251\ACK\EOT'\SUB) Deprecated. Ignored in `ENHANCED` mode.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTJ\STX\ETX\ENQ\DC2\EOT\251\ACK\EOT\b\n\
    \\r\n\
    \\ENQ\EOTJ\STX\ETX\SOH\DC2\EOT\251\ACK\t\"\n\
    \\r\n\
    \\ENQ\EOTJ\STX\ETX\ETX\DC2\EOT\251\ACK%&\n\
    \\DEL\n\
    \\EOT\EOTJ\STX\EOT\DC2\EOT\254\ACK\EOT=\SUBq All options except `task_queue_type` and `include_task_queue_status` are only available in the `ENHANCED` mode.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTJ\STX\EOT\ACK\DC2\EOT\254\ACK\EOT/\n\
    \\r\n\
    \\ENQ\EOTJ\STX\EOT\SOH\DC2\EOT\254\ACK08\n\
    \\r\n\
    \\ENQ\EOTJ\STX\EOT\ETX\DC2\EOT\254\ACK;<\n\
    \\191\STX\n\
    \\EOT\EOTJ\STX\ENQ\DC2\EOT\132\a\EOTE\SUB\176\STX Optional. If not provided, the result for the default Build ID will be returned. The default Build ID is the one\n\
    \ mentioned in the first unconditional Assignment Rule. If there is no default Build ID, the result for the\n\
    \ unversioned queue will be returned.\n\
    \ (-- api-linter: core::0140::prepositions --)\n\
    \\n\
    \\r\n\
    \\ENQ\EOTJ\STX\ENQ\ACK\DC2\EOT\132\a\EOT7\n\
    \\r\n\
    \\ENQ\EOTJ\STX\ENQ\SOH\DC2\EOT\132\a8@\n\
    \\r\n\
    \\ENQ\EOTJ\STX\ENQ\ETX\DC2\EOT\132\aCD\n\
    \b\n\
    \\EOT\EOTJ\STX\ACK\DC2\EOT\135\a\EOTF\SUBT Task queue types to report info about. If not specified, all types are considered.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTJ\STX\ACK\EOT\DC2\EOT\135\a\EOT\f\n\
    \\r\n\
    \\ENQ\EOTJ\STX\ACK\ACK\DC2\EOT\135\a\r0\n\
    \\r\n\
    \\ENQ\EOTJ\STX\ACK\SOH\DC2\EOT\135\a1A\n\
    \\r\n\
    \\ENQ\EOTJ\STX\ACK\ETX\DC2\EOT\135\aDE\n\
    \\183\SOH\n\
    \\EOT\EOTJ\STX\a\DC2\EOT\139\a\EOT\FS\SUB\168\SOH Report backlog info for the requested task queue types and versions\n\
    \ bool report_backlog_info = 8;\n\
    \ Report list of pollers for requested task queue types and versions\n\
    \\n\
    \\r\n\
    \\ENQ\EOTJ\STX\a\ENQ\DC2\EOT\139\a\EOT\b\n\
    \\r\n\
    \\ENQ\EOTJ\STX\a\SOH\DC2\EOT\139\a\t\ETB\n\
    \\r\n\
    \\ENQ\EOTJ\STX\a\ETX\DC2\EOT\139\a\SUB\ESC\n\
    \\138\SOH\n\
    \\EOT\EOTJ\STX\b\DC2\EOT\142\a\EOT'\SUB| Report task reachability for the requested versions and all task types (task reachability is not reported\n\
    \ per task type).\n\
    \\n\
    \\r\n\
    \\ENQ\EOTJ\STX\b\ENQ\DC2\EOT\142\a\EOT\b\n\
    \\r\n\
    \\ENQ\EOTJ\STX\b\SOH\DC2\EOT\142\a\t!\n\
    \\r\n\
    \\ENQ\EOTJ\STX\b\ETX\DC2\EOT\142\a$&\n\
    \\f\n\
    \\STX\EOTK\DC2\ACK\145\a\NUL\155\a\SOH\n\
    \\v\n\
    \\ETX\EOTK\SOH\DC2\EOT\145\a\b!\n\
    \}\n\
    \\EOT\EOTK\STX\NUL\DC2\EOT\148\a\EOT>\SUBo Deprecated. Use `versions_info.types_info.pollers` with `ENHANCED` mode instead.\n\
    \ Not set in `ENHANCED` mode.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTK\STX\NUL\EOT\DC2\EOT\148\a\EOT\f\n\
    \\r\n\
    \\ENQ\EOTK\STX\NUL\ACK\DC2\EOT\148\a\r1\n\
    \\r\n\
    \\ENQ\EOTK\STX\NUL\SOH\DC2\EOT\148\a29\n\
    \\r\n\
    \\ENQ\EOTK\STX\NUL\ETX\DC2\EOT\148\a<=\n\
    \7\n\
    \\EOT\EOTK\STX\SOH\DC2\EOT\150\a\EOTD\SUB) Deprecated. Not set in `ENHANCED` mode.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTK\STX\SOH\ACK\DC2\EOT\150\a\EOT-\n\
    \\r\n\
    \\ENQ\EOTK\STX\SOH\SOH\DC2\EOT\150\a.?\n\
    \\r\n\
    \\ENQ\EOTK\STX\SOH\ETX\DC2\EOT\150\aBC\n\
    \\151\SOH\n\
    \\EOT\EOTK\STX\STX\DC2\EOT\154\a\EOTR\SUB\136\SOH This map contains Task Queue information for each Build ID. Empty string as key value means unversioned.\n\
    \ Only set in `ENHANCED` mode.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTK\STX\STX\ACK\DC2\EOT\154\a\EOT?\n\
    \\r\n\
    \\ENQ\EOTK\STX\STX\SOH\DC2\EOT\154\a@M\n\
    \\r\n\
    \\ENQ\EOTK\STX\STX\ETX\DC2\EOT\154\aPQ\n\
    \\f\n\
    \\STX\EOTL\DC2\ACK\157\a\NUL\158\a\SOH\n\
    \\v\n\
    \\ETX\EOTL\SOH\DC2\EOT\157\a\b\GS\n\
    \S\n\
    \\STX\EOTM\DC2\ACK\161\a\NUL\172\a\SOH\SUBE GetClusterInfoResponse contains information about Temporal cluster.\n\
    \\n\
    \\v\n\
    \\ETX\EOTM\SOH\DC2\EOT\161\a\b\RS\n\
    \\176\SOH\n\
    \\EOT\EOTM\STX\NUL\DC2\EOT\164\a\EOT-\SUB\161\SOH Key is client name i.e \"temporal-go\", \"temporal-java\", or \"temporal-cli\".\n\
    \ Value is ranges of supported versions of this client i.e \">1.1.1 <=1.4.0 || ^5.0.0\".\n\
    \\n\
    \\r\n\
    \\ENQ\EOTM\STX\NUL\ACK\DC2\EOT\164\a\EOT\SYN\n\
    \\r\n\
    \\ENQ\EOTM\STX\NUL\SOH\DC2\EOT\164\a\ETB(\n\
    \\r\n\
    \\ENQ\EOTM\STX\NUL\ETX\DC2\EOT\164\a+,\n\
    \\f\n\
    \\EOT\EOTM\STX\SOH\DC2\EOT\165\a\EOT\RS\n\
    \\r\n\
    \\ENQ\EOTM\STX\SOH\ENQ\DC2\EOT\165\a\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTM\STX\SOH\SOH\DC2\EOT\165\a\v\EM\n\
    \\r\n\
    \\ENQ\EOTM\STX\SOH\ETX\DC2\EOT\165\a\FS\GS\n\
    \\f\n\
    \\EOT\EOTM\STX\STX\DC2\EOT\166\a\EOT\SUB\n\
    \\r\n\
    \\ENQ\EOTM\STX\STX\ENQ\DC2\EOT\166\a\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTM\STX\STX\SOH\DC2\EOT\166\a\v\NAK\n\
    \\r\n\
    \\ENQ\EOTM\STX\STX\ETX\DC2\EOT\166\a\CAN\EM\n\
    \\f\n\
    \\EOT\EOTM\STX\ETX\DC2\EOT\167\a\EOT9\n\
    \\r\n\
    \\ENQ\EOTM\STX\ETX\ACK\DC2\EOT\167\a\EOT'\n\
    \\r\n\
    \\ENQ\EOTM\STX\ETX\SOH\DC2\EOT\167\a(4\n\
    \\r\n\
    \\ENQ\EOTM\STX\ETX\ETX\DC2\EOT\167\a78\n\
    \\f\n\
    \\EOT\EOTM\STX\EOT\DC2\EOT\168\a\EOT\FS\n\
    \\r\n\
    \\ENQ\EOTM\STX\EOT\ENQ\DC2\EOT\168\a\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTM\STX\EOT\SOH\DC2\EOT\168\a\v\ETB\n\
    \\r\n\
    \\ENQ\EOTM\STX\EOT\ETX\DC2\EOT\168\a\SUB\ESC\n\
    \\f\n\
    \\EOT\EOTM\STX\ENQ\DC2\EOT\169\a\EOT\"\n\
    \\r\n\
    \\ENQ\EOTM\STX\ENQ\ENQ\DC2\EOT\169\a\EOT\t\n\
    \\r\n\
    \\ENQ\EOTM\STX\ENQ\SOH\DC2\EOT\169\a\n\
    \\GS\n\
    \\r\n\
    \\ENQ\EOTM\STX\ENQ\ETX\DC2\EOT\169\a !\n\
    \\f\n\
    \\EOT\EOTM\STX\ACK\DC2\EOT\170\a\EOT!\n\
    \\r\n\
    \\ENQ\EOTM\STX\ACK\ENQ\DC2\EOT\170\a\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTM\STX\ACK\SOH\DC2\EOT\170\a\v\FS\n\
    \\r\n\
    \\ENQ\EOTM\STX\ACK\ETX\DC2\EOT\170\a\US \n\
    \\f\n\
    \\EOT\EOTM\STX\a\DC2\EOT\171\a\EOT \n\
    \\r\n\
    \\ENQ\EOTM\STX\a\ENQ\DC2\EOT\171\a\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTM\STX\a\SOH\DC2\EOT\171\a\v\ESC\n\
    \\r\n\
    \\ENQ\EOTM\STX\a\ETX\DC2\EOT\171\a\RS\US\n\
    \\f\n\
    \\STX\EOTN\DC2\ACK\174\a\NUL\175\a\SOH\n\
    \\v\n\
    \\ETX\EOTN\SOH\DC2\EOT\174\a\b\FS\n\
    \\f\n\
    \\STX\EOTO\DC2\ACK\177\a\NUL\224\a\SOH\n\
    \\v\n\
    \\ETX\EOTO\SOH\DC2\EOT\177\a\b\GS\n\
    \&\n\
    \\EOT\EOTO\STX\NUL\DC2\EOT\179\a\EOT\RS\SUB\CAN Version of the server.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTO\STX\NUL\ENQ\DC2\EOT\179\a\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTO\STX\NUL\SOH\DC2\EOT\179\a\v\EM\n\
    \\r\n\
    \\ENQ\EOTO\STX\NUL\ETX\DC2\EOT\179\a\FS\GS\n\
    \5\n\
    \\EOT\EOTO\STX\SOH\DC2\EOT\182\a\EOT\"\SUB' All capabilities the system supports.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTO\STX\SOH\ACK\DC2\EOT\182\a\EOT\DLE\n\
    \\r\n\
    \\ENQ\EOTO\STX\SOH\SOH\DC2\EOT\182\a\DC1\GS\n\
    \\r\n\
    \\ENQ\EOTO\STX\SOH\ETX\DC2\EOT\182\a !\n\
    \,\n\
    \\EOT\EOTO\ETX\NUL\DC2\ACK\185\a\EOT\223\a\ENQ\SUB\FS System capability details.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTO\ETX\NUL\SOH\DC2\EOT\185\a\f\CAN\n\
    \A\n\
    \\ACK\EOTO\ETX\NUL\STX\NUL\DC2\EOT\187\a\b)\SUB1 True if signal and query headers are supported.\n\
    \\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\NUL\ENQ\DC2\EOT\187\a\b\f\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\NUL\SOH\DC2\EOT\187\a\r$\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\NUL\ETX\DC2\EOT\187\a'(\n\
    \\242\SOH\n\
    \\ACK\EOTO\ETX\NUL\STX\SOH\DC2\EOT\194\a\b0\SUB\225\SOH True if internal errors are differentiated from other types of errors for purposes of\n\
    \ retrying non-internal errors.\n\
    \\n\
    \ When unset/false, clients retry all failures. When true, clients should only retry\n\
    \ non-internal errors.\n\
    \\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\SOH\ENQ\DC2\EOT\194\a\b\f\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\SOH\SOH\DC2\EOT\194\a\r+\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\SOH\ETX\DC2\EOT\194\a./\n\
    \\\\n\
    \\ACK\EOTO\ETX\NUL\STX\STX\DC2\EOT\197\a\b4\SUBL True if RespondActivityTaskFailed API supports including heartbeat details\n\
    \\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\STX\ENQ\DC2\EOT\197\a\b\f\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\STX\SOH\DC2\EOT\197\a\r/\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\STX\ETX\DC2\EOT\197\a23\n\
    \7\n\
    \\ACK\EOTO\ETX\NUL\STX\ETX\DC2\EOT\200\a\b$\SUB' Supports scheduled workflow features.\n\
    \\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\ETX\ENQ\DC2\EOT\200\a\b\f\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\ETX\SOH\DC2\EOT\200\a\r\US\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\ETX\ETX\DC2\EOT\200\a\"#\n\
    \l\n\
    \\ACK\EOTO\ETX\NUL\STX\EOT\DC2\EOT\203\a\b,\SUB\\ True if server uses protos that include temporal.api.failure.v1.Failure.encoded_attributes\n\
    \\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\EOT\ENQ\DC2\EOT\203\a\b\f\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\EOT\SOH\DC2\EOT\203\a\r'\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\EOT\ETX\DC2\EOT\203\a*+\n\
    \\236\SOH\n\
    \\ACK\EOTO\ETX\NUL\STX\ENQ\DC2\EOT\208\a\b+\SUB\219\SOH True if server supports dispatching Workflow and Activity tasks based on a worker's build_id\n\
    \ (see:\n\
    \ https://github.com/temporalio/proposals/blob/a123af3b559f43db16ea6dd31870bfb754c4dc5e/versioning/worker-versions.md)\n\
    \\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\ENQ\ENQ\DC2\EOT\208\a\b\f\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\ENQ\SOH\DC2\EOT\208\a\r&\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\ENQ\ETX\DC2\EOT\208\a)*\n\
    \A\n\
    \\ACK\EOTO\ETX\NUL\STX\ACK\DC2\EOT\211\a\b\GS\SUB1 True if server supports upserting workflow memo\n\
    \\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\ACK\ENQ\DC2\EOT\211\a\b\f\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\ACK\SOH\DC2\EOT\211\a\r\CAN\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\ACK\ETX\DC2\EOT\211\a\ESC\FS\n\
    \l\n\
    \\ACK\EOTO\ETX\NUL\STX\a\DC2\EOT\214\a\b&\SUB\\ True if server supports eager workflow task dispatching for the StartWorkflowExecution API\n\
    \\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\a\ENQ\DC2\EOT\214\a\b\f\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\a\SOH\DC2\EOT\214\a\r!\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\a\ETX\DC2\EOT\214\a$%\n\
    \y\n\
    \\ACK\EOTO\ETX\NUL\STX\b\DC2\EOT\218\a\b\RS\SUBi True if the server knows about the sdk metadata field on WFT completions and will record\n\
    \ it in history\n\
    \\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\b\ENQ\DC2\EOT\218\a\b\f\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\b\SOH\DC2\EOT\218\a\r\EM\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\b\ETX\DC2\EOT\218\a\FS\GS\n\
    \\132\SOH\n\
    \\ACK\EOTO\ETX\NUL\STX\t\DC2\EOT\222\a\b2\SUBt True if the server supports count group by execution status\n\
    \ (-- api-linter: core::0140::prepositions=disabled --)\n\
    \\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\t\ENQ\DC2\EOT\222\a\b\f\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\t\SOH\DC2\EOT\222\a\r,\n\
    \\SI\n\
    \\a\EOTO\ETX\NUL\STX\t\ETX\DC2\EOT\222\a/1\n\
    \\f\n\
    \\STX\EOTP\DC2\ACK\226\a\NUL\229\a\SOH\n\
    \\v\n\
    \\ETX\EOTP\SOH\DC2\EOT\226\a\b&\n\
    \\f\n\
    \\EOT\EOTP\STX\NUL\DC2\EOT\227\a\EOT\EM\n\
    \\r\n\
    \\ENQ\EOTP\STX\NUL\ENQ\DC2\EOT\227\a\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTP\STX\NUL\SOH\DC2\EOT\227\a\v\DC4\n\
    \\r\n\
    \\ENQ\EOTP\STX\NUL\ETX\DC2\EOT\227\a\ETB\CAN\n\
    \\f\n\
    \\EOT\EOTP\STX\SOH\DC2\EOT\228\a\EOT7\n\
    \\r\n\
    \\ENQ\EOTP\STX\SOH\ACK\DC2\EOT\228\a\EOT'\n\
    \\r\n\
    \\ENQ\EOTP\STX\SOH\SOH\DC2\EOT\228\a(2\n\
    \\r\n\
    \\ENQ\EOTP\STX\SOH\ETX\DC2\EOT\228\a56\n\
    \\f\n\
    \\STX\EOTQ\DC2\ACK\231\a\NUL\234\a\SOH\n\
    \\v\n\
    \\ETX\EOTQ\SOH\DC2\EOT\231\a\b'\n\
    \\f\n\
    \\EOT\EOTQ\STX\NUL\DC2\EOT\232\a\EOTe\n\
    \\r\n\
    \\ENQ\EOTQ\STX\NUL\EOT\DC2\EOT\232\a\EOT\f\n\
    \\r\n\
    \\ENQ\EOTQ\STX\NUL\ACK\DC2\EOT\232\a\rA\n\
    \\r\n\
    \\ENQ\EOTQ\STX\NUL\SOH\DC2\EOT\232\aB`\n\
    \\r\n\
    \\ENQ\EOTQ\STX\NUL\ETX\DC2\EOT\232\acd\n\
    \\f\n\
    \\EOT\EOTQ\STX\SOH\DC2\EOT\233\a\EOTe\n\
    \\r\n\
    \\ENQ\EOTQ\STX\SOH\EOT\DC2\EOT\233\a\EOT\f\n\
    \\r\n\
    \\ENQ\EOTQ\STX\SOH\ACK\DC2\EOT\233\a\rA\n\
    \\r\n\
    \\ENQ\EOTQ\STX\SOH\SOH\DC2\EOT\233\aB`\n\
    \\r\n\
    \\ENQ\EOTQ\STX\SOH\ETX\DC2\EOT\233\acd\n\
    \\151\SOH\n\
    \\STX\EOTR\DC2\ACK\238\a\NUL\254\a\SOH\SUB\136\SOH (-- api-linter: core::0203::optional=disabled\n\
    \     aip.dev/not-precedent: field_behavior annotation not available in our gogo fork --)\n\
    \\n\
    \\v\n\
    \\ETX\EOTR\SOH\DC2\EOT\238\a\b\GS\n\
    \@\n\
    \\EOT\EOTR\STX\NUL\DC2\EOT\240\a\EOT\EM\SUB2 The namespace the schedule should be created in.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTR\STX\NUL\ENQ\DC2\EOT\240\a\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTR\STX\NUL\SOH\DC2\EOT\240\a\v\DC4\n\
    \\r\n\
    \\ENQ\EOTR\STX\NUL\ETX\DC2\EOT\240\a\ETB\CAN\n\
    \+\n\
    \\EOT\EOTR\STX\SOH\DC2\EOT\242\a\EOT\ESC\SUB\GS The id of the new schedule.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTR\STX\SOH\ENQ\DC2\EOT\242\a\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTR\STX\SOH\SOH\DC2\EOT\242\a\v\SYN\n\
    \\r\n\
    \\ENQ\EOTR\STX\SOH\ETX\DC2\EOT\242\a\EM\SUB\n\
    \G\n\
    \\EOT\EOTR\STX\STX\DC2\EOT\244\a\EOT3\SUB9 The schedule spec, policies, action, and initial state.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTR\STX\STX\ACK\DC2\EOT\244\a\EOT%\n\
    \\r\n\
    \\ENQ\EOTR\STX\STX\SOH\DC2\EOT\244\a&.\n\
    \\r\n\
    \\ENQ\EOTR\STX\STX\ETX\DC2\EOT\244\a12\n\
    \Q\n\
    \\EOT\EOTR\STX\ETX\DC2\EOT\246\a\EOT=\SUBC Optional initial patch (e.g. to run the action once immediately).\n\
    \\n\
    \\r\n\
    \\ENQ\EOTR\STX\ETX\ACK\DC2\EOT\246\a\EOT*\n\
    \\r\n\
    \\ENQ\EOTR\STX\ETX\SOH\DC2\EOT\246\a+8\n\
    \\r\n\
    \\ENQ\EOTR\STX\ETX\ETX\DC2\EOT\246\a;<\n\
    \F\n\
    \\EOT\EOTR\STX\EOT\DC2\EOT\248\a\EOT\CAN\SUB8 The identity of the client who initiated this request.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTR\STX\EOT\ENQ\DC2\EOT\248\a\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTR\STX\EOT\SOH\DC2\EOT\248\a\v\DC3\n\
    \\r\n\
    \\ENQ\EOTR\STX\EOT\ETX\DC2\EOT\248\a\SYN\ETB\n\
    \^\n\
    \\EOT\EOTR\STX\ENQ\DC2\EOT\250\a\EOT\SUB\SUBP A unique identifier for this create request for idempotence. Typically UUIDv4.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTR\STX\ENQ\ENQ\DC2\EOT\250\a\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTR\STX\ENQ\SOH\DC2\EOT\250\a\v\NAK\n\
    \\r\n\
    \\ENQ\EOTR\STX\ENQ\ETX\DC2\EOT\250\a\CAN\EM\n\
    \L\n\
    \\EOT\EOTR\STX\ACK\DC2\EOT\252\a\EOT)\SUB> Memo and search attributes to attach to the schedule itself.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTR\STX\ACK\ACK\DC2\EOT\252\a\EOT\US\n\
    \\r\n\
    \\ENQ\EOTR\STX\ACK\SOH\DC2\EOT\252\a $\n\
    \\r\n\
    \\ENQ\EOTR\STX\ACK\ETX\DC2\EOT\252\a'(\n\
    \\f\n\
    \\EOT\EOTR\STX\a\DC2\EOT\253\a\EOTB\n\
    \\r\n\
    \\ENQ\EOTR\STX\a\ACK\DC2\EOT\253\a\EOT+\n\
    \\r\n\
    \\ENQ\EOTR\STX\a\SOH\DC2\EOT\253\a,=\n\
    \\r\n\
    \\ENQ\EOTR\STX\a\ETX\DC2\EOT\253\a@A\n\
    \\f\n\
    \\STX\EOTS\DC2\ACK\128\b\NUL\130\b\SOH\n\
    \\v\n\
    \\ETX\EOTS\SOH\DC2\EOT\128\b\b\RS\n\
    \\f\n\
    \\EOT\EOTS\STX\NUL\DC2\EOT\129\b\EOT\GS\n\
    \\r\n\
    \\ENQ\EOTS\STX\NUL\ENQ\DC2\EOT\129\b\EOT\t\n\
    \\r\n\
    \\ENQ\EOTS\STX\NUL\SOH\DC2\EOT\129\b\n\
    \\CAN\n\
    \\r\n\
    \\ENQ\EOTS\STX\NUL\ETX\DC2\EOT\129\b\ESC\FS\n\
    \\f\n\
    \\STX\EOTT\DC2\ACK\132\b\NUL\137\b\SOH\n\
    \\v\n\
    \\ETX\EOTT\SOH\DC2\EOT\132\b\b\US\n\
    \:\n\
    \\EOT\EOTT\STX\NUL\DC2\EOT\134\b\EOT\EM\SUB, The namespace of the schedule to describe.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTT\STX\NUL\ENQ\DC2\EOT\134\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTT\STX\NUL\SOH\DC2\EOT\134\b\v\DC4\n\
    \\r\n\
    \\ENQ\EOTT\STX\NUL\ETX\DC2\EOT\134\b\ETB\CAN\n\
    \3\n\
    \\EOT\EOTT\STX\SOH\DC2\EOT\136\b\EOT\ESC\SUB% The id of the schedule to describe.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTT\STX\SOH\ENQ\DC2\EOT\136\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTT\STX\SOH\SOH\DC2\EOT\136\b\v\SYN\n\
    \\r\n\
    \\ENQ\EOTT\STX\SOH\ETX\DC2\EOT\136\b\EM\SUB\n\
    \\f\n\
    \\STX\EOTU\DC2\ACK\139\b\NUL\158\b\SOH\n\
    \\v\n\
    \\ETX\EOTU\SOH\DC2\EOT\139\b\b \n\
    \\146\ETX\n\
    \\EOT\EOTU\STX\NUL\DC2\EOT\147\b\EOT3\SUB\131\ETX The complete current schedule details. This may not match the schedule as\n\
    \ created because:\n\
    \ - some types of schedule specs may get compiled into others (e.g.\n\
    \   CronString into StructuredCalendarSpec)\n\
    \ - some unspecified fields may be replaced by defaults\n\
    \ - some fields in the state are modified automatically\n\
    \ - the schedule may have been modified by UpdateSchedule or PatchSchedule\n\
    \\n\
    \\r\n\
    \\ENQ\EOTU\STX\NUL\ACK\DC2\EOT\147\b\EOT%\n\
    \\r\n\
    \\ENQ\EOTU\STX\NUL\SOH\DC2\EOT\147\b&.\n\
    \\r\n\
    \\ENQ\EOTU\STX\NUL\ETX\DC2\EOT\147\b12\n\
    \*\n\
    \\EOT\EOTU\STX\SOH\DC2\EOT\149\b\EOT3\SUB\FS Extra schedule state info.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTU\STX\SOH\ACK\DC2\EOT\149\b\EOT)\n\
    \\r\n\
    \\ENQ\EOTU\STX\SOH\SOH\DC2\EOT\149\b*.\n\
    \\r\n\
    \\ENQ\EOTU\STX\SOH\ETX\DC2\EOT\149\b12\n\
    \R\n\
    \\EOT\EOTU\STX\STX\DC2\EOT\151\b\EOT)\SUBD The memo and search attributes that the schedule was created with.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTU\STX\STX\ACK\DC2\EOT\151\b\EOT\US\n\
    \\r\n\
    \\ENQ\EOTU\STX\STX\SOH\DC2\EOT\151\b $\n\
    \\r\n\
    \\ENQ\EOTU\STX\STX\ETX\DC2\EOT\151\b'(\n\
    \\f\n\
    \\EOT\EOTU\STX\ETX\DC2\EOT\152\b\EOTB\n\
    \\r\n\
    \\ENQ\EOTU\STX\ETX\ACK\DC2\EOT\152\b\EOT+\n\
    \\r\n\
    \\ENQ\EOTU\STX\ETX\SOH\DC2\EOT\152\b,=\n\
    \\r\n\
    \\ENQ\EOTU\STX\ETX\ETX\DC2\EOT\152\b@A\n\
    \\199\SOH\n\
    \\EOT\EOTU\STX\EOT\DC2\EOT\157\b\EOT\GS\SUB\184\SOH This value can be passed back to UpdateSchedule to ensure that the\n\
    \ schedule was not modified between a Describe and an Update, which could\n\
    \ lead to lost updates and other confusion.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTU\STX\EOT\ENQ\DC2\EOT\157\b\EOT\t\n\
    \\r\n\
    \\ENQ\EOTU\STX\EOT\SOH\DC2\EOT\157\b\n\
    \\CAN\n\
    \\r\n\
    \\ENQ\EOTU\STX\EOT\ETX\DC2\EOT\157\b\ESC\FS\n\
    \\f\n\
    \\STX\EOTV\DC2\ACK\160\b\NUL\183\b\SOH\n\
    \\v\n\
    \\ETX\EOTV\SOH\DC2\EOT\160\b\b\GS\n\
    \8\n\
    \\EOT\EOTV\STX\NUL\DC2\EOT\162\b\EOT\EM\SUB* The namespace of the schedule to update.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTV\STX\NUL\ENQ\DC2\EOT\162\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTV\STX\NUL\SOH\DC2\EOT\162\b\v\DC4\n\
    \\r\n\
    \\ENQ\EOTV\STX\NUL\ETX\DC2\EOT\162\b\ETB\CAN\n\
    \1\n\
    \\EOT\EOTV\STX\SOH\DC2\EOT\164\b\EOT\ESC\SUB# The id of the schedule to update.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTV\STX\SOH\ENQ\DC2\EOT\164\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTV\STX\SOH\SOH\DC2\EOT\164\b\v\SYN\n\
    \\r\n\
    \\ENQ\EOTV\STX\SOH\ETX\DC2\EOT\164\b\EM\SUB\n\
    \\159\SOH\n\
    \\EOT\EOTV\STX\STX\DC2\EOT\167\b\EOT3\SUB\144\SOH The new schedule. The four main fields of the schedule (spec, action,\n\
    \ policies, state) are replaced completely by the values in this message.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTV\STX\STX\ACK\DC2\EOT\167\b\EOT%\n\
    \\r\n\
    \\ENQ\EOTV\STX\STX\SOH\DC2\EOT\167\b&.\n\
    \\r\n\
    \\ENQ\EOTV\STX\STX\ETX\DC2\EOT\167\b12\n\
    \\132\STX\n\
    \\EOT\EOTV\STX\ETX\DC2\EOT\172\b\EOT\GS\SUB\245\SOH This can be the value of conflict_token from a DescribeScheduleResponse,\n\
    \ which will cause this request to fail if the schedule has been modified\n\
    \ between the Describe and this Update.\n\
    \ If missing, the schedule will be updated unconditionally.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTV\STX\ETX\ENQ\DC2\EOT\172\b\EOT\t\n\
    \\r\n\
    \\ENQ\EOTV\STX\ETX\SOH\DC2\EOT\172\b\n\
    \\CAN\n\
    \\r\n\
    \\ENQ\EOTV\STX\ETX\ETX\DC2\EOT\172\b\ESC\FS\n\
    \F\n\
    \\EOT\EOTV\STX\EOT\DC2\EOT\174\b\EOT\CAN\SUB8 The identity of the client who initiated this request.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTV\STX\EOT\ENQ\DC2\EOT\174\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTV\STX\EOT\SOH\DC2\EOT\174\b\v\DC3\n\
    \\r\n\
    \\ENQ\EOTV\STX\EOT\ETX\DC2\EOT\174\b\SYN\ETB\n\
    \^\n\
    \\EOT\EOTV\STX\ENQ\DC2\EOT\176\b\EOT\SUB\SUBP A unique identifier for this update request for idempotence. Typically UUIDv4.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTV\STX\ENQ\ENQ\DC2\EOT\176\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTV\STX\ENQ\SOH\DC2\EOT\176\b\v\NAK\n\
    \\r\n\
    \\ENQ\EOTV\STX\ENQ\ETX\DC2\EOT\176\b\CAN\EM\n\
    \\240\STX\n\
    \\EOT\EOTV\STX\ACK\DC2\EOT\182\b\EOTB\SUB\225\STX Schedule search attributes to be updated.\n\
    \ Do not set this field if you do not want to update the search attributes.\n\
    \ A non-null empty object will set the search attributes to an empty map.\n\
    \ Note: you cannot only update the search attributes with `UpdateScheduleRequest`,\n\
    \ you must also set the `schedule` field; otherwise, it will unset the schedule.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTV\STX\ACK\ACK\DC2\EOT\182\b\EOT+\n\
    \\r\n\
    \\ENQ\EOTV\STX\ACK\SOH\DC2\EOT\182\b,=\n\
    \\r\n\
    \\ENQ\EOTV\STX\ACK\ETX\DC2\EOT\182\b@A\n\
    \\f\n\
    \\STX\EOTW\DC2\ACK\185\b\NUL\186\b\SOH\n\
    \\v\n\
    \\ETX\EOTW\SOH\DC2\EOT\185\b\b\RS\n\
    \\f\n\
    \\STX\EOTX\DC2\ACK\188\b\NUL\198\b\SOH\n\
    \\v\n\
    \\ETX\EOTX\SOH\DC2\EOT\188\b\b\FS\n\
    \7\n\
    \\EOT\EOTX\STX\NUL\DC2\EOT\190\b\EOT\EM\SUB) The namespace of the schedule to patch.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTX\STX\NUL\ENQ\DC2\EOT\190\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTX\STX\NUL\SOH\DC2\EOT\190\b\v\DC4\n\
    \\r\n\
    \\ENQ\EOTX\STX\NUL\ETX\DC2\EOT\190\b\ETB\CAN\n\
    \0\n\
    \\EOT\EOTX\STX\SOH\DC2\EOT\192\b\EOT\ESC\SUB\" The id of the schedule to patch.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTX\STX\SOH\ENQ\DC2\EOT\192\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTX\STX\SOH\SOH\DC2\EOT\192\b\v\SYN\n\
    \\r\n\
    \\ENQ\EOTX\STX\SOH\ETX\DC2\EOT\192\b\EM\SUB\n\
    \\f\n\
    \\EOT\EOTX\STX\STX\DC2\EOT\193\b\EOT5\n\
    \\r\n\
    \\ENQ\EOTX\STX\STX\ACK\DC2\EOT\193\b\EOT*\n\
    \\r\n\
    \\ENQ\EOTX\STX\STX\SOH\DC2\EOT\193\b+0\n\
    \\r\n\
    \\ENQ\EOTX\STX\STX\ETX\DC2\EOT\193\b34\n\
    \F\n\
    \\EOT\EOTX\STX\ETX\DC2\EOT\195\b\EOT\CAN\SUB8 The identity of the client who initiated this request.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTX\STX\ETX\ENQ\DC2\EOT\195\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTX\STX\ETX\SOH\DC2\EOT\195\b\v\DC3\n\
    \\r\n\
    \\ENQ\EOTX\STX\ETX\ETX\DC2\EOT\195\b\SYN\ETB\n\
    \^\n\
    \\EOT\EOTX\STX\EOT\DC2\EOT\197\b\EOT\SUB\SUBP A unique identifier for this update request for idempotence. Typically UUIDv4.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTX\STX\EOT\ENQ\DC2\EOT\197\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTX\STX\EOT\SOH\DC2\EOT\197\b\v\NAK\n\
    \\r\n\
    \\ENQ\EOTX\STX\EOT\ETX\DC2\EOT\197\b\CAN\EM\n\
    \\f\n\
    \\STX\EOTY\DC2\ACK\200\b\NUL\201\b\SOH\n\
    \\v\n\
    \\ETX\EOTY\SOH\DC2\EOT\200\b\b\GS\n\
    \\f\n\
    \\STX\EOTZ\DC2\ACK\203\b\NUL\211\b\SOH\n\
    \\v\n\
    \\ETX\EOTZ\SOH\DC2\EOT\203\b\b(\n\
    \7\n\
    \\EOT\EOTZ\STX\NUL\DC2\EOT\205\b\EOT\EM\SUB) The namespace of the schedule to query.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTZ\STX\NUL\ENQ\DC2\EOT\205\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTZ\STX\NUL\SOH\DC2\EOT\205\b\v\DC4\n\
    \\r\n\
    \\ENQ\EOTZ\STX\NUL\ETX\DC2\EOT\205\b\ETB\CAN\n\
    \0\n\
    \\EOT\EOTZ\STX\SOH\DC2\EOT\207\b\EOT\ESC\SUB\" The id of the schedule to query.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTZ\STX\SOH\ENQ\DC2\EOT\207\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTZ\STX\SOH\SOH\DC2\EOT\207\b\v\SYN\n\
    \\r\n\
    \\ENQ\EOTZ\STX\SOH\ETX\DC2\EOT\207\b\EM\SUB\n\
    \$\n\
    \\EOT\EOTZ\STX\STX\DC2\EOT\209\b\EOT-\SUB\SYN Time range to query.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTZ\STX\STX\ACK\DC2\EOT\209\b\EOT\GS\n\
    \\r\n\
    \\ENQ\EOTZ\STX\STX\SOH\DC2\EOT\209\b\RS(\n\
    \\r\n\
    \\ENQ\EOTZ\STX\STX\ETX\DC2\EOT\209\b+,\n\
    \\f\n\
    \\EOT\EOTZ\STX\ETX\DC2\EOT\210\b\EOT+\n\
    \\r\n\
    \\ENQ\EOTZ\STX\ETX\ACK\DC2\EOT\210\b\EOT\GS\n\
    \\r\n\
    \\ENQ\EOTZ\STX\ETX\SOH\DC2\EOT\210\b\RS&\n\
    \\r\n\
    \\ENQ\EOTZ\STX\ETX\ETX\DC2\EOT\210\b)*\n\
    \\f\n\
    \\STX\EOT[\DC2\ACK\213\b\NUL\215\b\SOH\n\
    \\v\n\
    \\ETX\EOT[\SOH\DC2\EOT\213\b\b)\n\
    \\f\n\
    \\EOT\EOT[\STX\NUL\DC2\EOT\214\b\EOT6\n\
    \\r\n\
    \\ENQ\EOT[\STX\NUL\EOT\DC2\EOT\214\b\EOT\f\n\
    \\r\n\
    \\ENQ\EOT[\STX\NUL\ACK\DC2\EOT\214\b\r&\n\
    \\r\n\
    \\ENQ\EOT[\STX\NUL\SOH\DC2\EOT\214\b'1\n\
    \\r\n\
    \\ENQ\EOT[\STX\NUL\ETX\DC2\EOT\214\b45\n\
    \\f\n\
    \\STX\EOT\\\DC2\ACK\217\b\NUL\224\b\SOH\n\
    \\v\n\
    \\ETX\EOT\\\SOH\DC2\EOT\217\b\b\GS\n\
    \8\n\
    \\EOT\EOT\\\STX\NUL\DC2\EOT\219\b\EOT\EM\SUB* The namespace of the schedule to delete.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\\\STX\NUL\ENQ\DC2\EOT\219\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\\\STX\NUL\SOH\DC2\EOT\219\b\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\\\STX\NUL\ETX\DC2\EOT\219\b\ETB\CAN\n\
    \1\n\
    \\EOT\EOT\\\STX\SOH\DC2\EOT\221\b\EOT\ESC\SUB# The id of the schedule to delete.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\\\STX\SOH\ENQ\DC2\EOT\221\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\\\STX\SOH\SOH\DC2\EOT\221\b\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\\\STX\SOH\ETX\DC2\EOT\221\b\EM\SUB\n\
    \F\n\
    \\EOT\EOT\\\STX\STX\DC2\EOT\223\b\EOT\CAN\SUB8 The identity of the client who initiated this request.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\\\STX\STX\ENQ\DC2\EOT\223\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\\\STX\STX\SOH\DC2\EOT\223\b\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\\\STX\STX\ETX\DC2\EOT\223\b\SYN\ETB\n\
    \\f\n\
    \\STX\EOT]\DC2\ACK\226\b\NUL\227\b\SOH\n\
    \\v\n\
    \\ETX\EOT]\SOH\DC2\EOT\226\b\b\RS\n\
    \\f\n\
    \\STX\EOT^\DC2\ACK\229\b\NUL\238\b\SOH\n\
    \\v\n\
    \\ETX\EOT^\SOH\DC2\EOT\229\b\b\FS\n\
    \3\n\
    \\EOT\EOT^\STX\NUL\DC2\EOT\231\b\EOT\EM\SUB% The namespace to list schedules in.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT^\STX\NUL\ENQ\DC2\EOT\231\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT^\STX\NUL\SOH\DC2\EOT\231\b\v\DC4\n\
    \\r\n\
    \\ENQ\EOT^\STX\NUL\ETX\DC2\EOT\231\b\ETB\CAN\n\
    \+\n\
    \\EOT\EOT^\STX\SOH\DC2\EOT\233\b\EOT \SUB\GS How many to return at once.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT^\STX\SOH\ENQ\DC2\EOT\233\b\EOT\t\n\
    \\r\n\
    \\ENQ\EOT^\STX\SOH\SOH\DC2\EOT\233\b\n\
    \\ESC\n\
    \\r\n\
    \\ENQ\EOT^\STX\SOH\ETX\DC2\EOT\233\b\RS\US\n\
    \6\n\
    \\EOT\EOT^\STX\STX\DC2\EOT\235\b\EOT\RS\SUB( Token to get the next page of results.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT^\STX\STX\ENQ\DC2\EOT\235\b\EOT\t\n\
    \\r\n\
    \\ENQ\EOT^\STX\STX\SOH\DC2\EOT\235\b\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT^\STX\STX\ETX\DC2\EOT\235\b\FS\GS\n\
    \*\n\
    \\EOT\EOT^\STX\ETX\DC2\EOT\237\b\EOT\NAK\SUB\FS Query to filter schedules.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT^\STX\ETX\ENQ\DC2\EOT\237\b\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT^\STX\ETX\SOH\DC2\EOT\237\b\v\DLE\n\
    \\r\n\
    \\ENQ\EOT^\STX\ETX\ETX\DC2\EOT\237\b\DC3\DC4\n\
    \\f\n\
    \\STX\EOT_\DC2\ACK\240\b\NUL\243\b\SOH\n\
    \\v\n\
    \\ETX\EOT_\SOH\DC2\EOT\240\b\b\GS\n\
    \\f\n\
    \\EOT\EOT_\STX\NUL\DC2\EOT\241\b\EOTF\n\
    \\r\n\
    \\ENQ\EOT_\STX\NUL\EOT\DC2\EOT\241\b\EOT\f\n\
    \\r\n\
    \\ENQ\EOT_\STX\NUL\ACK\DC2\EOT\241\b\r7\n\
    \\r\n\
    \\ENQ\EOT_\STX\NUL\SOH\DC2\EOT\241\b8A\n\
    \\r\n\
    \\ENQ\EOT_\STX\NUL\ETX\DC2\EOT\241\bDE\n\
    \\f\n\
    \\EOT\EOT_\STX\SOH\DC2\EOT\242\b\EOT\RS\n\
    \\r\n\
    \\ENQ\EOT_\STX\SOH\ENQ\DC2\EOT\242\b\EOT\t\n\
    \\r\n\
    \\ENQ\EOT_\STX\SOH\SOH\DC2\EOT\242\b\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOT_\STX\SOH\ETX\DC2\EOT\242\b\FS\GS\n\
    \\f\n\
    \\STX\EOT`\DC2\ACK\245\b\NUL\171\t\SOH\n\
    \\v\n\
    \\ETX\EOT`\SOH\DC2\EOT\245\b\b/\n\
    \\SO\n\
    \\EOT\EOT`\ETX\NUL\DC2\ACK\246\b\EOT\129\t\ENQ\n\
    \\r\n\
    \\ENQ\EOT`\ETX\NUL\SOH\DC2\EOT\246\b\f#\n\
    \E\n\
    \\ACK\EOT`\ETX\NUL\STX\NUL\DC2\EOT\248\b\b \SUB5 A new id to be added to an existing compatible set.\n\
    \\n\
    \\SI\n\
    \\a\EOT`\ETX\NUL\STX\NUL\ENQ\DC2\EOT\248\b\b\SO\n\
    \\SI\n\
    \\a\EOT`\ETX\NUL\STX\NUL\SOH\DC2\EOT\248\b\SI\ESC\n\
    \\SI\n\
    \\a\EOT`\ETX\NUL\STX\NUL\ETX\DC2\EOT\248\b\RS\US\n\
    \\209\SOH\n\
    \\ACK\EOT`\ETX\NUL\STX\SOH\DC2\EOT\252\b\b0\SUB\192\SOH A build id which must already exist in the version sets known by the task queue. The new\n\
    \ id will be stored in the set containing this id, marking it as compatible with\n\
    \ the versions within.\n\
    \\n\
    \\SI\n\
    \\a\EOT`\ETX\NUL\STX\SOH\ENQ\DC2\EOT\252\b\b\SO\n\
    \\SI\n\
    \\a\EOT`\ETX\NUL\STX\SOH\SOH\DC2\EOT\252\b\SI+\n\
    \\SI\n\
    \\a\EOT`\ETX\NUL\STX\SOH\ETX\DC2\EOT\252\b./\n\
    \\211\SOH\n\
    \\ACK\EOT`\ETX\NUL\STX\STX\DC2\EOT\128\t\b\"\SUB\194\SOH When set, establishes the compatible set being targeted as the overall default for the\n\
    \ queue. If a different set was the current default, the targeted set will replace it as\n\
    \ the new default.\n\
    \\n\
    \\SI\n\
    \\a\EOT`\ETX\NUL\STX\STX\ENQ\DC2\EOT\128\t\b\f\n\
    \\SI\n\
    \\a\EOT`\ETX\NUL\STX\STX\SOH\DC2\EOT\128\t\r\GS\n\
    \\SI\n\
    \\a\EOT`\ETX\NUL\STX\STX\ETX\DC2\EOT\128\t !\n\
    \\SO\n\
    \\EOT\EOT`\ETX\SOH\DC2\ACK\131\t\EOT\136\t\ENQ\n\
    \\r\n\
    \\ENQ\EOT`\ETX\SOH\SOH\DC2\EOT\131\t\f\NAK\n\
    \X\n\
    \\ACK\EOT`\ETX\SOH\STX\NUL\DC2\EOT\133\t\b(\SUBH A build ID in the set whose default will become the merged set default\n\
    \\n\
    \\SI\n\
    \\a\EOT`\ETX\SOH\STX\NUL\ENQ\DC2\EOT\133\t\b\SO\n\
    \\SI\n\
    \\a\EOT`\ETX\SOH\STX\NUL\SOH\DC2\EOT\133\t\SI#\n\
    \\SI\n\
    \\a\EOT`\ETX\SOH\STX\NUL\ETX\DC2\EOT\133\t&'\n\
    \Q\n\
    \\ACK\EOT`\ETX\SOH\STX\SOH\DC2\EOT\135\t\b*\SUBA A build ID in the set which will be merged into the primary set\n\
    \\n\
    \\SI\n\
    \\a\EOT`\ETX\SOH\STX\SOH\ENQ\DC2\EOT\135\t\b\SO\n\
    \\SI\n\
    \\a\EOT`\ETX\SOH\STX\SOH\SOH\DC2\EOT\135\t\SI%\n\
    \\SI\n\
    \\a\EOT`\ETX\SOH\STX\SOH\ETX\DC2\EOT\135\t()\n\
    \\f\n\
    \\EOT\EOT`\STX\NUL\DC2\EOT\138\t\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT`\STX\NUL\ENQ\DC2\EOT\138\t\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT`\STX\NUL\SOH\DC2\EOT\138\t\v\DC4\n\
    \\r\n\
    \\ENQ\EOT`\STX\NUL\ETX\DC2\EOT\138\t\ETB\CAN\n\
    \\226\SOH\n\
    \\EOT\EOT`\STX\SOH\DC2\EOT\142\t\EOT\SUB\SUB\211\SOH Must be set, the task queue to apply changes to. Because all workers on a given task queue\n\
    \ must have the same set of workflow & activity implementations, there is no reason to specify\n\
    \ a task queue type here.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT`\STX\SOH\ENQ\DC2\EOT\142\t\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT`\STX\SOH\SOH\DC2\EOT\142\t\v\NAK\n\
    \\r\n\
    \\ENQ\EOT`\STX\SOH\ETX\DC2\EOT\142\t\CAN\EM\n\
    \\SO\n\
    \\EOT\EOT`\b\NUL\DC2\ACK\143\t\EOT\170\t\ENQ\n\
    \\r\n\
    \\ENQ\EOT`\b\NUL\SOH\DC2\EOT\143\t\n\
    \\DC3\n\
    \\212\STX\n\
    \\EOT\EOT`\STX\STX\DC2\EOT\150\t\b7\SUB\197\STX A new build id. This operation will create a new set which will be the new overall\n\
    \ default version for the queue, with this id as its only member. This new set is\n\
    \ incompatible with all previous sets/versions.\n\
    \\n\
    \ (-- api-linter: core::0140::prepositions=disabled\n\
    \     aip.dev/not-precedent: In makes perfect sense here. --)\n\
    \\n\
    \\r\n\
    \\ENQ\EOT`\STX\STX\ENQ\DC2\EOT\150\t\b\SO\n\
    \\r\n\
    \\ENQ\EOT`\STX\STX\SOH\DC2\EOT\150\t\SI2\n\
    \\r\n\
    \\ENQ\EOT`\STX\STX\ETX\DC2\EOT\150\t56\n\
    \a\n\
    \\EOT\EOT`\STX\ETX\DC2\EOT\152\t\b@\SUBS Adds a new id to an existing compatible set, see sub-message definition for more.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT`\STX\ETX\ACK\DC2\EOT\152\t\b\US\n\
    \\r\n\
    \\ENQ\EOT`\STX\ETX\SOH\DC2\EOT\152\t ;\n\
    \\r\n\
    \\ENQ\EOT`\STX\ETX\ETX\DC2\EOT\152\t>?\n\
    \\149\STX\n\
    \\EOT\EOT`\STX\EOT\DC2\EOT\158\t\b+\SUB\134\STX Promote an existing set to be the current default (if it isn't already) by targeting\n\
    \ an existing build id within it. This field's value is the extant build id.\n\
    \\n\
    \ (-- api-linter: core::0140::prepositions=disabled\n\
    \     aip.dev/not-precedent: Names are hard. --)\n\
    \\n\
    \\r\n\
    \\ENQ\EOT`\STX\EOT\ENQ\DC2\EOT\158\t\b\SO\n\
    \\r\n\
    \\ENQ\EOT`\STX\EOT\SOH\DC2\EOT\158\t\SI&\n\
    \\r\n\
    \\ENQ\EOT`\STX\EOT\ETX\DC2\EOT\158\t)*\n\
    \\218\SOH\n\
    \\EOT\EOT`\STX\ENQ\DC2\EOT\163\t\b/\SUB\203\SOH Promote an existing build id within some set to be the current default for that set.\n\
    \\n\
    \ (-- api-linter: core::0140::prepositions=disabled\n\
    \     aip.dev/not-precedent: Within makes perfect sense here. --)\n\
    \\n\
    \\r\n\
    \\ENQ\EOT`\STX\ENQ\ENQ\DC2\EOT\163\t\b\SO\n\
    \\r\n\
    \\ENQ\EOT`\STX\ENQ\SOH\DC2\EOT\163\t\SI*\n\
    \\r\n\
    \\ENQ\EOT`\STX\ENQ\ETX\DC2\EOT\163\t-.\n\
    \\173\ETX\n\
    \\EOT\EOT`\STX\ACK\DC2\EOT\169\t\b!\SUB\158\ETX Merge two existing sets together, thus declaring all build IDs in both sets compatible\n\
    \ with one another. The primary set's default will become the default for the merged set.\n\
    \ This is useful if you've accidentally declared a new ID as incompatible you meant to\n\
    \ declare as compatible. The unusual case of incomplete replication during failover could\n\
    \ also result in a split set, which this operation can repair.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT`\STX\ACK\ACK\DC2\EOT\169\t\b\DC1\n\
    \\r\n\
    \\ENQ\EOT`\STX\ACK\SOH\DC2\EOT\169\t\DC2\FS\n\
    \\r\n\
    \\ENQ\EOT`\STX\ACK\ETX\DC2\EOT\169\t\US \n\
    \\f\n\
    \\STX\EOTa\DC2\ACK\172\t\NUL\175\t\SOH\n\
    \\v\n\
    \\ETX\EOTa\SOH\DC2\EOT\172\t\b0\n\
    \\v\n\
    \\ETX\EOTa\t\DC2\EOT\173\t\EOT\SI\n\
    \\f\n\
    \\EOT\EOTa\t\NUL\DC2\EOT\173\t\r\SO\n\
    \\r\n\
    \\ENQ\EOTa\t\NUL\SOH\DC2\EOT\173\t\r\SO\n\
    \\r\n\
    \\ENQ\EOTa\t\NUL\STX\DC2\EOT\173\t\r\SO\n\
    \\v\n\
    \\ETX\EOTa\n\
    \\DC2\EOT\174\t\EOT\RS\n\
    \\f\n\
    \\EOT\EOTa\n\
    \\NUL\DC2\EOT\174\t\r\GS\n\
    \\f\n\
    \\STX\EOTb\DC2\ACK\177\t\NUL\184\t\SOH\n\
    \\v\n\
    \\ETX\EOTb\SOH\DC2\EOT\177\t\b,\n\
    \\f\n\
    \\EOT\EOTb\STX\NUL\DC2\EOT\178\t\EOT\EM\n\
    \\r\n\
    \\ENQ\EOTb\STX\NUL\ENQ\DC2\EOT\178\t\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTb\STX\NUL\SOH\DC2\EOT\178\t\v\DC4\n\
    \\r\n\
    \\ENQ\EOTb\STX\NUL\ETX\DC2\EOT\178\t\ETB\CAN\n\
    \Y\n\
    \\EOT\EOTb\STX\SOH\DC2\EOT\180\t\EOT\SUB\SUBK Must be set, the task queue to interrogate about worker id compatibility.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTb\STX\SOH\ENQ\DC2\EOT\180\t\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTb\STX\SOH\SOH\DC2\EOT\180\t\v\NAK\n\
    \\r\n\
    \\ENQ\EOTb\STX\SOH\ETX\DC2\EOT\180\t\CAN\EM\n\
    \\151\SOH\n\
    \\EOT\EOTb\STX\STX\DC2\EOT\183\t\EOT\ETB\SUB\136\SOH Limits how many compatible sets will be returned. Specify 1 to only return the current\n\
    \ default major version set. 0 returns all sets.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTb\STX\STX\ENQ\DC2\EOT\183\t\EOT\t\n\
    \\r\n\
    \\ENQ\EOTb\STX\STX\SOH\DC2\EOT\183\t\n\
    \\DC2\n\
    \\r\n\
    \\ENQ\EOTb\STX\STX\ETX\DC2\EOT\183\t\NAK\SYN\n\
    \\f\n\
    \\STX\EOTc\DC2\ACK\185\t\NUL\192\t\SOH\n\
    \\v\n\
    \\ETX\EOTc\SOH\DC2\EOT\185\t\b-\n\
    \\188\STX\n\
    \\EOT\EOTc\STX\NUL\DC2\EOT\191\t\EOTS\SUB\173\STX Major version sets, in order from oldest to newest. The last element of the list will always\n\
    \ be the current default major version. IE: New workflows will target the most recent version\n\
    \ in that version set.\n\
    \\n\
    \ There may be fewer sets returned than exist, if the request chose to limit this response.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTc\STX\NUL\EOT\DC2\EOT\191\t\EOT\f\n\
    \\r\n\
    \\ENQ\EOTc\STX\NUL\ACK\DC2\EOT\191\t\r;\n\
    \\r\n\
    \\ENQ\EOTc\STX\NUL\SOH\DC2\EOT\191\t<N\n\
    \\r\n\
    \\ENQ\EOTc\STX\NUL\ETX\DC2\EOT\191\tQR\n\
    \\204\STX\n\
    \\STX\EOTd\DC2\ACK\198\t\NUL\159\n\
    \\SOH\SUB\189\STX (-- api-linter: core::0134::request-mask-required=disabled\n\
    \     aip.dev/not-precedent: UpdateNamespace RPC doesn't follow Google API format. --)\n\
    \ (-- api-linter: core::0134::request-resource-required=disabled\n\
    \     aip.dev/not-precedent: GetWorkerBuildIdCompatibilityRequest RPC doesn't follow Google API format. --)\n\
    \\n\
    \\v\n\
    \\ETX\EOTd\SOH\DC2\EOT\198\t\b*\n\
    \\219\SOH\n\
    \\EOT\EOTd\ETX\NUL\DC2\ACK\202\t\EOT\209\t\ENQ\SUB\202\SOH Inserts the rule to the list of assignment rules for this Task Queue.\n\
    \ The rules are evaluated in order, starting from index 0. The first\n\
    \ applicable rule will be applied and the rest will be ignored.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTd\ETX\NUL\SOH\DC2\EOT\202\t\f'\n\
    \\239\SOH\n\
    \\ACK\EOTd\ETX\NUL\STX\NUL\DC2\EOT\207\t\b\GS\SUB\222\SOH Use this option to insert the rule in a particular index. By\n\
    \ default, the new rule is inserted at the beginning of the list\n\
    \ (index 0). If the given index is too larger the rule will be\n\
    \ inserted at the end of the list.\n\
    \\n\
    \\SI\n\
    \\a\EOTd\ETX\NUL\STX\NUL\ENQ\DC2\EOT\207\t\b\r\n\
    \\SI\n\
    \\a\EOTd\ETX\NUL\STX\NUL\SOH\DC2\EOT\207\t\SO\CAN\n\
    \\SI\n\
    \\a\EOTd\ETX\NUL\STX\NUL\ETX\DC2\EOT\207\t\ESC\FS\n\
    \\SO\n\
    \\ACK\EOTd\ETX\NUL\STX\SOH\DC2\EOT\208\t\bA\n\
    \\SI\n\
    \\a\EOTd\ETX\NUL\STX\SOH\ACK\DC2\EOT\208\t\b7\n\
    \\SI\n\
    \\a\EOTd\ETX\NUL\STX\SOH\SOH\DC2\EOT\208\t8<\n\
    \\SI\n\
    \\a\EOTd\ETX\NUL\STX\SOH\ETX\DC2\EOT\208\t?@\n\
    \@\n\
    \\EOT\EOTd\ETX\SOH\DC2\ACK\212\t\EOT\222\t\ENQ\SUB0 Replaces the assignment rule at a given index.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTd\ETX\SOH\SOH\DC2\EOT\212\t\f(\n\
    \\SO\n\
    \\ACK\EOTd\ETX\SOH\STX\NUL\DC2\EOT\213\t\b\GS\n\
    \\SI\n\
    \\a\EOTd\ETX\SOH\STX\NUL\ENQ\DC2\EOT\213\t\b\r\n\
    \\SI\n\
    \\a\EOTd\ETX\SOH\STX\NUL\SOH\DC2\EOT\213\t\SO\CAN\n\
    \\SI\n\
    \\a\EOTd\ETX\SOH\STX\NUL\ETX\DC2\EOT\213\t\ESC\FS\n\
    \\SO\n\
    \\ACK\EOTd\ETX\SOH\STX\SOH\DC2\EOT\214\t\bA\n\
    \\SI\n\
    \\a\EOTd\ETX\SOH\STX\SOH\ACK\DC2\EOT\214\t\b7\n\
    \\SI\n\
    \\a\EOTd\ETX\SOH\STX\SOH\SOH\DC2\EOT\214\t8<\n\
    \\SI\n\
    \\a\EOTd\ETX\SOH\STX\SOH\ETX\DC2\EOT\214\t?@\n\
    \\251\SOH\n\
    \\ACK\EOTd\ETX\SOH\STX\STX\DC2\EOT\221\t\b\ETB\SUB\234\SOH By default presence of one unconditional rule is enforced, otherwise\n\
    \ the replace operation will be rejected. Set `force` to true to\n\
    \ bypass this validation. An unconditional assignment rule:\n\
    \   - Has no hint filter\n\
    \   - Has no ramp\n\
    \\n\
    \\SI\n\
    \\a\EOTd\ETX\SOH\STX\STX\ENQ\DC2\EOT\221\t\b\f\n\
    \\SI\n\
    \\a\EOTd\ETX\SOH\STX\STX\SOH\DC2\EOT\221\t\r\DC2\n\
    \\SI\n\
    \\a\EOTd\ETX\SOH\STX\STX\ETX\DC2\EOT\221\t\NAK\SYN\n\
    \\SO\n\
    \\EOT\EOTd\ETX\STX\DC2\ACK\224\t\EOT\233\t\ENQ\n\
    \\r\n\
    \\ENQ\EOTd\ETX\STX\SOH\DC2\EOT\224\t\f'\n\
    \\SO\n\
    \\ACK\EOTd\ETX\STX\STX\NUL\DC2\EOT\225\t\b\GS\n\
    \\SI\n\
    \\a\EOTd\ETX\STX\STX\NUL\ENQ\DC2\EOT\225\t\b\r\n\
    \\SI\n\
    \\a\EOTd\ETX\STX\STX\NUL\SOH\DC2\EOT\225\t\SO\CAN\n\
    \\SI\n\
    \\a\EOTd\ETX\STX\STX\NUL\ETX\DC2\EOT\225\t\ESC\FS\n\
    \\250\SOH\n\
    \\ACK\EOTd\ETX\STX\STX\SOH\DC2\EOT\232\t\b\ETB\SUB\233\SOH By default presence of one unconditional rule is enforced, otherwise\n\
    \ the delete operation will be rejected. Set `force` to true to\n\
    \ bypass this validation. An unconditional assignment rule:\n\
    \   - Has no hint filter\n\
    \   - Has no ramp\n\
    \\n\
    \\SI\n\
    \\a\EOTd\ETX\STX\STX\SOH\ENQ\DC2\EOT\232\t\b\f\n\
    \\SI\n\
    \\a\EOTd\ETX\STX\STX\SOH\SOH\DC2\EOT\232\t\r\DC2\n\
    \\SI\n\
    \\a\EOTd\ETX\STX\STX\SOH\ETX\DC2\EOT\232\t\NAK\SYN\n\
    \\158\SOH\n\
    \\EOT\EOTd\ETX\ETX\DC2\ACK\237\t\EOT\239\t\ENQ\SUB\141\SOH Adds the rule to the list of redirect rules for this Task Queue. There\n\
    \ can be at most one redirect rule for each distinct Source Build ID.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTd\ETX\ETX\SOH\DC2\EOT\237\t\f,\n\
    \\SO\n\
    \\ACK\EOTd\ETX\ETX\STX\NUL\DC2\EOT\238\t\bI\n\
    \\SI\n\
    \\a\EOTd\ETX\ETX\STX\NUL\ACK\DC2\EOT\238\t\b?\n\
    \\SI\n\
    \\a\EOTd\ETX\ETX\STX\NUL\SOH\DC2\EOT\238\t@D\n\
    \\SI\n\
    \\a\EOTd\ETX\ETX\STX\NUL\ETX\DC2\EOT\238\tGH\n\
    \K\n\
    \\EOT\EOTd\ETX\EOT\DC2\ACK\242\t\EOT\244\t\ENQ\SUB; Replaces the routing rule with the given source Build ID.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTd\ETX\EOT\SOH\DC2\EOT\242\t\f0\n\
    \\SO\n\
    \\ACK\EOTd\ETX\EOT\STX\NUL\DC2\EOT\243\t\bI\n\
    \\SI\n\
    \\a\EOTd\ETX\EOT\STX\NUL\ACK\DC2\EOT\243\t\b?\n\
    \\SI\n\
    \\a\EOTd\ETX\EOT\STX\NUL\SOH\DC2\EOT\243\t@D\n\
    \\SI\n\
    \\a\EOTd\ETX\EOT\STX\NUL\ETX\DC2\EOT\243\tGH\n\
    \\SO\n\
    \\EOT\EOTd\ETX\ENQ\DC2\ACK\246\t\EOT\248\t\ENQ\n\
    \\r\n\
    \\ENQ\EOTd\ETX\ENQ\SOH\DC2\EOT\246\t\f/\n\
    \\SO\n\
    \\ACK\EOTd\ETX\ENQ\STX\NUL\DC2\EOT\247\t\b#\n\
    \\SI\n\
    \\a\EOTd\ETX\ENQ\STX\NUL\ENQ\DC2\EOT\247\t\b\SO\n\
    \\SI\n\
    \\a\EOTd\ETX\ENQ\STX\NUL\SOH\DC2\EOT\247\t\SI\RS\n\
    \\SI\n\
    \\a\EOTd\ETX\ENQ\STX\NUL\ETX\DC2\EOT\247\t!\"\n\
    \\244\ETX\n\
    \\EOT\EOTd\ETX\ACK\DC2\ACK\131\n\
    \\EOT\138\n\
    \\ENQ\SUB\227\ETX This command is intended to be used to complete the rollout of a Build\n\
    \ ID and cleanup unnecessary rules possibly created during a gradual\n\
    \ rollout. Specifically, this command will make the following changes\n\
    \ atomically:\n\
    \  1. Adds an assignment rule (with full ramp) for the target Build ID at\n\
    \     the end of the list.\n\
    \  2. Removes all previously added assignment rules to the given target\n\
    \     Build ID (if any).\n\
    \  3. Removes any fully-ramped assignment rule for other Build IDs.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTd\ETX\ACK\SOH\DC2\EOT\131\n\
    \\f\EM\n\
    \\SO\n\
    \\ACK\EOTd\ETX\ACK\STX\NUL\DC2\EOT\132\n\
    \\b#\n\
    \\SI\n\
    \\a\EOTd\ETX\ACK\STX\NUL\ENQ\DC2\EOT\132\n\
    \\b\SO\n\
    \\SI\n\
    \\a\EOTd\ETX\ACK\STX\NUL\SOH\DC2\EOT\132\n\
    \\SI\RS\n\
    \\SI\n\
    \\a\EOTd\ETX\ACK\STX\NUL\ETX\DC2\EOT\132\n\
    \!\"\n\
    \\190\SOH\n\
    \\ACK\EOTd\ETX\ACK\STX\SOH\DC2\EOT\137\n\
    \\b\ETB\SUB\173\SOH To prevent committing invalid Build IDs, we reject the request if no\n\
    \ pollers has been seen recently for this Build ID. Use the `force`\n\
    \ option to disable this validation.\n\
    \\n\
    \\SI\n\
    \\a\EOTd\ETX\ACK\STX\SOH\ENQ\DC2\EOT\137\n\
    \\b\f\n\
    \\SI\n\
    \\a\EOTd\ETX\ACK\STX\SOH\SOH\DC2\EOT\137\n\
    \\r\DC2\n\
    \\SI\n\
    \\a\EOTd\ETX\ACK\STX\SOH\ETX\DC2\EOT\137\n\
    \\NAK\SYN\n\
    \\f\n\
    \\EOT\EOTd\STX\NUL\DC2\EOT\140\n\
    \\EOT\EM\n\
    \\r\n\
    \\ENQ\EOTd\STX\NUL\ENQ\DC2\EOT\140\n\
    \\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTd\STX\NUL\SOH\DC2\EOT\140\n\
    \\v\DC4\n\
    \\r\n\
    \\ENQ\EOTd\STX\NUL\ETX\DC2\EOT\140\n\
    \\ETB\CAN\n\
    \\f\n\
    \\EOT\EOTd\STX\SOH\DC2\EOT\141\n\
    \\EOT\SUB\n\
    \\r\n\
    \\ENQ\EOTd\STX\SOH\ENQ\DC2\EOT\141\n\
    \\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTd\STX\SOH\SOH\DC2\EOT\141\n\
    \\v\NAK\n\
    \\r\n\
    \\ENQ\EOTd\STX\SOH\ETX\DC2\EOT\141\n\
    \\CAN\EM\n\
    \\248\STX\n\
    \\EOT\EOTd\STX\STX\DC2\EOT\148\n\
    \\EOT\GS\SUB\233\STX A valid conflict_token can be taken from the previous\n\
    \ ListWorkerVersioningRulesResponse or UpdateWorkerVersioningRulesResponse.\n\
    \ An invalid token will cause this request to fail, ensuring that if the rules\n\
    \ for this Task Queue have been modified between the previous and current\n\
    \ operation, the request will fail instead of causing an unpredictable mutation.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTd\STX\STX\ENQ\DC2\EOT\148\n\
    \\EOT\t\n\
    \\r\n\
    \\ENQ\EOTd\STX\STX\SOH\DC2\EOT\148\n\
    \\n\
    \\CAN\n\
    \\r\n\
    \\ENQ\EOTd\STX\STX\ETX\DC2\EOT\148\n\
    \\ESC\FS\n\
    \\SO\n\
    \\EOT\EOTd\b\NUL\DC2\ACK\150\n\
    \\EOT\158\n\
    \\ENQ\n\
    \\r\n\
    \\ENQ\EOTd\b\NUL\SOH\DC2\EOT\150\n\
    \\n\
    \\DC3\n\
    \\f\n\
    \\EOT\EOTd\STX\ETX\DC2\EOT\151\n\
    \\b?\n\
    \\r\n\
    \\ENQ\EOTd\STX\ETX\ACK\DC2\EOT\151\n\
    \\b#\n\
    \\r\n\
    \\ENQ\EOTd\STX\ETX\SOH\DC2\EOT\151\n\
    \$:\n\
    \\r\n\
    \\ENQ\EOTd\STX\ETX\ETX\DC2\EOT\151\n\
    \=>\n\
    \\f\n\
    \\EOT\EOTd\STX\EOT\DC2\EOT\152\n\
    \\bA\n\
    \\r\n\
    \\ENQ\EOTd\STX\EOT\ACK\DC2\EOT\152\n\
    \\b$\n\
    \\r\n\
    \\ENQ\EOTd\STX\EOT\SOH\DC2\EOT\152\n\
    \%<\n\
    \\r\n\
    \\ENQ\EOTd\STX\EOT\ETX\DC2\EOT\152\n\
    \?@\n\
    \\f\n\
    \\EOT\EOTd\STX\ENQ\DC2\EOT\153\n\
    \\b?\n\
    \\r\n\
    \\ENQ\EOTd\STX\ENQ\ACK\DC2\EOT\153\n\
    \\b#\n\
    \\r\n\
    \\ENQ\EOTd\STX\ENQ\SOH\DC2\EOT\153\n\
    \$:\n\
    \\r\n\
    \\ENQ\EOTd\STX\ENQ\ETX\DC2\EOT\153\n\
    \=>\n\
    \\f\n\
    \\EOT\EOTd\STX\ACK\DC2\EOT\154\n\
    \\bJ\n\
    \\r\n\
    \\ENQ\EOTd\STX\ACK\ACK\DC2\EOT\154\n\
    \\b(\n\
    \\r\n\
    \\ENQ\EOTd\STX\ACK\SOH\DC2\EOT\154\n\
    \)E\n\
    \\r\n\
    \\ENQ\EOTd\STX\ACK\ETX\DC2\EOT\154\n\
    \HI\n\
    \\f\n\
    \\EOT\EOTd\STX\a\DC2\EOT\155\n\
    \\bR\n\
    \\r\n\
    \\ENQ\EOTd\STX\a\ACK\DC2\EOT\155\n\
    \\b,\n\
    \\r\n\
    \\ENQ\EOTd\STX\a\SOH\DC2\EOT\155\n\
    \-M\n\
    \\r\n\
    \\ENQ\EOTd\STX\a\ETX\DC2\EOT\155\n\
    \PQ\n\
    \\f\n\
    \\EOT\EOTd\STX\b\DC2\EOT\156\n\
    \\bP\n\
    \\r\n\
    \\ENQ\EOTd\STX\b\ACK\DC2\EOT\156\n\
    \\b+\n\
    \\r\n\
    \\ENQ\EOTd\STX\b\SOH\DC2\EOT\156\n\
    \,K\n\
    \\r\n\
    \\ENQ\EOTd\STX\b\ETX\DC2\EOT\156\n\
    \NO\n\
    \\f\n\
    \\EOT\EOTd\STX\t\DC2\EOT\157\n\
    \\b+\n\
    \\r\n\
    \\ENQ\EOTd\STX\t\ACK\DC2\EOT\157\n\
    \\b\NAK\n\
    \\r\n\
    \\ENQ\EOTd\STX\t\SOH\DC2\EOT\157\n\
    \\SYN%\n\
    \\r\n\
    \\ENQ\EOTd\STX\t\ETX\DC2\EOT\157\n\
    \(*\n\
    \\f\n\
    \\STX\EOTe\DC2\ACK\161\n\
    \\NUL\169\n\
    \\SOH\n\
    \\v\n\
    \\ETX\EOTe\SOH\DC2\EOT\161\n\
    \\b+\n\
    \\f\n\
    \\EOT\EOTe\STX\NUL\DC2\EOT\162\n\
    \\EOT]\n\
    \\r\n\
    \\ENQ\EOTe\STX\NUL\EOT\DC2\EOT\162\n\
    \\EOT\f\n\
    \\r\n\
    \\ENQ\EOTe\STX\NUL\ACK\DC2\EOT\162\n\
    \\rG\n\
    \\r\n\
    \\ENQ\EOTe\STX\NUL\SOH\DC2\EOT\162\n\
    \HX\n\
    \\r\n\
    \\ENQ\EOTe\STX\NUL\ETX\DC2\EOT\162\n\
    \[\\\n\
    \\f\n\
    \\EOT\EOTe\STX\SOH\DC2\EOT\163\n\
    \\EOTn\n\
    \\r\n\
    \\ENQ\EOTe\STX\SOH\EOT\DC2\EOT\163\n\
    \\EOT\f\n\
    \\r\n\
    \\ENQ\EOTe\STX\SOH\ACK\DC2\EOT\163\n\
    \\rO\n\
    \\r\n\
    \\ENQ\EOTe\STX\SOH\SOH\DC2\EOT\163\n\
    \Pi\n\
    \\r\n\
    \\ENQ\EOTe\STX\SOH\ETX\DC2\EOT\163\n\
    \lm\n\
    \\208\SOH\n\
    \\EOT\EOTe\STX\STX\DC2\EOT\168\n\
    \\EOT\GS\SUB\193\SOH This value can be passed back to UpdateWorkerVersioningRulesRequest to\n\
    \ ensure that the rules were not modified between the two updates, which\n\
    \ could lead to lost updates and other confusion.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTe\STX\STX\ENQ\DC2\EOT\168\n\
    \\EOT\t\n\
    \\r\n\
    \\ENQ\EOTe\STX\STX\SOH\DC2\EOT\168\n\
    \\n\
    \\CAN\n\
    \\r\n\
    \\ENQ\EOTe\STX\STX\ETX\DC2\EOT\168\n\
    \\ESC\FS\n\
    \\f\n\
    \\STX\EOTf\DC2\ACK\171\n\
    \\NUL\174\n\
    \\SOH\n\
    \\v\n\
    \\ETX\EOTf\SOH\DC2\EOT\171\n\
    \\b'\n\
    \\f\n\
    \\EOT\EOTf\STX\NUL\DC2\EOT\172\n\
    \\EOT\EM\n\
    \\r\n\
    \\ENQ\EOTf\STX\NUL\ENQ\DC2\EOT\172\n\
    \\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTf\STX\NUL\SOH\DC2\EOT\172\n\
    \\v\DC4\n\
    \\r\n\
    \\ENQ\EOTf\STX\NUL\ETX\DC2\EOT\172\n\
    \\ETB\CAN\n\
    \\f\n\
    \\EOT\EOTf\STX\SOH\DC2\EOT\173\n\
    \\EOT\SUB\n\
    \\r\n\
    \\ENQ\EOTf\STX\SOH\ENQ\DC2\EOT\173\n\
    \\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTf\STX\SOH\SOH\DC2\EOT\173\n\
    \\v\NAK\n\
    \\r\n\
    \\ENQ\EOTf\STX\SOH\ETX\DC2\EOT\173\n\
    \\CAN\EM\n\
    \\f\n\
    \\STX\EOTg\DC2\ACK\176\n\
    \\NUL\184\n\
    \\SOH\n\
    \\v\n\
    \\ETX\EOTg\SOH\DC2\EOT\176\n\
    \\b(\n\
    \\f\n\
    \\EOT\EOTg\STX\NUL\DC2\EOT\177\n\
    \\EOT]\n\
    \\r\n\
    \\ENQ\EOTg\STX\NUL\EOT\DC2\EOT\177\n\
    \\EOT\f\n\
    \\r\n\
    \\ENQ\EOTg\STX\NUL\ACK\DC2\EOT\177\n\
    \\rG\n\
    \\r\n\
    \\ENQ\EOTg\STX\NUL\SOH\DC2\EOT\177\n\
    \HX\n\
    \\r\n\
    \\ENQ\EOTg\STX\NUL\ETX\DC2\EOT\177\n\
    \[\\\n\
    \\f\n\
    \\EOT\EOTg\STX\SOH\DC2\EOT\178\n\
    \\EOTn\n\
    \\r\n\
    \\ENQ\EOTg\STX\SOH\EOT\DC2\EOT\178\n\
    \\EOT\f\n\
    \\r\n\
    \\ENQ\EOTg\STX\SOH\ACK\DC2\EOT\178\n\
    \\rO\n\
    \\r\n\
    \\ENQ\EOTg\STX\SOH\SOH\DC2\EOT\178\n\
    \Pi\n\
    \\r\n\
    \\ENQ\EOTg\STX\SOH\ETX\DC2\EOT\178\n\
    \lm\n\
    \\217\SOH\n\
    \\EOT\EOTg\STX\STX\DC2\EOT\183\n\
    \\EOT\GS\SUB\202\SOH This value can be passed back to UpdateWorkerVersioningRulesRequest to\n\
    \ ensure that the rules were not modified between this List and the Update,\n\
    \ which could lead to lost updates and other confusion.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTg\STX\STX\ENQ\DC2\EOT\183\n\
    \\EOT\t\n\
    \\r\n\
    \\ENQ\EOTg\STX\STX\SOH\DC2\EOT\183\n\
    \\n\
    \\CAN\n\
    \\r\n\
    \\ENQ\EOTg\STX\STX\ETX\DC2\EOT\183\n\
    \\ESC\FS\n\
    \4\n\
    \\STX\EOTh\DC2\ACK\187\n\
    \\NUL\209\n\
    \\SOH\SUB& Deprecated. Use `DescribeTaskQueue`.\n\
    \\n\
    \\v\n\
    \\ETX\EOTh\SOH\DC2\EOT\187\n\
    \\b(\n\
    \\f\n\
    \\EOT\EOTh\STX\NUL\DC2\EOT\188\n\
    \\EOT\EM\n\
    \\r\n\
    \\ENQ\EOTh\STX\NUL\ENQ\DC2\EOT\188\n\
    \\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTh\STX\NUL\SOH\DC2\EOT\188\n\
    \\v\DC4\n\
    \\r\n\
    \\ENQ\EOTh\STX\NUL\ETX\DC2\EOT\188\n\
    \\ETB\CAN\n\
    \\129\ETX\n\
    \\EOT\EOTh\STX\SOH\DC2\EOT\193\n\
    \\EOT\"\SUB\242\STX Build ids to retrieve reachability for. An empty string will be interpreted as an unversioned worker.\n\
    \ The number of build ids that can be queried in a single API call is limited.\n\
    \ Open source users can adjust this limit by setting the server's dynamic config value for\n\
    \ `limit.reachabilityQueryBuildIds` with the caveat that this call can strain the visibility store.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTh\STX\SOH\EOT\DC2\EOT\193\n\
    \\EOT\f\n\
    \\r\n\
    \\ENQ\EOTh\STX\SOH\ENQ\DC2\EOT\193\n\
    \\r\DC3\n\
    \\r\n\
    \\ENQ\EOTh\STX\SOH\SOH\DC2\EOT\193\n\
    \\DC4\GS\n\
    \\r\n\
    \\ENQ\EOTh\STX\SOH\ETX\DC2\EOT\193\n\
    \ !\n\
    \\152\ETX\n\
    \\EOT\EOTh\STX\STX\DC2\EOT\200\n\
    \\EOT$\SUB\137\ETX Task queues to retrieve reachability for. Leave this empty to query for all task queues associated with given\n\
    \ build ids in the namespace.\n\
    \ Must specify at least one task queue if querying for an unversioned worker.\n\
    \ The number of task queues that the server will fetch reachability information for is limited.\n\
    \ See the `GetWorkerTaskReachabilityResponse` documentation for more information.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTh\STX\STX\EOT\DC2\EOT\200\n\
    \\EOT\f\n\
    \\r\n\
    \\ENQ\EOTh\STX\STX\ENQ\DC2\EOT\200\n\
    \\r\DC3\n\
    \\r\n\
    \\ENQ\EOTh\STX\STX\SOH\DC2\EOT\200\n\
    \\DC4\US\n\
    \\r\n\
    \\ENQ\EOTh\STX\STX\ETX\DC2\EOT\200\n\
    \\"#\n\
    \\180\ETX\n\
    \\EOT\EOTh\STX\ETX\DC2\EOT\208\n\
    \\EOT<\SUB\165\ETX Type of reachability to query for.\n\
    \ `TASK_REACHABILITY_NEW_WORKFLOWS` is always returned in the response.\n\
    \ Use `TASK_REACHABILITY_EXISTING_WORKFLOWS` if your application needs to respond to queries on closed workflows.\n\
    \ Otherwise, use `TASK_REACHABILITY_OPEN_WORKFLOWS`. Default is `TASK_REACHABILITY_EXISTING_WORKFLOWS` if left\n\
    \ unspecified.\n\
    \ See the TaskReachability docstring for information about each enum variant.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTh\STX\ETX\ACK\DC2\EOT\208\n\
    \\EOT*\n\
    \\r\n\
    \\ENQ\EOTh\STX\ETX\SOH\DC2\EOT\208\n\
    \+7\n\
    \\r\n\
    \\ENQ\EOTh\STX\ETX\ETX\DC2\EOT\208\n\
    \:;\n\
    \4\n\
    \\STX\EOTi\DC2\ACK\212\n\
    \\NUL\223\n\
    \\SOH\SUB& Deprecated. Use `DescribeTaskQueue`.\n\
    \\n\
    \\v\n\
    \\ETX\EOTi\SOH\DC2\EOT\212\n\
    \\b)\n\
    \\130\ACK\n\
    \\EOT\EOTi\STX\NUL\DC2\EOT\222\n\
    \\EOTU\SUB\243\ENQ Task reachability, broken down by build id and then task queue.\n\
    \ When requesting a large number of task queues or all task queues associated with the given build ids in a\n\
    \ namespace, all task queues will be listed in the response but some of them may not contain reachability\n\
    \ information due to a server enforced limit. When reaching the limit, task queues that reachability information\n\
    \ could not be retrieved for will be marked with a single TASK_REACHABILITY_UNSPECIFIED entry. The caller may issue\n\
    \ another call to get the reachability for those task queues.\n\
    \\n\
    \ Open source users can adjust this limit by setting the server's dynamic config value for\n\
    \ `limit.reachabilityTaskQueueScan` with the caveat that this call can strain the visibility store.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTi\STX\NUL\EOT\DC2\EOT\222\n\
    \\EOT\f\n\
    \\r\n\
    \\ENQ\EOTi\STX\NUL\ACK\DC2\EOT\222\n\
    \\r:\n\
    \\r\n\
    \\ENQ\EOTi\STX\NUL\SOH\DC2\EOT\222\n\
    \;P\n\
    \\r\n\
    \\ENQ\EOTi\STX\NUL\ETX\DC2\EOT\222\n\
    \ST\n\
    \\DEL\n\
    \\STX\EOTj\DC2\ACK\227\n\
    \\NUL\246\n\
    \\SOH\SUBq (-- api-linter: core::0134=disabled\n\
    \     aip.dev/not-precedent: Update RPCs don't follow Google API format. --)\n\
    \\n\
    \\v\n\
    \\ETX\EOTj\SOH\DC2\EOT\227\n\
    \\b&\n\
    \9\n\
    \\EOT\EOTj\STX\NUL\DC2\EOT\229\n\
    \\EOT\EM\SUB+ The namespace name of the target workflow\n\
    \\n\
    \\r\n\
    \\ENQ\EOTj\STX\NUL\ENQ\DC2\EOT\229\n\
    \\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTj\STX\NUL\SOH\DC2\EOT\229\n\
    \\v\DC4\n\
    \\r\n\
    \\ENQ\EOTj\STX\NUL\ETX\DC2\EOT\229\n\
    \\ETB\CAN\n\
    \\206\SOH\n\
    \\EOT\EOTj\STX\SOH\DC2\EOT\233\n\
    \\EOTD\SUB\191\SOH The target workflow id and (optionally) a specific run thereof\n\
    \ (-- api-linter: core::0203::optional=disabled\n\
    \     aip.dev/not-precedent: false positive triggered by the word \"optional\" --)\n\
    \\n\
    \\r\n\
    \\ENQ\EOTj\STX\SOH\ACK\DC2\EOT\233\n\
    \\EOT,\n\
    \\r\n\
    \\ENQ\EOTj\STX\SOH\SOH\DC2\EOT\233\n\
    \-?\n\
    \\r\n\
    \\ENQ\EOTj\STX\SOH\ETX\DC2\EOT\233\n\
    \BC\n\
    \\208\SOH\n\
    \\EOT\EOTj\STX\STX\DC2\EOT\237\n\
    \\EOT&\SUB\193\SOH If set, this call will error if the most recent (if no run id is set on\n\
    \ `workflow_execution`), or specified (if it is) workflow execution is not\n\
    \ part of the same execution chain as this id.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTj\STX\STX\ENQ\DC2\EOT\237\n\
    \\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTj\STX\STX\SOH\DC2\EOT\237\n\
    \\v!\n\
    \\r\n\
    \\ENQ\EOTj\STX\STX\ETX\DC2\EOT\237\n\
    \$%\n\
    \\145\SOH\n\
    \\EOT\EOTj\STX\ETX\DC2\EOT\241\n\
    \\EOT6\SUB\130\SOH Describes when this request should return - basically whether the\n\
    \ update is synchronous, asynchronous, or somewhere in between.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTj\STX\ETX\ACK\DC2\EOT\241\n\
    \\EOT%\n\
    \\r\n\
    \\ENQ\EOTj\STX\ETX\SOH\DC2\EOT\241\n\
    \&1\n\
    \\r\n\
    \\ENQ\EOTj\STX\ETX\ETX\DC2\EOT\241\n\
    \45\n\
    \k\n\
    \\EOT\EOTj\STX\EOT\DC2\EOT\245\n\
    \\EOT/\SUB] The request information that will be delivered all the way down to the\n\
    \ workflow execution.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTj\STX\EOT\ACK\DC2\EOT\245\n\
    \\EOT\"\n\
    \\r\n\
    \\ENQ\EOTj\STX\EOT\SOH\DC2\EOT\245\n\
    \#*\n\
    \\r\n\
    \\ENQ\EOTj\STX\EOT\ETX\DC2\EOT\245\n\
    \-.\n\
    \\f\n\
    \\STX\EOTk\DC2\ACK\248\n\
    \\NUL\140\v\SOH\n\
    \\v\n\
    \\ETX\EOTk\SOH\DC2\EOT\248\n\
    \\b'\n\
    \S\n\
    \\EOT\EOTk\STX\NUL\DC2\EOT\250\n\
    \\EOT4\SUBE Enough information for subsequent poll calls if needed. Never null.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTk\STX\NUL\ACK\DC2\EOT\250\n\
    \\EOT$\n\
    \\r\n\
    \\ENQ\EOTk\STX\NUL\SOH\DC2\EOT\250\n\
    \%/\n\
    \\r\n\
    \\ENQ\EOTk\STX\NUL\ETX\DC2\EOT\250\n\
    \23\n\
    \\204\SOH\n\
    \\EOT\EOTk\STX\SOH\DC2\EOT\255\n\
    \\EOT/\SUB\189\SOH The outcome of the update if and only if the workflow execution update\n\
    \ has completed. If this response is being returned before the update has\n\
    \ completed then this field will not be set.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTk\STX\SOH\ACK\DC2\EOT\255\n\
    \\EOT\"\n\
    \\r\n\
    \\ENQ\EOTk\STX\SOH\SOH\DC2\EOT\255\n\
    \#*\n\
    \\r\n\
    \\ENQ\EOTk\STX\SOH\ETX\DC2\EOT\255\n\
    \-.\n\
    \\215\EOT\n\
    \\EOT\EOTk\STX\STX\DC2\EOT\139\v\EOTJ\SUB\200\EOT The most advanced lifecycle stage that the Update is known to have\n\
    \ reached, where lifecycle stages are ordered\n\
    \ UPDATE_WORKFLOW_EXECUTION_LIFECYCLE_STAGE_UNSPECIFIED <\n\
    \ UPDATE_WORKFLOW_EXECUTION_LIFECYCLE_STAGE_ADMITTED <\n\
    \ UPDATE_WORKFLOW_EXECUTION_LIFECYCLE_STAGE_ACCEPTED <\n\
    \ UPDATE_WORKFLOW_EXECUTION_LIFECYCLE_STAGE_COMPLETED.\n\
    \ UNSPECIFIED will be returned if and only if the server's maximum wait\n\
    \ time was reached before the Update reached the stage specified in the\n\
    \ request WaitPolicy, and before the context deadline expired; clients may\n\
    \ may then retry the call as needed.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTk\STX\STX\ACK\DC2\EOT\139\v\EOT?\n\
    \\r\n\
    \\ENQ\EOTk\STX\STX\SOH\DC2\EOT\139\v@E\n\
    \\r\n\
    \\ENQ\EOTk\STX\STX\ETX\DC2\EOT\139\vHI\n\
    \\f\n\
    \\STX\EOTl\DC2\ACK\142\v\NUL\170\v\SOH\n\
    \\v\n\
    \\ETX\EOTl\SOH\DC2\EOT\142\v\b\"\n\
    \;\n\
    \\EOT\EOTl\STX\NUL\DC2\EOT\144\v\EOT\EM\SUB- Namespace that contains the batch operation\n\
    \\n\
    \\r\n\
    \\ENQ\EOTl\STX\NUL\ENQ\DC2\EOT\144\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTl\STX\NUL\SOH\DC2\EOT\144\v\v\DC4\n\
    \\r\n\
    \\ENQ\EOTl\STX\NUL\ETX\DC2\EOT\144\v\ETB\CAN\n\
    \\148\SOH\n\
    \\EOT\EOTl\STX\SOH\DC2\EOT\147\v\EOT \SUB\133\SOH Visibility query defines the the group of workflow to apply the batch operation\n\
    \ This field and `executions` are mutually exclusive\n\
    \\n\
    \\r\n\
    \\ENQ\EOTl\STX\SOH\ENQ\DC2\EOT\147\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTl\STX\SOH\SOH\DC2\EOT\147\v\v\ESC\n\
    \\r\n\
    \\ENQ\EOTl\STX\SOH\ETX\DC2\EOT\147\v\RS\US\n\
    \>\n\
    \\EOT\EOTl\STX\STX\DC2\EOT\149\v\EOT\SYN\SUB0 Job ID defines the unique ID for the batch job\n\
    \\n\
    \\r\n\
    \\ENQ\EOTl\STX\STX\ENQ\DC2\EOT\149\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTl\STX\STX\SOH\DC2\EOT\149\v\v\DC1\n\
    \\r\n\
    \\ENQ\EOTl\STX\STX\ETX\DC2\EOT\149\v\DC4\NAK\n\
    \5\n\
    \\EOT\EOTl\STX\ETX\DC2\EOT\151\v\EOT\SYN\SUB' Reason to perform the batch operation\n\
    \\n\
    \\r\n\
    \\ENQ\EOTl\STX\ETX\ENQ\DC2\EOT\151\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTl\STX\ETX\SOH\DC2\EOT\151\v\v\DC1\n\
    \\r\n\
    \\ENQ\EOTl\STX\ETX\ETX\DC2\EOT\151\v\DC4\NAK\n\
    \q\n\
    \\EOT\EOTl\STX\EOT\DC2\EOT\154\v\EOTE\SUBc Executions to apply the batch operation\n\
    \ This field and `visibility_query` are mutually exclusive\n\
    \\n\
    \\r\n\
    \\ENQ\EOTl\STX\EOT\EOT\DC2\EOT\154\v\EOT\f\n\
    \\r\n\
    \\ENQ\EOTl\STX\EOT\ACK\DC2\EOT\154\v\r5\n\
    \\r\n\
    \\ENQ\EOTl\STX\EOT\SOH\DC2\EOT\154\v6@\n\
    \\r\n\
    \\ENQ\EOTl\STX\EOT\ETX\DC2\EOT\154\vCD\n\
    \\143\EOT\n\
    \\EOT\EOTl\STX\ENQ\DC2\EOT\161\v\EOT(\SUB\128\EOT Limit for the number of operations processed per second within this batch.\n\
    \ Its purpose is to reduce the stress on the system caused by batch operations, which helps to prevent system\n\
    \ overload and minimize potential delays in executing ongoing tasks for user workers.\n\
    \ Note that when no explicit limit is provided, the server will operate according to its limit defined by the\n\
    \ dynamic configuration key `worker.batcherRPS`. This also applies if the value in this field exceeds the\n\
    \ server's configured limit.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTl\STX\ENQ\ENQ\DC2\EOT\161\v\EOT\t\n\
    \\r\n\
    \\ENQ\EOTl\STX\ENQ\SOH\DC2\EOT\161\v\n\
    \#\n\
    \\r\n\
    \\ENQ\EOTl\STX\ENQ\ETX\DC2\EOT\161\v&'\n\
    \!\n\
    \\EOT\EOTl\b\NUL\DC2\ACK\163\v\EOT\169\v\ENQ\SUB\DC1 Operation input\n\
    \\n\
    \\r\n\
    \\ENQ\EOTl\b\NUL\SOH\DC2\EOT\163\v\n\
    \\DC3\n\
    \\f\n\
    \\EOT\EOTl\STX\ACK\DC2\EOT\164\v\bS\n\
    \\r\n\
    \\ENQ\EOTl\STX\ACK\ACK\DC2\EOT\164\v\b7\n\
    \\r\n\
    \\ENQ\EOTl\STX\ACK\SOH\DC2\EOT\164\v8M\n\
    \\r\n\
    \\ENQ\EOTl\STX\ACK\ETX\DC2\EOT\164\vPR\n\
    \\f\n\
    \\EOT\EOTl\STX\a\DC2\EOT\165\v\bI\n\
    \\r\n\
    \\ENQ\EOTl\STX\a\ACK\DC2\EOT\165\v\b2\n\
    \\r\n\
    \\ENQ\EOTl\STX\a\SOH\DC2\EOT\165\v3C\n\
    \\r\n\
    \\ENQ\EOTl\STX\a\ETX\DC2\EOT\165\vFH\n\
    \\f\n\
    \\EOT\EOTl\STX\b\DC2\EOT\166\v\bU\n\
    \\r\n\
    \\ENQ\EOTl\STX\b\ACK\DC2\EOT\166\v\b8\n\
    \\r\n\
    \\ENQ\EOTl\STX\b\SOH\DC2\EOT\166\v9O\n\
    \\r\n\
    \\ENQ\EOTl\STX\b\ETX\DC2\EOT\166\vRT\n\
    \\f\n\
    \\EOT\EOTl\STX\t\DC2\EOT\167\v\bM\n\
    \\r\n\
    \\ENQ\EOTl\STX\t\ACK\DC2\EOT\167\v\b4\n\
    \\r\n\
    \\ENQ\EOTl\STX\t\SOH\DC2\EOT\167\v5G\n\
    \\r\n\
    \\ENQ\EOTl\STX\t\ETX\DC2\EOT\167\vJL\n\
    \\f\n\
    \\EOT\EOTl\STX\n\
    \\DC2\EOT\168\v\bG\n\
    \\r\n\
    \\ENQ\EOTl\STX\n\
    \\ACK\DC2\EOT\168\v\b1\n\
    \\r\n\
    \\ENQ\EOTl\STX\n\
    \\SOH\DC2\EOT\168\v2A\n\
    \\r\n\
    \\ENQ\EOTl\STX\n\
    \\ETX\DC2\EOT\168\vDF\n\
    \\f\n\
    \\STX\EOTm\DC2\ACK\172\v\NUL\173\v\SOH\n\
    \\v\n\
    \\ETX\EOTm\SOH\DC2\EOT\172\v\b#\n\
    \\f\n\
    \\STX\EOTn\DC2\ACK\175\v\NUL\184\v\SOH\n\
    \\v\n\
    \\ETX\EOTn\SOH\DC2\EOT\175\v\b!\n\
    \;\n\
    \\EOT\EOTn\STX\NUL\DC2\EOT\177\v\EOT\EM\SUB- Namespace that contains the batch operation\n\
    \\n\
    \\r\n\
    \\ENQ\EOTn\STX\NUL\ENQ\DC2\EOT\177\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTn\STX\NUL\SOH\DC2\EOT\177\v\v\DC4\n\
    \\r\n\
    \\ENQ\EOTn\STX\NUL\ETX\DC2\EOT\177\v\ETB\CAN\n\
    \\FS\n\
    \\EOT\EOTn\STX\SOH\DC2\EOT\179\v\EOT\SYN\SUB\SO Batch job id\n\
    \\n\
    \\r\n\
    \\ENQ\EOTn\STX\SOH\ENQ\DC2\EOT\179\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTn\STX\SOH\SOH\DC2\EOT\179\v\v\DC1\n\
    \\r\n\
    \\ENQ\EOTn\STX\SOH\ETX\DC2\EOT\179\v\DC4\NAK\n\
    \0\n\
    \\EOT\EOTn\STX\STX\DC2\EOT\181\v\EOT\SYN\SUB\" Reason to stop a batch operation\n\
    \\n\
    \\r\n\
    \\ENQ\EOTn\STX\STX\ENQ\DC2\EOT\181\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTn\STX\STX\SOH\DC2\EOT\181\v\v\DC1\n\
    \\r\n\
    \\ENQ\EOTn\STX\STX\ETX\DC2\EOT\181\v\DC4\NAK\n\
    \(\n\
    \\EOT\EOTn\STX\ETX\DC2\EOT\183\v\EOT\CAN\SUB\SUB Identity of the operator\n\
    \\n\
    \\r\n\
    \\ENQ\EOTn\STX\ETX\ENQ\DC2\EOT\183\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTn\STX\ETX\SOH\DC2\EOT\183\v\v\DC3\n\
    \\r\n\
    \\ENQ\EOTn\STX\ETX\ETX\DC2\EOT\183\v\SYN\ETB\n\
    \\f\n\
    \\STX\EOTo\DC2\ACK\186\v\NUL\187\v\SOH\n\
    \\v\n\
    \\ETX\EOTo\SOH\DC2\EOT\186\v\b\"\n\
    \\f\n\
    \\STX\EOTp\DC2\ACK\189\v\NUL\194\v\SOH\n\
    \\v\n\
    \\ETX\EOTp\SOH\DC2\EOT\189\v\b%\n\
    \;\n\
    \\EOT\EOTp\STX\NUL\DC2\EOT\191\v\EOT\EM\SUB- Namespace that contains the batch operation\n\
    \\n\
    \\r\n\
    \\ENQ\EOTp\STX\NUL\ENQ\DC2\EOT\191\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTp\STX\NUL\SOH\DC2\EOT\191\v\v\DC4\n\
    \\r\n\
    \\ENQ\EOTp\STX\NUL\ETX\DC2\EOT\191\v\ETB\CAN\n\
    \\FS\n\
    \\EOT\EOTp\STX\SOH\DC2\EOT\193\v\EOT\SYN\SUB\SO Batch job id\n\
    \\n\
    \\r\n\
    \\ENQ\EOTp\STX\SOH\ENQ\DC2\EOT\193\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTp\STX\SOH\SOH\DC2\EOT\193\v\v\DC1\n\
    \\r\n\
    \\ENQ\EOTp\STX\SOH\ETX\DC2\EOT\193\v\DC4\NAK\n\
    \\f\n\
    \\STX\EOTq\DC2\ACK\196\v\NUL\217\v\SOH\n\
    \\v\n\
    \\ETX\EOTq\SOH\DC2\EOT\196\v\b&\n\
    \$\n\
    \\EOT\EOTq\STX\NUL\DC2\EOT\198\v\EOT@\SUB\SYN Batch operation type\n\
    \\n\
    \\r\n\
    \\ENQ\EOTq\STX\NUL\ACK\DC2\EOT\198\v\EOT,\n\
    \\r\n\
    \\ENQ\EOTq\STX\NUL\SOH\DC2\EOT\198\v-;\n\
    \\r\n\
    \\ENQ\EOTq\STX\NUL\ETX\DC2\EOT\198\v>?\n\
    \\FS\n\
    \\EOT\EOTq\STX\SOH\DC2\EOT\200\v\EOT\SYN\SUB\SO Batch job ID\n\
    \\n\
    \\r\n\
    \\ENQ\EOTq\STX\SOH\ENQ\DC2\EOT\200\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTq\STX\SOH\SOH\DC2\EOT\200\v\v\DC1\n\
    \\r\n\
    \\ENQ\EOTq\STX\SOH\ETX\DC2\EOT\200\v\DC4\NAK\n\
    \%\n\
    \\EOT\EOTq\STX\STX\DC2\EOT\202\v\EOT8\SUB\ETB Batch operation state\n\
    \\n\
    \\r\n\
    \\ENQ\EOTq\STX\STX\ACK\DC2\EOT\202\v\EOT-\n\
    \\r\n\
    \\ENQ\EOTq\STX\STX\SOH\DC2\EOT\202\v.3\n\
    \\r\n\
    \\ENQ\EOTq\STX\STX\ETX\DC2\EOT\202\v67\n\
    \*\n\
    \\EOT\EOTq\STX\ETX\DC2\EOT\204\v\EOT-\SUB\FS Batch operation start time\n\
    \\n\
    \\r\n\
    \\ENQ\EOTq\STX\ETX\ACK\DC2\EOT\204\v\EOT\GS\n\
    \\r\n\
    \\ENQ\EOTq\STX\ETX\SOH\DC2\EOT\204\v\RS(\n\
    \\r\n\
    \\ENQ\EOTq\STX\ETX\ETX\DC2\EOT\204\v+,\n\
    \*\n\
    \\EOT\EOTq\STX\EOT\DC2\EOT\206\v\EOT-\SUB\FS Batch operation close time\n\
    \\n\
    \\r\n\
    \\ENQ\EOTq\STX\EOT\ACK\DC2\EOT\206\v\EOT\GS\n\
    \\r\n\
    \\ENQ\EOTq\STX\EOT\SOH\DC2\EOT\206\v\RS(\n\
    \\r\n\
    \\ENQ\EOTq\STX\EOT\ETX\DC2\EOT\206\v+,\n\
    \%\n\
    \\EOT\EOTq\STX\ENQ\DC2\EOT\208\v\EOT$\SUB\ETB Total operation count\n\
    \\n\
    \\r\n\
    \\ENQ\EOTq\STX\ENQ\ENQ\DC2\EOT\208\v\EOT\t\n\
    \\r\n\
    \\ENQ\EOTq\STX\ENQ\SOH\DC2\EOT\208\v\n\
    \\US\n\
    \\r\n\
    \\ENQ\EOTq\STX\ENQ\ETX\DC2\EOT\208\v\"#\n\
    \(\n\
    \\EOT\EOTq\STX\ACK\DC2\EOT\210\v\EOT'\SUB\SUB Complete operation count\n\
    \\n\
    \\r\n\
    \\ENQ\EOTq\STX\ACK\ENQ\DC2\EOT\210\v\EOT\t\n\
    \\r\n\
    \\ENQ\EOTq\STX\ACK\SOH\DC2\EOT\210\v\n\
    \\"\n\
    \\r\n\
    \\ENQ\EOTq\STX\ACK\ETX\DC2\EOT\210\v%&\n\
    \'\n\
    \\EOT\EOTq\STX\a\DC2\EOT\212\v\EOT&\SUB\EM Failure operation count\n\
    \\n\
    \\r\n\
    \\ENQ\EOTq\STX\a\ENQ\DC2\EOT\212\v\EOT\t\n\
    \\r\n\
    \\ENQ\EOTq\STX\a\SOH\DC2\EOT\212\v\n\
    \!\n\
    \\r\n\
    \\ENQ\EOTq\STX\a\ETX\DC2\EOT\212\v$%\n\
    \8\n\
    \\EOT\EOTq\STX\b\DC2\EOT\214\v\EOT\CAN\SUB* Identity indicates the operator identity\n\
    \\n\
    \\r\n\
    \\ENQ\EOTq\STX\b\ENQ\DC2\EOT\214\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTq\STX\b\SOH\DC2\EOT\214\v\v\DC3\n\
    \\r\n\
    \\ENQ\EOTq\STX\b\ETX\DC2\EOT\214\v\SYN\ETB\n\
    \?\n\
    \\EOT\EOTq\STX\t\DC2\EOT\216\v\EOT\ETB\SUB1 Reason indicates the reason to stop a operation\n\
    \\n\
    \\r\n\
    \\ENQ\EOTq\STX\t\ENQ\DC2\EOT\216\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTq\STX\t\SOH\DC2\EOT\216\v\v\DC1\n\
    \\r\n\
    \\ENQ\EOTq\STX\t\ETX\DC2\EOT\216\v\DC4\SYN\n\
    \\f\n\
    \\STX\EOTr\DC2\ACK\219\v\NUL\226\v\SOH\n\
    \\v\n\
    \\ETX\EOTr\SOH\DC2\EOT\219\v\b\"\n\
    \;\n\
    \\EOT\EOTr\STX\NUL\DC2\EOT\221\v\EOT\EM\SUB- Namespace that contains the batch operation\n\
    \\n\
    \\r\n\
    \\ENQ\EOTr\STX\NUL\ENQ\DC2\EOT\221\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTr\STX\NUL\SOH\DC2\EOT\221\v\v\DC4\n\
    \\r\n\
    \\ENQ\EOTr\STX\NUL\ETX\DC2\EOT\221\v\ETB\CAN\n\
    \\RS\n\
    \\EOT\EOTr\STX\SOH\DC2\EOT\223\v\EOT\CAN\SUB\DLE List page size\n\
    \\n\
    \\r\n\
    \\ENQ\EOTr\STX\SOH\ENQ\DC2\EOT\223\v\EOT\t\n\
    \\r\n\
    \\ENQ\EOTr\STX\SOH\SOH\DC2\EOT\223\v\n\
    \\DC3\n\
    \\r\n\
    \\ENQ\EOTr\STX\SOH\ETX\DC2\EOT\223\v\SYN\ETB\n\
    \\US\n\
    \\EOT\EOTr\STX\STX\DC2\EOT\225\v\EOT\RS\SUB\DC1 Next page token\n\
    \\n\
    \\r\n\
    \\ENQ\EOTr\STX\STX\ENQ\DC2\EOT\225\v\EOT\t\n\
    \\r\n\
    \\ENQ\EOTr\STX\STX\SOH\DC2\EOT\225\v\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOTr\STX\STX\ETX\DC2\EOT\225\v\FS\GS\n\
    \\f\n\
    \\STX\EOTs\DC2\ACK\228\v\NUL\232\v\SOH\n\
    \\v\n\
    \\ETX\EOTs\SOH\DC2\EOT\228\v\b#\n\
    \P\n\
    \\EOT\EOTs\STX\NUL\DC2\EOT\230\v\EOTI\SUBB BatchOperationInfo contains the basic info about batch operation\n\
    \\n\
    \\r\n\
    \\ENQ\EOTs\STX\NUL\EOT\DC2\EOT\230\v\EOT\f\n\
    \\r\n\
    \\ENQ\EOTs\STX\NUL\ACK\DC2\EOT\230\v\r5\n\
    \\r\n\
    \\ENQ\EOTs\STX\NUL\SOH\DC2\EOT\230\v6D\n\
    \\r\n\
    \\ENQ\EOTs\STX\NUL\ETX\DC2\EOT\230\vGH\n\
    \\f\n\
    \\EOT\EOTs\STX\SOH\DC2\EOT\231\v\EOT\RS\n\
    \\r\n\
    \\ENQ\EOTs\STX\SOH\ENQ\DC2\EOT\231\v\EOT\t\n\
    \\r\n\
    \\ENQ\EOTs\STX\SOH\SOH\DC2\EOT\231\v\n\
    \\EM\n\
    \\r\n\
    \\ENQ\EOTs\STX\SOH\ETX\DC2\EOT\231\v\FS\GS\n\
    \\f\n\
    \\STX\EOTt\DC2\ACK\234\v\NUL\246\v\SOH\n\
    \\v\n\
    \\ETX\EOTt\SOH\DC2\EOT\234\v\b*\n\
    \c\n\
    \\EOT\EOTt\STX\NUL\DC2\EOT\237\v\EOT\EM\SUBU The namespace of the workflow execution to which the update was\n\
    \ originally issued.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTt\STX\NUL\ENQ\DC2\EOT\237\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTt\STX\NUL\SOH\DC2\EOT\237\v\v\DC4\n\
    \\r\n\
    \\ENQ\EOTt\STX\NUL\ETX\DC2\EOT\237\v\ETB\CAN\n\
    \]\n\
    \\EOT\EOTt\STX\SOH\DC2\EOT\240\v\EOT4\SUBO The update reference returned in the initial\n\
    \ UpdateWorkflowExecutionResponse\n\
    \\n\
    \\r\n\
    \\ENQ\EOTt\STX\SOH\ACK\DC2\EOT\240\v\EOT$\n\
    \\r\n\
    \\ENQ\EOTt\STX\SOH\SOH\DC2\EOT\240\v%/\n\
    \\r\n\
    \\ENQ\EOTt\STX\SOH\ETX\DC2\EOT\240\v23\n\
    \T\n\
    \\EOT\EOTt\STX\STX\DC2\EOT\242\v\EOT\CAN\SUBF The identity of the worker/client who is polling this update outcome\n\
    \\n\
    \\r\n\
    \\ENQ\EOTt\STX\STX\ENQ\DC2\EOT\242\v\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTt\STX\STX\SOH\DC2\EOT\242\v\v\DC3\n\
    \\r\n\
    \\ENQ\EOTt\STX\STX\ETX\DC2\EOT\242\v\SYN\ETB\n\
    \p\n\
    \\EOT\EOTt\STX\ETX\DC2\EOT\245\v\EOT6\SUBb Describes when this poll request should return a response.\n\
    \ Omit to request a non-blocking poll.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTt\STX\ETX\ACK\DC2\EOT\245\v\EOT%\n\
    \\r\n\
    \\ENQ\EOTt\STX\ETX\SOH\DC2\EOT\245\v&1\n\
    \\r\n\
    \\ENQ\EOTt\STX\ETX\ETX\DC2\EOT\245\v45\n\
    \\f\n\
    \\STX\EOTu\DC2\ACK\248\v\NUL\140\f\SOH\n\
    \\v\n\
    \\ETX\EOTu\SOH\DC2\EOT\248\v\b+\n\
    \\178\STX\n\
    \\EOT\EOTu\STX\NUL\DC2\EOT\254\v\EOT/\SUB\163\STX The outcome of the update if and only if the update has completed. If\n\
    \ this response is being returned before the update has completed (e.g. due\n\
    \ to the specification of a wait policy that only waits on\n\
    \ UPDATE_WORKFLOW_EXECUTION_LIFECYCLE_STAGE_ACCEPTED) then this field will\n\
    \ not be set.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTu\STX\NUL\ACK\DC2\EOT\254\v\EOT\"\n\
    \\r\n\
    \\ENQ\EOTu\STX\NUL\SOH\DC2\EOT\254\v#*\n\
    \\r\n\
    \\ENQ\EOTu\STX\NUL\ETX\DC2\EOT\254\v-.\n\
    \\215\EOT\n\
    \\EOT\EOTu\STX\SOH\DC2\EOT\137\f\EOTJ\SUB\200\EOT The most advanced lifecycle stage that the Update is known to have\n\
    \ reached, where lifecycle stages are ordered\n\
    \ UPDATE_WORKFLOW_EXECUTION_LIFECYCLE_STAGE_UNSPECIFIED <\n\
    \ UPDATE_WORKFLOW_EXECUTION_LIFECYCLE_STAGE_ADMITTED <\n\
    \ UPDATE_WORKFLOW_EXECUTION_LIFECYCLE_STAGE_ACCEPTED <\n\
    \ UPDATE_WORKFLOW_EXECUTION_LIFECYCLE_STAGE_COMPLETED.\n\
    \ UNSPECIFIED will be returned if and only if the server's maximum wait\n\
    \ time was reached before the Update reached the stage specified in the\n\
    \ request WaitPolicy, and before the context deadline expired; clients may\n\
    \ may then retry the call as needed.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTu\STX\SOH\ACK\DC2\EOT\137\f\EOT?\n\
    \\r\n\
    \\ENQ\EOTu\STX\SOH\SOH\DC2\EOT\137\f@E\n\
    \\r\n\
    \\ENQ\EOTu\STX\SOH\ETX\DC2\EOT\137\fHI\n\
    \>\n\
    \\EOT\EOTu\STX\STX\DC2\EOT\139\f\EOT4\SUB0 Sufficient information to address this update.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTu\STX\STX\ACK\DC2\EOT\139\f\EOT$\n\
    \\r\n\
    \\ENQ\EOTu\STX\STX\SOH\DC2\EOT\139\f%/\n\
    \\r\n\
    \\ENQ\EOTu\STX\STX\ETX\DC2\EOT\139\f23\n\
    \\f\n\
    \\STX\EOTv\DC2\ACK\142\f\NUL\150\f\SOH\n\
    \\v\n\
    \\ETX\EOTv\SOH\DC2\EOT\142\f\b!\n\
    \\f\n\
    \\EOT\EOTv\STX\NUL\DC2\EOT\143\f\EOT\EM\n\
    \\r\n\
    \\ENQ\EOTv\STX\NUL\ENQ\DC2\EOT\143\f\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTv\STX\NUL\SOH\DC2\EOT\143\f\v\DC4\n\
    \\r\n\
    \\ENQ\EOTv\STX\NUL\ETX\DC2\EOT\143\f\ETB\CAN\n\
    \F\n\
    \\EOT\EOTv\STX\SOH\DC2\EOT\145\f\EOT\CAN\SUB8 The identity of the client who initiated this request.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTv\STX\SOH\ENQ\DC2\EOT\145\f\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTv\STX\SOH\SOH\DC2\EOT\145\f\v\DC3\n\
    \\r\n\
    \\ENQ\EOTv\STX\SOH\ETX\DC2\EOT\145\f\SYN\ETB\n\
    \\f\n\
    \\EOT\EOTv\STX\STX\DC2\EOT\146\f\EOT7\n\
    \\r\n\
    \\ENQ\EOTv\STX\STX\ACK\DC2\EOT\146\f\EOT'\n\
    \\r\n\
    \\ENQ\EOTv\STX\STX\SOH\DC2\EOT\146\f(2\n\
    \\r\n\
    \\ENQ\EOTv\STX\STX\ETX\DC2\EOT\146\f56\n\
    \\175\SOH\n\
    \\EOT\EOTv\STX\ETX\DC2\EOT\149\f\EOTU\SUB\160\SOH Information about this worker's build identifier and if it is choosing to use the versioning\n\
    \ feature. See the `WorkerVersionCapabilities` docstring for more.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTv\STX\ETX\ACK\DC2\EOT\149\f\EOT4\n\
    \\r\n\
    \\ENQ\EOTv\STX\ETX\SOH\DC2\EOT\149\f5P\n\
    \\r\n\
    \\ENQ\EOTv\STX\ETX\ETX\DC2\EOT\149\fST\n\
    \\f\n\
    \\STX\EOTw\DC2\ACK\152\f\NUL\157\f\SOH\n\
    \\v\n\
    \\ETX\EOTw\SOH\DC2\EOT\152\f\b\"\n\
    \t\n\
    \\EOT\EOTw\STX\NUL\DC2\EOT\154\f\EOT\EM\SUBf An opaque unique identifier for this task for correlating a completion request the embedded request.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTw\STX\NUL\ENQ\DC2\EOT\154\f\EOT\t\n\
    \\r\n\
    \\ENQ\EOTw\STX\NUL\SOH\DC2\EOT\154\f\n\
    \\DC4\n\
    \\r\n\
    \\ENQ\EOTw\STX\NUL\ETX\DC2\EOT\154\f\ETB\CAN\n\
    \R\n\
    \\EOT\EOTw\STX\SOH\DC2\EOT\156\f\EOT.\SUBD Embedded request as translated from the incoming frontend request.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTw\STX\SOH\ACK\DC2\EOT\156\f\EOT!\n\
    \\r\n\
    \\ENQ\EOTw\STX\SOH\SOH\DC2\EOT\156\f\")\n\
    \\r\n\
    \\ENQ\EOTw\STX\SOH\ETX\DC2\EOT\156\f,-\n\
    \\f\n\
    \\STX\EOTx\DC2\ACK\159\f\NUL\167\f\SOH\n\
    \\v\n\
    \\ETX\EOTx\SOH\DC2\EOT\159\f\b(\n\
    \\f\n\
    \\EOT\EOTx\STX\NUL\DC2\EOT\160\f\EOT\EM\n\
    \\r\n\
    \\ENQ\EOTx\STX\NUL\ENQ\DC2\EOT\160\f\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTx\STX\NUL\SOH\DC2\EOT\160\f\v\DC4\n\
    \\r\n\
    \\ENQ\EOTx\STX\NUL\ETX\DC2\EOT\160\f\ETB\CAN\n\
    \F\n\
    \\EOT\EOTx\STX\SOH\DC2\EOT\162\f\EOT\CAN\SUB8 The identity of the client who initiated this request.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTx\STX\SOH\ENQ\DC2\EOT\162\f\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTx\STX\SOH\SOH\DC2\EOT\162\f\v\DC3\n\
    \\r\n\
    \\ENQ\EOTx\STX\SOH\ETX\DC2\EOT\162\f\SYN\ETB\n\
    \R\n\
    \\EOT\EOTx\STX\STX\DC2\EOT\164\f\EOT\EM\SUBD A unique identifier for this task as received via a poll response.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTx\STX\STX\ENQ\DC2\EOT\164\f\EOT\t\n\
    \\r\n\
    \\ENQ\EOTx\STX\STX\SOH\DC2\EOT\164\f\n\
    \\DC4\n\
    \\r\n\
    \\ENQ\EOTx\STX\STX\ETX\DC2\EOT\164\f\ETB\CAN\n\
    \L\n\
    \\EOT\EOTx\STX\ETX\DC2\EOT\166\f\EOT0\SUB> Embedded response to be translated into a frontend response.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTx\STX\ETX\ACK\DC2\EOT\166\f\EOT\"\n\
    \\r\n\
    \\ENQ\EOTx\STX\ETX\SOH\DC2\EOT\166\f#+\n\
    \\r\n\
    \\ENQ\EOTx\STX\ETX\ETX\DC2\EOT\166\f./\n\
    \\f\n\
    \\STX\EOTy\DC2\ACK\169\f\NUL\170\f\SOH\n\
    \\v\n\
    \\ETX\EOTy\SOH\DC2\EOT\169\f\b)\n\
    \\f\n\
    \\STX\EOTz\DC2\ACK\172\f\NUL\180\f\SOH\n\
    \\v\n\
    \\ETX\EOTz\SOH\DC2\EOT\172\f\b%\n\
    \\f\n\
    \\EOT\EOTz\STX\NUL\DC2\EOT\173\f\EOT\EM\n\
    \\r\n\
    \\ENQ\EOTz\STX\NUL\ENQ\DC2\EOT\173\f\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTz\STX\NUL\SOH\DC2\EOT\173\f\v\DC4\n\
    \\r\n\
    \\ENQ\EOTz\STX\NUL\ETX\DC2\EOT\173\f\ETB\CAN\n\
    \F\n\
    \\EOT\EOTz\STX\SOH\DC2\EOT\175\f\EOT\CAN\SUB8 The identity of the client who initiated this request.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTz\STX\SOH\ENQ\DC2\EOT\175\f\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOTz\STX\SOH\SOH\DC2\EOT\175\f\v\DC3\n\
    \\r\n\
    \\ENQ\EOTz\STX\SOH\ETX\DC2\EOT\175\f\SYN\ETB\n\
    \2\n\
    \\EOT\EOTz\STX\STX\DC2\EOT\177\f\EOT\EM\SUB$ A unique identifier for this task.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTz\STX\STX\ENQ\DC2\EOT\177\f\EOT\t\n\
    \\r\n\
    \\ENQ\EOTz\STX\STX\SOH\DC2\EOT\177\f\n\
    \\DC4\n\
    \\r\n\
    \\ENQ\EOTz\STX\STX\ETX\DC2\EOT\177\f\ETB\CAN\n\
    \2\n\
    \\EOT\EOTz\STX\ETX\DC2\EOT\179\f\EOT1\SUB$ The error the handler failed with.\n\
    \\n\
    \\r\n\
    \\ENQ\EOTz\STX\ETX\ACK\DC2\EOT\179\f\EOT&\n\
    \\r\n\
    \\ENQ\EOTz\STX\ETX\SOH\DC2\EOT\179\f',\n\
    \\r\n\
    \\ENQ\EOTz\STX\ETX\ETX\DC2\EOT\179\f/0\n\
    \\f\n\
    \\STX\EOT{\DC2\ACK\182\f\NUL\183\f\SOH\n\
    \\v\n\
    \\ETX\EOT{\SOH\DC2\EOT\182\f\b&\n\
    \\f\n\
    \\STX\EOT|\DC2\ACK\185\f\NUL\208\f\SOH\n\
    \\v\n\
    \\ETX\EOT|\SOH\DC2\EOT\185\f\b$\n\
    \\f\n\
    \\EOT\EOT|\STX\NUL\DC2\EOT\186\f\EOT\EM\n\
    \\r\n\
    \\ENQ\EOT|\STX\NUL\ENQ\DC2\EOT\186\f\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT|\STX\NUL\SOH\DC2\EOT\186\f\v\DC4\n\
    \\r\n\
    \\ENQ\EOT|\STX\NUL\ETX\DC2\EOT\186\f\ETB\CAN\n\
    \\235\STX\n\
    \\EOT\EOT|\STX\SOH\DC2\EOT\196\f\EOT&\SUB\220\STX List of operations to execute within a single workflow.\n\
    \\n\
    \ Preconditions:\n\
    \ - The list of operations must not be empty.\n\
    \ - The workflow ids must match across operations.\n\
    \ - The only valid list of operations at this time is [StartWorkflow, UpdateWorkflow], in this order.\n\
    \\n\
    \ Note that additional operation-specific restrictions have to be considered.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT|\STX\SOH\EOT\DC2\EOT\196\f\EOT\f\n\
    \\r\n\
    \\ENQ\EOT|\STX\SOH\ACK\DC2\EOT\196\f\r\SYN\n\
    \\r\n\
    \\ENQ\EOT|\STX\SOH\SOH\DC2\EOT\196\f\ETB!\n\
    \\r\n\
    \\ENQ\EOT|\STX\SOH\ETX\DC2\EOT\196\f$%\n\
    \\SO\n\
    \\EOT\EOT|\ETX\NUL\DC2\ACK\198\f\EOT\207\f\ENQ\n\
    \\r\n\
    \\ENQ\EOT|\ETX\NUL\SOH\DC2\EOT\198\f\f\NAK\n\
    \\DLE\n\
    \\ACK\EOT|\ETX\NUL\b\NUL\DC2\ACK\199\f\b\206\f\t\n\
    \\SI\n\
    \\a\EOT|\ETX\NUL\b\NUL\SOH\DC2\EOT\199\f\SO\ETB\n\
    \\128\SOH\n\
    \\ACK\EOT|\ETX\NUL\STX\NUL\DC2\EOT\203\f\f=\SUBp Additional restrictions:\n\
    \ - setting `cron_schedule` is invalid\n\
    \ - setting `request_eager_execution` is invalid\n\
    \\n\
    \\SI\n\
    \\a\EOT|\ETX\NUL\STX\NUL\ACK\DC2\EOT\203\f\f)\n\
    \\SI\n\
    \\a\EOT|\ETX\NUL\STX\NUL\SOH\DC2\EOT\203\f*8\n\
    \\SI\n\
    \\a\EOT|\ETX\NUL\STX\NUL\ETX\DC2\EOT\203\f;<\n\
    \\SO\n\
    \\ACK\EOT|\ETX\NUL\STX\SOH\DC2\EOT\205\f\f?\n\
    \\SI\n\
    \\a\EOT|\ETX\NUL\STX\SOH\ACK\DC2\EOT\205\f\f*\n\
    \\SI\n\
    \\a\EOT|\ETX\NUL\STX\SOH\SOH\DC2\EOT\205\f+:\n\
    \\SI\n\
    \\a\EOT|\ETX\NUL\STX\SOH\ETX\DC2\EOT\205\f=>\n\
    \\f\n\
    \\STX\EOT}\DC2\ACK\210\f\NUL\219\f\SOH\n\
    \\v\n\
    \\ETX\EOT}\SOH\DC2\EOT\210\f\b%\n\
    \\f\n\
    \\EOT\EOT}\STX\NUL\DC2\EOT\211\f\EOT$\n\
    \\r\n\
    \\ENQ\EOT}\STX\NUL\EOT\DC2\EOT\211\f\EOT\f\n\
    \\r\n\
    \\ENQ\EOT}\STX\NUL\ACK\DC2\EOT\211\f\r\NAK\n\
    \\r\n\
    \\ENQ\EOT}\STX\NUL\SOH\DC2\EOT\211\f\SYN\US\n\
    \\r\n\
    \\ENQ\EOT}\STX\NUL\ETX\DC2\EOT\211\f\"#\n\
    \\SO\n\
    \\EOT\EOT}\ETX\NUL\DC2\ACK\213\f\EOT\218\f\ENQ\n\
    \\r\n\
    \\ENQ\EOT}\ETX\NUL\SOH\DC2\EOT\213\f\f\DC4\n\
    \\DLE\n\
    \\ACK\EOT}\ETX\NUL\b\NUL\DC2\ACK\214\f\b\217\f\t\n\
    \\SI\n\
    \\a\EOT}\ETX\NUL\b\NUL\SOH\DC2\EOT\214\f\SO\SYN\n\
    \\SO\n\
    \\ACK\EOT}\ETX\NUL\STX\NUL\DC2\EOT\215\f\f>\n\
    \\SI\n\
    \\a\EOT}\ETX\NUL\STX\NUL\ACK\DC2\EOT\215\f\f*\n\
    \\SI\n\
    \\a\EOT}\ETX\NUL\STX\NUL\SOH\DC2\EOT\215\f+9\n\
    \\SI\n\
    \\a\EOT}\ETX\NUL\STX\NUL\ETX\DC2\EOT\215\f<=\n\
    \\SO\n\
    \\ACK\EOT}\ETX\NUL\STX\SOH\DC2\EOT\216\f\f@\n\
    \\SI\n\
    \\a\EOT}\ETX\NUL\STX\SOH\ACK\DC2\EOT\216\f\f+\n\
    \\SI\n\
    \\a\EOT}\ETX\NUL\STX\SOH\SOH\DC2\EOT\216\f,;\n\
    \\SI\n\
    \\a\EOT}\ETX\NUL\STX\SOH\ETX\DC2\EOT\216\f>?b\ACKproto3"